Memory Leaks bei Verwendung von System.JSON

[BastiFantasti]

Hallo zusammen,

es liegt schon an der Delphi Implementierung des JSON Parsers.
Ich habe gerade das gleiche Problem. Ich polle eine REST Schnittstelle von Delphi aus, die mir einen JSON String zurück liefert. Nach kurzer Zeit bekomme ich die Meldung das der Speicher voll ist.

Ich versuche ein einfaches Beispielprogramm zu erstellen und stelle es hier ein.

Viele Grüße
Bastian

[BastiFantasti]

Sodele,

Projekt ist im Anhang.

Zum Testen:
- Projekt auf Debug kompilieren
- über IDE starten
- 1-2 mal die Schaltfläche btnParse klicken
- Anwendung beenden

FastMM4 zeigt die Leaks und schreibt ein Logfile im gleichen Verzeichnis

[Der schöne Günther]

Was erwartest du?

Du lässt dir mittels JsonValue := TJSonObject.ParseJSONValue(JsonString); etwas erstellen und gibst es nie wieder frei.

Du musst das auch schon wieder freigeben.

Delphi-Quellcode:

  // create TJSonObject from string
  JsonValue := TJSonObject.ParseJSONValue(JsonString);
  if Assigned(JSonValue) then
     try

        // get the array
        JsonArray := JsonValue.GetValue<TJSONArray>('phones');

        // iterate the array
        for ArrayElement in JsonArray do begin
           if ArrayElement.GetValue<String>('name') = User then
           begin
            Result := ArrayElement.GetValue<boolean>(Field);
            break;
           end;
        end;
     finally
        JSonValue.Destroy();
     end;

[freimatz]

Noch besser "JSonValue.Free();" statt "JSonValue.Destroy();"

[Der schöne Günther]

Nein, warum? Es ist doch völlig klar dass die Variable nicht nil ist, also kann man sich die nochmalige Überprüfung auch sparen.

[BastiFantasti]

allein das Json Objekt Freizugeben bringt nichts.
Hab ich auch schon versucht.

Delphi macht da intern so viele Unterobjekte (je nach Datenstruktur) und gibt die Teile aber nicht geregelt wieder frei wenn ich die JsonValue Variable freigebe.
JsonValue.free hatte ich drin, die Leaks waren dennoch da.

[himitsu]

Das macht man nicht, weil

weil

na weil in de Hilfe steht, dass man Destroy nicht direkt aufruft, deswegen.

[BastiFantasti]

ich hatte es mit .free drin.
FastMM hat aber dennoch ordentlich Leaks rausgeschrieben.

Ich teste nochmal
und ja, die destroy Methode rufe ich normal nicht direkt auf.
Normal FreeAndNil


Update:

jetzt habe ich es mit FreeAndNil freigegeben und jetzt scheint er gerade keinen Speicher mehr zu verschwenden.
Komisch ist, dass ich es vorher genau so hatte ...