Thema: Delphi TRegistry unter 12.3

Einzelnen Beitrag anzeigen

cltom

Registriert seit: 22. Sep 2005
228 Beiträge
 
Delphi 12 Athens
 
#5

AW: TRegistry unter 12.3

  Alt 26. Mär 2025, 09:55
Du solltest unbedingt den Rückgabewert von OpenKeyReadOnly prüfen. Das würde schon einen Hinweis auf die Ursache geben.

Als weitere Ursache kommt noch WOW64 in Frage. Füge doch mal das KEY_WOW64_64KEY oder KEY_WOW64_32KEY zu dem KEY_READ hinzu und schau ob das einen Unterschied macht.
Gute Hinweise, danke!! KEY_WOW64_64KEY hat funktioniert!

Das sieht nun also so aus und klappt:

Delphi-Quellcode:
var
  Reg : TRegistry;
  KeyString : string;
begin
  Reg := TRegistry.Create(KEY_WOW64_64KEY);
  Try
    Reg.RootKey := HKEY_LOCAL_MACHINE;
    if Reg.OpenKeyReadOnly(VKey) then
      KeyString := Reg.ReadString(VKeyStr);
    Reg.CloseKey;
  Finally
    Reg.Free;
  End;
Danke Euch!!
  Mit Zitat antworten Zitat