La orientación me ha ayudado.
por que en la ayuda de delphi no encontre una referencia a como usar
la funcion que me dices. Casimiro Notevi
Usando la funcion, emplea el directorio
C:\WINDOWS\system32
-------
este codigo es el que uso, lo pongo de referencia, por si hay un despistado como yo
la funcion, y com esta escrita
Código Delphi
[-]
Function GetWindowsSysDir : String;
var
SysDir : PChar;
begin
GetMem(SysDir, MAX_PATH + 1);
GetSystemDirectory(SysDir, MAX_PATH + 1);
Result := StrPas(SysDir) + '\';
FreeMem(SysDir);
end;
y esto es para usarla, en el evento onclick de un bototn.
para poner la propiedad de un archvio a oculto.
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
begin
FileSetAttr(GetWindowsSysDir+'Archivo.PRS', faArchive);
end;
Muchas Gracias por tu ayuda.