Zitat von
jfheins:
Ich glaube eher es liegt hier: Self := Create(Stream);
Das passiert eigentlich implizit im constructor - mit anderen Worten: Es wird ein Objekt erstellt, an Self zugewiesen und dann der Kontruktor aufgerufen. Wenn der jetzt noch ein Objekt erstellt und wieder an Self zuweist dann geht jede Referenz auf das erste verloren, aber der Speicher wird nicht freigegeben.
Wie kann man das beheben?
@hoika: Was ist denn daran falsch?
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var
FIniFile: TFIniFile;
begin
FIniFile:= TFIniFile.Create('C:\...\test.ini');
try
finally
FIniFile.Free;
end;
end;