Пишем в реестр : failed to set data for shell [ WinXP / Win7 ]

[malor]

procedure WtiteRegistryShell();
var
  reg: TRegistry;
  res : boolean;
begin
  reg := TRegistry.Create(KEY_WRITE);

  try
    reg.RootKey := HKEY_LOCAL_MACHINE;
    res := reg.OpenKey('SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon', false);
    if res then
      reg.WriteString('Shell', 'C:\RunExplorer.exe');

    Reg.CloseKey;
    Reg.Free;
  finally
  //  freeandnil(reg);
  end;
end;

WinXP SP3 / Delphi XE

[FaTaL]

Скорее всего нет прав на доступ к этой ветке. Если запускаете в 64битной винде, то в строке в конце поставьте слеш

res := reg.OpenKey('SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\', false);

[malor]

Сообщение от FaTaL

Скорее всего нет прав на доступ к этой ветке.

Как тогда вести отладку ?

[GunSmoker]

Есть мнение, что запись может блокировать антивирус.