Einzelnen Beitrag anzeigen

Benutzerbild von Flocke
Flocke

Registriert seit: 9. Jun 2005
Ort: Unna
1.172 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#10

Re: Neue Version von FindAllFiles

  Alt 12. Jul 2005, 07:44
Zitat von Luckie:
Delphi-Quellcode:
if Recurse then
  //FindAllFiles(FileList, AParentFolder + LSearchRec.Name + '\');
  LFindAllFiles(IncludeTrailingPathDelimiter(RootFolder));
Die Zeile, die du eingesetzt hast, hat ja auch mit der Ursprungszeile wenig zu tun
So sollte es gehen:

Delphi-Quellcode:
if Recurse then
  LFindAllFiles(FileList, AParentFolder + LSearchRec.Name + '\');
Volker
  Mit Zitat antworten Zitat