C'è la picturebox.
Studiamola...
La proprietà SizeMode impostata su AutoSize mi sembra la scelta migliore.
Ora devo studiare come renderla mobile. Iniziamo quindi a studiarne le coordinate.
Il principio per rendere mobile un'immagine parte dalla conoscenza delle coordinate del puntatore. Come si conoscono in VB?
Ecco: ho realizzato abbastanza agevolmente una PictureBox spostabile con il puntatore del mouse (ed eventualmente con il dito su tablet)
Public Class Form1
Dim initX, initY As Integer
Dim deltaX, deltaY As Integer
Dim pressed As Boolean = False
Private Sub PictureBox1_MouseDown(sender As Object, e As MouseEventArgs) Handles PictureBox1.MouseDown
initX = e.X
initY = e.Y
pressed = True
End Sub
Private Sub PictureBox1_MouseMove(sender As Object, e As MouseEventArgs) Handles PictureBox1.MouseMove
If pressed Then
deltaX = e.X - initX
deltaY = e.Y - initY
PictureBox1.Left += deltaX
PictureBox1.Top += deltaY
End If
End Sub
Private Sub PictureBox1_MouseUp(sender As Object, e As MouseEventArgs) Handles PictureBox1.MouseUp
pressed = False
End Sub
End Class
Nessun commento:
Posta un commento