Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
38.944 Beiträge
 
Delphi 10.4 Sydney
 
#4

AW: Objekteigenschaften gehen verloren

  Alt 18. Nov 2014, 14:17
Zeichnete Delphi 7 die Property nicht auch schon bunt? (jenachdem ob/wie gespeichert wird)



Und besser auch so
Delphi-Quellcode:
property MyLabel: TLabel read FLabel write AssignLabel;

procedure TTestComponent.AssignLabel(Value: TLabel);
begin
  FLabel.Assign(Value);
end;
Das Label vewaltest du ja ausschließlich innerhalb der Komponente, also sollte man extern den Zeiger besser nicht beschreiben und eine andere Instanz zuweisen dürfen. (nur dessen Property)
Ein NIL zugewiesen und deine Komponente reagiert bestimmt ganz nett.

Das Free ist auch nicht unbedingt nötig (bereitet aber keine Probleme), denn durch den Owner (das Self in TLabel.Create(Self); ) gibt dein Panel das Label selbsttändig frei.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
Delphi-Tage 2005-2014
  Mit Zitat antworten Zitat