根据Pascal函数的结果创建快捷方式

Question

我试图根据Pascal函数的结果创建一个快捷方式（返回一个路径），但是不知道怎么做。

这就是我想要做的事情：

[Icons]
Name: '{userstartup}\Myprog'; Filename: MyFunctionThatReturnsPath() + 'Myprog.exe';

但是从不调用该函数，而是将文件名视为一个简单的字符串。

Answer 1

[Icons]部分条目应如下所示：

[Icons]
Name: "{userdesktop}\Myprog"; Filename: "{code:MyFunctionThatReturnsPath}\Myprog.exe"

相应的功能是：

[Code]

function MyFunctionThatReturnsPath(Param: string): string;
begin
   Result := 'C:\path';
end; 

该函数必须采用字符串参数，即使您实际上没有使用它。见Pascal Scripting: Scripted Constants：

  

被调用函数必须有1个名为Param的String参数，并且必须返回String或Boolean值，具体取决于使用常量的位置。