[[cHackAll]]

Código Delphi [-]
uses NTSecurityU;

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