Delphi {$ INCLUDE filename}使用dpr文件的一部分

Question

我有很多使用相同单位的Delphi 10项目，我们称之为“公共”。

当我向公地添加新单位时，我必须手动将其添加到每个项目中。我尝试在每个{$INCLUDE commons.inc}文件的uses部分添加.dpr行：

uses
    Forms,
    {$INCLUDE commons.inc}
    projectUnit1,
    ...;

commons.inc有以下内容：

common1,
common2,

我可以编译项目，但无法管理commons.inc中的单位。通过管理，我的意思是 Ctrl-F12 ，从项目中删除等。

这是来自Delphi的帮助：

  

使用包含文件有一个限制：无法在语句部分的中间指定包含文件。实际上，语句部分的开头和结尾之间的所有语句必须存在于同一源文件中。

我想这就是为什么我的想法不起作用的原因？

我做错了什么，还是有另一种解决方案？

Answer 1

此解决方法可能适用。到目前为止，我发现的唯一缺点是所包含的文件没有出现在项目管理器中。

• 将包含要包含的文件的文件夹添加到每个项目的搜索路径。
• 创建Include.pas（一个普通的.pas文件），并以普通方式将其包含在每个项目中。
• 将要包含在多个项目中的文件添加到Include.pas的uses子句中。如果需要，可以使用$ IFDEFS。