我在Delphi 2010中编写了一个小型COM服务器,它可以作为零售应用程序的插件。零售应用程序寻找一个"发现"接口,该接口为每个接口注册任意数量的调用TAutoObjectFactory.Create
的附加接口。这运行得很好——所有插件接口都按设计运行。
但现在我想从另一个接口调用一个接口的公共方法,这样我就不必重复代码了。看起来很简单,只需调用ComClassManager.ForEachFactory
来查找我需要使用的接口的ClassID。这也奏效了!
但现在我找到了这个类,我被一个看似微不足道的最后一步难住了:如何使用或强制转换我找到的类(或类引用?)来实际调用它的一个方法。
在我发送给ForEachFactory
的"FactoryProc"中,我假设TComObjectFactory
的ComClass属性是我想要的,但它的类型是TClass,它指向的实际类对象的类引用(至少我希望我能正确理解这一点)。我对类引用有点模糊,我试图强制转换或以其他方式取消引用此属性导致了访问冲突或编译器错误。
有什么建议吗?
您的评论是对的,ComClassManager
处理的是类,而不是实例。您需要的是(您的应用程序的本地实现)运行对象表(或类似的东西),以便插件实例可以相互交互。
如何实际实现它取决于您真正需要什么,例如,在所有运行的实例上调用方法,或者仅在特定类的实例上。