[Source Help]Spot the problem in this

there's no stopper for it.

what you need to do is have the hotkey F3 call a function to wait for the person to click their mouse before moving down, then when they are not clicking the mouse to stop.

the way you have the code is that when its turned on the cursor is constantly moving down.. it doesnt wait for any mouse clicks before moving down it just moves

I know, I tried everything to do the click bit with loads of different functions but none worked. Any ideas which one?

you need to wait for the mouse click not do it.. XBUTTON1 i think.. i'm not very well adapted with VB, but i think WM_LBUTTONDOWN and WM_LBUTTONUP is what you need

Thanks, I'll try it in a minute.

I know that bit but we want it to work if it's on and if the mouse button is pressed.

Isn´t it mouse.left?

Tried that, for some reason it doesn't like me.

humm. i tired messin with it and it froze my keys. were all good now

Make 2 timers, 1 for hotkey and 1 for the code

Samueldo i will give you the answer MOuse left is = (Keys.LButton) this is for vb 2008 express.for right its = (Keys.RButton)

Edit:
THAT Code needs to change becuase it's all wrong.For Timer1

Edit This is what i have changed so far:

Public Class Form1
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vkey As Long) As Integer
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Dim Hotkey1 As Boolean
If Hotkey1 = GetAsyncKeyState(Keys.F3) Then
GetAsyncKeyState(Keys.LButton)
If Hotkey1 = True Then
Timer2.Start()
End If
End If
End Sub

Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
Dim value As Point
value = Cursor.Position
Cursor.Position = value
Me.Cursor = New Cursor(Cursor.Current.Handle)
Cursor.Position = New Point(Cursor.Position.X, Cursor.Position.Y + 30)
End Sub
End Class