相信用过Borland delphi或者C++ builder的朋友都应该对VCL组件中的事件回调机制有深刻印象，VCL组件大量的使用了事件属性来简化类之间的交互，提高了VCL组件开发程序的效率。同时，也可以在自己编写的的类中增加事件属性，使与VCL组件或者其他自定义类的交互变得简单、直观。

       VCL的事件机制其实就是函数指针回调的一种形式，通过在一个类A中保存其类B实例方法指针，类A就可以在其内部直接调用类B的实例方法。只是borland从开发语言层面上把其包装得易于理解和易用。如下面的例子：

       //声明一种事件类型，相当于c++中的函数指针类型，只是“of object”限定了此类型针对的是类方法。

       TErrorNotifyEvent = procedure (ErrCode:integer; ErrMsg:string) of object;

       TSourceClass=class(TObject)      //假设TSourceClass需要把其内部运行的错误通知给其他类的实例

        private

              //我们可以声明一个TErrorNotifyEvent类型的成员变量，用于保存回调函数指针

              FOnError:TErrorNotifyEvent;

        protected

              procedure DoErrorNotify(ErrCode:integer,ErrMsg:string);

        public

              //声明事件属性，并通过FOnError成员变量存取

              property OnError:TErrorNotifyEvent read FOnError write FOnError;

       End;

       procedure TSourceClass.DoErrorNotify(ErrCode:integer,ErrMsg:string);

       begin

              if FOnError<>nil then FOnError(ErrorCode,ErrMsg); //在TSrouceClass中回调FOnError保存的方法指针。

       end;

       这样，其他类就可以通过存取TSourceClass类的OnError属性达到使用TSourceClass错误报告的目的。一旦       TSourceClass内部有任何的错误需要通知到外部，都可以直接调用DoErrorNotify

       TTargetClass=class(TObject) //假设TTargetClass需要TSourceClass的错误通知

         private

         public

        //声明一个与TErrorNotifyEvent类型兼容的成员方法

              procedure ReceiveErrorNotify(ErrorCode:integer; ErrMsg:string);

       End;

       procedure TTargetClass.ReceiveErrorNotify(ErrorCode:integer; ErrMsg:string);

       begin

              //在ReceiveErrorNotify处理来自TSourceClass错误通知

       end;

       这样，TSourceClass与TTargetClass都已经具备了使用TErrorNotifyEvent事件类型进行交互的一切。下面的            代码演示了如何在它们的实例之间搭起联系。

       objSource:TSourceClass;

       objTarget:TTargetClass;

       objSource:=TSourceClass.Create;

       objTarget:=TTargetClass.Create;

       objSource.OnError:=objTarget.Receive //这样就把objSource与objTarget联系在一起。

       回到在c++可视化编成中占据重要地位的VC++，其MFC框架就没有提供如VCL框架类似的事件回调机制。不同类之间的交互需要编写很多额外的代码，或者使用其他的方法，如window消息。如使用MFC的CAsyncSocket类时，你不得不通过重载某些方法以达到接收socket数据的目的。如果CAsyncSocket本身有类似socket数据到达的事件通知OnDataArrived，那么我们就可以不需要重载CAsyncSocket类，直接在主程序类中使用OnDataArrived就可以达到接收socket数据的目的。

       那么，有没有别的方法可以帮助在VC中实现类似的VCL的事件回调机制呢？

       参照上面VCL的例子，我们很自然想到形如以下的方式：

typedef  void  (*NOTIFY_EVENT)(int notify_code);  //定义事件回调函数指针类型

class A

{

private:

public:

   NOTIFY_EVENT OnNotify; //声明事件属性

};

class B

{

private:

public:

  void  ReceiveNotify(int notify_code) //定义接收回调通知的成员函数

  {

  }

};

       并且按如下方式使用：

       A objA;

       B objB;

       objA.OnNotify=objB.ReceiveNotify;  //搭建类实例的之间联系，但此语句编译出错!

       在VC中编译，会产生如下的编译错误

              error C2440: '=' : cannot convert from 'void (__thiscall B::*)(int)' to 'void (__cdecl *)(int)'

       上述的编译信息表明两点：

       1．类A的OnNOtify成员变量是NOTIFY_EVENT的调用方式与B::ReceiveNotify不同，前者是    __cdecl方      式,后者则是默认的thiscall方式；

       2． NOTIFY_EVENT与B::ReceiveNotify类型不同，前者是一般的函数指针类型，后者则是针对类B  的函数指针类型 。

成员指针

       顾名思义，就是指向类成员的指针。C++中支持成员指针的定义和使用。如：

       class A

       {

       public:

              int m_IntMember;

              void VoidMethod() {}

       }

       上面的类A中有一个m_IntMember成员变量，一个VoidMethod成员函数。我们可以声明和使用指向它们的成员指针：

       int A::* pInt=&A::m_IntMember;

       typedef (B::*METHOD_POINTER)();

       METHOD_POINTER pMethod=&B::VoidMethod;

       A objA; A objB;

       int iVar=objA.*pInt; //直接存取实例objA的m_IntMember值

       objA.*pMethod(); //调用的是实例objA的VoidMethod方法

       objB.*pInt=iVar; //直接存取实例objB的m_IntMember值

       objB.*pMethod(); //调用的是实例objB的VoidMethod方法

       那么，我们如何使用成员指针解决上面编译错误的问题呢？ 请看下面代码。

//声明针对类B的函数指针类型

typedef  void  (B::*ERROR_NOTIFY_EVENT)(int notify_code);

class A

{

private:

public:

   ERROR_NOTIFY_EVENT OnNotify;

};

class B

{

private:

public:

  void  ReceiveNotify(int notify_code)

  {

  }

};

       A objA;

       B objB;

       objA.OnNotify=objB.ReceiveNotify;  //这样就ok了！！！

通过声明针对类B的成员函数指针类型 typedef  void  (B::*ERROR_NOTIFY_EVENT)(int notify_code)，实现类A实例回调类B实例的目的，这就是c++中实现事件回调机制的方法。