Zitat von
little-x:
Delphi-Quellcode:
Type TFather = Class
vorname: string;
alter: integer;
end;
Type TChild = Class
vorname: string;
alter: integer;
Vater: Pointer; // <- hier kommt das Problem; hier soll der Papa rein.
end;
Die Idee mit dem Pointer ist ein Irrweg!!
Das Problem lässt sich einfach mit einer
Vorwärtsdeklaration lösen:
Delphi-Quellcode:
Type
TFather = class; // Vorwärtsdeklaration. Delphi weiss jetzt, es gibt die Klasse
TChild = Class
vorname: string;
alter: integer;
Vater: TFather; // ganz einfach so
end;
TFather = Class
vorname: string;
alter: integer;
end;
In würde übrigens von
TPersistent ableiten, damit man die Objekte auch kopieren kann.