Bezug zu StringList auflösen

[messie]

Moin,

ich erstelle in einer function eine StringList, die als result an eine globale StringList übergeben wird:

Delphi-Quellcode:

function LeseDatei : TStringList;
var
  LocList : TStringList;
begin
  LocList := TStringList.Create;
  LocList.Add(irgendwas aus einer Datei);
  result := LocList;
end;


begin
  GlobalList := LeseDatei;
end;

bei der Übergabe des result übergebe ich ja nur einen Pointer auf den von LocList allozierten Speicher.
Wie kann ich diesen Speicher so an GlobalList übertragen, daß ich LocList nil setzen kann?

Grüße, Messie