@mirage228:
Ja, die Idee kam mir auch (ist auch vom Stil her elegant):
Hat man nur noch eine Klasse (und ein Modul) mehr
Danke euch für die schnellen Antworten:
Für die Vollständigkeit:
Delphi-Quellcode:
type
A1 = class
[...]
end;
Delphi-Quellcode:
type
B = class
<list of A1>
[...]
end;
Delphi-Quellcode:
type
A2 = class(A1)
myB: B;
[...]
end;
Gibt es in Delphi abstrakte Klassen (wär der Wahnsinn!)???