How to prevent xBrowse to move right after pressing Enter?

[Enrico Maria Giordano]

Hi friends, as per subject.

Any ideas?

EMG

[leandro]

Una idea
y si al final de la validación devuelves el foco a la misma columna.

Code: Select all  Expand view

......
oCol:bOnPostEdit   = { | oCol, xVal, nKey | If( nKey == VK_RETURN, (....,oBrw:GoToCol( oCol )) ,) }
.....
 

[Enrico Maria Giordano]

Thank you. Unfortunately, it doesn't work.

EMG

[Enrico Maria Giordano]

Any help? I really need this, please.

EMG

[ukoenig]

Enrico,

The test keeps the selected cell- columnposition after celledit

Code: Select all  Expand view

LOCAL nColPos := 1
...
...
WITH OBJECT oBrw
     FOR I := 1 TO 5 // total defined columns
           :aCols[I]:nEditType := EDIT_GET
           :aCols[I]:bOnPostEdit := { | oCol, xVal, nKey | ;
                    nColPos := oBrw:SelectedCol():nCreationOrder, ;
                    oBrw:SelectCol(nColPos) }
     NEXT

     oBrw:CreateFromCode()
END
 

regards
Uwe

[Enrico Maria Giordano]

Unfortunately, I need this without using EDIT_GET.

EMG

[cnavarro]

Have you tried with lEnterKey2Edit := .T. and/or nMoveType := 5 ?

[Enrico Maria Giordano]

Sorry, it doesn't work. Selection keeps moving right when I press Enter.

EMG

[ukoenig]

Christobal,

Have you tried with lEnterKey2Edit := .T. and/or nMoveType := 5 ?

sample xbposte-prg is showing the different tests using oBrw:nMoveType :!:

regards
Uwe

[nageswaragunupudi]

Code: Select all  Expand view

oBrw:bKeyChar := { |n| If( n == VK_RETURN, 0, nil ) }

[Enrico Maria Giordano]

In that sample, try to change this

Code: Select all  Expand view

o:nEditType := 0

and you will see that pressing Enter, the selection moves to the righ regardless of nMoveType.

How to stop this behavior?

EMG

[Enrico Maria Giordano]

Great Rao, it works! Many thanks!

EMG