 |
KnowBrainer Speech Recognition |
 |
 |  |
|
Topic Title: Commands for scrolling with the mouse wheel Topic Summary: Created On: 05/07/2021 12:50 PM Status: Post and Reply |
|
 |
 |
- thalon | - 05/07/2021 12:50 PM |
|
|
- wristofdoom | - 05/07/2021 01:39 PM |
|
|
- thalon | - 05/10/2021 01:26 PM |
|
|
- Lunis Orcutt | - 05/07/2021 05:45 PM |
|
|
- brooklyn cabin | - 05/27/2021 11:51 AM |
|
|
- wristofdoom | - 05/07/2021 06:33 PM |
|
|
- Mphillipson | - 05/09/2021 11:16 AM |
|
|
- Edgar | - 05/09/2021 12:35 PM |
|
|
- kkkwj | - 05/10/2021 02:09 AM |
 05/07/2021 12:50 PM
|
|
|
today, I implemented two commands to scoll with the mouse wheel, which I'd like to share with you. I find them very useful, especiallyin web apps which implement their own scroll bar. Command: mouse wheel <1to100> down Declare Function mouse_event Lib "user32.dll" (ByVal dB As Long, ByVal dX As Long, ByVal dY As Long, ByVal dP As Long, ByVal dE As Long) As Long
Sub Main dist = CInt(ListVar1) mouse_event(&H800,0,0,-120*dist,0) End Sub Command: mouse wheel <1to100> up Declare Function mouse_event Lib "user32.dll" (ByVal dB As Long, ByVal dX As Long, ByVal dY As Long, ByVal dP As Long, ByVal dE As Long) As Long
Sub Main dist = CInt(ListVar1) mouse_event(&H800,0,0,-120*dist,0) End Sub |
|
|
|
|
FuseTalk Standard Edition v4.0 - © 1999-2023 FuseTalk™ Inc. All rights reserved.