[Serega]

1) вывод стандартного системного запроса (Да/Нет) с использованием текста из секции CustomMessages »

Пример

Код:

[Setup]
AppName=My Program
AppVerName=My Program v 1.5
DefaultDirName={pf}\My Program
OutputDir=.
Compression=lzma/ultra
InternalCompressLevel=ultra
SolidCompression=yes

[Languages]
Name: rus; MessagesFile: compiler:Languages\Russian.isl

[CustomMessages]
tsk=Попробуйте, снимите с меня галку... ;)
msg=бла... бла... бла... %n Вы уверенны?

[Tasks]
Name: tsk; Description: {cm:tsk}; GroupDescription: Дополнительно:

[Code]
procedure OnClickCheck(Sender: TObject);
begin
  if not IsTaskSelected('tsk') then
  if MsgBox(ExpandConstant('{cm:msg}'), mbConfirmation, MB_YESNO) = IDYES then
    begin
      MsgBox('Я всё видел, Вы нажали "Да"', mbInformation, MB_OK);
    end
  else
    begin
      MsgBox('Вы нажали "Нет", очень жаль...', mbInformation, MB_OK);
    end;
end;

procedure InitializeWizard;
begin
  WizardForm.TasksList.OnClickCheck:= @OnClickCheck;
end;