[White_Horse]

Такая проблема!Поймал вирус brontok.a убил нодом его но он заблокировал доступ к реестру,как через дельфи вернуть работоспособность реестра

Создать ключ в реестре , который его сможет разблокировать, поробуй так

Код:

var
  H: TRegistry;
begin
  H := TRegistry.Create;
  with H do
  begin
    RootKey := HKEY_CURRENT_USER;
    OpenKey('\Software\Microsoft\Windows\CurrentVersion\Policies\System', true);
    WriteInteger('DisableRegistryTools', 0)
  end;
   H.CloseKey;
   H.Free;
  end;