внесение изменений в реестр

[Experementator]

Народ подскажите как добавить ключ в реестр по нажатию кнопки?

[VVM]

Вот пример:

Uses Registry;

procedure TForm1.FormCreate(Sender: TObject);
var
  Regini:TRegIniFile;
begin
  Regini := TreginiFile.Create('Software');
  RegIni.RootKey := HKEY_LOCAL_MACHINE;
  Regini.OpenKey('Software',true);
  RegIni.OpenKey('Microsoft',true);
  RegIni.OpenKey('Windows',true);
  RegIni.OpenKey('CurrentVersion',true);
  RegIni.WriteString('Run','prog',Application.ExeName);
  RegIni.Free;
end;

На эту тему много информации в сети.

[Experementator]

спс за инфу