আমি যে অটোহটকি স্ক্রিপ্টটি ব্যবহার করি তা এখানে। আপনি বাম ছোট ছোট বোতামটি ধরে রেখে এবং বলটি উপরে / নিচে রোল করে স্ক্রোল করুন। তবে বাম ছোট ছোট বোতামটি ক্লিক করা এখনও ব্যাক করে। এটি বাম / ডানদিকেও স্ক্রোল করতে পারে তবে এটি আমার পক্ষে খুব সংবেদনশীল ছিল তাই এটি এখানে মন্তব্য করা হয়েছে (যে ব্লকটি শুরু হয় ;timesX := Abs(movedx) / 4
)।
আমি মূল সংস্করণটি http://www.autohotkey.com/board/topic/30816-simulate-scrol-wheel-wil-using-right-mouse-button/ এ পেয়েছি
। আমি আমার ভার্সনটি সেখানে আরেকজন 8923 হিসাবে পোস্ট করেছি।
$*XButton1::
Hotkey, $*XButton1 Up, XButton1up, off
;KeyWait, XButton1, T0.4
;If ErrorLevel = 1
;{
Hotkey, $*XButton1 Up, XButton1up, on
MouseGetPos, ox, oy
SetTimer, WatchTheMouse, 5
movedx := 0
movedy := 0
pixelsMoved := 0
; TrayTip, Scrolling started, Emulating scroll wheel
;}
;Else
; Send {XButton1}
return
XButton1up:
Hotkey, $*XButton1 Up, XButton1up, off
SetTimer, WatchTheMouse, off
;TrayTip
If (pixelsMoved = 0)
{
;The mouse was not moved, send the click event
; (May want to make it PGUP or something)
Send {XButton1}
Send {XButton1Up}
}
return
WatchTheMouse:
MouseGetPos, nx, ny
movedx := movedx+nx-ox
movedy := movedy+ny-oy
pixelsMoved := pixelsMoved + Abs(nx-ox) + Abs(ny-oy)
;timesX := Abs(movedx) / 4
;ControlGetFocus, control, A
;Loop, %timesX%
;{
; If (movedx > 0)
; {
; SendMessage, 0x114, 1, 0, %control%, A ; 0x114 is WM_HSCROLL
; movedx := movedx - 4
; }
; Else
; {
; SendMessage, 0x114, 0, 0, %control%, A ; 0x114 is WM_HSCROLL
; movedx := movedx + 4
; }
;}
timesY := Abs(movedy) / 4
Loop, %timesY%
{
If (movedy > 0)
{
Click WheelDown
movedy := movedy - 4
}
Else
{
Click WheelUp
movedy := movedy + 4
}
}
MouseMove ox, oy
return