Horizontal or Vertical Scroll event?

new topic     » topic index » view thread      » older message » newer message

{{{ I've tracked a bug down to the following snippet of code (from Mike's Editor):

procedure onScroll_MAIN( integer pos) if pos ! oldvscroll and getVScrollPos(MAIN) = pos then scrollVertical(pos) elsif getHScrollPos(MAIN) pos then scrollHorizontal(pos) end if end procedure onScroll[MAIN] routine_id("onScroll_MAIN")

The trouble is it should be calling ScrollVertical but it is calling ScrollHorizontal. The file is positioned at (1,1) pos is 1. oldvscroll is 1. oldhscroll is 1. getVScrollPos(MAIN) returns 1. getHScrollPos returns 1.

I tried findChildren(MAIN) but no HScroll or VScroll controls appear to be returned. getSelf() always returns MAIN.

The original create(HScroll...) lines have been removed and replaced with MAIN createEx ( Window, "", 0, left, top,windowWidth, windowHeight, {WS_THICKFRAME, WS_SYSMENU, WS_MINIMIZEBOX, WS_MAXIMIZEBOX, WS_HSCROLL, WS_VSCROLL, {WS_EX_CLIENTEDGE} )

Is there any way to determine if it is a horizontal or vertical scroll event in that case?

I'm actually using v0.55.5, but I tested v0.57.9 and got the same.

Pete

new topic     » topic index » view thread      » older message » newer message

Search



Quick Links

User menu

Not signed in.

Misc Menu