paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-12 11:09:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

FV Drivers: change name for mouse scroll up/down

Browse Source
This commit is contained in:
Margers 2024-09-24 10:47:25 +00:00 committed by Michael Van Canneyt
parent ede78f682b
commit a67c85cb89
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
packages/fv/src/drivers.inc
View File

@ -297,8 +297,12 @@ CONST
mbLeftButton = $01; { Left mouse button }
mbRightButton = $02; { Right mouse button }
mbMiddleButton = $04; { Middle mouse button }
mbScrollWheelDown = $08; { Scroll wheel down}
mbScrollWheelUp = $10; { Scroll wheel up }
mbScrollWheelDown = $08 deprecated 'use mbScrollDown instead';
mbScrollWheelUp = $10 deprecated 'use mbScrollUp instead';
mbScrollDown = $08; { Scroll down - turn the wheel downward (toward you) }
mbScrollUp = $10; { Scroll up - turn the wheel upward (away from you) }
mbXButton1 = $20; { 4th mouse button. Browser_Back }
mbXButton2 = $40; { 5th mouse button. Browser_Forward }
{---------------------------------------------------------------------------}