Delphi Prüfen ob Ordner, Unterordner hat

Thema durchsuchen

Ansicht

Themen-Optionen

Prüfen ob Ordner, Unterordner hat

Ein Thema von SirThornberry · begonnen am 26. Apr 2006 · letzter Beitrag vom 28. Apr 2006

Vorheriger Beitrag

Nächster Beitrag

SirThornberry

(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge

Delphi 2006 Professional

Prüfen ob Ordner, Unterordner hat

26. Apr 2006, 13:23

Hallo,

wie kann ich schnell prüfen ob ein Ordner einen Unterordner hat?
Zur versuche ich mit

markieren

Delphi-Quellcode:

			FindFirst(Folder, faDirecotry, LSearchRec)

[...]

zu prüfen ob im Suchergebnis ein Ordner ist. Jedoch werden bei der Angabe von "faDirectory" nicht nur Ordner zurück geliefert sondern auch Dateien. Wenn ich also einen Ordner mit 5000 Dateien hab und prüfen will ob in diesem Ordner ein Unterordner existiert, gehe ich mit FindFirst-FindNext 5000 dateien durch um dann festzustellen,dass kein Ordner dabei ist. Das muss doch auch irgendwie effektiver funktionieren.

Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's