Clipper/FiveWin - ultima tecla pulsada

 
Vista:

ultima tecla pulsada

Publicado por JUAN (62 intervenciones) el 18/05/2011 14:04:15
Hola, tengo un twbrowse con la información de una agenda en FiveWin y quisiera saber como puedo capturar la última tecla pulsada para mediante bKeyDown ir a la inicial del nombre.

Ejemplo:

pulsando la tecla "M" , com oBlx:bKeyDowm ejecuto la orden de busqueda, pero do consigo capturar la "M" pulsada. Probé con Chr(Lastkey()) pero no devuelve la nada.

Saludos y muchas gracias, Juan
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

ultima tecla pulsada

Publicado por marcelo (29 intervenciones) el 19/05/2011 18:56:36
No se si es la manera mas elegante, pero yo lo hago asi y funciona!

En el Dlg del browse tengo esto:

Brw02:bKeyChar = { | nKey| KeyCharCarg(nKey),Brw02:SetFocus(),Brw02:Refresh() }


y la funcion que llama es:

static function KeyCharCarg( nKey)
local Ini
sele Clientes
Ini=chr(nkey)
seek Ini
retu nil

Saludos
Marcelo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

ultima tecla pulsada

Publicado por marcelo (1 intervención) el 19/05/2011 19:02:25
por las dudas, en el prg tenes que poner: include "inkey.ch"
Marcelo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

ultima tecla pulsada

Publicado por Jose Flores Sotillo (26 intervenciones) el 31/05/2011 19:31:49
Juan, la instrucción similar a IF LASTKEY() = 77 ... , es;
IF GetASynKey( 77 ) ... // 77 es el valor decimal de la letra 'M'

Espero harberte sido de utilidad.
Un saludo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

ultima tecla pulsada

Publicado por Jose Flores (26 intervenciones) el 01/06/2011 09:09:06
P.D.
Si no sabes el valor de la letra puedes usar la función ASC("M") --> 77
Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar