Einzelnen Beitrag anzeigen

Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.431 Beiträge
 
Delphi 12 Athens
 
#7

AW: Eigene Komponete / Darstellungsfehler?!

  Alt 22. Dez 2014, 13:36
Das Problem sind die Setter:

Delphi-Quellcode:
procedure FAMCard.SetHeader(const Value: FAMPanel);
begin
  FHeader := Value;
end;
Hier ist der vorige Inhalt von FHeader immer noch instanziert, wird aber nie mehr freigegeben. (Nie, abgesehen davon, daß bei Programmende der Speicher natürlich schon wieder freigegeben wird)


Alternativ:
Delphi-Quellcode:
procedure FAMCard.SetHeader(const Value: FAMPanel);
begin
  FHeader.Free;
  FHeader := Value;
end;
oder
Delphi-Quellcode:
procedure FAMCard.SetHeader(const Value: FAMPanel);
begin
  FHeader.Assign(Value);
end;
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat