Harnessing The Mouse Wheel
Hello!
I have made some sort of a graphical application and want to use the mouse wheel for zooming in or out. But as far as I know it has no direct event attached. How can I go about it?
View Complete Forum Thread with Replies
See Related Forum Messages: Follow the Links Below to View Complete Thread
Mouse Wheel
I was curious if there is any way to make the mousewheel work, when I am programming code. It will not scroll the code up and down. Thanks.
Mouse Wheel
how can i catch the mouse wheel scroll when the mouse is over a usercontrol but so it will work without the focus set on it...?
Mouse Wheel
How do I get access to the mouse wheel?
I am making a game and i want the wheel to scroll the map, increase characteristic values etc, what methods can i use to access the wheel and how do they trigger ie does it trigger an event every time the weel moves over a "bump" or does it return a value like the x and y values of the mouse.
Mouse Wheel In VB IDE
Hi,
I am so very used to using the mouse wheel to scroll in all of the editors I use that it really bugs me that I cannot use it to scroll the code in the Visual Basic IDE. Does anyone know of a way to enable it??
Mouse Wheel
Hi!
I have a small problem.
I have a mouse with a wheel, but it doesn't scroll the text in VB Editor. It scrolls in other programs like Notepad and Explorer though.
Someone knows why?
Mouse Wheel
well I am creating a Mouse Emulator and it is almost done, although, since the mouse wheel in mouse_event only works for Win NT; I have not been able to emulate it.
Is there any way to emulate the mouse wheel in a non NT system?
Mouse Wheel
hi, how can i know when the user is rotating the mouse wheel?
Wheel Mouse
Any ideas as to why my Ps2 Optical Wheel Mouse won't work with VB6? Doesn't require a driver or anything for any other program.
Mouse Wheel
This is so annoying! How come I can't scroll through my code with the whell !? Is Visual Basic not compatible with it? When you get used to the whell, it's so hard to use the scroll bar. Is there a way to "fix" this ?
About The Mouse Wheel
Hi all
I'm trying to get if the user is using the mouse wheel inside an usercontrol, I am using the GetMessage to this inside a timer control
Code:
GetMessage amsg, 0, 0, 0
DispatchMessage amsg
this works fine, but I have a problem, this makes that the control goes slowly when the timer control has enabled.
I am wondering if there's other ways to capture the wheel movement, or if it's possible to subclassing the form to capture this and if this is more faster than other methods.
I suposse that i place more that usercontrol in a form and i don't want that it's makes slowly the program
Thanks
Mouse Wheel
i'm using Visual Basic 6...
i have these code for try do a Mouse Wheel event, but i don't know where is the error... i don't know use these function...
can anyone help me finish these code?
thanks
Code:
Option Explicit
Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Private Const WHEEL_DELTA = 120
Private Const MOUSEEVENTF_WHEEL = &H800
Public Sub WheelTest()
mouse_event MOUSEEVENTF_WHEEL, 0, 0, WHEEL_DELTA, 0
If WHEEL_DELTA > 0 Then
Debug.Print "up"
Else
Debug.Print "down"
End If
End Sub
Private Sub Timer1_Timer()
Call WheelTest
End Sub
i know that these code have, at least, 2 errors but i don't know catch them and resolve them... please same help...
thanks
How To Use The Wheel Of The Mouse?
how to use the wheel of the mouse?
I want to use the middle wheel of the mouse, but not know way, any advice of the somebody will be appreciated.
TIA
VB6 And The Mouse Wheel
I am trying to disable the mouse wheel within VB 6 when using the Web Browser control.
When using the web browser control if you press the shift key at the same time as well as using the mouse wheel you can navigate backwards and forwards between pages.
Can any one tell me how to disable the mouse wheel both with or without using the SHIFT key?
Thanks in advance.
Mouse Wheel
Also, how do i get my mouse wheel to scroll the code window?
It works in every app except VB
(flippin typical )
Mouse Wheel
I have an VB application which has many forms. The users now are so used to use the mouse wheels to move the pages up and down so they wanted to have the same ability when they use the VB application. How do I "borrow" microsoft's mouse wheel function and use it in my application? Thanks.
TTT
Mouse Wheel In VB6
Is there a way to trap the Mousewheel events in VB6, maybe using API or something?
Thanks in advance, VBGizmo.
Mouse Wheel IDE?
Anyone know how to get the mouse wheel to work in the IDE of Vb6? It does up at my work, but not at home... not sure why.
I dunno if this should be posted here, but this is where i normally hang out.
Thanks!
Mouse Wheel
Does anyone have the code to capture mouse wheel events. I had this somewere but lost it and now all i can find is using stupid VBEvents.dll (i don't actually thing it is stupid, never tried it, but the idea of having a dll to run a dll... )
Pleeeeeeeease no VBEvents.dll
Mouse Wheel
the wheel on my mouse doesn't work while using VB code segment. If anyone has a solution please send me an e-mail.
thanks
Mouse Wheel
How can I use the mouse wheel in my VB application?
Wheel Mouse
hi
im using Access and VBA and when a user uses the wheel mouse my program acts funny!
Is there somthing i can do maybe in form load where i can switch the wheel part of the mouse OFF
Mouse Wheel
How can I use the mouse wheel to effect my program?
Wheel Mouse.
Why doesnt a Wheel Mouse work with VB6?
It's working fine in my Applications. But the VB application wont accept a Wheel Mouse.
Why?
Mouse Wheel
Does anyone know why my VB6.0 doesn't recognize the mouse wheel? I can't get the screen to scroll by using the wheel!
Thanks
Dan McLeran
Mouse Wheel
Any ideas on how to capture the mouse wheel events??
Mouse Wheel, XP, And VB5
Why doesn't my mouse wheel work in the code windows in VB5 under XP?
I can scroll the properties and project windows using the wheel, but
not the actual code windows (XP). Everything works fine using Windows
98.
Thank you.
---
Allen
Mouse Wheel
No this isnt another question about why the mouse wheel doesnt work in the VB6 IDE
My question is, is it possible to check whether the mouse wheel was moved, and by how much?, preferably through the API.
Anyone know?
Edited by - PhateNZ on 9/1/2005 9:21:51 PM
Mouse Wheel
In past post I understand not all mouse scroll wheels will work in VB 6 EDITOR is this also the case when code is compiled into .EXE for installation ?
I would like to be able to use the wheel to change Label text that contains HH:MM:SS. I use two up / dn arrow buttons to change but it only changes seconds so it takes forever to get to the hours. I also have a repeater when presses will change and increase speed but still not accurates.
What I want to do is have the mouse over each of the three times HH:MM:SS and use the mouse wheel to make the changes. ?
Anyone
Mouse Wheel
Can the mouse scroll wheel be used in VB6 editor ?
Mouse Wheel
I've created a Quote System in Access 2000 and VBA. I have a autonumber field on my form that is my primary key. If you are entering a new Quote and you happen to move your mouse wheel then you lose the autonumber and get an error message saying that your primary key can not contain a null value. Does anyone know how to disable the mouse wheel for a specific application or how I can prevent this from happening when the wheel is moved?
Thanks for your help!
Mouse Wheel API
I was wondering what API calls are needed to detect the usage of the wheel on the new mice.
Set Time With Mouse Wheel
I hereby dump this concept for a UserControl (For whatever dubious worth it may contain) on your heads.
The main idea is to use the slider control hidden behind a frame control to drive labels with a mouse wheel. Basically a keyboard free way to enter time.
Quick and easy.
Code:
Option Explicit
Dim m_index As Integer
Private Sub Form_Load()
m_index = -1
End Sub
Private Sub Label1_MouseMove(Index As Integer, Button As Integer, Shift As Integer, x As Single, y As Single)
If Index <> m_index Then
With Slider1
m_index = Index
.LargeChange = 1
.SmallChange = 1
Select Case Index
Case 0
.Min = 2
.Max = 13
Case 1
.Min = 1
.Max = 6
Case 2
.Min = 1
.Max = 10
Case 3
.Min = 1
.Max = 2
End Select
If Index = 3 Then
If Label1(Index).Caption = "AM" Then
.Value = 1
Else
.Value = 2
End If
Else
.Value = CInt(Label1(Index).Caption) + 1
End If
Slider1.SetFocus
End With
End If
End Sub
Private Sub Slider1_Scroll()
If m_index = 3 Then
If Slider1.Value = 1 Then
Label1(m_index).Caption = "AM"
Else
Label1(m_index).Caption = "PM"
End If
Else
Label1(m_index).Caption = Slider1.Value - 1
End If
End Sub
How To Know The Wheel Mouse Event
I want to change the value of a label moving the wheel of the mouse (I thing that isn't good english, I'm sorry)
In vb 6.0 there is mousedown event in most controls, but with it I only can control the click of third buton, but not the wheeling of it.
Does anybody can help me? thanks.
VScrollBar And Mouse Wheel
Hi!
How can I make the VScrollBar recognizes the mouse wheel movement? I need to use the Vscrollbar on my app but it doesn't react to the mouse wheel ( it just changes its value by clicking on it ).
Thanks!
Fergo
Using Mouse Wheel In VB6 Programs
Hello,
is there any way to use the mouse wheel in VB6 programs, especially with the DataGrid control? I tried to subclass my window and handle the WM_MOUSEWHEEL messages by translating them to WM_KEYDOWN, WM_KEYUP with PageUp/PageDown key codes, but it seems that the window simply does not get WM_MOUSEWHEEL at all. I'm using VB6 SP6 on WinXP SP1 Czech.
Thanks
Disabling Mouse Wheel
I'm working on a program that uses a lot of combo boxes. When using the mouse wheel to scroll through combo boxes it scrolls so fast that all the code doesn't appear to be executing. So, in order to stop this, I just want to disable the mouse wheel for these combo boxes (or the entire form). Does anyone know how to go about disabling the mouse wheel?
Scrolling Wheel On Mouse
How do you get the scrolling wheel on a mouse to work for
a text box?
Any help would be greatly appreciated.
Scroll Bar And The Mouse Wheel
I have set up an image control inside a picture box.
the picture box is in a tab strip and I have attached a scroll bar to the side of the tab strip.
Now I control the scrolling of the image with the scroll bar and everything works fine.
There was just one thing I wanted to be abe to do.
Right now, in order to scroll with the wheel on a mouse the mouse has to be positioned over the scroll bars.
Is there a way I can associate the scroll bar with the image control so that when someone has the mouse over the image, scrolling with the wheel will cause the scroll bars to move???
Thanks guys
Mouse WHEEL Event...
Is there an event that will capture the 'rotation' of a mouse wheel?
Not the mouse ball, inside the mouse, but the scroll button on the mouse..
Need Help With Mouse Scroll Wheel
Hi all,
I'm at a very basic level so wish you could keep your answers as clear as possible.
I'm a slotcar fan and would like to build something that allows an easy reading of the number of revolutions (rph) of my electric motors.
Was thinking about using the mouse scroll wheel.
Have made a search in this site and found some pretty easy code that uses WM_MOUSEWHEEL but, due to my lack of knowledge, I'm still missing a way to understand how to know when the wheel has completed 1 turn.
Anybody could please help, maybe with a basic code sample ?
Thanks in advance,
Ste.
Using Mouse Scroll-Wheel In VB6.0?
Is there an update or script that I can download somewhere that will allow the scroll-wheel on my mouse to scroll through code in Visual Basic 6.0.. I have gotten use to using the scroll-wheel in applications like Dreamweaver, Notepad and just about every other application the has multiple line text boxes.. It would help me alot to be able to scroll up and down applications this way. Plz help.
~Nemo
Activating Mouse Wheel In VB6
Hello everybody!
How can I activate the mouse scroll to work with de code in VB6? Its so more pratical to scroll the mouse whell instead of taking the mouse to the scrollbar.
Is it possible?
FeRgO
Mouse Wheel Scroll NOT In IDE
Hi,
My scroll works fine in the VB IDE but not when I run the program. I know about VBScroll, but I'm hoping there is another way of having scrolling functionality that I can deploy with my program. I don't want to install an extra program on all machines that run my program just to get scroll to work.
Thanks
Mouse Wheel Object
i've been reading in the msdn about how to make my projects use the wheel on my mouse but i don't have the mouse wheel object in my collection so were can i get it?
Mouse Wheel KeyCodes
is there a virtual key code for the mouse wheel wheel?
like VK_SCROLLUP, VK_SCROLLDOWN, etc.
Mouse Wheel Trouble
Hi!
For some reason vb crashes every time I use This code
Quote:
Originally Posted by manavo11
Subclassing :
VB Code:
'**************'* Form Code'**************Option Explicit Private Sub Form_Load() Hook Me.hwndEnd Sub Private Sub Form_Unload(Cancel As Integer) Unhook Me.hwndEnd Sub
VB Code:
'**************'* Standard Module Code'**************Option Explicit Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, _ ByVal nIndex As Long, _ ByVal dwNewLong As Long) _ As LongPrivate Declare Function CallWindowProc Lib "user32" Alias "CallWindowProcA" (ByVal lpPrevWndFunc As Long, _ ByVal hwnd As Long, _ ByVal Msg As Long, _ ByVal wParam As Long, _ ByVal lParam As Long) _ As LongPrivate Declare Function DefWindowProc Lib "user32" Alias "DefWindowProcA" (ByVal hwnd As Long, _ ByVal wMsg As Long, _ ByVal wParam As Long, _ ByVal lParam As Long) _ As Long Private Const GWL_WNDPROC = (-4) Private Const WM_MOUSEWHEEL = &H20A Private mPrevProc As Long Public Sub Hook(ByVal hwnd As Long) mPrevProc = SetWindowLong(hwnd, GWL_WNDPROC, AddressOf WndProc)End Sub Public Sub Unhook(ByVal hwnd As Long) Call SetWindowLong(hwnd, GWL_WNDPROC, mPrevProc) mPrevProc = 0& End Sub Public Function WndProc(ByVal hwnd As Long, ByVal uMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As LongOn Error Resume Next Dim x As Long, y As Long, delta As Long If uMsg = WM_MOUSEWHEEL Then delta = HiWord(wParam) x = LoWord(lParam) y = HiWord(lParam) Debug.Print "Scrolling " & IIf((delta > 0), "Up", "Down") & " ,X:" & x & ",Y:" & y End If If mPrevProc& Then WndProc = CallWindowProc(mPrevProc, hwnd, uMsg, wParam, lParam) Else WndProc = DefWindowProc(hwnd, uMsg, wParam, lParam) End If End Function Private Function LoWord(DWord As Long) As Long If DWord And &H8000& Then LoWord = DWord Or &HFFFF0000 Else LoWord = DWord And &HFFFF& End IfEnd Function Private Function HiWord(DWord As Long) As Long HiWord = (DWord And &HFFFF0000) &H10000End Function
Is there any simple code that works to detect if the mouse is being scrolled up or down?
Thanks
|
TRACKER
