FiveTech Software tech support forums

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

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

Rafael,

You may try:

Code: Select all  Expand view

oGet:SetPos( oGet:nPos + 1 )

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

good

Antonio Linares wrote:

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

good

Antonio, este codigo

Code: Select all  Expand view

    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.

Gustavo,

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

oGet:nPos := 10

desde el VALID

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  Expand view

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

No pasa nada... porque?

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

Cambia tambien oGet:oGet:Pos := 10