Delphi-Quellcode:
constructor TMyClass.Create(AOwner: TComponent);
begin
inherited;
if AOwner is TWincontrol then Parent := TWincontrol(AOwner);
//...
end;
Ich habe zwar noch nicht verstanden warum, aber so funktioniert es.
Delphi-Quellcode:
constructor TMyClass.CreateWithParent(AOwner: TComponent; AParent: TWinControl);
begin
inherited Create(AOwner);
Parent := AParent;
//...
end;
So funktioniert es (noch) nicht.
Wenn ich den Konstruktor so im Deklarationsteil der Klasse hinschreibe, meldet der Kompiler folgende Fehlermeldung:
"Deklaration von 'Create' unterscheidet sich von vorheriger Deklaration".
Könntest Du bitte auch noch etwas erläutern, wie der beschriebene Code funktioniert, damit ich das verstehe und nachvollziehen kann.
Schon mal vielen Dank.