如何在Delphi中重新组织我单位的文件夹结构？

Question

我使用Delphi启动了一个原型，所有源文件都在一个目录下 现在，我想使用文件夹重新组织所有内容。

我发现了两种方法。

1 /首先是在Delphi IDE中打开每个单元，在Save as打开新文件夹。然后删除旧的单元文件。

2 /在Windows资源管理器下，重新组织所有内容，然后在Delphi IDE中打开项目，删除对旧（未知）单元的引用，然后按文件夹添加每个单元文件夹。

由于我有100多个单位，无论我使用何种方法（1或2），都非常痛苦 你是如何进行这种重组的？ 我错过了一个功能吗？

Answer 1

我没有检查XE，但在XE2中，这在IDE中很容易做到：

• 如果多个项目的所有项目都在一个项目组中
• 在项目经理中为每个单位做
  • 按F2重命名设备或使用上下文菜单
  • 重命名时将子文件夹放在单元名称前面（例如test \ Unit1.pas）

IDE将移动单元（删除旧单元）并将此更改提升为项目组中的所有项目。

Answer 2

你真的需要在项目中命名所有100多个单位吗？它们中的一些是否只是可以放在搜索路径上的文件夹中的常用功能？从项目中删除所有不太常用的单位，并将它们放在文件夹中以适合您的逻辑。 IDE将找到它们，您也可以在需要时右键单击在IDE中打开它们，而不用在具有固定路径的项目中命名它们。

Answer 3

最简单的方法是：

1. 将项目文件复制到您希望它们的文件夹;
2. 编辑项目* .dpr文件以删除所有in ..;
3. 编辑项目选项并将项目文件夹的路径添加到搜索路径选项（不是全局IDE默认项目选项，而是项目的选项）。

Answer 4

只有第二个选项。使用TotalCommander，Windows资源管理器等将文件移动到新目录。我认为您的源布局应如下所示：

myutils
libs
    crypto
    database
    network

然后添加这些目录：

myutils;libs\crypto;libs\database;libs\network

到Unit Search Path