delphi - 在编译时检查一个单元是否存在

Question

如果存在，我想使用一个单位。有没有类似{$IF Declared(MyUnit)}单位的东西，或者不同的方式？

我安装了一个组件包的演示版本，并希望有条件地使用其中的单元，并有条件地添加菜单项以测试其功能。所有这些都不会强迫每个人都安装演示包。

Answer 1

这是不可能的。您需要有一个条件语句来执行单元搜索。查看项目文件中列出的单位，然后是搜索路径。但是，没有这样的条件。

您可以做的最好的事情是仅在定义了条件符号时才使用这些单位。然后，您需要在项目中定义该符号。

这显然很不方便，但只有在评估组件时才有必要。评估完成后，您将普遍采用它，或者根本不采用。与此同时，你将不得不忍受一定程度的尴尬。