FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour VK_ESCAPE y tsbrowser
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
VK_ESCAPE y tsbrowser
Posted: Sun May 21, 2006 03:51 PM
Amigos,

Porque no aparece en pantalla el cartel HOLA cuando presiono la tecla ESC?

   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:

   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.
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

Continue the discussion