Moin Alexander,
eine Prüfung von
Attr = faDirectory
kann leicht daneben gehen, da die Eigenschaft Attr ein Bitfeld darstellt, in dem jedes Attribut in einem eigene Bit verschlüsselt ist. Z.B. würde ein verstecktes Verzeichnis (faHidden) nicht mehr als Verzeichnis erkannt werden.
Man muss das gewünschte Bit ausmaskieren
Delphi-Quellcode:
(Attr and faDirectory) = faDirectory
// oder
(Attr and faDirectory) <> 0
um es zu testen.