Question

我有一个小的安装项目来运行vb.net项目，32位和64位的安装/设置环境和inno-setup帮助我运行它的正确版本。这是代码，它很简短。我的问题是DisableReadyPage=yes仍然显示准备安装页面。如何摆脱它？

即使我禁用了[file]和[run]部分准备安装页面仍然存在...

[Setup]
AppName=xxx Environment
AppVerName=xxx Environment
AppPublisher=zzz
AppPublisherURL=somewebaddress1
AppSupportURL=somewebaddress2
AppUpdatesURL=somewebaddress3
AppID="xxx Environment"
DefaultDirName={pf}\zzz
PrivilegesRequired=admin
DefaultGroupName=xxx Environment
CreateUninstallRegKey=no
DisableDirPage=yes
DisableProgramGroupPage=yes
DisableWelcomePage=yes
DisableReadyPage=yes
DisableFinishedPage=yes
DirExistsWarning=yes
OutputDir=.
OutputBaseFilename="Setup"

[Files]
Source: Unzip.exe; DestDir: {tmp}; Flags: deleteafterinstall
Source: Setup.zip; DestDir: {tmp}; Flags: deleteafterinstall

[Run]
Filename: "{tmp}\UNZIP.EXE"; Parameters: "{tmp}\Setup.zip -d {tmp}"
Filename: "{code:RunInstallExe}"

[Code]
function GetProcessorTypeId (): Integer;
var
  s: String;
  i: Integer;
begin

  case ProcessorArchitecture of
    paX86:  i := 1;//s := 'x86';
    paX64:  i := 2;//s := 'x64';
    paIA64: i := 3;//s := 'Itanium';
  else
    i := 0;//s := 'Unrecognized';
  end;
  Result := i;

end;

function RunInstallExe(Param: String): String;
var
  _path: string;
  _procId: Integer;
begin

  _procId := GetProcessorTypeId();
  if _procId = 1 then
    begin
      _path := ExpandConstant('{tmp}\Install86Environ.exe');
    end
  else if _procId = 2 then
    begin
      _path := ExpandConstant('{tmp}\Install86Environ.exe');;  //run in wow64 mode
    end
  else if _procId = 3 then
    begin
      _path := ExpandConstant('{tmp}\Install64Environ.exe');;
    end
  else
    begin
      _path := '';
    end

  if FileExists(_path) then
    begin
        Result := _path;
    end
  else
    begin
        MsgBox('Installation package not found.', mbCriticalError, MB_OK);
    end

end;

Answer 1

根据documentation：

当安装程序未以静默方式运行时，如果尚未显示“准备安装”向导页面之前没有其他向导页面，则忽略此指令。

使用所有的Disable * Page指令，它是显示的第一个页面。

您禁用所有网页的目标是什么？

在Inno Setup安装程序中隐藏“Ready”页面

1 个答案: