Hallöle,
gegeben sei folgende Funktion:
Delphi-Quellcode:
function GetTheUltimateAnswer(out Value: string): Boolean;
const
Key = 'SOFTWARE\Deep Thought';
Ident = 'Die Frage nach dem Leben, dem Universum und einfach allem';
var
Reg: TRegistry;
begin
Value := '';
Result := false;
Reg := TRegistry.Create(KEY_READ);
try
Reg.RootKey := HKEY_LOCAL_MACHINE;
if Reg.OpenKey(Key, false) then
try
Value := Reg.ReadString(Ident);
Result := Value <> '';
finally
Reg.CloseKey;
end;
finally
Reg.Free;
end;
end;
In einem
GUI-Programm bekomme ich true und damit einen Wert zurück, in einer Konsolenanwendung nicht (natürlich bei exakt identischem Code). Hat jemand eine Ahnung, woran das liegen könnte?
Nachtrag: mit einem anderen Schlüssel funktioniert das auch in der Konsole, hä?