Vista 2. Partition Registry-Zugriff schägt fehl

[DeddyH]

Kleine Anregung:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  Reg : TRegistry;
begin
  Reg := TRegistry.Create(KEY_ALL_ACCESS);
  try
    Reg.RootKey := HKEY_CURRENT_USER;
    if Reg.OpenKey('\Software\SPP', true) then
      begin
        Reg.WriteString('Test', 'Ich war hier');
        Reg.CloseKey;
      end
    else
      MessageDlg(inttostr(getlasterror), mtWarning, [mbOK], 0);
  finally
    Reg.Free;
  end;
end;