Fórum Retirar atributos de uma pasta ! #175437
16/08/2003
0
var p:pchar; begin p:=pchar(form3.edit1.text); SetFileAttributes(p,7);
certo, ai eu atribui ah ele sistema, oculto e somente leitura.
li q pra retirar todos os atributos eh preciso colocar um ´0´ no lugar do meu 7, mas eu fiz isso e nao funcionou. ele continua com todos os atributos que eu tinha colocado antes. Q q eu faco pra ele tirar os atributos?????
8) [/code]
Smyle
Curtir tópico
+ 0Posts
16/08/2003
Cebikyn
FileSetAttr(FileName, FileGetAttr(FileName) xor $00000001);
Este exemplo remove a propriedade Somente Leitura.
Gostei + 0
16/08/2003
Smyle
Gostei + 0
17/08/2003
Cebikyn
[*:b9528e7454]Oculto - $00000002
[*:b9528e7454]Sistema - $00000004
[*:b9528e7454]VolumeID - $00000008
[*:b9528e7454]Diretório - $00000010
[*:b9528e7454]Arquivo - $00000020
[*:b9528e7454]Qualquer Arquivo - $0000003F[/list:u:b9528e7454]Acho que para tirar todos, deve-se ver quais atributos o arquivo tem e depois tira-los usando os números a cima no código da msg anterior
Gostei + 0
18/08/2003
Smyle
valeu
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)