本人亲测-inno setup打包EXE(较完整实例)

; Script generated by the Inno Setup Script Wizard.
; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES!
#define MyAppName “消息助手”
#define MyAppVersion “1.0”
#define MyAppPublisher “消息助手, Inc.”
#define MyAppURL “http://www.newhero.com.cn/”
#define MyAppExeName “消息助手.exe”

[Setup]
; NOTE: The value of AppId uniquely identifies this application.
; Do not use the same AppId value in installers for other applications.
; (To generate a new GUID, click Tools | Generate GUID inside the IDE.)
; 打包时需要生成一个新的GUID(UUID uuid = UUID.randomUUID();System.out.println(uuid)?
AppId={{85773db6-6d50-40ad-9371-c0f603bb1f31}
AppName={#MyAppName}
AppVersion={#MyAppVersion}
AppVerName={#MyAppName} {#MyAppVersion}
AppPublisher={#MyAppPublisher}
AppPublisherURL={#MyAppURL}
AppSupportURL={#MyAppURL}
AppUpdatesURL={#MyAppURL}
DefaultDirName={pf}{#MyAppName}
DisableProgramGroupPage=yes
OutputBaseFilename=消息助手
;默认开始菜单名
DefaultGroupName=消息助手
Compression=lzma
SolidCompression=yes
DisableFinishedPage=yes
AlwaysRestart=no

[Languages]
Name: “chinesesimp”; MessagesFile: “compiler:Languages\chinesesimp.isl”

[Files]
Source: “E:\innosetup*”; DestDir: “{app}”; Flags: ignoreversion
Source: “E:\innosetup\kpsignx.dll”; DestDir: “C:\Windows\System32”; Flags: ignoreversion
Source: “E:\innosetup\kpsignx.dll”; DestDir: “C:\Windows\SysWOW64”; Flags: ignoreversion
; NOTE: Don’t use “Flags: ignoreversion” on any shared system files

[Icons]
Name: “{userdesktop}\消息助手”; Filename: “{app}\消息助手.exe”; IconFilename: “{app}\favicon.ico”
Name: “{group}\消息助手”; Filename: “{app}\消息助手.exe”;
Name: “{group}\卸载消息助手”; Filename: “{app}\unins000.exe”

[Run]
;Filename: “{app}{#MyAppExeName}”; Flags: nowait postinstall skipifsilent
Filename:"{app}\kpsignx.bat";Parameters:"-open"

;自定义不同语言文本
[CustomMessages]
chinesesimp.checkSoftTip=安装程序检测到将安装的软件正在运行!%n%n点击"确定"终止软件后继续操作,否则点击"取消"。

[Code]

// 自定义函数,判断软件是否运行,参数为需要判断的软件的exe名称
function KDetectSoft(strExeName: String): Boolean;
// 变量定义
var ErrorCode: Integer;
var bRes: Boolean;
var strFileContent: AnsiString;
var strTmpPath: String; // 临时目录
var strTmpFile: String; // 临时文件,保存查找软件数据结果
var strCmdFind: String; // 查找软件命令
var strCmdKill: String; // 终止软件命令
begin
strTmpPath := GetTempDir();
strTmpFile := Format(’%sfindSoftRes.txt’, [strTmpPath]);
strCmdFind := Format(’/c tasklist /nh|find /c /i “%s” > “%s”’, [strExeName, strTmpFile]);
strCmdKill := Format(’/c taskkill /f /t /im %s’, [strExeName]);
//ShellExec(‘open’, ExpandConstant(’{cmd}’), ‘/c taskkill /f /t /im 你的软件名.exe’, ‘’, SW_HIDE, ewNoWait, ErrorCode);
//bRes := ShellExec(‘open’, ExpandConstant(’{cmd}’), ‘/c tasklist /nh|find /c /i “你的软件名.exe” > 0.txt’, ‘’, SW_HIDE, ewWaitUntilTerminated, ErrorCode);
bRes := ShellExec(‘open’, ExpandConstant(’{cmd}’), strCmdFind, ‘’, SW_HIDE, ewWaitUntilTerminated, ErrorCode);
if bRes then begin
bRes := LoadStringFromFile(strTmpFile, strFileContent);
strFileContent := Trim(strFileContent);
if bRes then begin
if StrToInt(strFileContent) > 0 then begin
if MsgBox(ExpandConstant(’{cm:checkSoftTip}’), mbConfirmation, MB_OKCANCEL) = IDOK then begin
// 终止程序
ShellExec(‘open’, ExpandConstant(’{cmd}’), strCmdKill, ‘’, SW_HIDE, ewNoWait, ErrorCode);
Result:= true;// 继续安装
end else begin
Result:= false;// 安装程序退出
Exit;
end;
end else begin
//MsgBox(‘软件没在运行’, mbInformation, MB_OK);
Result:= true;
Exit;
end;
end;
end;
Result :=true;
end;

// 卸载时关闭软件
function InitializeUninstall(): Boolean;
begin
Result := KDetectSoft(‘消息助手.exe’);
end;

//安装包百度搜索 inno setup 下载即可,汉化将chinesesimp.isl文件放到Languages下面即可汉化(此汉化包是给打包以后的安装包汉化的,不是本软件等的汉化包)

  • 2
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 打赏
    打赏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

57367896_qq

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值