delphi - 如何在不修改给定单元的情况下禁用该单元的警告？

Question

因此，我在我的单元中包含了一些其他单元，在构建应用程序后，我收到了来自这些单元的大量警告。数量如此之大，以至于我在列表中找到自己的警告时遇到了问题。 ;-)

是否有一些编译器指令可以让我关闭这些警告？但请注意，我不想以任何方式修改这些单位。我想实现这样的目标:

unit MyUnit;

interface

uses
  UnitA, {$WARN EMIT_WARNNIGS OFF} UnitB, {$WARN EMIT_WARNNIGS ON} UnitC, UnitD.

implementation

uses
  UnitE, {$WARN EMIT_WARNNIGS OFF} UnitF, UnitG, {$WARN EMIT_WARNNIGS ON} UnitH.

这是一个我想要的虚构编译器指令，或者它可能存在但我不知道？

感谢您的宝贵时间。

Answer 1

有一个编译器指令可以关闭警告，但这只能在项目选项中设置(在这种情况下它适用于所有单元)或在单元本身中设置(在这种情况下它仅适用于该单元)。

所以，你有几个选择。

完全符合您要求的不切实际的选项:

因此，唯一的解决方案是在项目中禁用警告，然后使用该指令在您自己的所有单元中启用它们。

最简单、最现实的选择:

编译单元一次，并且仅通过从库路径中删除源来使用 DCU。如果您无论如何都不想编辑它们，这是最简单的。

您仍然可以将它们添加到与库路径不同的浏览路径中。在这种情况下，将使用 DCU，但 Delphi 仍然可以找到源代码，因此您仍然可以在调试时导航它们。

一个小优点是构建项目也更快，因为这些单元不需要在每次构建时重新编译。

最佳选择:

完全停止使用这些装置。具有如此多警告的单元都是劣质软件，可能会导致严重问题。

其他解决方案:

• 放弃不修改单元的愿望，无论如何都将编译器指令添加到这些单元
• 解决警告