如何使用Inno Setup安装跨多文件夹的隐藏文件？

嘿，我来帮你搞定这个Inno Setup安装隐藏文件的问题！你之前看到的DirectoryCopy确实是用来本地机器内复制文件的，而你需要的是把打包在setup.exe里的隐藏文件提取安装到用户机器上，其实用Inno Setup自带的[Files]段就能轻松解决，不用写复杂的自定义函数，下面给你详细讲两种方法：

方法一：用[Files]段一键搞定（推荐） #

这是最省事的方式，只要配置好[Files]段的参数，就能让Inno Setup在编译时自动包含隐藏文件，安装时自动提取并设置为隐藏属性。

假设你的开发机器上，要打包的隐藏文件分布在MyAppSource目录的多个子文件夹里，那你可以这么写：

[Files]
; 递归复制所有源文件夹下的文件，包含隐藏文件，安装后标记为隐藏
Source: "MyAppSource\**\*"; DestDir: "{app}"; Flags: recursesubdirs createallsubdirs includehidden hidden

给你拆解一下每个参数的作用：

• recursesubdirs：告诉Inno Setup递归处理MyAppSource下的所有子文件夹
• createallsubdirs：在用户机器的{app}目录下，自动创建和源文件对应的子文件夹结构
• includehidden：关键！ 默认Inno Setup编译时会忽略隐藏文件，加这个flag才能把你开发机上的隐藏文件打包进setup.exe
• hidden：确保安装到用户机器上的文件被标记为隐藏属性（即使源文件属性意外丢失，也能强制设置）

如果需要区分隐藏文件和普通文件，分开安装，也可以分写两个[Files]条目：

[Files]
; 处理隐藏文件
Source: "MyAppSource\HiddenFiles\**\*"; DestDir: "{app}\HiddenFiles"; Flags: recursesubdirs createallsubdirs includehidden hidden
; 处理普通文件
Source: "MyAppSource\NormalFiles\**\*"; DestDir: "{app}\NormalFiles"; Flags: recursesubdirs createallsubdirs

方法二：动态控制（适合需要自定义逻辑的场景） #

如果你需要根据用户选择或者其他条件，动态设置文件是否隐藏，那就可以用Code段配合SetFileAttributes函数来实现。

先在[Files]段把文件提取出来（记得加includehidden确保打包隐藏文件），然后在AfterInstall事件里调用自定义函数设置隐藏属性：

[Files]
Source: "MyAppSource\**\*"; DestDir: "{app}"; Flags: recursesubdirs createallsubdirs includehidden; AfterInstall: SetAllFilesHidden

[Code]
; 递归设置目录下所有文件为隐藏的函数
procedure SetDirectoryFilesHidden(const DirPath: string);
var
  FilePath: string;
  FindRec: TFindRec;
begin
  FilePath := DirPath + '\*';
  if FindFirst(FilePath, FindRec) then
  begin
    repeat
      // 跳过当前目录和上级目录的标记
      if (FindRec.Name <> '.') and (FindRec.Name <> '..') then
      begin
        // 如果是子文件夹，递归处理
        if (FindRec.Attributes and FILE_ATTRIBUTE_DIRECTORY) <> 0 then
          SetDirectoryFilesHidden(DirPath + '\' + FindRec.Name)
        // 如果是文件，设置为隐藏属性
        else
          SetFileAttributes(DirPath + '\' + FindRec.Name, FILE_ATTRIBUTE_HIDDEN);
      end;
    until not FindNext(FindRec);
    FindClose(FindRec);
  end;
end;

// 触发设置的入口函数
procedure SetAllFilesHidden;
begin
  SetDirectoryFilesHidden(ExpandConstant('{app}'));
end;

这样就能在文件安装完成后，自动把所有文件（包括子文件夹里的）设置为隐藏属性。

内容的提问来源于stack exchange，提问作者Sanjay Karia