Comunidad Gambas-es
[SOLUCIONADO] Evento Key_Press - cambiar tecla sobre la marcha - Versión para impresión

+- Comunidad Gambas-es (https://gambas-es.org)
+-- Foro: Gambas (https://gambas-es.org/forum-3.html)
+--- Foro: Aplicaciones/Fragmentos de Código (https://gambas-es.org/forum-8.html)
+--- Tema: [SOLUCIONADO] Evento Key_Press - cambiar tecla sobre la marcha (/thread-994.html)

Páginas: 1 2

RE: Evento Key_Press - cambiar tecla sobre la marcha - tincho - 18-08-2022

(18-08-2022, 15:34)vuott escribió: Un esemplo practico: cómo ejecutar con código Gambas un programa externo (por ejemplo "Gedit") desde Terminal.

gracias Vuott me lo apunto.
(18-08-2022, 18:58)Shordi escribió: ComboBox1.Insert(Upper(Key.Text))

Nunca mejor dicho, has dado en la tecla !  Smile
Ahora con .Insert ya funciona bien, es decir que independientemente de si esta activado el bloqueo de mayúsculas o no lo esta el texto en el TextBox siempre aparece en mayúsculas

La solución es la siguiente:

Código:
Public Sub TextBox1_KeyPress()
  If Key.Text <> Upper(Key.Text) Then
    TextBox1.Insert(Upper(Key.Text))
    Stop Event
  Endif
End

Ahora sin importar el bloqueo del teclado cada campo puede tener su propia configuración
El efecto es el siguiente: 
[Imagen: gs3fS7u.png]