Porque no aparece en pantalla el cartel HOLA cuando presiono la tecla ESC?
- Code: Select all Expand view
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() ) ) , ) ) }
Ya me han dicho que pruebe haciendo esto:
- Code: Select all Expand view
obrw:bUserKeys :={|nKey| Tufunciondecontrol(nKey)}
....
FUNCTION Tufunciondecontrol( nn )
IF nn = VK_ESCAPE
? "ESCAPE"
ELSE
? "CUALQUIERA"
ENDIF
RETURN nil
Pero reconoce "CUALQUIERA DISTINTA A LA ESC"
Gracias.
