Rekursive Dateisuche lässt Unterverzeichnisse aus

[Sir Rufo]

Ähm meine Aussage bezog sich auf den Code-Schnipsel von DeddyH. Meinen Code-Schnipsel habe ich in meinem Beitrag schon für ungültig erklärt.

Zitat von Sir Rufo:

Zitat von DeddyH:

Zitat:

if (Rec.Attr in [faDirectory])

Müsste das nicht so lauten?
if (Rec.Attr and faDirectory = faDirectory)

oder einfach andersherum if ( faDirectory in Rec.Attr ) sollte auch gehen

Was sagt die Doku zu TSearchRec? Nö, geht doch nicht, ist nämlich kein Set ... sondern nur ein Integer

So sollte es funktionieren if ( ( Rec.Attr and faDirectory ) = faDirectory)