delphi中怎麼狨取鼠標的狀態(30分)

  • 主题发起人 主题发起人 hbug
  • 开始时间 开始时间
H

hbug

Unregistered / Unconfirmed
GUEST, unregistred user!
delphi中怎麼狨取鼠標的狀態!如,當明是是DBclick還是Click,是leftbutton還rightButton<br>被按下,還有當前鼠標的位置!
 
D里有鼠标的单击和双击事件!<br><br>if Button=mbLeft then &nbsp; // or mbRight <br><br><br>var<br>&nbsp; p :TPoint;<br><br>GetCursorPos(p);
 
假如不在那兩個事件裡寫下那個代碼!?能不能得到當前鼠標的位置?如:我是DBclick窗<br>口還是Click呢?我是RightClick窗口還是leftClick呢?好像用那個方法不太行吧!
 
不是每个OnClick和ONDbClick都可以判断左右和位置吧!<br><br><br>另外,你可以关注一下TScreen这个类,好像它可以。<br>
 
如果想做一個鼠標記錄器,就要每時第刻的去記錄它的位置,還有它的狀態!!你的那個在<br>某一個Object上加入onclick事件還是DBclick事件好像不行吧!總不能在窗體上寫一個事件<br>!
 
如果想做一個鼠標記錄器,简单的话可以参考spy++中的鼠标事件(一共16个),然后在重载<br>application的OnMessage事件,通过识别消息来记录鼠标记录器.<br>当然如果用MouseProc hook可以从结构上简化,可惜我不懂[:(]
 
后退
顶部