Hi
I found some code on the net that allows the user to move the form by clicking on it anywhere... Here it is:
So I just call MoveForm Me in the mousedown event.
This works great but only with the left mouse button... I need to have it do this with the right button only.
I tried changing the WM_NCLBUTTONDOWN to &HA4 (the value for the right button down message) but this didn't work for some reason
Any help appreciated
-Steve
I found some code on the net that allows the user to move the form by clicking on it anywhere... Here it is:
Code:
Const WM_NCLBUTTONDOWN = &HA1
Public Sub MoveForm(ByRef frmWhich As Form)
' Used to move forms without title bars (put in
' MouseDown event of form)
ReleaseCapture
SendMessage frmWhich.hWnd, WM_NCLBUTTONDOWN, 2, 0&
End Sub
So I just call MoveForm Me in the mousedown event.
This works great but only with the left mouse button... I need to have it do this with the right button only.
I tried changing the WM_NCLBUTTONDOWN to &HA4 (the value for the right button down message) but this didn't work for some reason
Any help appreciated
-Steve