Como puedo regresar el foco a un get ??

Posts: 128

Joined: Tue Jan 03, 2006 08:31 PM

Como puedo regresar el foco a un get ??
Posted: Thu Apr 17, 2008 02:27 AM

Tengo el siguiente codigo donde uso un get

   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"

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

Code: Select all Collapse

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"

Saludos
GABO

Ale SB

Posts: 248

Joined: Wed Jan 11, 2006 11:30 AM

Como puedo regresar el foco a un get ??
Posted: Thu Apr 17, 2008 02:54 AM

Amigo tente usar apos el get:refresh,

oDlg:Update()

Saluds

aleseribeli@hotmail.com

FwH, Hb Svn, ADS 8.1, ADS 10, Pelles C, FwPPC, MsVc 2008, MsVc 2010
"Conhecimento, você não subtrai quando divide; mas soma e multiplica."
**---Mário Persona---**

Antonio Linares

Posts: 44162

Joined: Thu Oct 06, 2005 05:47 PM

Como puedo regresar el foco a un get ??
Posted: Thu Apr 17, 2008 08:53 AM

Gabo,

Prueba asi:

Code: Select all Collapse

REDEFINE BUTTONBMP oBotons[2] ID 716  OF oDlgChild; 
            ACTION ( AddItemToBrowse(aDetalle, hVars, oGets), ; 
                     oBrwDetalle:Refresh(), MsgStop("hola"), oBotons[2]:oJump := Gets[8], oGets[8]:Refresh() ) ; 
            BITMAP "BMP_ADD_ITEM"

regards, saludos

Antonio Linares
www.fivetechsoft.com

gabo

Posts: 128

Joined: Tue Jan 03, 2006 08:31 PM

Como puedo regresar el foco a un get ??
Posted: Thu Apr 17, 2008 01:54 PM

Gracias antonio:
pero no funciono.. sigue igual no pasa el foco al get, lo unico que hago es un refresh de un xbrowse..
saludos

antolin

Posts: 498

Joined: Thu May 10, 2007 08:30 PM

Como puedo regresar el foco a un get ??
Posted: Thu Apr 17, 2008 04:42 PM

Intenata:

PostMessage(oGets[8]:hWnd, WM_SETFOCUS)

o

PostMessage(oGets[8]:hWnd, FM_CHANGEFOCUS)

Peaaaaaso de foro...

FWH 2007 - xHarbour - BCC55

gabo

Posts: 128

Joined: Tue Jan 03, 2006 08:31 PM

Como puedo regresar el foco a un get ??
Posted: Thu Apr 17, 2008 07:27 PM

Antolin,

gracias!!!

funciono perfecto!!

Saludos
GABO

FiveTech Support Forums

Continue the discussion