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

Rafael Clemente · Post by **Rafael Clemente** » Tue Oct 11, 2005 3: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 · Post by **Rafael Clemente** » Tue Oct 11, 2005 4:15 pm

It was just a matter of adding SysRefresh() !!!

Rafael

Post by **Antonio Linares** » Tue Oct 11, 2005 4:15 pm

Rafael,

You may try:

Code: Select all

oGet:SetPos( oGet:nPos + 1 )

Post by **Antonio Linares** » Tue Oct 11, 2005 4:16 pm

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

good

goosfancito · Post by **goosfancito** » 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

    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.

Post by **Antonio Linares** » 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

goosfancito · Post by **goosfancito** » 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

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

No pasa nada... porque?

Post by **Antonio Linares** » Tue Mar 20, 2007 1:00 pm

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

Cambia tambien oGet:oGet:Pos := 10

FiveTech Software tech support forums

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

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

Solved!

Re: Solved!

Re: Solved!