+// "button_press_event" from slider
+//-----------------------------------------------------------------------------
+extern "C" {
+static gint gtk_scrollbar_button_press_callback( GtkRange *widget,
+ GdkEventButton *gdk_event,
+ wxScrollBar *win )
+{
+ if (g_isIdle) wxapp_install_idle_handler();
+
+ // check if a LINEUP/LINEDOWN event must be thrown
+ // I suppose here the size of scrollbar top/bottom buttons is 16px height
+ if (gdk_event->type == GDK_BUTTON_PRESS && gdk_event->button == 1)
+ {
+ int scroll_height, mouse_pos;
+
+ // get the mouse position when the click is done
+ if (win->HasFlag(wxSB_VERTICAL))
+ {
+ scroll_height = GTK_WIDGET(widget)->allocation.height - 16;
+ mouse_pos = (int)gdk_event->y;
+ }
+ else
+ {
+ scroll_height = GTK_WIDGET(widget)->allocation.width - 16;
+ mouse_pos = (int)gdk_event->x;
+ }
+
+ // compare mouse position to scrollbar height
+ if (mouse_pos > scroll_height)
+ g_currentUpDownEvent = wxEVT_SCROLL_LINEDOWN;
+ else if (mouse_pos < 16)
+ g_currentUpDownEvent = wxEVT_SCROLL_LINEUP;
+ }
+
+ // There is no slider field any more
+ win->m_isScrolling = (gdk_event->window == widget->slider);
+
+ return FALSE;
+}
+}
+
+//-----------------------------------------------------------------------------
+// "button_release_event" from slider