Probleme mit FindAllFiles aus der Codelib

[endeffects]

hat sich schon erledigt, ich bin wiedermal so clever

Delphi-Quellcode:

var FileList: TStrings;
begin
FileList:= TStringList.Create;
FindAllFiles(FileList, 'C:\cache\', '*.*', True);
FileList.SaveToFile('c:\test.txt');