Zitat von
Schwedenbitter:
Warum werden die Elemente nicht sichtbar? Ich habe doch - wenn auch etwas kompliziert - Form1 als Parent übergeben.
In TZeile.Create erzeugst du die Labels und weist deren Parent den aktuellen Inhalt von FZeichner zu - dieser ist aber zu diesem Zeitpunkt noch nil! Er wird erst nach dem TZeile.Create gesetzt. Folgende Änderung sollte helfen:
Delphi-Quellcode:
Procedure TZeile.SetZeichner(IsZeichner: TWinControl);
Begin
FZeichner:=IsZeichner;
ZUser.Parent := FZeichner;
ZAnteil.Parent := FZeichner;
ZProzent.Parent := FZeichner;
ZDauer.Parent := FZeichner;
ZAnzahl.Parent := FZeichner;
End;