Inno Setup 安装前卸载原程序

  • Post author:
  • Post category:其他



分享一下我老师大神的人工智能教程!零基础,通俗易懂!

http://blog.csdn.net/jiangjunshow


也欢迎大家转载本篇文章。分享知识,造福人民,实现我们中华民族伟大复兴!

很多時候我們需要在安裝文件之前卸載原有的程序而不是覆蓋安裝,本文的code就是實現了這樣的功能。

實現原理是:從注冊表

‘UninstallString’

項中讀取卸載信息,用

Exec

進行靜默卸載。

下面code中

APP_NAME

為你的程序名,可以去注冊表中確認。

function InitializeSetup(): boolean;varResultStr: String;ResultCode: Integer;beginif RegQueryStringValue(HKLM, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\APP_NAME_is1', 'UninstallString', ResultStr) thenbeginResultStr := RemoveQuotes(ResultStr);Exec(ResultStr, '/silent', '', SW_HIDE, ewWaitUntilTerminated, ResultCode);end;result := true;end;


给我老师的人工智能教程打call!

http://blog.csdn.net/jiangjunshow

这里写图片描述



版权声明:本文为ytffhew原创文章,遵循 CC 4.0 BY-SA 版权协议,转载请附上原文出处链接和本声明。