FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexActive topicsAll discussionsLogin (GitHub)
Board index FiveWin for Harbour/xHarbour In a TGet, make the cursor jump one position to thr right
Rafael Clemente
Posts: 365
Joined: Sat Oct 08, 2005 07:59 PM

In a TGet, make the cursor jump one position to thr right

Posted: Tue Oct 11, 2005 03:54 PM

Hi everybody

In a TGet(), how can I make the cursor step one position to the right. I have tried oGet:PostMsg( WM_KEYDOWN, VK_RIGHT, 0 ) but it does not seem to work
Any suggestion? Thanks

Rafael

Rafael Clemente
Posts: 365
Joined: Sat Oct 08, 2005 07:59 PM

Solved!

Posted: Tue Oct 11, 2005 04:15 PM

It was just a matter of adding SysRefresh() !!! :oops:
Rafael

Antonio Linares
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

In a TGet, make the cursor jump one position to thr right

Posted: Tue Oct 11, 2005 04:15 PM
Rafael,

You may try:

Code: Select all Collapse
oGet:SetPos( oGet:nPos + 1 )
regards, saludos

Antonio Linares
www.fivetechsoft.com
Antonio Linares
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

Re: Solved!

Posted: Tue Oct 11, 2005 04:16 PM
Rafael Clemente wrote:It was just a matter of adding SysRefresh() !!!


good :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
goosfancito
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM

Re: Solved!

Posted: Tue Mar 20, 2007 12:10 PM
Antonio Linares wrote:
Rafael Clemente wrote:It was just a matter of adding SysRefresh() !!!


good :-)

Antonio, este codigo


Code: Select all Collapse
    redefine get odatos[1]...
    ...

    redefine get odatos[10]...

    oDatos[1]:bValid:= { || oDatos[1]:SetPos( 10 ), SysRefresh(), .T. }

Cuando valida oDatos[1], salta al get en la posicion 10? aca no me esta funcionado.
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Antonio Linares
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

In a TGet, make the cursor jump one position to thr right

Posted: Tue Mar 20, 2007 12:30 PM

Gustavo,

Si el foco se va a ir a otro control, prueba a hacer:

oGet:nPos := 10

desde el VALID

regards, saludos

Antonio Linares
www.fivetechsoft.com
goosfancito
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM

In a TGet, make the cursor jump one position to thr right

Posted: Tue Mar 20, 2007 12:34 PM
Antonio Linares wrote:Gustavo,

Si el foco se va a ir a otro control, prueba a hacer:

oGet:nPos := 10

desde el VALID


Code: Select all Collapse
oDatos[1]:bValid:= { || oDatos[1]:nPos:= 5, SysRefresh(), .T. }


No pasa nada... porque?
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Antonio Linares
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM

In a TGet, make the cursor jump one position to thr right

Posted: Tue Mar 20, 2007 01:00 PM

Cuando vuelve el foco al Get, el cursor no va a otra posición ?

Cambia tambien oGet:oGet:Pos := 10

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion

Static archive · New replies & topics via GitHub Discussions