我用ATL写了一个控件,实现了方法调用。但是,如何产生事件,并弹出事件不知道怎么实现。
请高手指点如何实现???

解决方案 »

  1.   

    转:
    _   EFILE.KILLGHOST.COM 
    COM中事件驱动技术探讨 邹飞
    版本v1.0
    2004年7月目  录
    1.     问题的提出.... 3
    2.     名次术语.... 3
    3.     常用技术.... 3
    3.1       紧密耦合事件(Tightly Coupled Events,TCE)... 3
    3.1.1       连接点技术... 3
    3.1.2       消息队列技术... 11
    3.2       松散耦合事件(Loosely Coupled Events,LCE)... 11
    3.2.1    COM+的事件驱动... 11
    4.     总结.... 181.              问题的提出
    类似于设计模式中Observer模式,在COM编程中,希望实现一种机制,使得对数据变化感兴趣的若干部分能够接受到数据的变化通知。一个典型的应用:计算机监控程序在计算机状态数据发生变化时通知系统管理员、系统日志程序、发送电子邮件等等。
    2.              名次术语
    订阅者Subscriber:对数据感兴趣的程序
    发布者Publisher:发布数据变化通知的程序
    激发事件Firing Event:发布者发起的通知过程
    源接口(Source)/出(Outgoing)接口:发布者和订阅者之间达成的一致接口
    接收器(Sink):订阅者提供给发布者的对象
    3.              常用技术
    3.1               紧密耦合事件(Tightly Coupled Events,TCE)
    3.1.1            连接点技术
    COM中提供了连接点的技术用于实现事件驱动。连接点技术的工作方式为:
    订阅者通过查询标准COM接口IConnectionPointContainer,询问发布者是否支持连接点机制
    通过IConnectionPointContainer的FindConnectionPoint方法得到某种特定类型的连接点,通过接口IConnectionPoint返回
    订阅者创建一个接收器(Sink)对象
    订阅者通过IConnectionPoint的Advise方法把接收器对象加入到发布者的接收者名单中,返回一个cookie(DWORD的标识)
    订阅者通过IConnectionPoint的Unadvise取消对该事件的关注
    从上面的工作方式可以发现,要实现连接点技术,只要订阅者和发布者遵循一定的接口规范,并对这些接口进行实现即可。
    发布者:实现IConnectionPointContainer的容器、支持IConnectionPoint的连接点
    订阅者:实现Sink对象
    在VC中,提供了多种机制对连接点的实现进行了简化,使得开发连接点程序变得很简单,在VC6和VC7中均对连接点有很好的支持,同时又有一定差别,本文分别介绍。
    实例介绍
    首先介绍一下我们要实现的实例的功能描述:
    发布者:实现一个Add方法的接口,当Add方法被调用时,如果结果大于100,则调用OnAdd事件,将Add的参数传出去,实现为一个COM的DLL
    订阅者:订阅OnAdd事件,当OnAdd事件被调用时,输出参数值,实现为Dialog Based Application。
    Visual C++ 6.0
    Visual C++从5.0后提供了ATL(Active Template Library,活动模板库),它一套可用于开发轻量级COM组件的开发库(在ATL里使用非常复杂难懂的Template,理解起来很麻烦~~~)
    我们的第一种方法就是通过ATL来实现连接点:
    发布者:
    通过ATL COM Wizard新建一个COM组件
    项目名称为XAdd
    通过ATL Object Wizard新建一个COM对象(Simple Object)
    Short Name设为Add(其他的名字Wizard会自动产生),同时,在Attributes中钩上Support Connection Points,以使得该COM对象支持连接点,这会自动产生一个_IAddEvents的接口。
    给Add增加Add方法
    HRESULT Add([in] LONG a, [in] LONG b, [out] LONG* pVal);
    给_IAddEvents增加OnAdd方法
    HRESULT OnAdd([in] LONG a, [in] LONG b);
    F7编译,自动注册COM组件
    在CAdd的右键菜单中选择Implement Connection Point,选择_IAddEventsWizard会自动给CAdd增加上对IConnectionPointContainer接口的实现,并会增加CProxy_IAddEvents,它对IConnectionPoint接口进行了实现。
    在CAdd的Add方法实现中增加对事件的触发:
    STDMETHODIMP CAdd::Add(LONG a, LONG b, LONG* pVal)
    {
             *pVal = a + b;
             Fire_OnAdd(a, b);                // 触发OnAdd事件
             return S_OK;
    }重新编译、注册即可。订阅者: 新建一个MFC AppWizard(exe),名为XAddClient,类型为Dialog based,其余采用默认即可。
    添加对ATL的支持(一种简单的方法是选择New ATL Class,由于不能在MFC Application中加入ATL Class,但这是ATL的支持已经被加入)
    在项目中加入XAdd.h文件(发布者的接口定义头文件)
    在项目中导入COM的类型库在stdafx.h中加入:#import "../XAdd.tlb" no_namespace, named_guidsn         新建一个类CEventSink,public继承自IDispEventImpl<1, CEventSink, &DIID__IAddEvents, &LIBID_XADDLib>namespace {_ATL_FUNC_INFO OnAddInfo = {         CC_STDCALL,         VT_EMPTY,         2 ,         {VT_I4, VT_I4}};}
    class CEventSink : public IDispEventImpl<1, CEventSink, &DIID__IAddEvents, &LIBID_XADDLib>
    {
    public:
             CEventSink();
             virtual ~CEventSink();
             void __stdcall OnAdd(int a, int b);
             BEGIN_SINK_MAP(CEventSink)
             SINK_ENTRY_INFO(1, DIID__IAddEvents, 1, OnAdd, &OnAddInfo)
             END_SINK_MAP()
    };实现CEventSink的OnAdd方法
    void __stdcall CEventSink::OnAdd(int a, int b)
    {
             CString str;
             str.Format("%d %d", a, b);
             AfxMessageBox(str);
    }
    这样,接收器对象就已经实现完成,下面只要把接收器Advise到XAdd对象上即可。
    在Dialog中加入Sink对象的Advise、并调用Add()方法,这个步骤比较简单,可以参考例程
    定义private变量:
    IAddPtr pAdd;
    DWORD dwCookie;
    CEventSink* pSink;
    在OnInitDialog()中创建COM对象
    CoInitialize(NULL);
    pAdd.CreateInstance(__uuidof(Add));
    在DestroyWindow中销毁COM对象
           pAdd = NULL;
           CoUninitialize();
    增加3个按钮方法:OnCallAdd、OnAdvise、OnUnadvise
    void CXAddClientDlg::OnCallAdd() 
    {
           LONG ret;
           pAdd->Add(1, 2, &ret);
    }void CXAddClientDlg::OnAdvise() 
    {
    if (pSink == NULL)
    {
     pSink = new CEventSink();
    AtlAdvise(pAdd, (IUnknown*)pSink, DIID__IAddEvents, &dwCookie);
    }
    }void CXAddClientDlg::OnUnadvise() 
    {
    if (pSink != NULL)
     {
     AtlUnadvise(pAdd, DIID__IAddEvents, dwCookie);
     delete pSink;
    }
    }
    我们可以发现,ATL为我们定义了一组Wizard、Macro、Template等,使得实现COM对象变得很简单,我们不需要去关心AddRef()、Release()等很多通用方法的实现,ATL已经帮我们做得很好。
    除了使用ATL作为开发COM的开发库,MFC也提供了很好的COM支持,因此也可以通过MFC实现连接点技术,本文不再介绍。
      

  2.   

    Visual C++ 7.0在Microsoft推出Visual Studio.NET后,同时也对VC进行了升级,在Visual C++ 7.0中,提供了很多对C++的扩充,包括更好的对COM的支持。在VC 7.0种可以通过__hook、__unhook关键字更方便地实现事件驱动。这里给出一个具体的实现例子(开发环境为:Microsoft Visual C++.NET 中文版):发布者:
    在VC 7.0中新建一个ATL项目,名为XAdd
    添加ATL 简单对象,名为Add,在选项中增加对连接点的支持:
    这里有个小小的问题,通过Wizard自动产生的接口定义是和接口的实现类定义放在一起的(Add.h),但接口定义应该是客户可见的,而接口的实现类则不应该客户可见,因此我们做个改动,把Add.h中的接口定义copy到另一个文件IAdd.h中,并在Add.h中#include “IAdd.h”
     在IAdd中添加方法Add
    HRESULT Add([in] LONG a, [in] LONG b, [out,retval] LONG* pVal);
    在_IAddEvents中添加事件方法OnAdd
    HRESULT OnAdd([in] LONG a, [in] LONG b);
    实现CAdd中的Add方法
    STDMETHODIMP CAdd::Add(LONG a, LONG b, LONG* pVal)
    {
         *pVal = a + b;
         __raise OnAdd(a, b);   // 触发事件
         return S_OK;
    }
    编译、注册订阅者:
    新建Win32 控制台项目,名为AddClient,应用程序设置中添加ATL支持
     添加ATL支持
    在stdafx.h中增加:
    #define _ATL_ATTRIBUTES
    #include 
    #include 
    #include 添加类AddProxy,用于实现Sink对象,同时作为客户端事件驱动代理头文件AddProxy.h#pragma once#include #include "../IAdd.h"[ module(name = "Receiver") ];[ event_receiver(com) ]class CAddProxy{public:     CAddProxy(void);     virtual ~CAddProxy(void);     void OnAdd(LONG a, LONG b);private:     void Hook(IAdd* pS);     void UnHook(IAdd* pS);     LONG Add(LONG a, LONG b);   // 对COM对象的包装     _COM_SMARTPTR_TYPEDEF(IAdd, __uuidof(IAdd));     IAddPtr m_pAdd;};
    实现文件AddProxy.cpp#include "StdAfx.h"#include ".\addproxy.h"#include using namespace std;CAddProxy::CAddProxy(void){
         m_pAdd.CreateInstance("XAdd.Add");   // 创建COM对象     Hook(m_pAdd);                        // 挂接事件}CAddProxy::~CAddProxy(void)
    {
         UnHook(m_pAdd);                           // 取消挂接     m_pAdd = NULL;                            // 销毁COM对象
    }void CAddProxy::OnAdd(LONG a, LONG b){     cout << a << b << endl;              // 事件代码}void CAddProxy::Hook(IAdd* pS){
         __hook(&_IAddEvents::OnAdd, pS, &CAddProxy::OnAdd); // 挂接}void CAddProxy::UnHook(IAdd* pS){
         __unhook(pS);                        // 取消挂接}LONG CAddProxy::Add(LONG a, LONG b){     LONG ret;     m_pAdd->Add(a, b, &ret);     return ret;}在main()函数中创建Proxy对象,执行Add()方法。int _tmain(int argc, _TCHAR* argv[]){     CAddProxy add;     add.Add(1, 2);     return 0;}编译,执行。如果我们看一下Wizard帮我们生成的代码,我们可以发现,在VC 7.0里对COM的支持多出了很多关键字,如__event、__interface、__raise、__hook、__unhook等,通过这些关键字要实现COM事件驱动是很简单的(即使完全不采用Wizard,而手工编码,也不复杂)此外,需要说明的是:虽然VC 7.0是在VS.net中提供的,但采用这种方法写出来的COM组件和接收器都可以在Windows 2000等没有.Net Framework的机器上运行,即不需要.NET Framework的支持。3.1.2            消息队列技术
    通过Microsoft提供的MSMQ(Microsoft Message Queue Server,微软消息队列服务器)也可以实现紧密耦合的事件驱动,这不是本文的重点,这里不叙述。说明:MSMQ只在Windows 2000以后的操作系统提供,且不作为系统的必选安装,需要在安装系统后再增加。3.2               松散耦合事件(Loosely Coupled Events,LCE)
    3.2.1            COM+的事件驱动
    虽然通过连接点技术可以实现COM中的事件驱动,但它存在着一些缺点:
    发布者和订阅者生命周期紧密相关,对于企业应用不很合适
    连接点在建立和断开连接时需要多次交互,效率较低,对于分布式应用环境存在问题
    TCE没有事件过滤的机制针对这些问题,COM+中引入了一种发布和订阅LCE事件的机制,称为COM+事件(COM+ Event)。它有着很多好的特性,本文无法对COM+作更详细的介绍,这里只是结合一个实例说明COM+ Event的实现,而对于事件过滤、安全设定等高级选项请参考COM+相关书籍。实例说明:设计一个股票价格发布和订阅系统,当股票价格发生变动时,发布者自动通知订阅者(调用订阅者的方法)
      

  3.   

    实现步骤:1、编写事件组件通过ATL COM Wizard创建COM组件工程XEvent
    通过ATL Object Wizard创建组件StockEvent,无须设置Attributes中的Support Connection Points
    给IStockEvent增加方法NewQuoteHRESULT NewQuote([in] BSTR bsSymbol, [in] double dValue);无须为该方法实现,只须返回S_OK即可。
    编译,注册2、安装事件组件(以Windows 2000 Professional为例)
    打开“控制面板”==〉“管理工具”下的组件服务
    在COM+应用程序上点右键,“新建”==〉“应用程序”,为事件组件新建一个Application,名为StockApp
    在新建出的StockApp应用程序下的组件菜单中,点右键,“新建”==〉“组件”
    选择“安装新的事件类”
    将第一步编写的事件组件导入,向导会自动发现组件以及组件中的接口。
    安装完成3、编写事件订阅服务
    通过ATL COM AppWizard新建一个COM组件项目,名为StockSubscriber
    导入事件组件接口在stdafx.h中加入#import "../Test.tlb" raw_interfaces_only no_namespace, named_guids
    在项目中加入文件XEvent.h
    通过ATL Object Wizard新建一个Simple Object,名为StockEventSubscriber,这一步工作只是为了让ATL自动帮我们产生idl文件以及coclass的C++类包装,所以接口IStockEventSubscriber对我们是没有什么用途的,可以把它删掉(下面会介绍怎么删除),当然也可以不通过ATL Object Wizard而是自己写idl和CStockEventSubscriber。
    在StockEventSubscriber.idl中修改coclass,使它的默认接口为IStockEvent修改library部分:library STOCKSUBSCRIBERLib{       importlib("stdole32.tlb");       importlib("stdole2.tlb");       importlib("../XEvent/XEvent.tlb");       [              uuid(E04C02F3-F8B4-489C-B91F-A04D3DB5AEFD),              helpstring("StockEventSubscriber Class")       ]       coclass StockEventSubscriber       {              [default] interface IStockEvent;              interface IStockEventSubscriber;       };};给CStockEventSubscriber增加IStockEvent的实现(即当触发事件会执行的代码)头文件StockEventSubscriber.h…class ATL_NO_VTABLE CStockEventSubscriber :          public CComObjectRootEx<CComSingleThreadModel>,         public CComCoClass<CStockEventSubscriber, &CLSID_StockEventSubscriber>,         public IDispatchImpl<IStockEventSubscriber, &IID_IStockEventSubscriber, &LIBID_STOCKSUBSCRIBERLib>,         public IDispatchImpl<IStockEvent, &IID_IStockEvent, &LIBID_XEVENTLib>…BEGIN_COM_MAP(CStockEventSubscriber)         COM_INTERFACE_ENTRY(IStockEventSubscriber)         COM_INTERFACE_ENTRY(IStockEvent)         COM_INTERFACE_ENTRY2(IDispatch, IStockEvent)END_COM_MAP()…
    // IStockEventpublic:         STDMETHOD(NewQuote) (BSTR bsSymbol, double dValue);…实现文件StockEventSubscriber.cpp…STDMETHODIMP CStockEventSubscriber::NewQuote(BSTR bsSymbol, double dValue){         TCHAR buf[100];         _stprintf(buf, _T("%s %lf"), bsSymbol, dValue);         ::MessageBox(NULL, buf, _T("Stock Price"), MB_OK);         return S_OK;}编译,注册
    附:上面的步骤其实产生了一个没有任何用途的“空”接口IStockEventSubscriber,下面给出一个步骤去除它
     在StockEventSubscriber.idl文件中,删除接口定义       [              object,              uuid(1FBF1C53-35B5-4E59-B821-AE68D16E4536),              dual,              helpstring("IStockEventSubscriber Interface"),              pointer_default(unique)       ]       interface IStockEventSubscriber : IDispatch       {       };       删除coclass中的接口说明       interface IStockEventSubscriber;在StockEventSubscriber.h头文件中,删除对IstockEventSubscriber接口的实现public IDispatchImpl<IStockEventSubscriber, &IID_IStockEventSubscriber, &LIBID_STOCKSUBSCRIBERLib>,…
             COM_INTERFACE_ENTRY(IStockEventSubscriber)修改COM_INTERFACE_ENTRY2(IDispatch, IStockEvent)为COM_INTERFACE_ENTRY(IDispatch)编译,注册4、安装事件订阅服务在“组件服务”==〉“StockApp”的组件下新建组件,选择“安装新组件”,安装StockSubscriber.dll5、订阅服务在“组件服务”==〉“StockApp”的组件==〉“StockSubscriber.StockEventSubscriber.1”==〉“订阅”点右键,“新建”==〉“订阅”选择订阅方法,直接选中IstockEvent,点“下一步”
    选择事件类,选中某个事件类,点“下一步”
    订阅选项,为订阅起一个名称StockSubscriber,选中“立即启用该订阅”,点“下一步”
    完成订阅5、测试事件驱动我们用VB写一个简单的COM组件调用(用VC写也是完全一样的),在里面对Xevent的NewStock()方法进行调用,会发现StockSubscriber中的NewStock方法也被调用了(弹出对话框),证明事件被正确的订阅了。代码如下:Private Sub Command1_Click()    Set StockPriceEvent = CreateObject("XEvent.StockEvent")    StockPriceEvent.NewQuote "Test", 100End Sub6、制作COM+安装文件COM+组件服务自动提供了对组件打包分发的功能,可以在“组件服务”==〉“StockApp”点右键,“导出”
    然后可以自动生成安装文件,以后可以直接在其他机器上安装,COM+组件就可以正确安装。其他说明:
     采用COM+实现还可以获得COM+的其他很多特性,比如JIT、对象池、安全特性等。COM+至少要在Windows 2000以上的机器才能够使用。
    4.              总结
    实现COM的事件驱动包括TCE和LCE两种模式,TCE可以通过Connection Point或消息队列实现,LCE通过COM+订阅者模型实现。实现连接点:VC7实现起来更简单,对ATL的支持更全面、更稳定,而VC6.0的ATL则经常容易出现一些小问题。COM+订阅者模型:COM+可以提供更好的运行特性,以及更灵活的配置管理,但只能在Windows 2000以上的机器运行。在实现事件驱动时根据具体情况选择一种实现。
      

  4.   

    去VCKBASE上看杨老师的文章就知道了