Memoryleak oder doch nicht?

[Fritzew]

Das wird sicher nur 1+ durchlaufen?

Delphi-Quellcode:

if nReading = 0 then
  Begin
    New(FToPBuffer);
    LineStart := FToPBuffer;
    LineStart^.Nr := 0;
  end;

[EWeiss]

Zitat:

Zitat von Fritzew (Beitrag 1397560)

Das wird sicher nur 1+ durchlaufen?

Delphi-Quellcode:

if nReading = 0 then
  Begin
    New(FToPBuffer);
    LineStart := FToPBuffer;
    LineStart^.Nr := 0;
  end;

Ja wenn nReading = 0

EDIT:
Und LineStart wird ja freigegeben.
Da es der gleiche Pointer wie der von FToPBuffer ist darf ich FToPBuffer nicht nochmals freigeben das wäre ja dann doppelt gemoppelt.


gruss

[Fritzew]

Ohne mehr Code kann ich Dir nicht mehr sagen,
aber es wird ja wohl definitiv mehr erzeugt als freigeben wird.....
Mach doch mal Spasseshalber zum Debugger eine globale Variable die du hochzählst bei jedem! erzeugen und runterzählst beim freigeben. Sollte ja am Ende 0 sein :-)

[EWeiss]

Zitat:

Zitat von Fritzew (Beitrag 1397568)

Ohne mehr Code kann ich Dir nicht mehr sagen,
aber es wird ja wohl definitiv mehr erzeugt als freigeben wird.....
Mach doch mal Spasseshalber zum Debugger eine globale Variable die du hochzählst bei jedem! erzeugen und runterzählst beim freigeben. Sollte ja am Ende 0 sein :-)

Kein Problem muss mich da wohl durch wurschteln. Danke.

gruss

[Stevie]

Davon abgesehen kannst dir evtl den ganzen Pointerkrams/New/Dispose und ne linked list sparen und ein Array nutzen. Linked lists sind nur dann wirklich besser als arrays wenn man zwischendurch viele! Hinzufüge oder Entfernen Operationen hat, da sie die nachfolgenden Elemente in einem Array nicht verschieben müssen oder das Array resizen müssen. Und auch dann würd ich das nur nach ausgiebigen Performancetests unterschreiben, denn selbst dann spielt noch eine Rolle über was für eine Lebensspanne der liste wir reden. Lebt sie lang genug, wird sie irgendwann Opfer von Speicherfragmentierung (die ganzen Nodes liegen kreuz und quer im RAM) wogegen der CPU Cache/Prefetcher bei nem Array nur kurz zuckt.

[EWeiss]

Ich lese eine Textdatei ein und diese bzw.. die geparsten Daten davon leben solange wie die Classe lebt.
Ein Array nutzt in dem fall gar nichts.

EDIT:
Die eingelesenen Daten werden über die gesamte Classe verteilt.

gruss

[Stevie]

Zitat:

Zitat von EWeiss (Beitrag 1397584)

Ich lese eine Textdatei ein und diese bzw.. die geparsten Daten davon leben solange wie die Classe lebt.
Ein Array nutzt in dem fall gar nichts.

Ein array of TParseFile statt einer linked list nützt nichts weil?

[EWeiss]

Zitat:

Zitat von Stevie (Beitrag 1397586)

Zitat:

Zitat von EWeiss (Beitrag 1397584)

Ich lese eine Textdatei ein und diese bzw.. die geparsten Daten davon leben solange wie die Classe lebt.
Ein Array nutzt in dem fall gar nichts.

Ein array of TParseFile statt einer linked list nützt nichts weil?

Ach so meinst du das jo könnte man machen.
Muss mir das mal überlegen.

EDIT:
Ich werde das mit der linkedlist behalten um das zu ändern brauche ich wieder Tage.

gruss

[EWeiss]

Denke das ist nicht so einfach zu beheben.
Bei jeden Fenster das ich erstelle muss ich die Textdatei einlesen.

Selbst wenn ich die Classe vorher zerstöre und neu erstellen lasse bleiben die strings irgendwie im Speicher.
Was dann zu dem besagten Speicherleck führt.

Das Hauptproblem ist das ich die Classe nicht zerstören kann wenn ich das Fenster schließe so bleibt immer was im Speicher zurück.
Glaube muss mein Konzept nochmal überdenken nur mit einem Array of Class ist es nicht getan.

Hmmm...

EDIT:
Musste noch kleine Änderungen hinzufügen..
Ein einfaches

Delphi-Quellcode:

FPBuffer.Str := ''

oder

Delphi-Quellcode:

finalize(FPBuffer^);

hat leider nichts gebracht die Strings waren immer noch im Speicher.

Aber so geht's.

Delphi-Quellcode:

  FPBuffer := LineStart;
  while (FPBuffer.Nr < LineStart.Max) do
  begin
    FPBuffer := FPBuffer.Ptr;
    FPBuffer.Str := '';
  end;
  Dispose(FPBuffer);
  FPBuffer := nil;

Jetzt noch den Data Kram dann sollte es gut sein.

gruss