Delphi 2009 - 检测组件是否安装

Question

我得到了一些与其他开发人员共享的代码。我有一个很好的调试模块，我在单元测试中留下了它，但他没有这个，所以这是一场不断添加和删除代码的战斗。

如果有一种方法我们可以使用条件(很像 Delphi 版本或 Unicode)就好了

  {$IfDef MYComponent}
    MyComponent := TMyComponent.Create;
    MyComponent.Logging := true;
  {$EndIf}

我想我可以将我的ide设置为Define something，但我想知道是否有一种方法可以检测该组件是否已安装......

Answer 1

试试这个(应该适用于 Delphi 6 之后的所有版本):

{$IF DECLARED(TMyComponent)}
{$IFEND}

然后您可以简单地更新您的使用列表来使该组件可见或不可见。