Inno Setup - заменить кнопки по умолчанию далее / назад / отмена - PullRequest
Новая
       31

Inno Setup - заменить кнопки по умолчанию далее / назад / отмена

3 голосов
/ 02 февраля 2011

Мне нужен способ добавить свои собственные кнопки на страницы мастера / удалить существующие в Inno Setup.Это возможно?

1 Ответ

11 голосов
/ 02 февраля 2011

Да, это возможно: 

[code]
procedure AboutButtonOnClick(Sender: TObject);
begin
  MsgBox('This is a demo of how to create a button!', mbInformation, mb_Ok);
end;

procedure CreateAboutButton(ParentForm: TSetupForm; CancelButton: TNewButton);
var
  AboutButton: TNewButton;
begin
  AboutButton := TNewButton.Create(ParentForm);
  AboutButton.Left := ParentForm.ClientWidth - CancelButton.Left - CancelButton.Width;
  AboutButton.Top := CancelButton.Top;
  AboutButton.Width := CancelButton.Width;
  AboutButton.Height := CancelButton.Height;
  AboutButton.Caption := '&About...';
  AboutButton.OnClick := @AboutButtonOnClick;
  AboutButton.Parent := ParentForm;
end;


procedure InitializeWizard();
begin
  CreateAboutButton(WizardForm, WizardForm.CancelButton);
end;

Дополнительные примеры можно найти в примере сценария CodeClasses.iss в папке \ program files \ inno setup 5 \ examples.

...