Proceduren in Klassen

[freak4fun]

Da gibt es keine Probleme, erst wenn TLine von TCircle oder umgekehrt erbt.
Edit: Neutral General hat recht.

Nicht vergessen:

Delphi-Quellcode:

SetLength(list, 3);
list[1]:=Tcircle.create;
list[2]:=Tline.create;

Und:

Delphi-Quellcode:

list[1].free;
list[2].free;