Inno制作安装包

烧火大爷

已于 2025-03-26 12:42:22 修改

阅读量210

点赞数 1

分类专栏：手机生活常识文章标签：经验分享

于 2025-02-25 11:12:11 首次发布

本文链接：https://blog.youkuaiyun.com/qq_30065669/article/details/145688766

版权

手机生活常识专栏收录该内容

11 篇文章

订阅专栏

下载链接Inno Setup Downloads

引导感觉不好用。直接叫豆包给我生成代码，选择空脚本。

代码示例服务后台开机自启。

[Setup]
AppName=LocalAssetBundleService
AppVersion=1.0
; 定义公司名称常量，可根据需要修改
#define CompanyName "AGD"
; 定义产品名称常量，可根据需要修改
#define ProductName "闽宁红色文化教育资源创新与共享应用研究"
; 设置默认安装目录，使用公司名称和产品名称常量
DefaultDirName={pf}\{#CompanyName}\{#ProductName}
OutputBaseFilename={#ProductName}安装包
Compression=lzma
SolidCompression=yes
; 设置安装程序的图标
SetupIconFile="D:\CProgram\LocalABService\LocalABService\bin\Debug\icon.ico" 
; 设置开始菜单文件夹名称为 产品名称
DefaultGroupName=闽宁红色文化教育资源创新与共享应用研究
; 禁用选择开始菜单文件夹页面
DisableProgramGroupPage=yes

[Files]
; 注意目标目录更新为新的安装路径
Source: "D:\CProgram\LocalABService\LocalABService\bin\Debug\AssetBundles\*"; DestDir: "{app}\AssetBundles"; Flags: recursesubdirs createallsubdirs
Source: "D:\CProgram\LocalABService\LocalABService\bin\Debug\LocalABService.exe"; DestDir: "{app}"; Flags: ignoreversion
; 添加图标文件到安装包
Source: "D:\CProgram\LocalABService\LocalABService\bin\Debug\icon.ico"; DestDir: "{app}"; Flags: ignoreversion

[Icons]
; 在开始菜单添加应用快捷方式
Name: "{group}\{#ProductName}"; Filename: "{app}\LocalABService.exe"; IconFilename: "{app}\icon.ico"
; 在桌面添加应用快捷方式
Name: "{commondesktop}\{#ProductName}"; Filename: "{app}\LocalABService.exe"; IconFilename: "{app}\icon.ico"
; 在开始菜单添加卸载快捷方式
Name: "{group}\{#ProductName}卸载"; Filename: "{uninstallexe}"; IconFilename: "{app}\icon.ico"

[Run]
Filename: "{app}\LocalABService.exe"; Description: "Start Local AssetBundle Service"; Flags: postinstall skipifsilent runhidden

[Registry]
; 安装时添加注册表项以实现开机自启
Root: HKCU; Subkey: "Software\Microsoft\Windows\CurrentVersion\Run"; ValueType: string; ValueName: "LocalABService"; ValueData: "{app}\LocalABService.exe"; Flags: uninsdeletevalue

[Code]
procedure CurStepChanged(CurStep: TSetupStep);
var
  ResultCode: Integer;
begin
  if CurStep = ssPostInstall then
  begin
    // 安装完成后关闭 LocalABService.exe 进程
    Exec('taskkill', '/F /IM LocalABService.exe', '', SW_HIDE, ewWaitUntilTerminated, ResultCode);
  end;
end;

procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
var
  ResultCode: Integer;
begin
  if CurUninstallStep = usUninstall then
  begin
    // 卸载时关闭 LocalABService.exe 进程
    Exec('taskkill', '/F /IM LocalABService.exe', '', SW_HIDE, ewWaitUntilTerminated, ResultCode);
  end;
end;

应用程序安装完成启动，平时手动启动。

[Setup]
AppName=Reservoir
AppVersion=1.0
; 定义公司名称常量，可根据需要修改
#define CompanyName "AGD"
; 定义产品名称常量，可根据需要修改
#define ProductName "水库综合管理平台"
; 设置默认安装目录，使用公司名称和产品名称常量
DefaultDirName={pf}\{#CompanyName}\{#ProductName}
OutputBaseFilename={#ProductName}安装包
Compression=lzma
SolidCompression=yes
; 设置安装程序的图标
SetupIconFile="D:\UnityProgram\Git\Reservoir\Output\Reservoir\icon.ico" 
; 设置开始菜单文件夹名称为 产品名称
DefaultGroupName=水库综合管理平台
; 禁用选择开始菜单文件夹页面
DisableProgramGroupPage=yes
 
[Files]
; 注意目标目录更新为新的安装路径
; 递归添加 Reservoir 目录下的所有文件和子目录
Source: "D:\UnityProgram\Git\Reservoir\Output\Reservoir\*"; DestDir: "{app}"; Flags: recursesubdirs createallsubdirs ignoreversion
 
[Icons]
; 在开始菜单添加应用快捷方式
Name: "{group}\{#ProductName}"; Filename: "{app}\Reservoir.exe"; IconFilename: "{app}\icon.ico"
; 在桌面添加应用快捷方式
Name: "{commondesktop}\{#ProductName}"; Filename: "{app}\Reservoir.exe"; IconFilename: "{app}\icon.ico"
; 在开始菜单添加卸载快捷方式
Name: "{group}\{#ProductName}卸载"; Filename: "{uninstallexe}"; IconFilename: "{app}\icon.ico"
 
[Run]
//Filename: "{app}\Reservoir.exe"; Description: "Start Reservoir"; Flags: postinstall skipifsilent runhidden
Filename: "{app}\Reservoir.exe"; Description: "Start Reservoir"; Flags: postinstall skipifsilent
;[Registry]
; 安装时添加注册表项以实现开机自启
;Root: HKCU; Subkey: "Software\Microsoft\Windows\CurrentVersion\Run"; ValueType: string; ValueName: "Reservoir"; ValueData: "{app}\Reservoir.exe"; Flags: uninsdeletevalue
 
[Code]
//procedure CurStepChanged(CurStep: TSetupStep);
//var
  //ResultCode: Integer;
//begin
  //if CurStep = ssPostInstall then
  //begin
    // 安装完成后关闭 Reservoir.exe 进程
    //Exec('taskkill', '/F /IM Reservoir.exe', '', SW_HIDE, ewWaitUntilTerminated, ResultCode);
  //end;
//end;
 
procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
var
  ResultCode: Integer;
begin
  if CurUninstallStep = usUninstall then
  begin
    // 卸载时关闭 Reservoir.exe 进程
    Exec('taskkill', '/F /IM Reservoir.exe', '', SW_HIDE, ewWaitUntilTerminated, ResultCode);
  end;
end;

复制粘贴。保存。