Исходный код

//---------------------------------------------------------
// Интеграция с MechaniCS.
// Запускает MechaniCS.
//---------------------------------------------------------

// получить утилиты
CComPtr<ITDMSUtility> pUtility;
CheckError(pApp->get_Utility(&pUtility));

// запустить любую версию MechaniCS под текущей версией AutoCAD
CComPtr<ITDMSAcad> pAcad;
VARIANT varMCSName, varAcadName;
varMCSName.vt = VT_EMPTY;
varAcadName.vt = VT_EMPTY;
CheckError(pUtility->StartMechaniCS(varMCSName, varAcadName, &pAcad));

// запустить конкрентную версию MechaniCS
CComPtr<ITDMSAcad> pAcad;
VARIANT varMCSName, varAcadName;
varMCSName.vt = VT_BSTR;
varMCSName.bstrVal = A2BSTR("MechaniCS 3.0");
varAcadName.vt = VT_EMPTY;
CheckError(pUtility->StartMechaniCS(varMCSName, varAcadName, &pAcad));
SysFreeString(varMCSName.bstrVal);