Como darle permisos a usuarios a una carpeta compartida desde delphi

[Bracus]

Hola a todos,

Estoy desarrollando una pequeña aplicación que maneje directorios y subdirectorios, pero necesito darle permisos de usuarios a esas carpeta, será posible hacerlo desde Delphi?

Saludos y Gracias!!!

[[cHackAll]]

Acá un ejemplo.

[Bracus]

Grandísmo ese ejemplo...
Gracias!! ya tengo donde comenzar

[Bracus]

Hola estoy probando el ejemplo que me recomendaste, pero se me ha hecho un poco complicado, si lo han utilizado diganme como...

Gracias!!!

[Bracus]

Empezado por cHackAll

Acá un ejemplo.

Hola cHackAll, he estado probando con el ejemplo que me propusiste, pero no logro utilizarla como quiero, es que se hace dificil, si ya la has utilizado, enviame un ejemplo de cómo utilizarla. para darle permisos a un usuario a un directorio determinado.

Gracias!!!

[[cHackAll]]

Código Delphi [-]
uses NTSecurityU;

procedure TForm1.Button1Click(Sender: TObject);
begin
 SetFileObjectAccessRights('c:\windows\temp', GetAccountSID('Administrator'), ACCESS_DENIED_ACE_TYPE, False);
end;

[Bracus]

Vale, y así mismo puedo darle permiso a otro usuario de la red?

[[cHackAll]]

Dimelo tu