Inno Setup：如何从InstallDelete部分调用自定义函数

Question

如果软件已经安装了旧版本，我需要Inno Setup生成的安装程序在安装之前删除某些文件。

我试图通过比较版本号(下面的自定义函数)来做到这一点，但是在编译时，Inno Setup生成了一个错误:

[ISPP]未声明的标识符：“获取安装版本”。

Inno安装脚本相关摘录如下:

(...)
[Code]
function GetInstalledVersion(MandatoryButNotUsedParam: String): String;
var Version: String;
begin
  if RegValueExists(HKEY_LOCAL_MACHINE,'Software\Microsoft\Windows\CurrentVersion\Uninstall\'+ExpandConstant('AppId')+'_is1', 'DisplayVersion') then
    begin
      RegQueryStringValue(HKEY_LOCAL_MACHINE,'Software\Microsoft\Windows\CurrentVersion\Uninstall\'+ExpandConstant('AppId')+'_is1', 'DisplayVersion', Version);
      MsgBox(ExpandConstant('Existing version:'+Version+'  New version:'+ExpandConstant('AppVersion')), mbInformation, MB_OK);
      Result := Version;
    end
  else
    begin
      Result := '';
    end
end;
(...)
[InstallDelete]
#define InstalledAppVersion GetInstalledVersion('')
#if "1.013" > InstalledAppVersion
  Type: files; Name: {userappdata}\xxx\*.hhd
#endif

作为Inno Setup的新手，这当然是一个微不足道的问题，但在论坛上找不到答案。因此，问题是：如何从[InstallDelete]部分正确调用函数GetInstalledVersion？

是否存在问题，因为在读取< code>[code]部分之前可能会调用< code>[InstallDelete]部分？

非常感谢任何帮助/提示！

Answer 1

您是否要检查当前安装的版本，如果它低于1.013，然后从{userappdata}\xxx\*. hhd中删除用户文件？

那么你需要的是参数检查 http://www.jrsoftware.org/ishelp/index.php?topic=scriptcheck

[Code]
function isOldVersionInstalled: Boolean;
begin
  // Result := <True|False>;
end;

[InstallDelete]
Type: files; Name: {userappdata}\xxx\*.hhd; Check:isOldVersionInstalled;

你的例子有什么问题：

您正在从预处理器调用Pascal函数。那是两码事。< br >您可以在预处理器中定义一个宏-这有点像函数，但这不是您想要的，因为预处理器只在编译时运行，因此它不能用于检查用户文件/环境的状态。