FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Problems in the xBrowse 1309 jumping columns
Posts: 117
Joined: Mon Aug 13, 2007 05:22 PM
Problems in the xBrowse 1309 jumping columns
Posted: Thu Nov 28, 2013 08:44 PM

Same putting
oLbx:nMoveType := MOVE_NONE

I already changed also in the source of the xBrowse:: nMoveType := MOVE_NONE / / MOVE_FAST_RIGHT
and even so not for of jumping for the next cell

I found what believe to be the problem in the method bkEYcHAR

  case nKey == VK_RETURN
     oCol := ::SelectedCol()
     if oCol:oEditGet != nil
        PostMessage( oCol:oEditGet:hWnd, WM_KEYDOWN, nKey )   //VK_RETURN )
     elseif oCol:lEditable .and. ! oCol:hChecked .and. ::lEnterKey2Edit .and. ! ( oCol:nEditType == EDIT_LISTBOX )
        return oCol:Edit()
     elseif oCol:nEditType == EDIT_LISTBOX .and. oCol:lEditable
        //Simulate Click over button for no lost focus
        PostMessage( oCol:oBtnList:hWnd, WM_LBUTTONDOWN, 1, 1 )
        PostMessage( oCol:oBtnList:hWnd, WM_LBUTTONUP, 1, 1 )
     elseif ::oTreeItem!=nil
        If( ::oTreeItem:oTree != nil,( ::oTreeItem:Toggle(), ::Refresh() ),)
     else

----> ::GoRight()
endif

Marcelo Ferro da Silveira

Fwh14.04/xHarbour 1.2.3 Simplex / Bcc582 / Pelles 8

SqlLib /xMate/WS

Continue the discussion