man kann das mit With machen, aber man sollte schon den richtigen Desktructor nutzen
Zitat von
API:
@hoika: auch nach ändern durch inherited Destroy; geht der Leak nicht weg.
man überschreibt nicht Free, sondern Destroy
Delphi-Quellcode:
destructor TFIniSection.Destroy; // in der Definition mit OVERRIDE;
var
i: Integer;
begin
Name := '';
Finalize(Values);
inherited;
end;