Einzelnen Beitrag anzeigen

Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.534 Beiträge
 
Delphi 11 Alexandria
 
#5

AW: Ein Object in mehreren Listen

  Alt 18. Mai 2011, 08:06
Ich habe das zwar noch nie versucht bzw. gebraucht, aber möglicherweise so:
Delphi-Quellcode:
destructor TDings.Destroy;
begin
  if AllesOK then
    begin
      MachSauber;
      inherited;
    end;
end;
Nur: wozu soll das gut sein, wenn ich Free aufrufe, gehe ich davon aus, dass das Objekt danach auch garantiert freigegeben ist.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat