Zitat von
mkinzler:
Um es flexibler zu gestalten, würde ich folgende Änderung einführen:
Delphi-Quellcode:
Procedure MakeLabel( AOwner, AParent: TComponent);
begin
LB:=TLabel.Create( AOwner);
...
LB.Parent := AParent;
...
Danke für die Antwort, das stimmt das muss natürlich nachher flexibler werden.
Was sagt jetzt Owner aus MakeLabel(Form1,RichEdit); in etwa.
Edit: habs mal ausprobiert
LB.Parent:=AParent;
Inkompatible Typen TWinControl und TComponent