Speicher Freigeben

[stiftII]

Hallo,

ich habe folgende Funktion:

Delphi-Quellcode:

function ExtraColumsStringsDB(firma:string):TStringlist;
var
  Temp: Array Of TColumn;
  i: integer;
begin
     Result := TStringList.Create;
     Temp := GetExtraFields(firma);
     for i:=0 to high(Temp) do
     begin
       result.Add(Temp[i].FieldName );
     end;
end;

Aufgerufen wird diese zB so:
ExtraColumsStringsDB('name').count Allerdings ist mir aufgefallen, dass bei dieser Vorgehensweise der verwendete Speicher der Funktion niemals freigegeben werden kann. (FPC hat ja keinen Garbage Collector)

Wenn man den Speicher in der Funktion freigeben würde, könnte man den Rückgabewert (TStringlist) ja niemals benutzen.

Gibt es irgendeine Möglichkeit diese nicht mehr verwendeten Variablen nach Ausführung der Funktion wieder freizugeben ?

Grüße
stiftII