Spanish B4XPreferenceDialog Mayusculas

GiovanniO said:

Saludos compañeros, ¿de casualidad alguien sabe como hacer que el texto de las cajas de los preferenciadialog solo acepta Mayusculas?

Este es mi código pero no logro entender en que parte podría definir esa opción. Gracias por cualquier consejo y saludos.

B4X:

Esperar a que (PrefDialog.ShowDialog(Item, "OK", "CANCEL")) se complete (Resultado como entero)
    Si Resultado = xui.DialogResponse_Positive Entonces
        Parámetros dim como lista
        parámetros.Inicializar
        params.AddAll(Array(Item.Get("Af"), Item.Get("Estado"), Item.Get("Serie"), Item.Get("Tipo"), Item.Get("Marca"), Item.Get("Modelo"), Item.Get("FechaCompra"), Item.Get("FechaAsignacion"), Item.Get("Asignado"), Item.Get("Sucursal"))) 'claves basadas en el archivo json de plantilla
        Si RowId = 0 Entonces 'nueva fila
            B4XTable1.sql1.ExecNonQuery2($"INSERTAR EN datos VALORES("", ?, ?, ?, ?, ?, ?, ?, ?, ?)"$, parámetros)
            B4XTable1.Borrar vista de datos
        Demás
            parámetros.Add(RowId)
            La primera columna es c0. La omitimos porque es la columna de edición.
            B4XTable1.sql1.ExecNonQuery2("ACTUALIZAR conjunto de datos c1 = ?, c2 = ?, c3 = ?, c4 = ?, c5 = ?, c6 = ?, c7 = ?, c8 = ?, c9 = ?, c10 = ? DONDE rowid = ?", parámetros)
            B4XTable1.Actualizar
        Fin si
    Fin si

Click to expand...