https://foro.gambas-es.org/viewtopic.php?f=1&t=1823&p=10702#p10702
-----------------------------------
fabianfv
Viernes, 19 Agosto 2011, 16:15

Re: Bug O Error Con Key.Text Y Gb.qt / Gb.qt.ext
-----------------------------------
[quote user="BrunoIV" post="10700"][code linenumbers=false syntax=gambas]
PUBLIC SUB TextEdit1_KeyRelease()
 DIM sLetra AS String = ""


  'OPCIÓN A
  'Esto NO imprime la letra
  PRINT "La letra introducida es: " & Key.Text
 
 
 'OPCIÓN B
 'Si se introduce TAB o BACKSPACE no hace NADA
 TRY sLetra = Chr(Key.Code)
 
 IF NOT ERROR THEN
   PRINT sLetra 'Para el a y A son 65 (siempre imprime mayus)
 END IF
 
 
END
[/code][/quote]

Bueno, ahora sí podemos hacer algo más para ayudar.

[b][i]Opción A[/i][/b]: recién caigo en la cuenta de que estás usando KeyRelease. Deberías usar KeyPress, ya que [b]al momento en que se produce el evento KeyRelease, Key.Text ya no está disponible[/b] (algo que es lógico). [b]Con KeyPress podés verificar la entrada del usuario antes de que el cambio impacte en el control. Si quisieras verificar el contenido de un control de texto después de que el cambio impactó en el control deberías usar el evento Change[/b].

[b][i]Opción B[/i][/b]: TAB y BACKSPACE son caracteres no imprimibles y por ello es lógico que Key.Text sea una cadena vacía.

Nota: en tu mensaje inicial decís que estás usando el control Editor para poder resaltar la sintaxis, pero tu código nos dice que el control del que estás hablando es un TextEditor.


