VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



Scrolling on the Middle Mouse Button

by Angsuman Banerji (23 Submissions)
Category: Miscellaneous
Compatability: VB.NET
Difficulty: Unknown Difficulty
Originally Published: Fri 4th January 2008
Date Added: Mon 8th February 2021
Rating: (1 Votes)

Scrolling on the Middle Mouse Button

API Declarations
Private m_cMiddleScroller As cMiddleButtonScroller

Rate Scrolling on the Middle Mouse Button



      
   ' Create the middle button scroller
   Set m_cMiddleScroller = New cMiddleButtonScroller
     
End Sub

Private Sub txtSample_MouseDown( _
      Button As Integer, Shift As Integer, _
      X As Single, Y As Single _
   )
   If (Button = vbMiddleButton) Then
      With m_cMiddleScroller
         .HorizontalMode = ePixelBased
         .VerticalMode = eLineBased
         .StartMiddleScroll txtSample.hwnd
      End With
   End If
End Sub


Download this snippet    Add to My Saved Code

Scrolling on the Middle Mouse Button Comments

No comments have been posted about Scrolling on the Middle Mouse Button. Why not be the first to post a comment about Scrolling on the Middle Mouse Button.

Post your comment

Subject:
Message:
0/1000 characters