Inno Setup 使用插件替换卸载程序图标

最新推荐文章于 2024-08-03 19:46:27 发布

幺妹

最新推荐文章于 2024-08-03 19:46:27 发布

阅读量2.3k

点赞数

分类专栏： INNO安装包制作文章标签： function integer string exe

本文链接：https://blog.youkuaiyun.com/jjccwwbb/article/details/6280184

版权

INNO安装包制作专栏收录该内容

3 篇文章

订阅专栏

本文介绍如何使用Inno Setup中的插件替换卸载程序的图标，确保图标格式与大小一致以避免错误。提供了替换卸载图标的代码示例。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

;注意: 替换卸载程序的图标，必须是在卸载程序生成之前！
;建议安装图标与卸载图标的格式与大小一致，否则可能会导致卸载程序出错！
;要替换图标的exe文件路径名称留空，则插件会自动替换掉Inno卸载程序的图标！
[Files]
; 修改卸载图标插件，放在和生成exe iss相同目录
Source: "UpdateIcon.dll"; Flags: solidbreak dontcopy
; 卸载图标
Source: "Uninstall.ico"; Flags: solidbreak dontcopy
[code]
//使用插件替换卸载程序图标
function UpdateIcon(const hWnd: Integer; const exeFileName, exeIcon, IcoFileName: String; wlangID: DWORD): Boolean;
external 'UpdateIcon@files:UpdateIcon.dll stdcall';
function UpdateUninstIcon(const IcoFileName: String): Boolean;
begin
Result:= UpdateIcon(MainForm.Handle, '', '', IcoFileName, 0);
end;
procedure CurStepChanged(CurStep: TSetupStep);
var
sIcon: String;
begin
if CurStep=ssInstall then
begin
    sIcon:= ExpandConstant('{tmp}/Uninstall.ico');
    ExtractTemporaryFile(ExtractFileName(sIcon));
    UpdateUninstIcon(sIcon)
end;
end;