Die Methode TRegistry.OpenKey erzeugt einen neuen Schlüssel, wenn dieser noch nicht vorhanden ist, und er 2. Parameter auf True gesetzt wird:
Code:
reg := TRegistry.Create;
try
reg.RootKey := HKEY_LOCAL_MACHINE;
if reg.OpenKey('\Software\Test', True) then
begin
...
reg.CloseKey;
end;
if reg.OpenKey('\Software\Test\UniTest', True) then
begin
...
reg.CloseKey;
end;
// oder:
reg.CreateKey('\Software\Test\UniTest');
finally
reg.Free;
end;