'Miramos la coordenada Top de la Label7 para saber en que dispositivo estamos ejecutando la aplicacion.
If Label7.Top = 489 Then
Activity.AddView(ListView1,0, 590, 240, 210)'Configuracion para el S2. Valor de la posicion de representacion del ListView, X, Y, ancho, alto
End If
If Label7.Top = 780 Then
Activity.AddView(ListView1,0,920,400,360) 'Configuracion para el Note.
End If
If Label7.Top = 593 Then
Activity.AddView(ListView1,0,700,300,325) 'Configuracion para el Tab.
ListView1.SingleLineLayout.ItemHeight = 25dip
ListView1.SingleLineLayout.Label.TextSize = 14
ListView1.SingleLineLayout.Label.Top = 3
Label6.TextSize = 14
End If