返回列表 上一主題 發帖

[發問] 如何讓ComboBox可以用滑鼠滾動?

回復 10# c_c_lai
這已經超出我的程度太多了
我研究了好幾天還是覺得霧煞煞 有更容易懂的解說嗎?

TOP

回復 11# acdx
  1. Sub Hook_Mouse()
  2.     hhkLowLevelMouse = SetWindowsHookEx _
  3.         (WH_MOUSE_LL, AddressOf LowLevelMouseProc, Application.Hinstance, 0)
  4. End Sub
複製代碼
Hook_Mouse 去呼叫 Windlows 的程式庫函數
  1. Declare Function SetWindowsHookEx Lib _
  2.         "user32" Alias "SetWindowsHookExA" (ByVal idHook As Long, ByVal lpfn As Long, _
  3.         ByVal hmod As Long, ByVal dwThreadId As Long) As Long
複製代碼
此 Function 將 LowLevelMouseProc  帶回來的位址,以及 WH_MOUSE_LL (=14) 與事件、執行緒參數等
資訊傳入給 LowLevelMouseProc 以啟動 MOUSEWHEEL 的功能設定。
如此概略解說你應該會有所了解吧?

TOP

        靜思自在 : 【做人的開始】每一天都是故人的開始,每一個時刻都是自己的警惕。
返回列表 上一主題