Bitte lass das!
Grundsatz:
Wer erzeugt, gibt frei.
Die Konsequenz hiervon ist es, die benötigte Liste als Parameter an eine Procedure zu übergeben. Aus eigener Erfahrung weiß ich, das Funktionsergebnisse manchmal anfangen ein Eigenleben zu führen.
Also nicht
Persliste:=HolePersliste;
Sondern
Delphi-Quellcode:
persliste:=TStringlist.Create;
FuellePersliste(persliste);
..
persliste.Free;
Gruß
K-H