- Presentación.
Hay una librería llamada TouchImageView con la que podemos arrastrar una imagen por la pantalla.
Una limitación que tiene esta librería es que solo se puede mover un gráfico sobre un fondo.
Aquí tienes su tutorial en inglés. TouchImageView.
____________________________
- Designer. Layout.
Código.
|
paisaje3.gif
|
pajaro.gif
|
- Bajamos a la carpeta Files del proyecto las imágenes paisaje3.gif y pajaro.gif.
- Luego copiamos y pegamos el código.
- Podremos mover la pajaro.gif por la pantalla.
- También tendremos que activar la librería: TouchImageView
|
____________________________
- Código (copia y pega).
Código en Basic4android
|
Sub Process_Globals
' Juan Antonio Villalpano
' juana1991@yahoo.com
' marzo 2013
End Sub
Sub Globals
Dim rectangulo As Rect
Dim TouchImageView1 As TouchImageView
End Sub
Sub Activity_Create(FirstTime As Boolean)
If FirstTime Then
' izquierda, derecha, ancho, alto
rectangulo.Initialize(10dip, 10dip, 20%x, 20%x)
End If
TouchImageView1.Initialize("TouchImageView1")
TouchImageView1.MinScale = 0.3 ' Mínima escala del zoom
TouchImageView1.MaxScale = 6 ' Máxima escala del zoom
TouchImageView1.TranslatePadding = 20 ' Trozo de imagen que no sale de pantalla
TouchImageView1.Gravity = Gravity.FILL ' Fondo de pantalla
TouchImageView1.SetBackgroundImage(LoadBitmap(File.DirAssets, "paisaje3.gif"))
Dim Bitmap1 As Bitmap
Bitmap1.Initialize(File.DirAssets, "pajaro.gif")
TouchImageView1.Bitmap=Bitmap1
TouchImageView1.SetScaleRect(rectangulo, "CENTER")
Activity.AddView(TouchImageView1, 0, 0, 100%x, 100%y)
End Sub
Sub Activity_Resume
End Sub
Sub Activity_Pause (UserClosed As Boolean)
rectangulo=TouchImageView1.GetScaleRect
End Sub
Sub Toggle_Click
TouchImageView1.TouchEnabled = Not(TouchImageView1.TouchEnabled)
End Sub
Sub TouchImageView1_Click
' Cuando pulsas en la imagen
End Sub
Sub TouchImageView1_LongClick
' Pulsar durante un tiempo en la imagen
End Sub
|
______________________________
- La imagen se dirige hacia el ratón.
|
- Mediante este código podemos mover el ratón por la pantalla y la imagen nos seguirá dirigiéndose hacia el ratón.
- Si dejamos el ratón pulsado sobre un lugar de la pantalla, la imagen se dirigirá al ratón.
- Es interesante que bajes y ejecutes este código. |
|
______________________________
- Ejemplo de arrastrar y soltar varias imágenes en una pantalla.
En esta página de los foros hay un ejemplo llamado basket.zip
Trata de mover varias imágenes en una pantalla.
________________________________