2010年4月30日 星期五

如何在datawindow中禁止使用者使用滑鼠滾輪

這不算太難,只要懂點MSDN的人大概都能明白吧

Datawindow視窗物件上的兩個事件都可以用,擇一即可

一、寫在 OTHER EVENT

CONSTANT integer WM_MOUSEWHEEL = 522

if message.number = WM_MOUSEWHEEL then
   message.processed = True
   message.returnvalue = 1
end if


二、新增事件ue_syscommand 並繼承pbm_syscommand

CONSTANT integer WM_MOUSEWHEEL = 522

if CommandType = WM_MOUSEWHEEL then
   message.processed = True
   message.returnvalue = 1
end if


用的原理就是利用截取WINDOWS API 的事件訊息,並由PB物件的事件規則去決定返回值,當API收到指定的值,就會發生對應動作。

0 個回應: