Hallo,
habe seit langer Zeit eine kleine Funktion in Verwendung, um einen Registry-Eintrag zu prüfen. Es scheint nun, dass die (unter 12.3??) nicht mehr funktioniert oder sie funktioniert schon länger nicht und mir ist es nicht aufgefallen.
Delphi-Quellcode:
const
VKey = 'SOFTWARE\Microsoft\Windows NT\CurrentVersion\';
VKeyStr = 'RegisteredOrganization';
var
Reg : TRegistry;
KeyString : string;
begin
Reg := TRegistry.Create(KEY_READ);
Try
Reg.RootKey := HKEY_LOCAL_MACHINE;
Reg.OpenKeyReadOnly(VKey);
KeyString := Reg.ReadString(VKeyStr);
Reg.CloseKey;
Finally
Reg.Free;
End;
end;
Den Key gibt es natürlich, bloß beim Einlesen des Strings kommt ein leerer String zurück. Ich komm nicht dahinter, was da schief läuft, hoffe, ich sitze da keiner Trivialität auf.
Danke!