ciao a tutti....sto cercando di ricreare una form per visualizzare immagini simile al metodo di acdsee (sposti l'immagine tenendo premuto il mouse)
ecco il codice

codice:
Private Sub Image1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

If Button = 1 Then
   ver = Image1.Top + Y
   orz = Image1.Left + X
   Image1.Top = ver - Y
   Image1.Left = orz - X
End If
End Sub
sembra assurdo, ma la prima volta che ho lanciato il pg è andato, poi quando ho cominciato a scrivere controlli....ha smesso di funz..
Ho notato che in teoria non può funz. perchè imposto come top e left
il loro valore. Ho provato a calcolarmi la variazione, salvandola in due variabili e incrementando o decrementando di 15, ma l'immagine si muove MOOOOOLTO più lentamente del mouse.....
Forse mi sfugge qualcosa sul funzionamento del mousemove...
Qualcuno ha qualche idea o info utile??
Grazie in anticipo
ciao e buona notte