WEB开发网
开发学院软件开发VC 关于 IDispatch 接口的 LPDispatch 属性的实现 阅读

关于 IDispatch 接口的 LPDispatch 属性的实现

 2006-07-22 22:53:38 来源:WEB开发网   
核心提示:本文示例源代码或素材下载 好象是绕口令一样的标题,呵呵,关于 IDispatch 接口的 LPDispatch 属性的实现,看看下面的这个例子,我想大家就知道是什么意思了吧,在Release目录中有两个DLL和两个VBS的测试程序,用Regsvr32.exe注册两个组件后,在脚本语言中,我们经常看到类似这样的语

本文示例源代码或素材下载

好象是绕口令一样的标题。呵呵,看看下面的这个例子,我想大家就知道是什么意思了吧。

在脚本语言中,我们经常看到类似这样的语句:obj.Document.Write(...),obj显然是一个自动化的对象(IDispatch),它可以拥有方法和属性。但 Document 到底是什么那?如果说它是方法,那么就无法解释 Document.Write 了;如果说他是属性,那么属性怎么还有Write方法那?答案是Document是一个LPDispatch类型的属性(具有自动化类型的属性),当然,这样的属性拥有方法就不奇怪了吧。

在我们自己写的自动化组件中,当然你可以把所有的方法都用唯一的一个自动化接口表现出来,但是这样好吗?所有的方法都处于一个层次上,没有适当的分类,显然不是个优秀的组件。好了,下面看看我们如何实现分层次的自动化组件吧。

MFC(CCmdTarget) 和 ATL(DUAL 双接口)都可以实现组件自动化的接口。下面分别来实现。(VC6编译测试通过)

一、用MFC实现LPDispatch自动化接口属性

  1. 产生一个支持自动化(Automation)的程序(例子程序中,使用的是DLL)
  2. 添加一个自动化类 CAAA ,派生于CCmdTarget。选择Createable by type ID。注意,只有选择这项,才能被外部程序(VB)CreateObject或(VC)CreateDispatch等方法建立对象
  3. 添加另一个自动化类CBBB,派生于CCmdTarget。选择Automation
  4. 在CAAA中,添加的成员对象,CBBB m_bbb
  5. 在IAAA中,添加名称为BBB,类型为LPDispatch的属性,使用Get/Set类型
  6. 完成BBB属性的Get/Set代码 LPDISPATCH CAAA::GetBBB()
    {
     return m_bbb.GetIDispatch(TRUE);
    }
    void CAAA::SetBBB(LPDISPATCH newValue)
    {
     SetNotSupported();
    }
  7. 在IBBB中,添加方法(例子程序中,实现了一个数值加法)
  8. 修改CBBB的析构函数,从protected移动到public中

二、用ATL实现LPDispatch自动化接口属性

  1. 产生一个ATL的组件程序框架(例子程序中,使用的是DLL)
  2. 添加一个IAAA的双接口
  3. 手工添加另一个IBBB的双接口

    IDL文件修改如下: ... ...
    [
     object,
     uuid(D17A119E-0FEC-4737-8EBD-4AA040393A36), //这里是例子程序中的IID,你需要自己产生
     dual,
     helpstring("IBBB Interface"),
     pointer_default(unique)
    ]
    interface IBBB : IDispatch
    {
    };
    ... ...
    coclass AAA
    {
     [default] interface IAAA;
     interface IBBB; //这是手工添加的第2个接口
    };
    头文件,修改如下:

    添加派生关系

    class ATL_NO_VTABLE CAAA :
     public CComObjectRootEx<CComSingleThreadModel>,
     public CComCoClass<CAAA, &CLSID_AAA>,
     public IDispatchImpl<IAAA, &IID_IAAA, &LIBID_ATLDISPLib>,
     public IDispatchImpl<IBBB, &IID_IBBB, &LIBID_ATLDISPLib> //新增
    添加并修改接口入口宏 BEGIN_COM_MAP(CAAA)
     COM_INTERFACE_ENTRY(IAAA)
     COM_INTERFACE_ENTRY(IBBB) //新增
     //修改,使用ENTRY2方式,这样VB才能知道默认使用哪个IDispatch接口
     COM_INTERFACE_ENTRY2(IDispatch,IAAA)
    END_COM_MAP()

  4. 在IAAA中,添加属性BBB,类型为LPDispatch,只实现Get方法 STDMETHODIMP CAAA::get_BBB(LPDISPATCH *pVal)
    {
     QueryInterface(IID_IBBB,(LPVOID *)pVal);
     return S_OK;
    }
  5. 在IBBB中,添加方法(例子程序中,实现了一个数值加法) HRESULT Add([in] long n1,[in] long n2, [out,retval] long *pnSum);

三、测试

下载代码后,在Release目录中有两个DLL和两个VBS的测试程序。用Regsvr32.exe注册两个组件后,双点VBS文件就可以执行了。

Tags:关于 IDispatch 接口

编辑录入:爽爽 [复制链接] [打 印]
赞助商链接