5

我需要使用 NSIS 或 InnoSetup 制作 Windows 安装程序。客户希望在安装程序对话框/向导页面中显示图像,并且该图像需要可单击,例如单击时打开浏览器窗口。这可能吗?如果是,是否也可以使用动画 GIF?

4

3 回答 3

5

要使欢迎页面的左侧图像可点击,您可以使用以下命令:

[Code]
procedure OnBannerClick(Sender: TObject);
var
  ErrorCode: Integer;
begin
  ShellExec('', 'http://www.stackoverflow.com', '', '', SW_SHOW, ewNoWait, 
    ErrorCode);
end;

procedure InitializeWizard;
begin
  WizardForm.WizardBitmapImage.Cursor := crHand;
  WizardForm.WizardBitmapImage.OnClick := @OnBannerClick;
end;
于 2012-11-29T11:43:00.360 回答
3

....对于 NSIS 也是如此:

!include MUI2.nsh
!define MUI_PAGE_CUSTOMFUNCTION_SHOW MakeClickableWizardImage
!insertmacro MUI_PAGE_WELCOME
!insertmacro MUI_PAGE_INSTFILES
!define MUI_PAGE_CUSTOMFUNCTION_SHOW MakeClickableWizardImage
!insertmacro MUI_PAGE_FINISH
!insertmacro MUI_LANGUAGE English

Function OnWizardClick
ExecShell "" "http://example.com"
FunctionEnd

Function MakeClickableWizardImage
StrCpy $0 $mui.WelcomePage.Image
${If} $mui.FinishPage.Image <> 0
    StrCpy $0 $mui.FinishPage.Image
${EndIf}
${NSD_OnClick} $0 OnWizardClick
FunctionEnd
于 2012-11-29T17:08:31.583 回答
2

如果你想实现一个 gif 图像,你可以使用这个扩展:

GifCTRL 2.1

它是中文的,但示例 Inno 脚本显示了您需要的一切。

于 2012-12-03T06:43:45.223 回答