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

Question

我正在尝试根据 Pascal 函数（returns 一条路径）的结果创建快捷方式，但不知道该怎么做。

这就是我想要做的事情：

[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:

The called function must have 1 String parameter named Param, and must return a String or a Boolean value depending on where the constant is used.

Create shortcut based on result of Pascal function