I created a xbrowse without vertical scrolling and the program crashed at line 2466 of xbrowse.prg:
- Code: Select all Expand view RUN
- case nKey == K_PGUP
::oVScroll:PageUp()
case nKey == K_PGDN
::oVScroll:PageDown()
I already fixed it locally:
- Code: Select all Expand view RUN
- case nKey == K_PGUP
if ::oVScroll != nil
::oVScroll:PageUp()
endif
case nKey == K_PGDN
if ::oVScroll != nil
::oVScroll:PageDown()
endif
I hope it is useful,
Perry