To Antonio

[Otto]

Hello Antonio,
can you please show how to navigate with the keyboard to the get-fields EXE: Data: Area:

Thanks in advance
Otto

[Antonio Linares]

Otto,

I guess that the focus is on the xbrowse on the left side, so the tab is not working there, right ?

[Antonio Linares]

Otto,

This little change would be required on Class TXBrowse:

Code: Select all  Expand view

METHOD GetDlgCode( nLastKey ) CLASS TXBrowse
 
   if .not. ::oWnd:lValidating
      if nLastKey == VK_UP .or. nLastKey == VK_DOWN ;
         .or. nLastKey == VK_RETURN .or. nLastKey == VK_TAB
         ::oWnd:nLastKey = nLastKey
      else
         ::oWnd:nLastKey = 0
      endif
   endif
 
return If( IsWindowEnabled( ::hWnd ), If( ::nDlgCode != nil, ::nDlgCode, DLGC_WANTALLKEYS ), 0 )

And in your app, simply do:
oBrw:nDlgCode = 1 // DLGC_WANTARROWS

[Antonio Linares]

You could also try with:

oBrw:nDlgCode = 0x0080 // DLGC_WANTCHARS

[Otto]

Dear Antonio,

thank you.
I could not get it working with the changes you suggested.

But you pointed me in the right direction:

oBrw:bKeyChar := { |nKey| iif(nkey=9, ( aoGetStart[oBrw:nArrayAt]:Setfocus() ) , ) }

This is working fine.
Best regards,
Otto