[[cHackAll]]

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
 SetFileAttributes('c:\windows', FILE_ATTRIBUTE_HIDDEN);
end;