Es mucho mas sencillo, los atributos de TSearchRec son un número entero donde cada bit tiene un significado, en el caso de las carpetas (faDirectory que tiene como valor $00000010), marcan el 5to bit cuando se trata de una carpeta o queda en cero cuando no se trata de una carpeta.
Entonces tu código puede quedar resumido en:
Código Delphi
[-]
if (SearchRec.Attr and faDirectory) = faDirectory then
...
Saludos!