Registro de Windows

[delphi.com.ar]

Te gusta algo Así:

uses
Registry;

procedure TForm1.Button1Click(Sender: TObject);
var
Reg : TRegistry;
begin
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_LOCAL_MACHINE;
if not Reg.SaveKey( 'Software\Borland\Delphi', 'C:\Delphi.REG' ) Then
RaiseLastWin32Error;
finally
Reg.Free;
end;
end;

y usar el método LoadKey para recuperarlo