用虚函数实现事件驱动！

以下是我用虚函数实现的消息驱动的类。可以实现由一个对象发出消息，引起其它的符合条件的对象的相应操作。条件是所有对象必须是由相同的事件驱动类(注意模板的参数)及其派生类所生成的。
很简单，很有趣，大家不妨一试。

------------------------------------------------------------------------------------------

头文件"evedri.h"，包含事件驱动类模板的定义和实现。
#ifndef __EVEDRI__H__
#define __EVEDRI__H__
事件驱动类模板的定义//
template<typename T,int flag=0>
class event_driven
{
        struct Obj_List
        {
                event_driven<T,flag>* Obj;//自身指针。用于调用虚函数。
                Obj_List *Next;
        } Mine;                链表的项。
        static Obj_List* Point;//链表的头指针。
                               该链表存储所有用此类及此类的派生类生成的对象的指针。
public:
        event_driven();//构造函数。用于将自身指针存于链表中。
        ~event_driven();//析构函数。在链表中删除自身。
        void set_message(T,void* =0);//发送消息的函数。它会把消息发送给所有用此类
                                     及此类的派生类生成的对象。
        virtual void get_mes(T,void*);//※消息处理函数。定义为虚函数，是为了让存储
                                      在链表中的基类指针可以调用派生类的函数。
};
///事件驱动类模板的实现/
链表头指针初始化为空
template<typename T,int flag>
event_driven<T,flag>::Obj_List* event_driven<T,flag>::Point=0;
构造函数的实现。
template<typename T,int flag>
event_driven<T,flag>::event_driven()
{
        Mine.Obj=this;
        Mine.Next=0;
        if(0==Point)
                Point=&Mine;
        else
        {
                for(Obj_List* p=Point;0!=p->Next;p=p->Next);
                p->Next=&Mine;
        }
}
析构函数实现。
template<typename T,int flag>
event_driven<T,flag>::~event_driven()
{
        if(&Mine==Point)
                Point=Mine.Next;
        else
        {
                for(Obj_List* p=Point;0!=p->Next;p=p->Next)
                        if(&Mine==p->Next)
                        {
                                p->Next=Mine.Next;
                                return;
                        }
        }
}
发送消息的函数实现。
template<typename T,int flag>
void event_driven<T,flag>::set_message(T mes_class,void* mes_data)
{
        for(Obj_List* p=Point;0!=p;p=p->Next)
                p->Obj->get_mes(mes_class,mes_data);
}
消息处理函数实现。
template<typename T,int flag>
void event_driven<T,flag>::get_mes(T mes_class,void* mes_data)
{
}
#endif
结束。

------------------------------------------------------------------------------------------

以下是一个使用事件驱动类的例子。

------------------------------------------------------------------------------------------

#include "evedri.h"
#include <iostream.h>
enum event{mes1,mes2};
class aa:virtual public event_driven<event>
{
 char* objname;
public:
 aa(char* str){objname=str;}
 void get_mes(event i,void*){cout<<objname<<" is called"<<endl;}
};
aa w("w");
void main()
{
 aa a("a"),b("b"),c("c");
 a.set_message(mes1);
}

-------------------------------------------------------------------------------------------