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.