module Mouse:sig
..end
Mouse and touchscreen information.
All positions are given in logical pixels, not hardware pixels (see the Theme
SCALE
variable).
val pointer_pos : Tsdl.Sdl.event -> int * int
Return the pointer current position. This works both for mouse and touchscreen.
val pos : unit -> int * int
Get current mouse position.
val window_pos : Tsdl.Sdl.window -> int * int
Return the mouse position with respect to the given window, using window position if necessary.
Tsdl.Sdl.event -> int * int
: val finger_pos : Tsdl.Sdl.event -> float * float
val wheel_y : Tsdl.Sdl.event -> int
val set_wheel_speed : float -> unit
Set the speed of vertical scrolling via the mouse wheel and touchpad. By
default, wheel speed is 1. for usual vertical scrolling (standard on
Linux) and -1. for "natural" scrolling (standard on Mac
OS). set_wheel_speed 0.
(or any speed less than 0.01) will disable
mouse wheel scrolling.