Hola
Descartex te ha dado una de las soluciones a tu problema, pero ya que no lo es, no es cuestion de tirar la toalla a la primera respuesta que te den y menos en fin de semana que muchos no entramos al foro, en el foro hay mas gente que puede ayudarte e incluso el propio Descartex te podria haber dado otra solucion si le hubieses dado la oportunidad, por que si te dió una solucion y no era esa, habrá que buscar otra. Por otro lado añadir al titulo [CERRADO] a la mayoria de foreros nos deja fuera de juego, ya que cuando un problema queda solucionado ponemos [SOLUCIONADO], y de esa forma de un simple golpe de vista sabemos que para esa pregunta ha habido una solucion y eso facilita que el foro sea mas dinámico.
https://www.b4x.com/android/forum/threads/mejorar-el-foro-“spanish-forum”.39799/
Aqui cada uno expone lo que cree que puede hacer que mejore el foro
Una de las formas es como te ha dicho Descartex, y la otra podria ser esta:
camEx.SetJpegQuality(de 0 a 100 la calidad de la foto) ' la que te ha dicho Descartex
Dim pictureSizes() As CameraSize = camEx.GetSupportedPicturesSizes
Dim current As CameraSize = camEx.GetPictureSize
For i = 0 To pictureSizes.Length - 1
Log("Ancho: " & pictureSizes(i).Width & " Alto: " & pictureSizes(i).Height)
Next
"Normalmente" en las tablets he visto que en
pictureSizes(0) viene la resolución mas baja, y en
pictureSizes.Length la mas alta, sin embargo en moviles es al revés, asi que tendrás que averiguar cual es la que te interesa.
Compara en el bucle cual es la resolución mas alta o la que te vaya mejor a ti, guardatelo en una variable y luego haz esto para ponerla en la camara, esto lo tienes que hacer en el evento Ready cuando te diga que la camara existe (
Success = True)
Dim ps As CameraSize = pictureSizes(TamañoQueQuierasPoner)
camEx.SetPictureSize(ps.Width, ps.Height)
camEx.CommitParameters
Saludos