Page 1 of 1
¿Cómo saber en cual de todos los controles se hizo un ENTER?
Posted: Thu Apr 05, 2007 8:54 pm
by goosfancito
Gente,
Tengo un dialogo con:
1 browser
2 un par de say
4 botones.
Estoy capturando las teclas que se presionan y quiero saber en que control se pulso en RETURN.
Como debo hacerlo?
Gracias.
Posted: Thu Apr 05, 2007 9:45 pm
by karinha
Code: Select all
#Include "FiveWin.Ch"
Function Main()
LOCAL oWnd
DEFINE WINDOW oWnd TITLE "Testando as Teclas - Caixa Alta e Baixa"
oWnd:bKeyDown = { | nKey | MsgInfo( "Caixa Baixa: " + Str( nKey ) ) }
oWnd:bKeyChar = { | nKey | MsgInfo( "Caixa Alta.: " + Str( nKey ) ) }
ACTIVATE WINDOW oWnd
Return Nil
Posted: Thu Apr 05, 2007 11:44 pm
by goosfancito
karinha wrote:Code: Select all
#Include "FiveWin.Ch"
Function Main()
LOCAL oWnd
DEFINE WINDOW oWnd TITLE "Testando as Teclas - Caixa Alta e Baixa"
oWnd:bKeyDown = { | nKey | MsgInfo( "Caixa Baixa: " + Str( nKey ) ) }
oWnd:bKeyChar = { | nKey | MsgInfo( "Caixa Alta.: " + Str( nKey ) ) }
ACTIVATE WINDOW oWnd
Return Nil
Gracias