[VB6] - api messages const

[joaquim]

joySetCapture API is probably the answer then

give me an advice... if i put that joystick 'if' from timer control in these procedure, will works?

Call PollJoystick
        If (MYJOYEX.dwXpos = 0 And MYJOYEX.dwYpos = 0) Then
            Direction = DirectionLeftUp
        ElseIf (MYJOYEX.dwXpos = 0 And MYJOYEX.dwYpos = 65535) Then
            Direction = DirectionLeftDown
        ElseIf (MYJOYEX.dwXpos = 65535 And MYJOYEX.dwYpos = 0) Then
            Direction = DirectionRightUp
        ElseIf (MYJOYEX.dwXpos = 65535 And MYJOYEX.dwYpos = 65535) Then
            Direction = DirectionRightDown
        ElseIf (MYJOYEX.dwXpos = 0) Then
            Direction = DirectionLeft
        ElseIf (MYJOYEX.dwXpos = 65535) Then
            Direction = DirectionRight
        ElseIf (MYJOYEX.dwYpos = 0) Then
            Direction = DirectionUp
        ElseIf (MYJOYEX.dwYpos = 65535) Then
            Direction = DirectionDown
        Else
            Direction = DirectionNone
        End If
        RaiseEvent Joystick(JoyNum, Direction, lngButton)