1
0
mirror of https://github.com/gryf/wmaker.git synced 2026-02-17 14:45:49 +01:00

Initial mouse wheel code.

This commit is contained in:
dan
2000-04-13 21:24:28 +00:00
parent b188d55bbe
commit 5c76167098
6 changed files with 153 additions and 17 deletions

View File

@@ -481,7 +481,28 @@ handleActionEvents(XEvent *event, void *data)
switch (event->type) {
case ButtonPress:
if (getSliderPart(sPtr, event->xbutton.x, event->xbutton.y)==KNOB_PART)
if (event->xbutton.button==WINGsConfiguration.mouseWheelUp
&&!sPtr->flags.dragging) {
// Wheel up
if (sPtr->value+1<=sPtr->maxValue) {
WMSetSliderValue(sPtr, sPtr->value+1);
if (sPtr->flags.continuous && sPtr->action) {
(*sPtr->action)(sPtr, sPtr->clientData);
}
}
} else if (event->xbutton.button==WINGsConfiguration.mouseWheelDown
&&!sPtr->flags.dragging) {
// Wheel down
if (sPtr->value-1>=sPtr->minValue)
{
WMSetSliderValue(sPtr, sPtr->value-1);
if (sPtr->flags.continuous && sPtr->action) {
(*sPtr->action)(sPtr, sPtr->clientData);
}
}
}
else if (getSliderPart(sPtr, event->xbutton.x, event->xbutton.y)
==KNOB_PART)
sPtr->flags.dragging = 1;
else {
#ifdef STRICT_NEXT_BEHAVIOUR