windows-8.1 - Pascal 程序没有写出我期望的方式

Question

我正在尝试使用我以前从未使用过的 Inno Setup 创建一个安装程序，并且一切正常，只是我想要在安装时创建一个 VERSION.txt 文件。到目前为止，在我的脚本的最后，这是我得到的:

[Code]
procedure writeVersion();
begin
  SaveStringToFile(ExpandConstant('{app}\VERSION.txt'), '{#MyAppVersion}', False);
end;

procedure nowWrite();
begin
  writeVersion();
end;            

但是在我编译并运行安装程序后，根本没有创建 VERSION.txt 文件。我以前从未使用过 Pascal，这是我放弃之前所能达到的最大程度。为什么没有创建文件？

编辑:
我尝试添加

begin
  nowWrite();          
end.

按照@TLama 的建议结束，但它仍然没有写入新文件。

在此先感谢您的帮助!

Answer 1

您必须在标准安装程序事件中调用 noWrite。目前您的代码从未被调用。

列出了支持的事件 on this page

例如:

procedure CurStepChanged(CurStep: TSetupStep);
begin
  if CurStep = ssPostInstall then
    nowWrite();  
end;

将在设置完成后调用您的自定义代码。只需研究文档以选择符合您需求的事件。