Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ;for Example
- ;套用範圍為AHKGUI上的所有滑動條
- GUI,Add, Slider,x10 y+ Range0-10 TickInterval1 ,5 ;僅任意開兩條作例子
- GUI,Add, Slider,x10 y+ Range0-10 TickInterval1 ,5
- GUI,Show
- return
- #If MouseIsOver("msctls_trackbar") ;檢查游標所在的視窗及控制, msctls_trackbarXXX為滑動條的ClassNN
- WheelUp::Send {WheelDown}
- WheelDown::Send {WheelUp}
- #If
- MouseIsOver(vMouseOver){
- MouseGetPos, , ,id , control ;此處得滑鼠游標所在的視窗ID及控制
- WinGetClass, class, ahk_id %id% ;由視窗ID取得視窗Class
- if (class = "AutoHotkeyGUI") AND control contains %vMouseOver% ;若游標所在視窗為AHKGUI 且 控制為 msctls_trackbarxxx
- return 1
- else
- return 0
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement