Forum: Object-Pascal / Delphi-Language
Delphi
by mkinzler,
13. Jun 2006
Dann würde ich die (zusätzliche) Funktionalität von TProgramm aufsplitten, die Vereinbarungen als Interface und die Implemnetierung in eine Helperklasse.
TMyForm = class (Tform, IProgramm);
MyForm.helper: TProgrammHelper;
TMyFrame = class( TFrame, IProgramm);
MyFrame.helper: TProgrammHelper;
Forum: Object-Pascal / Delphi-Language
Delphi
by mkinzler,
13. Jun 2006
Warum den das die Implementierung liegt doch in TProgramm
TProgramm <- TFrame
TMyForm <- TForm
TmyForm.frame: TProgramm;
oder du setzt wie gesagr höher im Vererbungsschema an, so daß wieder beide (TMyFrame/TmyForm) von TProgramm erben.
Forum: Object-Pascal / Delphi-Language
Delphi
by mkinzler,
13. Jun 2006
Warum setzt du dann nicht an einer höheren Stelle an?
Forum: Object-Pascal / Delphi-Language
Delphi
by mkinzler,
13. Jun 2006
Delphi erlaubt nur die (Mehrfach-)Vererbung von Interfaces. Eine Möglichkeit wäre die Kombination von Interface und Implementierung durch ein Memberobjekt. Aber sinnvoller wäre es das Vererbungsshema anzupassen.