Re: [TCLCORE] TIP 474: "Treat the mouse wheel events in a uniform way" again

[Griffin, B. <bri...@me...>]

I also have a touch screen.  Here's what I get when simply touching a Tk window:
Unfortunately Spy++ does not allow copying text, so I've attached a screen shot.  There's a lot going on there with a touch then release.

-Brian

From: Griffin, Brian
Sent: Friday, June 29, 2018 9:45 AM
To: Brad Lanam <bra...@gm...>; Tcl Core Mailing List <tcl...@li...>
Subject: Re: [TCLCORE] TIP 474: "Treat the mouse wheel events in a uniform way" again



From: Brad Lanam [mailto:bra...@gm...]
Sent: Friday, June 29, 2018 7:14 AM
To: Tcl Core Mailing List <tcl...@li...<mailto:tcl...@li...>>
Subject: Re: [TCLCORE] TIP 474: "Treat the mouse wheel events in a uniform way" again

On Thu, Jun 28, 2018 at 11:39 PM, Harald Oehlmann <har...@el...<mailto:har...@el...>> wrote:
Am 29.06.2018 um 08:17 schrieb Brad Lanam:
> Does someone have a touchpad on windows with horizontal scrolling enabled?
> And can test in Tk whether the horizontal scroll creates a <MouseWheel>
> event?
> And also test whether the horizontal scroll works when there is a
> horizontal scrollbar active.
>
> I have a touchpad on the laptop with Linux, but the horizontal scroll
> does not work in a Windows VM.
> This may very well be due to the VirtualBox mouse device driver.
>
> The tilt-wheel on the Logitech G500 mouse did not create a <MouseWheel>
> event.
> I will test the tilt-wheel further on Windows tomorrow and see if Tk
> handles it at all.
I have a touchpad and it works in Notepad wether in x or y.
- if I move with two fingers to left-right -> x-scroll
- If I move with two fingers up-down -> y-scroll
- If I try an angle, it chooses x or y. I have to release the fingers to
change direction.

Tk:
pack [text .e] -fill both -expand true
bind .e <MouseWheel> "puts MW%D"
bind .e <Button-4> "puts B4"
bind .e <Button-5> "puts B5"

Mouspad Gesture up/down: MW120 / MW-120
Mousepad gesture left/right: no reaction

The tilt-wheel on the Logitech G500 does not work for horizontal scrolling within Tcl/Tk.
It does work within firefox.
I'm on Windows 10, so I would need one of those message spy programs that works there.

I'm on Windows 10 and have Spy++.

Using:
(bin) 1 % set tk_patchLevel
8.6.5
(bin) 2 % parray tcl_platform
tcl_platform(byteOrder)     = littleEndian
tcl_platform(engine)        = Tcl
tcl_platform(machine)       = amd64
tcl_platform(os)            = Windows NT
tcl_platform(osVersion)     = 10.0
tcl_platform(pathSeparator) = ;
tcl_platform(platform)      = windows
tcl_platform(pointerSize)   = 8
tcl_platform(threaded)      = 1
tcl_platform(user)          = bgriffin
tcl_platform(wordSize)      = 4

When I use 2-finger swipe gesture I see, for example:
WM_MOUSEHWHEEL fwKeys:0000 zDelta:-2 xPos:220 yPos:370 for horizontal swipe and
WM_MOUSEWHEEL fwKeys:0000 zDelta:-2 xPos:220 yPos:370 for vertical swipe.

Interestingly, direction is decided by the initial motion and stays, even if the swipe changes orientation.  So, if I start the swipe to the left, the initial message is mouseHwheel, and all subsequent messages are also Hwheel, even if my fingers start moving up.  And vis-versa, starting out with a downward swipe gives MouseWheel as the first message and all subsequent messages, even if the swipe changes direction to the left.  In order to change direction I have to stop and lift my fingers off the touch pad.

This differs from the Mac, where a diagonal swipe generates both button-4/5 & button-6/7 events.

And lastly, not surprisingly, I get no Button-(4,5,6,7) events in Tk.

-Brian