Moin Nailor,
immer nach faAnyFile suchen.
Bei Directories dann
Delphi-Quellcode:
if (srSearch.Attr and faDirectory) <> 0 then // Verzeichnis
// oder
if (srSearch.Attr and faDirectory) = faDirectory then // Verzeichnis
und bei Dateien
Delphi-Quellcode:
if (srSearch.Attr and faDirectory) = 0 then // Kein Verzeichnis
// oder
if (srSearch.Attr and faDirectory) <> faDirectory then // Kein Verzeichnis
Mit der Methode bin ich bislang gut gefahren.
Eine kleine Frage noch:
Warum benutzt Du eigentlich immer die Kombination aus SetCurrentDir und FindFirst mit Dateimaske?
Als ersten Parameter akzeptiert FindFirst auch einen kompletten Pfad.
Ich frage nur, weil ich das bisher noch nie so gesehen habe.
Eines noch zum +/or "Problem":
Ich sage nicht, dass es grundsätzlich nicht geht Flags mit + zu verknüpfen, nur kann immer der Fall eintreten, das die Verwendung von arithmetischen Operatoren zu Fehlern führen
kann.
Da sich dies, ohne die genauen numerischen Werte zu kennen, aber nicht vorhersagen lässt, finde ich es einfach sinnvoller Flags nur mit logischen Operatoren zu bearbeiten. Dann braucht man sich nicht darum zu kümmern, ob das in dem speziellen Falle anders geht oder nicht.
Intern benutzt Borland übrigens auch or um die Flags zu Verknüpfen.