COM

NoRemove *
{
	NoRemove ShellEx
	{
		{00021500-0000-0000-C000-000000000046} = s '{MYKEY}'
	}
}

IShellFolder* shFolder = NULL;
IQueryInfo* pInfo;

LPITEMIDLIST pidl = NULL;

SHGetDesktopFolder(&shFolder);
SHILCreateFromPath(file, &pidl, 0);

if (SUCCEEDED(shFolder->GetUIObjectOf(NULL, 1, (LPCITEMIDLIST*)&pidl, IID_IQueryInfo, NULL, (void**)&pInfo)))
{
	pInfo->GetInfoTip(0, &pwszTip);
	pInfo->Release();

	if (pwszTip)
	{
		MessageBox(NULL, pwszTip, NULL, MB_OK);
	}
}

CComPtr<ICWOLE2> tCWOLE;
HRESULT hr;
hr = CoInitialize(0);

hr = CoCreateInstance(CLSID_CWOLEv2, 0, CLSCTX_LOCAL_SERVER, IID_ICWOLE2, (void**)&tCWOLE);
IConnectionPointContainer   * pConnPtContainer;
hr = tCWOLE->QueryInterface(IID_IConnectionPointContainer,(void**)&pConnPtContainer);
if(FAILED(hr)){
	CoUninitialize();
	return false;
}
CComPtr<IConnectionPoint> ICPoint;
hr = pConnPtContainer->FindConnectionPoint(DIID_ICWOLEEvents,&m_pConnectionPoint);
if(FAILED(hr)){
	CoUninitialize();
	return false;
}

m_sink = new CSink;
LPUNKNOWN pUnk = NULL;
m_sink->QueryInterface(IID_IUnknown,(void**)&pUnk);
hr = m_pConnectionPoint->Advise(pUnk,&m_sink->cookie);
if(FAILED(hr)){
	CoUninitialize();
	return false;
}
pConnPtContainer->Release();
.
.
.
// Here I must get the event from the COM Server, but how can this be done???
// How can I test if I get the information from the correct class??
.
.
.

m_pConnectionPoint->Unadvise(m_sink->cookie);
m_pConnectionPoint->Release();
m_sink->Release();

class CSink : public ICWOLEEvents
{
	public:
		
		CSink::CSink() {m_refCount = 1, cookie = 0;}
		CSink::~CSink()	{}
		
		STDMETHODIMP QueryInterface(REFIID riid, void ** ppvObj); //HRESULT _stdcall
		STDMETHODIMP_(ULONG) AddRef();  // Note the underscore
		STDMETHODIMP_(ULONG) Release();
	
		
		STDMETHODIMP GetTypeInfoCount(UINT *iTInfo);
		STDMETHODIMP GetTypeInfo(UINT iTInfo, LCID lcid, ITypeInfo **ppTInfo);
		STDMETHODIMP GetIDsOfNames(REFIID riid, OLECHAR **rgszNames, UINT cNames,  LCID lcid, DISPID *rgDispId);
		STDMETHODIMP Invoke(DISPID dispIdMember, 
							REFIID riid, 
							LCID lcid,
							WORD wFlags, DISPPARAMS* pDispParams,
							VARIANT* pVarResult, EXCEPINFO* pExcepInfo,
							UINT* puArgErr);
		
		
		
    public:
		int m_refCount;
		DWORD cookie;
		//void OnConfigurationApply(VARIANT_BOOL *pAccept);
		void OnShowMessageDlg(IMsgDlg *pIMsg, VARIANT_BOOL *Result);

};

HRESULT CSink::QueryInterface(REFIID riid, void ** ppvObj)
{

	if (riid == IID_IUnknown){
		*ppvObj = static_cast<void*>(this);
	}
	
	else if (riid == DIID_ICWOLEEvents){
		*ppvObj = static_cast<ICWOLEEvents*>(this);
	}
	else if (riid == IID_IDispatch){
		*ppvObj = static_cast<IDispatch*>(this);
	}
	
	else
	{
	    char clsidStr[256];
	    WCHAR wClsidStr[256];
	    char txt[512];
		
	    StringFromGUID2(riid, (LPOLESTR)&wClsidStr, 256);
		
	    // Convert down to ANSI
	    WideCharToMultiByte(CP_ACP, 0, wClsidStr, -1, clsidStr, 256, NULL, NULL);
		
	    sprintf(txt, "riid is : %s: Unsupported Interface", clsidStr);
		
		*ppvObj = NULL;
		return E_NOINTERFACE;
	}
	
	static_cast<IUnknown*>(*ppvObj)->AddRef();
	return S_OK;
}
/******************************************************************************/
STDMETHODIMP_(ULONG) CSink::AddRef()
{
	return ++m_refCount;
}
/******************************************************************************/
STDMETHODIMP_(ULONG) CSink::AddRef()
{
	return ++m_refCount;
}
/******************************************************************************/
STDMETHODIMP_(ULONG) CSink::Release()
{
	if (--m_refCount == 0)
	{
		delete this;
		return 0;
	}
	return m_refCount;
}
/******************************************************************************/
STDMETHODIMP CSink::GetTypeInfoCount(UINT *iTInfo)
{
	return E_NOTIMPL;
}
/******************************************************************************/
STDMETHODIMP CSink::GetTypeInfo(UINT iTInfo, LCID lcid, 
                                       ITypeInfo **ppTInfo)
{
	
	return E_NOTIMPL;
}
/******************************************************************************/
STDMETHODIMP CSink::GetIDsOfNames(REFIID riid,  
                                         OLECHAR **rgszNames, 
                                         UINT cNames,  LCID lcid,
                                         DISPID *rgDispId)
{
	HRESULT hr = E_FAIL;
	return hr;
}
/******************************************************************************/
STDMETHODIMP CSink::Invoke(DISPID dispIdMember, REFIID riid, LCID lcid,
                                  WORD wFlags, DISPPARAMS* pDispParams,
                                  VARIANT* pVarResult, EXCEPINFO* pExcepInfo,
                                  UINT* puArgErr)
{

	if ((riid != IID_NULL))
		return E_INVALIDARG;
	
	HRESULT hr = S_OK;  // Initialize
	
	
	return hr;
}
/******************************************************************************/
void CSink::OnShowMessageDlg(IMsgDlg *pIMsg, VARIANT_BOOL *Result){
	// Is this correct???
}

[
  uuid(90B4344B-90CD-4527-BC00-4F4D45C793D6),
  version(2.13),
  helpstring("CW  CWOLE")
]
library CW_CWOLE
{
    // TLib :     // TLib : OLE Automation : {00020430-0000-0000-C000-000000000046}
    importlib("stdole2.tlb");

    // Forward declare all types defined in this typelib
    interface ICWOLE2;
    dispinterface ICWOLEEvents;
.
.
.
.
.

    [
      uuid(6775FB91-B5BE-11D6-A996-0050BA24C7B9),
      version(1.1),
      helpstring("Event dispatch interface for CW CWOLE")
    ]
    dispinterface ICWOLEEvents {
        properties:
        methods:
            [id(0x00000001)]
            void OnConfigurationApply([in, out] VARIANT_BOOL* pAccept);
            [id(0x00000002)]
            void OnShowMessageDlg(
                            [in] IMsgDlg* pIMsg, 
                            [out, retval] VARIANT_BOOL* Result);
    };

    typedef [uuid(5CBBA151-1C47-4D6C-B14C-C527E333F812), version(1.2)]
    enum {
        ECS_DEFAULT = 0,
        ECS_FRONT = 1,
        ECS_LEFT = 2,
        ECS_RIGHT = 3,
        ECS_LEFTUP = 4,
        ECS_RIGHTUP = 5,
        ECS_TOP = 6,
        ECS_BACK = 7,
        ECS_BACKLEFTUP = 8,
        ECS_BACKRIGHTUP = 9,
        ECS_BOTTOM = 10
    } ECamSetup;

    typedef [uuid(9545E3CA-6401-4418-A040-DA3A89E2C792), version(1.3)]
    enum {
        EPM_PERSP = 0,
        EPM_ORTHO = 1,
        EPM_2D = 2
    } EProjectionMode;

    [
      uuid(F560F763-2948-11D7-A9BF-0050BA24C7B9),
      version(2.13),
      helpstring("CWOLE2")
    ]
    coclass CWOLEv2 {
        [default] interface ICWOLE2;
        [default, source] dispinterface ICWOLEEvents;
    };