Porque no aparece en pantalla el cartel HOLA cuando presiono la tecla ESC?
Code: Select all
oBrw: bKeyDown:= { | nKey | if( nKey == VK_ESCAPE , ( MsgInfo("HOLA")) ,;
if( nKey == VK_RETURN,;
( IF ( lVolver != .t., ( ABMProductos( , .t., PRODUCTO->CODIGO, aSetVars, .f. ), oBrw:reset(), oBrw: Refresh() ),;
oDlg:END() ) ) , ) ) }
Code: Select all
obrw:bUserKeys :={|nKey| Tufunciondecontrol(nKey)}
....
FUNCTION Tufunciondecontrol( nn )
IF nn = VK_ESCAPE
? "ESCAPE"
ELSE
? "CUALQUIERA"
ENDIF
RETURN nil
Gracias.