Sta je ustvari problem... prikazivanje ili cuvanje podataka?
Za podatke mozes iskoristiti klasu slicnu ovoj
Code:
TOsoba = class
ID: Cardinal;
Otac, Majka: TOsoba;
BratSestra: array of TOsoba;
SinCerka: array of TOsoba;
Ime, Prezime: String;
DatumiVremeRodjenja: TDateTime;
.
.
.
end;
Kada snimas podatke na disk snimis prvo ID (sam odluci kako zelis da ga kreiras... bitno je samo da ne postoje osobe sa itim ID), ID osoba koji su roditelji, brace, sestre, sinovi, i posle snimis ime, prezime i ostale podatke koji ti trebaju.
Prikaz bi mogao da uradis samo do nekog odredjenog kolena... recimo prikazujes 5 generacija... sto je se vise udaljavas od pocetne osobe prikazujes sve manje detalja kako bi ti ostali vise prostora za ispis podataka na ekranu. Za cukunbabu je dovoljno da ispises samo ime i datum... nema potrede prikazivati njene brace i sestre... ako korisnik zeli i to da vidi pomerise kroz stablo blize njoj. Ako hoces da prikazujes kompletno stablo od recimo 5 generacija to ce biti bas komplikovano prikazati na ekranu.