In the following sample, try to hit down arrow key (on the keyboard) many times till to move the highlight to the last record and then hit down arrow key one more time. Now hit up arrow key and you will see that the scrollbar thumb doesn't move up (it will move when you hit up arrow key again):
A possible fix:
EMG
#include "Fivewin.ch"
REQUEST DBFCDX
FUNCTION MAIN()
LOCAL oDlg, oBrw
RDDSETDEFAULT( "DBFCDX" )
USE TEST
INDEX ON FIELD -> last + FIELD -> first TO "TEMP__" FOR FIELD -> last = "A"
DEFINE DIALOG oDlg;
SIZE 400, 400
@ 1, 1 LISTBOX oBrw FIELDS TEST -> last,;
TEST -> first;
SIZE 200, 200 PIXEL
oBrw:bLogicLen = { || ( oBrw:cAlias ) -> ( OrdKeyCount() ) }
ACTIVATE DIALOG oDlg;
CENTER
CLOSE
FERASE( "TEMP__.CDX" )
RETURN NILA possible fix:
METHOD VGoDown() INLINE iif( ::nVScrollPos < ::nLen, ::VSetPos( ::nVScrollPos + 1 ), )
METHOD VGoUp() INLINE iif( ::nVScrollPos > 1, ::VSetPos( ::nVScrollPos - 1 ), )EMG
