大佬教程收集整理的这篇文章主要介绍了inno-setup – 在Inno安装程序中,可以添加条件语句到[Run]部分中执行什么?,大佬教程大佬觉得挺不错的,现在分享给大家,也给大家做个参考。
procedure curstepChanged(curstep: TSetupStep); var ResultCode: Integer; begin if(curstep = ssInstall) then begin if(InstallServer) then begin ExtractTemporaryFile('ServerSetup.msi'); Exec('msiexec',ExpandConstant('/i "{tmp}\ServerSetup.msi" /qb INSTALLDIR="{Code:GeTinstallPath}\Server\" ALLUSERS=2'),'',SW_SHOW,ewWaitUntilTerminated,ResultCodE); end; if(InstallClient) then begin ExtractTemporaryFile('ClientSetup.msi'); Exec('msiexec',ExpandConstant('/i "{tmp}\ClientSetup.msi" /qb INSTALLDIR="{Code:GeTinstallPath}\Client\" ALLUSERS=2'),ResultCodE); end; end; end;
[Files] source: ClientSetup.msi; DestDir: {tmp}; Flags: deleteafterinstall; Components: Client source: ServerSetup.msi; DestDir: {tmp}; Flags: deleteafterinstall; Components: Server [Run] Filename: msiexec.exe; Parameters: /i "{tmp}\ClientSetup.msi" /qb INSTALLDIR="{Code:GeTinstallPath}\Client\" ALLUSERS=2; WorkingDir: {tmp}; StatusMsg: Installing client; Components: Client Filename: msiexec.exe; Parameters: /i "{tmp}\ServerSetup.msi" /qb INSTALLDIR="{Code:GeTinstallPath}\Server\" ALLUSERS=2; WorkingDir: {tmp}; StatusMsg: Installing server; Components: Server [Components] Name: Client; Description: Client Installation Name: Server; Description: Server Installation
当然,您不一定要使用组件.您没有写出如何决定要运行哪个安装程序.如果您需要更复杂的逻辑,您还可以使用Check
functions,如:
[Files] source: ClientSetup.msi; DestDir: {tmp}; Flags: deleteafterinstall; check: checkClient source: ServerSetup.msi; DestDir: {tmp}; Flags: deleteafterinstall; check: checkServer [Run] Filename: msiexec.exe; Parameters: /i "{tmp}\ClientSetup.msi" /qb INSTALLDIR="{Code:GeTinstallPath}\Client\" ALLUSERS=2; WorkingDir: {tmp}; StatusMsg: Installing client; check: checkClient Filename: msiexec.exe; Parameters: /i "{tmp}\ServerSetup.msi" /qb INSTALLDIR="{Code:GeTinstallPath}\Server\" ALLUSERS=2; WorkingDir: {tmp}; StatusMsg: Installing server; check: checkServer [Code] function checkClient: @R_262_8487@an; begin Result := whateverCondition; end; function checkServer: @R_262_8487@an; begin Result := whateverOtherCondition; end;
以上是大佬教程为你收集整理的inno-setup – 在Inno安装程序中,可以添加条件语句到[Run]部分中执行什么?全部内容,希望文章能够帮你解决inno-setup – 在Inno安装程序中,可以添加条件语句到[Run]部分中执行什么?所遇到的程序开发问题。
如果觉得大佬教程网站内容还不错,欢迎将大佬教程推荐给程序员好友。
本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。