muovere immagine

[gaullo]

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

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

[Markooo]

Public globalX As Integer
Public globalY As Integer

Private Sub Form_DragDrop(Source As Control, X As _
   Single, Y As Single)
   Image1.Move X - globalX, Y - globalY
End Sub

Private Sub image1_MouseDown(Button As Integer, _
   Shift As Integer, X As Single, Y As Single)
   Image1.Drag vbBeginDrag
   globalX = X
   globalY = Y
End Sub

[gaullo]

In questo modo mi sposta il contorno del'image, ma quando lascio il bottone del mouse, il contorno sparisce e l'immagine non si è mossa.

Poi vorrei che l'image si muovesse conteporaneamente al mouse, non solo il contorno!!!

[Markooo]

a me funziona!

[gaullo]

io uso vb6...tu??

[Markooo]

vb6... magari sarà qualche proprietà diversa nell'image

[Markooo]

Non so perchè, ma ho notato che quel codice che ho messo sopra funziona ancora meglio con le Picture...

Con il controllo image ogni tanto,anche a me, trascina solo il contorno; ma poi se la risposto va comunque...e poi solo ogni tanto; sempre + confused

[gaullo]

Speriamo che qualcuno che ci è già passato riesca a spiegare perchè succede così!!!!
Comunque da me è lo stesso anche con picture

[gaullo]

up???