FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Cursor de Get
Posts: 401
Joined: Thu Oct 06, 2005 10:15 PM
Cursor de Get
Posted: Thu Sep 15, 2011 09:34 PM

Saludos,

Alguna manera de manterner en un get la rayita "|" del cursor cuando este pierde el foco ?

Saludos,



Pablo Alberto Vidal

/*

------------------------------------------------------

Harbour 3.2.0, Fivewin 17.02, BCC7

------------------------------------------------------

*/
Posts: 401
Joined: Thu Oct 06, 2005 10:15 PM
Re: Cursor de Get
Posted: Fri Sep 16, 2011 11:28 AM

???

Saludos,



Pablo Alberto Vidal

/*

------------------------------------------------------

Harbour 3.2.0, Fivewin 17.02, BCC7

------------------------------------------------------

*/
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
Re: Cursor de Get
Posted: Fri Sep 16, 2011 03:58 PM
xFocus( oGet )


Code (fw): Select all Collapse
FUNCTION xFocus( oObj )    

    xSetFocus( oObj )
    xSetFocus( oObj )

RETURN( .T. )


FUNCTION xSetFocus( oObj )    


    LOCAL _oWnd := oObj:oWnd, _oTempo := ""

    DEFINE TIMER _oTempo INTERVAL 10 OF _oWnd ;
           ACTION ( oObj:SetFocus(), _oTempo:End() )

    ACTIVATE TIMER _oTempo

RETURN( .T. )
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 401
Joined: Thu Oct 06, 2005 10:15 PM
Re: Cursor de Get
Posted: Tue Sep 20, 2011 05:06 PM

karinha, gracias por la repuesta
pero no funciono....

Saludos,



Pablo Alberto Vidal

/*

------------------------------------------------------

Harbour 3.2.0, Fivewin 17.02, BCC7

------------------------------------------------------

*/
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
Re: Cursor de Get
Posted: Tue Sep 20, 2011 06:51 PM
Pablo, mira si TABSTOP esta ON en el Recurso(GET) del dialogo.

Ó


Code (fw): Select all Collapse
  xFocus( oGet )

  oGet:bGotFocus := { || oGet:SetPos( 1 ), Nil }
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

Continue the discussion