[Gnom_aka_Lexander]

Bond01, Можно модернизировать тот пример, который я давал:

читать дальше »

[Setup]
AppName=My Application
AppVersion=1.5
DefaultDirName={pf}\My Application

[code]
var
RegClick: TNotifyEvent;
procedure Reg;
begin
RegEdit := ExpandConstant('{sys}\reg.exe');// вызов консольной системной утилиты для работы с реестром
reg := ExpandConstant('{src}\') + 'reg.reg'; // берем рег-файл рядом с инсталлом
Exec(RegEdit, ' import ' + ' ' + AddQuotes(reg),ExpandConstant('{src}'),SW_HIDE, ewWaitUntilTerminated, ResultCode); // импортируем файл реестра
end;

procedure RegClick();
begin
if WizardForm.CurPageID=wpReady then // добавляем клик только на странице готовности
//begin // Проверить, как стабильнее работает
Reg // выполняем procedure Reg;
//end; // Проверить, как стабильнее работает
OldClick(Sender); // выполняем родной клик
end;

procedure InitializeWizard();
begin
OldClick:= WizardForm.NextButton.OnClick; // Заставляем не забыть родной клик
WizardForm.NextButton.OnClick:=@RegClick; // Задаем новый клик
end;

Вносится в реестр будет по нажатии кнопки далее на странице готовности.