Registriert seit: 29. Okt 2004
68 Beiträge
Delphi 6 Professional
|
Re: recursive Dateisuche -> Algorythmusfragen
4. Nov 2004, 14:13
angenommen verzeichnissstrucktur
c:\
c:\unterverz
er sucht also in C:\ findet "unterverz" und geht mit
GetFilesInDirectory(ADirectory+SR.Name,AMask,AList,True);
in die nächste ebene(c:\unterverz), dort gibt es keine unterverzeichnisse meher --> er läuft bis zum ende der funktion und kehrt an die stelle zurück von der er aufgerufen wurde(also eine ebene höher C:\),
also 1 Zeile unterhalb von
GetFilesInDirectory(ADirectory+SR.Name,AMask,AList,True);
da ist nun until FindNext(SR)<>0;
--> er sucht nach dem nächsten Verzeichniss in C:\
|