枚举CAD命令行子窗口acedGetAcadTextCmdLine();

admin

1. CWnd *wTextCmdLine = acedGetAcadTextCmdLine();
3. if (wTextCmdLine != NULL)
5. {
7. ::EnumChildWindows(wTextCmdLine->m_hWnd,EnumChildProc,0);
9. }
11. BOOL CALLBACK EnumChildProc(HWND hWnd,LPARAM lParam)
13. {
15. WCHAR lpWinTitle[256];
17. ::GetWindowText(hWnd,lpWinTitle,256-1);
19. CString m_strTitle;
21. m_strTitle.Format(_T("%s"),lpWinTitle);
23. MessageBox(NULL,m_strTitle,_T("cwnd"),MB_OK);
25. WCHAR lpWinTitle2[256];
27. ::GetClassName(hWnd,lpWinTitle2,MAX_PATH-1);
29. MessageBox(NULL,lpWinTitle2,_T("cwnd"),MB_OK);
31. /*命令行会有三个子窗口*/return true;
33. }

复制代码