[求助]：各位高人如何用键盘来控制鼠标（帮忙看以下代码那有错）

casmli

我想用键盘来控制鼠标的一些动作，例如移动、按键信息等，但没能成功。下面是试验的一个例子（在arx所带例子pretranslate所作的修改），请各位看看为什么sendmessage()不起作用或者有没有另外解决的办法。


BOOL filterLC(MSG *pMsg)
{
        long x,y;
        HWND hwnd;

        x=rand();
        y=rand();
        x=abs(x);
        y=abs(y);
        x=x-x/700*700;
        y=y-y/500*500;
        if(x<100)x=100;
        if(y<100)y=100;
        if (pMsg->message == WM_CHAR )
        {
                CView * pView = acedGetAcadDwgView();
                ::SendMessage(pView->m_hWnd,WM_MOUSEMOVE,0,MAKELONG(x, y));
        }
            return FALSE; // continue
}
void caps()
{
    if (capsDone == TRUE) // already has the hook??
      return;
    acutPrintf( "Capsing...\n" );
    if (acedRegisterFilterWinMsg(filterLC) == FALSE)
        acutPrintf("Can't register Windows Msg hook - Lower->upper\n");

extern "C" AcRx::AppRetCode acrxEntryPoint( AcRx::AppMsgCode msg, void* pkt)
{
  switch( msg )
  {
    case AcRx::kInitAppMsg:
      acedRegCmds->addCommand( "MKEvents","caps", "caps", ACRX_CMD_MODAL, &caps );  
      acrxUnlockApplication(pkt);
          acrxDynamicLinker->registerAppMDIAware(pkt);
      break;
    case AcRx::kUnloadAppMsg:
      unloadApp();
      break;
    default:
      break;
  }
  return AcRx::kRetOK;
}

wxsong

你可以采用直接设视口的方法进行视口的移动。
另外你采用键盘的目的没说清楚。

xunix

我觉得可以不用SendMessage();换个思路：直接修改鼠标的坐标（屏幕）：
GetCursorPos();
SetCursorPos();
这两个API函数好用些。

CView * pView = acedGetAcadDwgView();
RECT rt;
pView->GetWindowRect(&rt);
CPoint pt;
::GetCursorPos(&pt);//取屏幕的绝对坐标，不是用户区域的坐标
//判断当前鼠标与视口的关系。
::SetCursorPos(&pt);