【Inno Setup】安装前先卸载旧版本

最新推荐文章于 2024-07-18 19:15:02 发布

shen_wei

最新推荐文章于 2024-07-18 19:15:02 发布

阅读量8.2k

点赞数

分类专栏： Inno Setup 文章标签： Inno Setup C

本文链接：https://blog.csdn.net/shen_001/article/details/12430575

版权

Inno Setup 专栏收录该内容

2 篇文章 0 订阅

订阅专栏

从注册表中获取 UninstallString 卸载信息，Exec函数来进行卸载。。

APP_NAME 就是AppName 名字

[Code]
function InitializeSetup(): boolean;
var
  ResultStr: String;
  ResultCode: Integer;
begin
  if RegQueryStringValue(HKLM, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\APP_NAME_is1', 'UninstallString', ResultStr) then
    begin
      ResultStr := RemoveQuotes(ResultStr);
      Exec(ResultStr, '/silent', '', SW_HIDE, ewWaitUntilTerminated, ResultCode);
    end;
    result := true;
end;