Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Unterverzeichnisse auslesen (https://www.delphipraxis.net/29135-unterverzeichnisse-auslesen.html)

fred.reichbier 4. Sep 2004 11:43


Unterverzeichnisse auslesen
 
Hi Leute!
Wie kann ich alle Unterverzeichnisse eines Ordners auslesen?
Dateien auslesen kann ich schon :-D .
Danke,
fred

Steve 4. Sep 2004 12:22

Re: Unterverzeichnisse auslesen
 
Hi,

versuchs mal mit Delphi-Referenz durchsuchenFindFirst(strVerzeichnis,faDirectory,srMySearchRec); wobei strVerzeichnis mit *.* enden sollte ;)
Wenn Du von diesen Verzeichnissen nochmal die unterverzeichnisse willst, solltest Du's am Klügsten rekursiv lösen :)

Gruß
Stephan

mytar 4. Sep 2004 13:16

Re: Unterverzeichnisse auslesen
 
Schau dir die folgende Unit von Luckie an:
FindAllFiles

mytar 5. Sep 2004 09:12

Re: Unterverzeichnisse auslesen
 
Das ganze ist auch in der Code-Library verfügbar:

Code-Library: Verzeichnisse nach Dateien durchsuchen

fred.reichbier 5. Sep 2004 10:34

Re: Unterverzeichnisse auslesen
 
Oh, danke!

SirThornberry 5. Sep 2004 10:45

Re: Unterverzeichnisse auslesen
 
Zitat:

Zitat von Steve
Hi,

versuchs mal mit Delphi-Referenz durchsuchenFindFirst(strVerzeichnis,faDirectory,srMySearchRec); wobei strVerzeichnis mit *.* enden sollte ;)
Wenn Du von diesen Verzeichnissen nochmal die unterverzeichnisse willst, solltest Du's am Klügsten rekursiv lösen :)

warum "*.*"? Dabei werden nur Ordner aufgelistet in denen ein "." vorkommt. Imho sollte auch nur "*" reichen

MathiasSimmack 5. Sep 2004 10:47

Re: Unterverzeichnisse auslesen
 
Zitat:

Zitat von SirThornberry
warum "*.*"? Dabei werden nur Ordner aufgelistet in denen ein "." vorkommt. Imho sollte auch nur "*" reichen

Du denkst zu sehr an Linux. "*.*" schließt auch Ordner ohne irgendwelche Punkte im Namen ein.


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:44 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz