Sinnvoll ist es, die Liste vom Aufrufer deiner Funktion bereitstellen zu lassen:
Delphi-Quellcode:
procedure FillTokenList(const sCommand, sSeparator : string; liste:TStrings);
begin
Assert(Assigned(liste)); // zur Sicherheit
liste.clear;
...
end;
Damit wird die Funktion zu einer Procedure. Du kannst auch TStrings-Objekte übergeben, die kein TStringList sind. z.B.:
FillTokenList('EXEC', ',', Memo1.Lines);
Der vorgeschlagene Umweg über "TokenList.Text" ist keinesfalls zu empfehlen.