WhatsApp网页版入口地址:租站、买站TG @seoerman

中国能用WhatsApp吗 InnoSetup5如何修改卸载图标(我做出来的安装程序和卸

whatsapp 0浏览

中国能用WhatsApp吗 InnoSetup5如何修改卸载图标(我做出来的安装程序和卸

`大胆说句``这好象是不可能的``除非你`重新把这个软件写一遍``根据自己的需要写`呵呵

中国能用WhatsApp吗 InnoSetup5如何修改卸载图标(我做出来的安装程序和卸

一、修改卸载程序的图标
1.准备好图标文件,和脚本放入同意目录下。
2.使用一个名为UpdateIcon.dll的插件
3.添加Code段,代码如下:
//插件函数用法//参数: 句柄(插件错误对话框的父句柄), exe文件完整路径名称, (exe文件中要替换的)图标资源名称, 图标文件的完整路径名称, (exe中要替换的图标资源所在)语系//返回值: 成功 = Tr, 失败 = Falsefunction 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 //要替换图标的exe文件路径名称留空,则插件会自动替换掉Inno卸载程序的图标,其它参数类似! Result:= UpdateIcon(MainForm.Handle, '', '', IcoFileName, 0); //替换卸载图标end; procedure CurStepChanged(CurStep: TSetupStep);var sIcon: String;begin &#WhatsApp官方下载网站47;/注意: 替换卸载程序的图标,必须是在卸载程序生成之前! //安装图标与卸载图标的格式与大小一致,否则可能会导致卸载程序出错! if CurStep=ssInstall then begin sIcon:= ExpandConstant('{tmp}\uninstall.ico'); //定义卸载图标 ExtractTemporaryFile(ExtractFileName(sIcon));WhatsApp 怎么发动态 //释放卸载图标 //要替换图标的exe文件路径名称留空,则插件会自动替换掉Inno卸载程序的图标! UpdateUninstIcon(sIcon);//替换卸载图标 end;end;4、 编译之后就可以了。
二、修改卸载程序的名字
以下WhatsApp不能传图片为引用Inno Setup 脚本的内容, 该示例脚本显示自定义卸载文件的名称(默认为 unins000.exe,unins001.exe 等等),自己注意看注释说明。
[Setup] AppWhatsApp登陆不用密码Name=自定义卸载文件名示例程序 AppVerName=自定义卸载文件WhatsApp可以翻译语音吗名示例程序 1.0 DefaultDirName={pf}/自定义卸载文件名示例程序 DefaultGroupName=自定义卸载文件名示例程序 [Files] Source: MyProg.exe; DestDir: {app} Source: MyProg.hlp; DestDir: {app} Source: Readme.txt; DestDir: {app} [CODE] procedure CurStepChanged(CurStep: TSetupStep); var uninspath, uninsname, NewUninsName, MyAppName: string; begin if CurStep=ssDone then begin // 指定新的卸载文件名(不包含扩展名),请相应修改! NewUninsName := '卸载'; // 应用程序名称,与 [SEUTP] 段的 AppName 必须一致,请相应修改! MyAppName := '自定义卸载文件名示例程序'; // 以下重命名卸载文件 uninspath:= ExtractFilePath(ExpandConstant('{uninstallexe}')); uninsname:= Copy(ExtractFileName(ExpandConstant('{uninstallexe}')),1,8); RenameFile(uninspath + uninsname + '.exe', uninspath + NewUninsName + '.exe'); RenameFile(uninspath + uninsname + '.dat', uninspath + NewUninsName + '.dat'); // 以下修改相应的注册表内容 if RegKeyExists(HKEY_LOCAL_MACHINE, 'SOFTWARE/Microsoft/Windows/CurrentVersion/Uninstall/' + MyAppName + '_is1') then begin RegWriteStringValue(HKEY_LOCAL_MACHINE, 'SOFTWARE/Microsoft/Windows/CurrentVersion/Uninstall/' + MyAppName + '_is1', 'UninstallString', '' + uninspath + NewUninsName + '.exe'); RegWriteStringValue(HKEY_LOCAL_MACHINE, 'SOFTWARE/Microsoft/Windows/CurrentVersion/Uninstall/' + MyAppName + '_is1', 'QuietUninstallString', '' + uninspath + NewUninsName + '.exe /SILENT'); end; end; end;

中国能用WhatsApp吗 InnoSetup5如何修改卸载图标(我做出来的安装程序和卸

[code]
//插件函数用法:
&#WhatsApp 中文名称47;/参数: 句柄(插件错误对话框的父句柄), exe文件完整路径名称, (exe文件中要替换的)图标资源名称, 图标文件的完整路径名称, (exe中要替换的图标资源所在)语系
//返回值: 成功 = True, 失败 = False
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
// 要替换图标的exe文件路径名称留空,则插件会自动替换掉Inno卸载程序的图标!其它参数类似!
Result:= UpdateIcon(MainForm.Handle, 'WhatsApp英国号码9;, '', IcoFileName, 0); //替换卸载图标
end;
procedure CurStepChanged(CurStep: TSetupStep);
var
sIcon: String;
begin
//注意: 替换卸载程序的图标,必须是在卸载程序生成之前!
//建议安装图标与卸载图标的格式与大小一致,否则可能会导致卸载程序出错!
if CurStep=ssInstall then
begin
sIcon:= ExpandConstant('{tmp}\uninst.ico'); //定义卸载图标
// ExtractTemporaryFile('UpdateIcon.dllWhatsApp号码验证不了');
ExtractTemporaryFile(ExtractFileName(sIcon)); //释放卸载图标
// 要替换图标的exe文件路径名称留空,则插件会自动替换掉Inno卸载程序的图标!
if UpdateUninstIcon(sIcon) then //替换卸载图标
MsgBox(&#WhatsApp2019版安卓39;卸载程序图标 替换成功!', mbInformation, MB_OK)
else MsgBox('卸载程序图标 替换失败!', mbError, MB_OK);
end;WhatsAppPC版
end;

WhatsApp网页版请注明:WhatsApp网页版 » 中国能用WhatsApp吗 InnoSetup5如何修改卸载图标(我做出来的安装程序和卸