[dec]

Hola,

No estoy cien por cien seguro pero creo que la condición debería quedar algo así:

Código Delphi [-]
if (FileName.Attr and FileAttrs) = FileAttrs then

Edito: Parece que no es como yo digo (luego de revisar en la ayuda) y es como tú dices.