Я пишу dll плагина-отладчика для Mathcad. http://twt.mpei.ru/ochkov/Mathcad_14/Chapter6/index.html#_Toc163715518 это всё делается (на всякий случай).
Есть успешно работающая dll, по команде из Mathcad`а создающая интерфейсный поток с модальным диалогом отладчика, и по другой команде его завершающая. DLL - "обычная с использованием общей DLL MFC". Резво так окошко вылезает и прячется 
Дальше мне надо добавить в диалог компонент ActiveX (NTGraph). Exe-шники с этим компонентом работают. Соответствующий OCX регистрирую (успешность регистрации подтверждается отсутствием характерной ошибки Debug Assertion Failed! Program: C:\блаблабла.exe File: блаблабла\occcont.cpp Line: 926). Но окошко появляться не жалает. Никаких runtime error, просто не появляется.
Пробовал другие ActiveX на диалог наляпывать - всё одно: без компонентов - робит, с компонентами - не робит.
КОД
| Код | mcd_debug.cpp
#define AMS AFX_MANAGE_STATE(AfxGetStaticModuleState())
/*.........*/
LRESULT ShowDeb(COMPLEXSCALAR * const Result,const COMPLEXSCALAR * const x)
{AMS; // та самая волшебная функция, вызывающая и убивающая поток с диалогом
Result->real = 0;
if ((x->real == 1) & (!vidim))// показ окна дебаггера
{
if (!myVal.IsEmpty()) myVal.RemoveAll(); // Чистим глобальный массив
CRuntimeClass * RtC = RUNTIME_CLASS(CMyUIThread);
pThread = AfxBeginThread(RtC);// запустили поток с окном
if (pThread->m_hThread == NULL) Result->real = 0; // FAIL // кстати другая уже тема, но еще не понял как правильно проверить успешность
else {vidim = TRUE; Result->real = 1;} // SUCCESS
}
else if (vidim) // уничтожить окно дебаггера
{
PostThreadMessage( pThread->m_nThreadID, WM_QUIT, 0, 0);// завершаем поток
if (pThread->m_hThread == NULL) Result->real = 0; // FAIL
else {vidim = FALSE; Result->real = 1;} // SUCCESS
}
Result->imag = 0;return 0;
}
/*.........*/
BOOL Cmcd_debugApp::InitInstance()
{
AfxEnableControlContainer(); // использовать ActiveX ()
CWinApp::InitInstance();
/*.........*/
return(TRUE);
} |
В классе потока CMyUIThread,
| Код | MyUIThread.cpp
BOOL CMyUIThread::InitInstance()
{
AfxEnableControlContainer(); // если убрать здесь и в Cmcd_debugApp::InitInstance() или в одном из них - тоже не запускается
myDlg.DoModal(); // Запускаем единственное окно дебаггера myDlg - public член класса CMyUIThread
return TRUE;
}
int CMyUIThread::ExitInstance()
{
myDlg.~CAdvDlg(); // вот кстати тоже хз, как правильнее окно уничтожить
return CWinThread::ExitInstance();
}// всё остальное по умолчанию |
И в классе вызываемого потоком модального окна
| Код | AdvDlg.cpp
// Конструктор, деструктор - по умолчанию
void CAdvDlg::DoDataExchange(CDataExchange* pDX)
{
CDialog::DoDataExchange(pDX);
DDX_Control(pDX, IDC_EDIT1, myEdit);
DDX_Text(pDX, IDC_EDIT1, lastVal);
//DDX_Control(pDX, IDC_NTGRAPHCTRL1, m_Graph1); // пробую закоментировать/раскомментировать - влияния нет
}
BOOL CAdvDlg::OnInitDialog()
{
CDialog::OnInitDialog();
//m_Graph1.SetFrameStyle(0); // прямоугольник без картинки
//m_Graph1.SetPlotAreaColor(RGB(255,255,255)); // белый фон
//m_Graph1.SetControlFrameColor(RGB(255,255,255)); // инициализация компонента - пробую закоментить-раскоментить - не влияет
return TRUE; // пробовал FALSE. по смыслу у меня фокус не стоит ни на одном элементе, поэтому ТРУ
} |
Вообще диалог создан редактором ресурсов VS
В основном всё поумолчательное
ОТЛАДКА
При создании потока проходит конструктор диалога CAdvDlg
Доходит до myDlg.DoModal(); в CMyUIThread::InitInstance()
До BOOL CAdvDlg::OnInitDialog() не доходит. Просто передает управление маткаду, так и не показав окно. Вглубь не могу отследить, ибо "Не загружена символьная информация ни для одного фрейма стека вызовов. Невозможно показать исходный код."
Вот. Требуется брэйншторминг. Задача осложняется тем, что я могу чинить только свою сторону и не знаю что там делает Mathcad, потому что я его не писал Не знаю, как влияет на это вызывающее приложение, вообще как оно может повлиять, если у всё это в другом потоке? Значит косяк на моей стороне...
Может вообще не так делаю? Никогда не втыкал ActiveX в dll. |
