2
我需要一种方法将我自己的按钮添加到向导页面/删除Inno Setup中的现有按钮。那可能吗?Inno Setup - 替换默认的next/back/cancel按钮
我需要一种方法将我自己的按钮添加到向导页面/删除Inno Setup中的现有按钮。那可能吗?Inno Setup - 替换默认的next/back/cancel按钮
是的,这是可能的:
[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个\实例。
拯救生命。感谢您的及时回应 – SharpAffair 2011-02-02 15:21:55