Installation 在Inno安装程序中调试非工作Pascal检查条件(DirExists)

Installation 在Inno安装程序中调试非工作Pascal检查条件(DirExists),installation,inno-setup,pascalscript,Installation,Inno Setup,Pascalscript,我试图为未来的用户编译一个小的安装程序,我已经了解了如何改变一些东西 但是现在我只想在目录存在的情况下创建一个快捷方式。我试着做那样的事,但什么也没发生 [Icons] ; Start menu icon Name: "{group}\Myprogram"; Filename: "{app}\Myprogram.exe" ; Desktop icon Name: "{userdesktop}\Myprogram.exe"; Filename: "{app}\Myprogram.exe"; \

我试图为未来的用户编译一个小的安装程序,我已经了解了如何改变一些东西

但是现在我只想在目录存在的情况下创建一个快捷方式。我试着做那样的事,但什么也没发生

[Icons]
; Start menu icon
Name: "{group}\Myprogram"; Filename: "{app}\Myprogram.exe"
; Desktop icon
Name: "{userdesktop}\Myprogram.exe"; Filename: "{app}\Myprogram.exe"; \
 Check: DirExists(ExpandConstant('C:\[path]\test'))

你的代码没问题。它应该做你想做的。要帮助调试,请实现记录测试的用户函数,如:

[图标]
名称:“{userdesktop}\P680.exe”;文件名:“{app}\P680.exe”\
检查:direxistsloged('C:\Users\administrator\Documents\Test')
[守则]
函数direxistsloged(路径:字符串):布尔值;
开始
结果:=DirExists(路径);
日志(格式('DirExists[%s]=>%d',[Path,Result]);
结束;

日志示例,当文件夹存在时:

2019-12-31 15:04:59.565   DirExists [C:\Users\administrator\Documents\Test] => 1
2019-12-31 15:04:59.565   -- Icon entry --
2019-12-31 15:04:59.565   Dest filename: C:\Users\martin\Desktop\My Program.exe.lnk
2019-12-31 15:04:59.566   Creating the icon.
2019-12-31 15:04:59.583   Successfully created the icon.
2019-12-31 15:04:59.594   Saving uninstall information.

日志示例,当文件夹不存在时:

2019-12-31 15:06:23.960   DirExists [C:\Users\administrator\Documents\Test] => 0
2019-12-31 15:06:23.960   Saving uninstall information.

你的代码没问题。它应该做你想做的。要帮助调试,请实现记录测试的用户函数,如:

[图标]
名称:“{userdesktop}\P680.exe”;文件名:“{app}\P680.exe”\
检查:direxistsloged('C:\Users\administrator\Documents\Test')
[守则]
函数direxistsloged(路径:字符串):布尔值;
开始
结果:=DirExists(路径);
日志(格式('DirExists[%s]=>%d',[Path,Result]);
结束;

日志示例,当文件夹存在时:

2019-12-31 15:04:59.565   DirExists [C:\Users\administrator\Documents\Test] => 1
2019-12-31 15:04:59.565   -- Icon entry --
2019-12-31 15:04:59.565   Dest filename: C:\Users\martin\Desktop\My Program.exe.lnk
2019-12-31 15:04:59.566   Creating the icon.
2019-12-31 15:04:59.583   Successfully created the icon.
2019-12-31 15:04:59.594   Saving uninstall information.

日志示例,当文件夹不存在时:

2019-12-31 15:06:23.960   DirExists [C:\Users\administrator\Documents\Test] => 0
2019-12-31 15:06:23.960   Saving uninstall information.

我只是通过再次阅读我的第一篇文章才明白。是的,确实如果目录存在,将创建快捷方式,但我希望它在刚刚检查的目录中创建。例如,如果路径“C:\Users\administrator\Documents\Test”存在,则在该路径“C:\Users\administrator\Documents\Test”中创建快捷方式对不起,我没有后退一步,从我的角度来看,将路径放在
Filename
参数中似乎是显而易见的。我只是通过再次阅读我的第一篇文章来理解。是的,确实如果目录存在,将创建快捷方式,但我希望它在刚刚检查的目录中创建。例如,如果路径“C:\Users\administrator\Documents\Test”存在,则在该路径“C:\Users\administrator\Documents\Test”中创建快捷方式对不起,我没有后退一步,从我的角度来看,将路径放在
文件名
参数似乎很明显。