COM

<br />
......<br />
<br />
static CLSID clsid;	// i already get the right clsid from the registry<br />
<br />
IDispatch *pInterface = 0;<br />
<br />
CoInitialize(NULL);<br />
<br />
// create the control <br />
HRESULT hRet = CoCreateInstance(clsid, NULL, CLSCTX_INPROC_SERVER, IID_IDispatch, (void**) &pInterface ); <br />
// examine return value <br />
if(hRet!=S_OK) pInterface = 0;  <br />
			<br />
CString CstrMethod = "CONFIG"; <br />
BSTR BstrMethod = CstrMethod.AllocSysString();<br />
<br />
DISPID dispid; <br />
<br />
// get the id of the method									<br />
hRet = pInterface->GetIDsOfNames(IID_NULL, &BstrMethod, CLSCTX_INPROC_SERVER , LOCALE_SYSTEM_DEFAULT, &dispid); <br />
<br />
if(hRet!=S_OK) MessageBox("It is not possible to get the Id of the method!");<br />
<br />
CWnd m_ControlWrapper;<br />
RECT rct = {0,0,5,50};<br />
<br />
BOOL bStat=FALSE;<br />
bStat= m_ControlWrapper.CreateControl(clsid, "Spectrometer", WS_CHILD, rct, this, 1212, NULL, FALSE, NULL);<br />
<br />
if (bStat == FALSE)<br />
{<br />
     ::MessageBox (m_hWnd,"Error!!", /*Fenster header:*/"Could not place control", MB_OK);<br />
     return;<br />
}<br />
<br />
VARIANT varResult;<br />
VariantInit(&varResult);<br />
EXCEPINFO ExceptInfo;<br />
DISPPARAMS dispparamsNoArgs = { NULL, NULL, 0, 0 };<br />
<br />
// here is the problem hRet = E_UNEXPECTED<br />
hRet = pInterface->Invoke(dispid, IID_NULL, LOCALE_SYSTEM_DEFAULT, DISPATCH_METHOD, &dispparamsNoArgs, &varResult, &ExceptInfo, NULL);<br />
<br />
CoUninitialize(); <br />

interface IX : IUnknown<br />
{<br />
	virtual void __stdcall Fx() = 0;<br />
	virtual void __stdcall Fy() = 0;<br />
};

interface IX : IUnknown<br />
{<br />
	virtual void __stdcall Fy() = 0;<br />
	virtual void __stdcall Fx() = 0;<br />
};