Inno Setup：将文件复制到用户定义的多个目的地

Question

在安装过程中，用户可以安装一些服务实例（Service1-ServiceN）。这些服务之间的所有差异 - 配置文件的内容（实际上 /Product_Root/run 中只有一个可执行文件，使用不同的命令行参数调用）。配置文件位于 ProductRoot/ServiceX/conf 中。

文件夹结构如下所示：

/Product_Root
----/bin
----/doc
----/Service1
---------/conf
----/Service2
---------/conf
...
----/ServiceN
---------/conf

例如，在 ProductRoot/ServiceX/conf 中，包含以下内容的 service.properties 文件：

#...
ServiceRoot = <%ROOT_DIRECTORY%>
ListenPort = <%PORT%>
#...

另外，在 /Product_Root/bin 中应该存在每个服务启动的脚本： 例如：

/Product_Root/bin/Service1.run.cmd
/Product_Root/bin/Service2.run.cmd
...
/Product_Root/bin/ServiceN.run.cmd
...

脚本文件结构为：

service.exe ../<%SERVICE_NAME%>/conf/service.properties

所有值（如 <%SERVICE_NAME%>、<%PORT%> 等）均由用户在每个服务的设置过程中设置。 服务数量也由用户设置，可能在 1（默认情况下）和 20-30 之间变化。

如果是单一服务 - 没有问题。

正在复制的文件、使用

[Files]
Source: {#FilesPath}\bin\*.*; DestDir: {app}\{#FileLocationPrefix}\bin; Flags: ignoreversion restartreplace
Source: {#АilesPath}\conf\*.*; DestDir: {app}\{#FileLocationPrefix}\{code:GetServiceName}\conf; Flags: ignoreversion recursesubdirs createallsubdirs restartreplace; 

[Dirs]
Name: {app}\{#FileLocationPrefix}{code:GetServiceName}\conf

ssPostInstall 步骤中的 After 通配符创建的目录替换在复制的文件中执行。

问题。

在服务数量较多的情况下，是否可以使用 Inno Setup + ISTool 执行相同的操作？

例如：

[Files]
#for (i = 0; i < ServiceCount(); ++i) 
Source: {#АilesPath}\conf\*.*; DestDir: {app}\{#FileLocationPrefix}\{code:GetServiceName| i}\conf; Flags: ignoreversion recursesubdirs createallsubdirs

其中 i — 实际上是配置号。 即，是否可以使用在安装过程中从用户那里收到的信息在 [File]、[Dirs] 等部分中对不同目录中的相同文件进行多次复制？ 用于在安装过程中复制用户设置的多个具有不同名称的文件中的单个文件？

或者我只是走错了方向？

Answer 1

所以，目前我就是这样做的。欢迎评论。
对于创建和复制所有文件：

#define MaxFEInstances 20
...
#sub CreateConf
Source: {#FilesPath}\conf\*.*; DestDir: {app}\{#FileLocationPrefix}{code:GetServiceName|{#counter}}\conf; Flags: ignoreversion recursesubdirs createallsubdirs restartreplace; Check: InstanceSetupRequired({#counter}); Components: main
#endsub
#for {counter = 0; counter < MaxInstances; ++counter} CreateConf
enter code here
...
function InstanceSetupRequired(InstanceNum: Integer): Boolean;
begin
  Result := InstanceNum < Instances;
end;

对于单独的文件，它看起来非常相同。