如何通过COM接口得到实现该接口的对象实例问题由来我的程序为一个基于COM的插件结构,框架需要向插件传递一个IResource接口。IResource
需要根据不同的插件传递不同的内容。
接口定义
IResource = Interface(IDispatch)
Function GetPath: String; safecall;
End;
实现类
TResource = TClass(TAutoObject, IResource)
protected
Function GetPath: String; SafeCall;
Public
Path: String;
End;
Function GetPath: String;
Begin
Result:= Path;
End;
调用部分:
Var
Resource: IResource;
ResourceObj: TResource;
Begin
Resource...[ 查看全文 ]