Registry Windows 7 ändern

[vazili_Zaitzef]

Hallo,

ich habe ein kleines Problem mit der Registry.
Ich möchte in dem Registry Zweig:
HKEY_LOCAL_MACHINE\Software\Microsoft\Windows NT\CurrentVersion\Winlogon
den AutoAdminLogon auf 1 setzten.

Hierzu benutzte ich Folgende Funktion:

Code: Alles auswählen

Procedure CreateKey(KeyName, KeyEntry, RootKey, Key : String);
Var
  Reg : TRegistry;
Begin
  Reg := TRegistry.Create(KEY_SET_VALUE OR $0002);
 
//  Reg.RootKey:= longword(RootKey);
  Reg.RootKey := strtoint('$' + RootKey);
  Reg.OpenKey(key, false);
  Reg.Access:=REG_SZ;
 
  // einen Eintrag hinzufügen:
  Reg.WriteString(KeyName,KeyEntry);
 
  Reg.CloseKey;
  Reg.Free;
End; 
 
...
CreateKey('DefaultAdminLogon', '1', '80000002', '\Software\Microsoft\Windows NT\CurrentVersion\Winlogon');

Allerdings sieht es so aus, als ob ich keine Admin rechte besitze, obwohl ich das Programm als Administrator (inklusive Administrator Benutzerkonto) ausführe.
Eine Meldung kommt auch nicht...
Kann mir jemand helfen, und mir erklären wie ich das Problem löschen kann?

Vielen Dank für eure Hilfe

Vazili

[vazili_Zaitzef]

Hallo,

hat denn niemand eine Idee?
Der Code funktioniert übrigens wenn ich in einnem einen Zweig schreibe.

[Bitschubser]

Alles viel zu lange her, kann mich nicht an Details erinnern...

Aber bei mir hat damals

Code: Alles auswählen

   myRegistry := TRegistry.Create(KEY_ALL_ACCESS);

geholfen.

[Michl]

Ich mag zwar eigentlich nicht meine Registry zu Testzwecken verändern, doch habe ich mal Deinen Code bei mir probiert. Dieser schreibt diesen Eintrag an genau die von Dir vorgegebene Stelle!

PS: evtl. müsstest Du noch unter Projekt -> Projekteinstellungen -> Anwendung -> Ausführungsebene -> "benötigt Administrator" einstellen.

[vazili_Zaitzef]

Hallo,

danke für Eure Mühen und das Ausprobieren.
Bei mir leitet der das aus irgend einem Grund immer in den blöden WOW6432Node Ordner um.
Dann wird das wohl an meinem Windows liegen. Muss ich mir mal eine Virtuelle Maschine bauen und das ganze mal dort ausprobieren...

Ich halte euch auf dem Laufenden



Gut zu wissen, das man auch ein Programm mit Admin rechten versehen kann

Bis später:)

[Socke]

Bei mir leitet der das aus irgend einem Grund immer in den blöden WOW6432Node Ordner um.

Wenn du die 64-Bit-Knoten verändern willst, solltest du auch ein 64-Bit-Programm verwenden ...

[vazili_Zaitzef]

Hallo,

herzlichen Dank für die Hilfe, jetzt funktioniert es
So macht das ja auch mehr sinn, dachte eigentlich, das ich das für beider Verisonen benutzen könnte.
Naja . Schade ist nur, das man nicht direkt für beide Versionen von Windows erstellen kann.
Naja, muss ich wohl 2 mal Lazarus installieren.

Beste Grüße und bis zum nächsten Mal

Vazili