【转载】COM 组件设计与应用（十六）——连接点(vc.net)

STDMETHODIMP CDispConnect::Add(long n1, long n2)
{
	long nVal = n1 + n2;
	Fire_Result( nVal );	// 调用IDE帮我们生成的代理函数代码，发出事件

	return S_OK;
}

STDMETHODIMP CSink::QueryInterface(const struct _GUID &iid,void ** ppv)
{
	*ppv=this;
	return S_OK;
}

ULONG __stdcall CSink::AddRef(void)
{	return 1;	}	// 做个假的就可以，因为反正这个对象在程序结束前是不会退出的

ULONG __stdcall CSink::Release(void)
{	return 0;	}	// 做个假的就可以，因为反正这个对象在程序结束前是不会退出的

STDMETHODIMP CSink::GetTypeInfoCount(unsigned int *)
{	return E_NOTIMPL;	}	// 不用实现，反正也不用

STDMETHODIMP CSink::GetTypeInfo(unsigned int,unsigned long,struct ITypeInfo ** )
{	return E_NOTIMPL;	}	// 不用实现，反正也不用

STDMETHODIMP CSink::GetIDsOfNames(<span style="color:#0000ff;">const</span> IID &,LPOLESTR *,UINT,LCID,DISPID *)
{	return E_NOTIMPL;	}	// 不用实现，反正也不用

STDMETHODIMP CSink::Invoke(
	long dispID,
	const struct _GUID &,
	unsigned long,
	unsigned short,
	struct tagDISPPARAMS * pParams,
	struct tagVARIANT *,
	struct tagEXCEPINFO *,
	unsigned int *)
{		// 只需要实现这个就足够啦
	switch(dispID)	// 根据不同的dispID,完成不同的回调函数
	{
	case 1:
		......	// 这里就能接收到 COM 发出的事件啦
		break;
	case 2:
		......	// 事件的代号 dispID 其实就是 IDL 文件中的连接点函数的id(n)的号码
		break;
	default:	break;
	}
	return S_OK;
}

......
library MultConnectLib
{
	importlib("stdole2.tlb");
	...... // 第一个连接点。是 ATL 帮我们生成的 <b>[   // 第2个连接点，需要我们手工添加
		uuid(E3330AE1-2B1D-42E6-A8E0-A9CB0D1AC74C), // CLSID 可以用 GUIDGEN.EXE 产生
		helpstring("_IDispConnect事件接口")
	]
	dispinterface _IDispConnectEvents2
	{
		properties:
		methods:
	};</b> [
		uuid(4B0FDB44-BAF2-4F25-A2B0-B5ECD5CD440E), // 这是示例程序的类型库ID，肯定和你产生是不同的
		helpstring("DispConnect Class")
	]
	coclass DispConnect
	{
		[default] interface IDispConnect;
		[default, source] dispinterface _IDispConnectEvents; <b>[source] dispinterface _IDispConnectEvents2; // 别忘了，这还有一行</b> };
};

HRESULT Fire_Timer( VARIANT  varDate)
{
　　HRESULT hr = S_OK;
　　T * pThis = static_cast(this);
　　int cConnections = m_vec.GetSize();

　　for (int iConnection = 0; iConnection < cConnections; iConnection++)
　　{
　　　　pThis->Lock();
　　　　CComPtr punkConnection = m_vec.GetAt(iConnection);
　　　　pThis->Unlock();

　　　　IDispatch * pConnection = static_cast(punkConnection.p);
　　　　if (pConnection)
　　　　{
　　　　　　CComVariant avarParams[1];
　　　　　　<b>// 原始为：avarParams[0] = varDate;	avarParams[0].vt = VT_VARIANT;
　　　　  // 但可惜这是错误的，因为 avarParams[0] = varDate; 就已经正确地完成了赋值
　　　　  // 再对 avarParams[0].vt 赋值，是引用方式才能这么操作的。
　　　　  avarParams[0] = varDate; // 这才是正确的操作</b> 　　　　   CComVariant varResult;

　　　　   DISPPARAMS params = { avarParams, NULL, 1, 0 };
　　　　   hr = pConnection->Invoke(1, IID_NULL, LOCALE_USER_DEFAULT, DISPATCH_METHOD, ¶ms, &varResult, NULL, NULL);
　　　　 }
　　}
　　return hr;
}