FastIniFiles Memory Leaks

[himitsu]

man kann das mit With machen, aber man sollte schon den richtigen Desktructor nutzen

Zitat:

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;

[hoika]

Hallo,

Free wird zwar aufgerufen,
der Destructor heisst aber Destroy.

Mit dem with stimmt wie oben.

Was spricht gegeben

FIniFile:=
with FIniFile

Ausserdem verstehe ich nicht,
warum man heutzutage noch IniFiles benutzt ...


Heiko

[hoika]

Hallo,

zeig doch noch mal den Leak-Code (fastmm).


Heiko

[API]

Zitat:

Zitat von hoika

Hallo,
zeig doch noch mal den Leak-Code (fastmm).
Heiko

http://codepaste.net/78msi9

[hoika]

Hallo,

hast du die unit überarbeitet (Free->Destroy override) ?

Der Programmierer der Unit hat die leaks "eingebaut".



Heiko

[jfheins]

FastIniFile + MemeoryLeak :arrow: http://en.wikipedia.org/wiki/Space-time_tradeoff :mrgreen:

[Klaus01]

Delphi-Quellcode:

  TFIniEntry = class
    public
      // Markiert den Wert zum löschen, d.h. er wird nicht geschrieben
      Deleted: Boolean;
      constructor Create;
  end;

  TFIniFile = class
    private
      // Sektionen in der Datei
      Entries: array of TFIniEntry;
      // Index der geöffneten Sektion
      CurrentSection: Integer;

Delphi-Quellcode:

destructor TFIniFile.Free(SaveChanges: Boolean = true);
begin
  if isChanged and SaveChanges then Save;
  Finalize(Entries);
  inherited Destroy;
end;

Ich denke, dass Finalize nur das dyn Array dereferenziert aber
nicht die Instanzen von TFIniEntry freigibt.
Dazu müßte vorher durch das Array iteriert werden und die Instanzen
freigeben werden.

Grüße
Klaus

[hoika]

Hallo,

Einspruch.

Lese ich mir die Hilfe zu Finalize durch,
macht sie genau so, was sie soll.

Aber ein
Entries.Dispose;

geht hier doch auch ?

Noch mal die Frage an den TE,
hast du Free durch Destroy ersetzt ?


Heiko

[hoika]

Hallo,

Die Memleaks sind bei

1.

Delphi-Quellcode:

SetLength(Values, Length(Values)+1);
Values[High(Values)] := TFIniValue.Create(Buf1, Buf2);

und 2. bei

Delphi-Quellcode:

SetLength(Entries, Length(Entries)+1);
Entries[High(Entries)] := TFIniSection.Create(Buf);

Warum, darf der Programmierer selber rausfinden.
Ich klink mich aus.


Heiko

[himitsu]

Joar, man könnte auch die schonmal gestellte Frage aufwerfen:
Warum unbedingt INI?

PS: TMemIniFile und andere schnellere Ini-Varianten gibt es notfalls auch noch.

PSS: Finalize gibt nur das Array, aber nicht die darin enthaltenen Objekte frei.
Finalize gibt allgemein keine Objekte/Pointer frei, sondern nur Strings, DynArrays und Interfaces.

Und wenn ich mir diese Unit so ansehe, dann werden alle intern erstellten Objekte niemals freigegeben.