¿Cómo saber en cual de todos los controles se hizo un ENTER?

[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.

[karinha]

Code: Select all  Expand view


#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



[goosfancito]

Code: Select all  Expand view


#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