Verzeichnisse nach Dateien durchsuchen

[renekr]

Hi,

Ja so ätte i es a machen können,Ich habe halt den Start Parameter nicht Global gesetzt sondern in der Procedure,und wenn i da mit Roofolder arbeite wird dieser verändert.
Ich habe nun einen 2. Parameter dazu gemacht und da den selben Such Fodler nochmals übergeben.
Aber deine Lösung ist glaube ich praktischer.

aufruf:
[/delphi]
FindAllFilesPDES(ProgramFilesDir+'\Becker\',Progra mFilesDir+'\Test\','*.exe*',true);
[delphi]

Ich habe noch was abgeändert,und zwar wollte ich das ich Rekursive suche, aber wen ner ein Verz. gefunden hat sollte er nicht mehr rek. suchen.
Weil meine Dateien nur im 1. Unterverz. liegen,mehrere sind nicht nötig.


Danke