Spanish Mensajes en burbujas al estilo Watsapp

ningunos

New Member
Licensed User
Longtime User
Hola a todos,

Me gustaría saber como puedo mostrar mensajes entre usuarios de un chat, en burbujas como si fuera Watsapp.

Había pensado en ir creando paneles con una imagen de fondo y re escalarlos según el tamaño del texto recibido. También había pensado en poner un listview pero no se si puedo poner una imagen de fondo en cada ítem.

Si alguien puede orientarme un poco en esto, se lo agradezco mucho.

Muchas gracias y un saludo. :)
 

mlc

Active Member
Licensed User
Longtime User
Hola

Yo te recomiendo que utilices un Scrollview y que para cada uno de los comentarios del chat insertes un panel en el Scrollview.

Para redondear esquinas del panel :
B4X:
      Dim cd As ColorDrawable
      cd.Initialize(colors.blue, 10dip)
                panel.background = cd

despues mides el ancho del texto :
B4X:
wi = canvas1.MeasureStringWidth("texto", Typeface.SANS_SERIF, 18)

para hacerte una idea del alto del panel.

La ventaja del panel, es que puedes insertar un label para el texto, otro para la fecha o la hora, un imageview para poner una imagen etc.etc...

Espero ayude
 
Top