Como puedo regresar el foco a un get ??
Posted: Thu Apr 17, 2008 2:27 am
Tengo el siguiente codigo donde uso un get
En el botonbmp grabo datos en un browse y refresco, despues se supone que debe de regresar al GET anterior y no lo hace! me pueden orientar y decirme donde puede estar mi error !
Sin embargo si le pongo un MsgStop() antes de poner el foco en el get, si lo regresa el foco al get
Saludos
GABO
Code: Select all
REDEFINE GET oGets[8] VAR hVars["CLAVE"] ID 706 OF oDlgChild
oGets[8]:bKeyDown:= { |nKey| IIF( nKey == VK_RETURN, ;
( ChkArticulos( oGets[8], hVars["CLAVE"] ), 1 ) , 0 ) }
REDEFINE BUTTONBMP oBotons[2] ID 716 OF oDlgChild;
ACTION ( AddItemToBrowse(aDetalle, hVars, oGets), ;
oBrwDetalle:Refresh(), oGets[8]:SetFocus(), oGets[8]:Refresh() ) ;
BITMAP "BMP_ADD_ITEM"
Sin embargo si le pongo un MsgStop() antes de poner el foco en el get, si lo regresa el foco al get
Code: Select all
REDEFINE BUTTONBMP oBotons[2] ID 716 OF oDlgChild;
ACTION ( AddItemToBrowse(aDetalle, hVars, oGets), ;
oBrwDetalle:Refresh(), MsgStop("hola"), oGets[8]:SetFocus(), oGets[8]:Refresh() ) ;
BITMAP "BMP_ADD_ITEM"
GABO