[Resolvido] CreateFile

[Lívio Bruno 0]

É o seguinte pessoal . . . tenho um código que "protege" um arquivo qualquer . . .

 

Código abaixo:

 

var

h1: thandle;

begin

h1:=CreateFile(pchar('c:\teste.txt'), GENERIC_READ or GENERIC_WRITE, 0, nil, OPEN_EXISTING, FILE_ATTRIBUTE_HIDDEN, 0);

end;

 

agora queria "desprotege-lo" . . . alguém poderia me ajudar?

obs.: Já tentei "CloseHandle(h1);" e não deu certo.

[Raficcha 1]

Experimente utilizar closeFile(h1);

 

Se não me engano esta função fecha este tipo de handle..

[Lívio Bruno 0]

Experimente utilizar closeFile(h1);

 

Se não me engano esta função fecha este tipo de handle..

 

 

Muito obrigado pela ajuda amigão mas já resolvi o problema... eu não estava declarando a variável "h1" como global.