De uma olhada nas propriedades FileGetAttr e FileSetAttr da 
Unit SysUtils, elas trabalham exatamente com isso.

Marco
Belo Horizonte, MG

--- Em delphi-br@yahoogrupos.com.br, "pelebr" <[EMAIL PROTECTED]> escreveu
>
> preciso testar num programa
> usando findfirst - findenext
> e identificar e guardar todos diretorios e subs do hd num array
> 
> testei assim
> if searchrec.attr = 16 then... //16 = diretorio
> 
> so que um diretorio pode ter varios atributos 
> e nesse teste nao leio muitas pastas do disco 
> pois ele pode ter atributo 17= atributo diretorio mais atributo 
oculto
> atributo 22 = diretorio + sistema + oculto e etc
> 
> como posso testar de forma que eu entre em TODAS pastas dum HD
> se for diretorio quero ler nao me interessa se eh sistema oculto 
> 
> entenderam?
> obrigado
>


Responder a