如何获得连接点容器（IConnectionPointContainer)(100分)

VC++的代码为
ITTAPI m_pTapi ;
HRESULT hr = S_OK;
IConnectionPointContainer * pCPC;
IConnectionPoint * pCP;
// 获得连接点容器
//
hr = m_pTapi->QueryInterface(
IID_IConnectionPointContainer,
(void **)&pCPC
);
请问上述的IID_IConnectionPointContainer 在delphi为什么呢？请帮忙用delphi代码翻译以上代码，谢谢了，还有
HRESULT STDMETHODCALLTYPE QueryInterface(REFIID iid, void **ppvObject)
{
if (iid == IID_ITTAPIEventNotification)
{
AddRef();
*ppvObject = (void *)this;
return S_OK;
}

if (iid == IID_IUnknown)
{
AddRef();
*ppvObject = (void *)this;
return S_OK;
}

return E_NOINTERFACE;
}
用delphi怎么写呢？谢谢了，由于本人是刚来注册的，现在只有给100分，请各位见谅！