如何判断鼠标是否在移动(100)

  • 主题发起人 主题发起人 kingswww
  • 开始时间 开始时间
K

kingswww

Unregistered / Unconfirmed
GUEST, unregistred user!
我想知道如何判断桌面上鼠标一动 就通知我 最好能给个例子
 
弄个全局钩子就行了,判断WM_MOVE
 
我不想多出来个Dll 全局钩子这个东西我也不会哇! 能给个例子吗?
 
如果是鼠标键盘都算,可以用GetLastInputInfo然后用Timer检测就OK了。否则就要自己写hook,当然还需要把代码写在DLL中。
 
给你参考一下。procedure TForm1.Timer1Timer(Sender: TObject);var Pos: TPoint;begin application.ProcessMessages; GetCursorPos(Pos); Edit1.Text := Format('x:%d y:%d', [Pos.X, Pos.Y]);end;我的timer的Interval设为100
 
谢谢 Vsun 我要的就是这种效果 他们说的鼠标钩子我也用了可是那也太复杂了[:)]
 

Similar threads

后退
顶部