Klassenkonzept

[quendolineDD]

Du verwendest hier das sogenannte Containment. Du hast eine Klasse, welche eine weitere Klasse beinhaltet.
Ich persönlich finde es so nicht gut. Da du ja nun auch wiederum von Vater und Mutter die jeweiligen Eltern benennen musst. Ansonsten bekommst du ja inkonsistente Daten.

Aber sei es drum. Du hast einen Constructor, welcher 4 Parameter erwartet: Den Namen, das Alter und Vater und Mutter.
Im Implementationsteil muss das dann wie folgt lauten:

Delphi-Quellcode:

implementation
   constructor TPersonClass.create(name : String;
                                   alter : Integer;
                                   Mutter, Vater : TPersonClass);
   begin
     self.name := name;
     self.alter := alter;
     self.Mutter := Mutter;
     self.Vater := Vater;
   end;

Dekliniert werden die Personen jeweils wie folgt:

Delphi-Quellcode:

Person1 := TPersonenClass.create('Peter', 16, nil, nil);
  Person2 := TPersonenClass.create('Anna', 38, Person1, nil);

Interessant, dass die Mutter deiner Person2 Peter heißt

Du solltest dir hier wirklich ein anderes Klassenkonzept aussuchen.