Funktioniert, ob Konsole oder
GUI:
Delphi-Quellcode:
procedure TestKey;
const
KeyName = '
\Software\Test\Test';
var
Reg: TRegistry;
begin
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_CURRENT_USER;
if Reg.OpenKey(KeyName, true)
then
try
Reg.WriteString('
A_B', '
Ohne GUI');
//oder eben "Mit GUI"
finally
Reg.CloseKey;
end;
finally
Reg.Free;
end;
end;
OK, anderer RootKey, aber daran wird es wohl kaum liegen.