COM动态添加删除成员,类似JavaScript中调用的对象

在JavaScript中调用对象时,可动态添加删除成员如:

var obj=new Object;
obj.member1='aaaaa';
obj.fun1=function()
{
    alert('fun1');
}

查了好些资料,原来Object这个COM对象,是实现了IDispatchEx接口

JS在调用对象成员之前,先利用IDispatchEx::GetDispID(成员名) 判断成员是否存在

那么在VC++中编写COM对象时即可以这样 在GetDispID中 添加对应的成员即可

//类头文件
class CSRObject	:public IDispatchEx
{
	CSRObject(void);
	~CSRObject(void);
	virtual HRESULT STDMETHODCALLTYPE GetDispID( __RPC__in BSTR bstrName, DWORD grfdex, __RPC__out DISPID *pid );

	virtual HRESULT STDMETHODCALLTYPE InvokeEx( DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp, VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller );

	virtual HRESULT STDMETHODCALLTYPE DeleteMemberByName( __RPC__in BSTR bstrName, DWORD grfdex );
	virtual HRESULT STDMETHODCALLTYPE QueryInterface( REFIID riid, void **ppvObject );
         //省略若干虚函数实现...
}

HRESULT STDMETHODCALLTYPE CSRObject::QueryInterface( REFIID riid, void **ppvObject )
{
	if (riid==IID_IUnknown)
	{
		*ppvObject = (CSRObject *)this;
	}else if (riid==IID_IDispatch)
	{
		*ppvObject = (CSRObject *)this;
	}else if (riid==IID_IDispatchEx)
	{
		*ppvObject = (CSRObject *)this;
                  //IDispatchEx接口
	}else{
		*ppvObject = NULL;
		return(E_NOINTERFACE);
	}
	return S_OK;
}

//这里是JS按照成员名字查成员DISPID
//JS在调用成员前会先调用该函数
HRESULT STDMETHODCALLTYPE CSRObject::GetDispID( __RPC__in BSTR bstrName, DWORD grfdex, __RPC__out DISPID *pid )
{
	AFX_MANAGE_STATE(AfxGetStaticModuleState());

         if(grfdex & fdexNameCaseInsensitive) 

		//如果有fdexNameCaseInsensitive标志,查找成员名时忽略大小写

	if (成员不存在 && grfdex & fdexNameEnsure)  	

		//如果成员不存在且有fdexNameEnsure标志,你需要动态的创建这个成员名

	//存在成员返回S_OK,并且 *pid=该成员ID

        //没有该成员返回 DISP_E_UNKNOWNNAME
}

//这里才是真正的调用函数
HRESULT STDMETHODCALLTYPE CSRObject::InvokeEx( DISPID id, LCID lcid, WORD wFlags, DISPPARAMS *pdp, VARIANT *pvarRes, EXCEPINFO *pei, IServiceProvider *pspCaller )
{
	AFX_MANAGE_STATE(AfxGetStaticModuleState());

        //参数:id 就是JS通过GetDispID得到的DISPID,你需要按照该ID判断此次调用的是什么函数

	if (wFlags & DISPATCH_PROPERTYGET && wFlags & DISPATCH_METHOD)
	{
                //比如在JS中的代码:
                //var n=xxx.getvalue([param]);
                //那么将会到这里来
	}else if (wFlags & DISPATCH_PROPERTYGET)	//获取属性值
	{
                //比如在JS中的代码:
                //var n=xxx.value;
                //那么将会到这里来
	}else if (wFlags & DISPATCH_PROPERTYPUT) //设置属性值
	{
                //比如在JS中的代码:
                //xxx.value=n;
                //那么将会到这里来
	}else if (wFlags & DISPATCH_METHOD) //调用成员
	{
                //比如在JS中的代码:
                //xxx.getvalue();
                //那么将会到这里来
	}else{
		//其它情况暂时没遇到过
		return DISP_E_MEMBERNOTFOUND;
	}

	return hr;
}

备份:http://www.silenceret.com/view.asp?id=12