Einzelnen Beitrag anzeigen

Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.542 Beiträge
 
Delphi 11 Alexandria
 
#19

AW: Rekursive Dateisuche lässt Unterverzeichnisse aus

  Alt 30. Okt 2014, 18:02
Wenn hier if (Rec.Attr and faDirectory = faDirectory) :
AND wir immer vor = aufgelöst, also passt es.
Muss ja so sein, denn dies
if (Rec.Attr and (faDirectory = faDirectory)) wird gar nicht kompiliert, dazu müsste man schon explizit Rec.Attr nach Boolean casten, dann ist man aber auch selbst Schuld, wenn es nicht stimmt.

Da aber alle Dateiattribute nur aus einem Bit bestehen, kann man das noch kürzen
if (Rec.Attr and faDirectory <> 0)
Kann man, hat aber keinen Mehrwert. Wozu soll man sich Gedanken machen (oder nachsehen), ob wirklich alle Attribute 2er-Potenzen sind? Da bleib ich lieber bei der gezeigten Schreibweise, das passt immer, selbst wenn irgendwann mal ein mehrbittiges Attribut hinzukommen sollte.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat