Inno setup 卸载运行中的检查参数功能无法正常工作

Inno setup 卸载运行中的检查参数功能无法正常工作,inno-setup,pascalscript,Inno Setup,Pascalscript,我想从[UninstallRun]部分的[code]部分获取参数。安装时,我在调试输出中发现“未找到”。安装时我没有调用CheckGetFile(),卸载时也没有调用GetFilePath()和CheckGetFile()。为什么? 这是我的剧本 [代码] 变量 检查:布尔; 函数GetFilePath(默认值:String):String; 开始 日志('GetFilePath()'); 检查:=假; 结果:=''; {做点什么} 如果(找到)那么 开始 检查:=正确; 结果:=目标路径; 结

我想从
[UninstallRun]
部分的
[code]
部分获取参数。安装时,我在调试输出中发现“未找到”。安装时我没有调用
CheckGetFile()
,卸载时也没有调用
GetFilePath()
CheckGetFile()
。为什么?
这是我的剧本

[代码]
变量
检查:布尔;
函数GetFilePath(默认值:String):String;
开始
日志('GetFilePath()');
检查:=假;
结果:='';
{做点什么}
如果(找到)那么
开始
检查:=正确;
结果:=目标路径;
结束;
结束;
函数CheckGetFile:boolean;
开始
如果(检查)那么
开始
日志('找到文件');
结果:=真;
结束;
如果(不检查)那么
开始
日志(“未找到”);
结果:=假;
结束;
结束;
[卸载运行]
文件名:“{app}\MyApp.exe”;参数:“{code:GetFilePath}”;Check:CheckGetFile();

更新

[代码]
变量
TargetPath:字符串;
函数GetFilePath():布尔值;
开始
结果:=假;
{做点什么}
如果(找到)那么
开始
TargetPath:=“C:\Windows\xxx”;
结果:=真;
结束;
结束;
过程CurUninstallStep已更改(CurUninstallStep:TUninstallStep);
变量
结果代码:整数;
开始
如果CurUninstallStep=usUninstall,则
开始
如果是(GetFilePath),则
开始
Exec(ExpandConstant('{app}\MyApp.exe'),'/q/u'+TargetPath',
SW_SHOW、ewwaitunterminated、ResultCode);
结束;
结束;
结束;
在安装时对进行评估。您不能在卸载时使用它检查文件是否存在

为此,您必须使用
[code]

过程CurUninstallStep已更改(CurUninstallStep:TUninstallStep);
变量
结果代码:整数;
开始
如果CurUninstallStep=usUninstall,则
开始
如果是的话
开始
Exec(ExpandConstant('{app}\MyApp.exe'),'','',
SW_SHOW、ewwaitunterminated、ResultCode);
结束;
结束;
结束;