FastIniFiles Memory Leaks

[hoika]

Hallo,

wer programmiert denn so schlimm

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
  FIniFile: TFIniFile;
begin
  FIniFile:= TFIniFile.Create('C:\...\test.ini');
  try
  finally
    FIniFile.Free;
  end;
end;

oder mit dem with

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  with TFIniFile.Create('C:\...\test.ini') do
  begin
    try
    (*........*)
    finally
      Free;
    end;
  end;
end;

Schönes Bsp., wie man sich mit with Probleme bereiten kann
(liegt aber nicht am with, sondern an der Programmierung).

Delphi-Quellcode:

constructor TFIniFile.Create(const FileName: string; CommentChar: Char = '#');
var
  Stream: TStream;
begin
  //...
  Create(Stream);
  Stream.Free;
end;

Heiko