uses Registry;
with TRegistry.Create do
begin
RootKey := HKEY_LOCAL_MACHINE;
if OpenKey('Software\blabla, True) then
WriteInteger('keyname', DWord(0));
Free;
end;

uses Registry;
with TRegistry.Create do
begin
RootKey := HKEY_LOCAL_MACHINE;
if OpenKey('Software\blabla, True) then
WriteInteger('keyname', DWord(0));
Free;
end;