Forum: Object-Pascal / Delphi-Language
Delphi
by Uwe Raabe,
10. Aug 2009
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:
Procedure TZeile.SetZeichner(IsZeichner: TWinControl);
Begin
FZeichner:=IsZeichner;
ZUser.Parent := FZeichner;
ZAnteil.Parent := FZeichner;
ZProzent.Parent...
Forum: Object-Pascal / Delphi-Language
Delphi
by Uwe Raabe,
10. Aug 2009
Der Fehler liegt hier:
SetLength(Zeile,Anzahl);
Zeile:=TZeile.Create(Form1);
besser so: