Memory-Leak WMI

[El.Blindo]

Tjo, leuchtet ein, aber irgendwie brauch ich ja die TStringList als Ergebnis der Function.

Aber wie krieg ich den Speicher wieder frei ?

result.free erzeugt ein Exception, das mag er nicht.

Wenn ich mir vorher ein Stringlist erstelle :

Delphi-Quellcode:

function TForm1.WhatEver : TStringList;
var
  StList    : TStringList;

Begin
  StList := TStringList.Create; // Erstellen
  try
    blah              
    blah
    blah
    StList.add(Result of blah);
  result := StList; // Zuweisen des Ergebnisses an Result
  finally
     StList.Free;   // Speicher freigeben
  end;
end;

Dann gibts auch ne Exception!

Confused, scheint nicht so einfach zu sein ne TStringlist als Rückgabewert zu haben.