CAD主视窗口激活问题

guoshun

由自已做的树型视菜单，单击树视节点，发送一条命令到命令窗口，如“输入线名称：”。此时按键盘没有作保反映，必须先用鼠标点击主视窗，方可由键盘输入。这样不方便。怎样发送命令到命令窗口，并且同时激活主视窗口？

newer

你是怎么做的？ 把代码贴到论坛来。

guoshun

使用acDocManagerPtr()->sendstringToExecute(curDoc(),_T("(seleobj)\n"),false,true)
发送到cad命令窗口。鼠标进入树型为单箭头，单击结点后（执行上述函数），回到cad图形视窗仍为单箭头，只有在cad图形视窗单击后，鼠标才变回十字型。

CSharpBoy

让ACAD主窗口保持焦点。
鼠标离开菜单窗口，让ACAD主窗口保持焦点。

xinxirong

那就发送focus消息到绘图区试试，

guoshun

请问怎样“发送focus消息到绘图区试试”

guoshun

“鼠标离开菜单窗口，让ACAD主窗口保持焦点。“　思路是清晰的，但我不会做。请您帮忙。

LoveArx

guoshun 发表于 2017-8-16 15:25

主窗口 SetFocus()

guoshun

CMDIFrameWnd *pF;
pF = acedGetAcadFrame();               
acDocManagerPtr()->sendStringToExecute(curDoc(), _T("(seleobj)\n"), false, true);
pF->SetFocus();
这样试了，不行。

xinxirong

drawing窗口

guoshun

CView *pF;
                pF = acedGetAcadDwgView();
                acDocManagerPtr()->sendStringToExecute(curDoc(), _T("(seleobj)\n"), false, true);
                pF->SetFocus();
这样也不行。

newer

为了即时传送到命令行执行，
你要在 sendStringToExecute 前面 设置 命令行窗口焦点。

1.                 AcApDocument* pDoc = acDocManager->curDocument();
   
2.                 if (pDoc)
   
3.                 {
   
4.                         // give the command line focus (otherwise the command doesn't get processed immediately)
   
5.                         CWnd* wndCommandLine = acedGetAcadDockCmdLine();
   
6.                         if( wndCommandLine )
   
7.                                 wndCommandLine->SetFocus();               
   
8.                         Acad::ErrorStatus es = acDocManager->sendStringToExecute(pDoc, sToSend, false, true, false);
   
9.                         if( es == Acad::eOk )
   
10.                                 acedRetT();
    
11.                 }
    

                AcApDocument* pDoc = acDocManager->curDocument();<br />                 if (pDoc)<br />                 {<br />                         // give the command line focus (otherwise the command doesn't get processed immediately)<br />                         CWnd* wndCommandLine = acedGetAcadDockCmdLine();<br />                         if( wndCommandLine )<br />                                 wndCommandLine->SetFocus();                <br />                         Acad::ErrorStatus es = acDocManager->sendStringToExecute(pDoc, sToSend, false, true, false);<br />                         if( es == Acad::eOk )<br />                                 acedRetT();<br />                 }<br />

xinxirong

我觉得acedGetAcadDwgView()也行，主要是顺序问题

guoshun

if (str == _T("选线"))
        {       
                AcApDocument *pDoc = acDocManager->curDocument();
                if (pDoc) {
                        CWnd* wndCommandLine = acedGetAcadDockCmdLine();
                        if (wndCommandLine)
                                wndCommandLine->SetFocus();
                        Acad::ErrorStatus es = acDocManager->sendStringToExecute(pDoc, _T("(seleobj)\n"), false, true);
                        if (es == Acad::eOk)
                                acedRetT();
                }
        }
这样试了，也不行。

Lisphk

guoshun 发表于 2017-8-17 17:28

你不点击菜单，鼠标移动到菜单上，然后离开进入CAD窗口，这个时候光标自动变成十字线不？