Forum: Programmieren allgemein
by Sir Rufo,
30. Okt 2014
@himitsu
Ja, Ja ... :)
@DeddyH
Der Code von Perusau funktioniert, denn der Such-Filter steht auf faAnyFile and not faDirectory.
Allerdings könnte das hier if (SR.Name<>'.') AND (SR.Name<>'..') AND (SR.Attr<>faDirectory) then direkt wieder raus, der dürfte nie anschlagen ;)
Forum: Programmieren allgemein
by Sir Rufo,
30. Okt 2014
Ä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.
So sollte es funktionieren if ( ( Rec.Attr and faDirectory ) = faDirectory)
Forum: Programmieren allgemein
by Sir Rufo,
30. Okt 2014
Das Problem sind die fehlenden Klammern ;)
Forum: Programmieren allgemein
by Sir Rufo,
30. Okt 2014
Weil das ja jeder einfach so machen könnte ;)
Forum: Programmieren allgemein
by Sir Rufo,
30. Okt 2014
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