[VB6] Confinare il mouse in una form

[genuzzu]

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Picture1.Left = X
Picture1.Top = Y
Picture1.Refresh
If X > 9800 Or Y > 5430 Or X > 100 Or Y > 100 Then
X = 500
Y = 500
Else
End If
End Sub


Il movimento della banana sincronizzata al mouse nella picturebox funziona (lol) ma purtroppo il mouse non viene confinato, con quell' if modifico le variabili, non la posizione del mouse. Mi sapete aiutare?

Per me questo è un problema :sofico: :mc: :muro:
Spero di aver letto bene il regolamento :read: .

[Kralizek]

mi sembra che devi ricorrere alle win32 per confinare il topo in una scatola.

[DanieleC88]

mi sembra che devi ricorrere alle win32 per confinare il topo in una scatola.

Non saprei con VB6 ma temo di sì. Con VB.NET credo sia sufficiente impostare una prioprietà: http://msdn.microsoft.com/en-us/library/system.windows.forms.cursor.clip.aspx

Altrimenti ci sono sempre le API Win32: http://msdn.microsoft.com/en-us/library/ms648383(VS.85).aspx

ciao ;)