1 /////////////////////////////////////////////////////////////////////////////
4 // Author: Robert Roebling
6 // Copyright: (c) 1998 Robert Roebling
7 // Licence: wxWindows licence
8 /////////////////////////////////////////////////////////////////////////////
12 #pragma implementation "scrolbar.h"
15 #include "wx/scrolbar.h"
26 //-----------------------------------------------------------------------------
28 //-----------------------------------------------------------------------------
30 extern void wxapp_install_idle_handler();
33 //-----------------------------------------------------------------------------
35 //-----------------------------------------------------------------------------
37 extern bool g_blockEventsOnDrag
;
38 extern bool g_blockEventsOnScroll
;
40 static const float sensitivity
= 0.02;
42 //-----------------------------------------------------------------------------
44 //-----------------------------------------------------------------------------
46 static void gtk_scrollbar_callback( GtkAdjustment
*adjust
, wxScrollBar
*win
)
48 if (g_isIdle
) wxapp_install_idle_handler();
50 if (!win
->m_hasVMT
) return;
51 if (g_blockEventsOnDrag
) return;
53 float diff
= adjust
->value
- win
->m_oldPos
;
54 if (fabs(diff
) < sensitivity
) return;
56 win
->m_oldPos
= adjust
->value
;
58 GtkRange
*range
= GTK_RANGE( win
->m_widget
);
60 wxEventType command
= wxEVT_SCROLL_THUMBTRACK
;
61 if (range
->scroll_type
== GTK_SCROLL_STEP_BACKWARD
) command
= wxEVT_SCROLL_LINEUP
;
62 else if (range
->scroll_type
== GTK_SCROLL_STEP_FORWARD
) command
= wxEVT_SCROLL_LINEDOWN
;
63 else if (range
->scroll_type
== GTK_SCROLL_PAGE_BACKWARD
) command
= wxEVT_SCROLL_PAGEUP
;
64 else if (range
->scroll_type
== GTK_SCROLL_PAGE_FORWARD
) command
= wxEVT_SCROLL_PAGEDOWN
;
66 int value
= (int)ceil(adjust
->value
);
68 int orient
= win
->HasFlag(wxSB_VERTICAL
) ? wxVERTICAL
: wxHORIZONTAL
;
70 wxScrollEvent
event( command
, win
->GetId(), value
, orient
);
71 event
.SetEventObject( win
);
72 win
->GetEventHandler()->ProcessEvent( event
);
75 wxCommandEvent cevent( wxEVT_COMMAND_SCROLLBAR_UPDATED, win->GetId() );
76 cevent.SetEventObject( win );
77 win->ProcessEvent( cevent );
81 //-----------------------------------------------------------------------------
82 // "button_press_event" from slider
83 //-----------------------------------------------------------------------------
85 static gint
gtk_scrollbar_button_press_callback( GtkRange
*WXUNUSED(widget
),
86 GdkEventButton
*WXUNUSED(gdk_event
),
89 if (g_isIdle
) wxapp_install_idle_handler();
91 win
->SetScrolling(TRUE
);
92 // g_blockEventsOnScroll = TRUE; doesn't work in DialogEd
97 //-----------------------------------------------------------------------------
98 // "button_release_event" from slider
99 //-----------------------------------------------------------------------------
101 static gint
gtk_scrollbar_button_release_callback( GtkRange
*WXUNUSED(widget
),
102 GdkEventButton
*WXUNUSED(gdk_event
),
105 if (g_isIdle
) wxapp_install_idle_handler();
107 win
->SetScrolling(FALSE
);
108 // g_blockEventsOnScroll = FALSE;
110 gtk_signal_emit_by_name( GTK_OBJECT(win
->m_adjust
), "value_changed" );
115 //-----------------------------------------------------------------------------
117 //-----------------------------------------------------------------------------
119 IMPLEMENT_DYNAMIC_CLASS(wxScrollBar
,wxControl
)
121 wxScrollBar::~wxScrollBar(void)
125 bool wxScrollBar::Create(wxWindow
*parent
, wxWindowID id
,
126 const wxPoint
& pos
, const wxSize
& size
,
127 long style
, const wxValidator
& validator
, const wxString
& name
)
130 m_acceptsFocus
= TRUE
;
132 if (!PreCreation( parent
, pos
, size
) ||
133 !CreateBase( parent
, id
, pos
, size
, style
, validator
, name
))
135 wxFAIL_MSG( wxT("wxScrollBar creation failed") );
141 if ((style
& wxSB_VERTICAL
) == wxSB_VERTICAL
)
142 m_widget
= gtk_vscrollbar_new( (GtkAdjustment
*) NULL
);
144 m_widget
= gtk_hscrollbar_new( (GtkAdjustment
*) NULL
);
146 m_adjust
= gtk_range_get_adjustment( GTK_RANGE(m_widget
) );
148 gtk_signal_connect( GTK_OBJECT(m_adjust
),
150 (GtkSignalFunc
) gtk_scrollbar_callback
,
153 gtk_signal_connect( GTK_OBJECT(m_widget
),
154 "button_press_event",
155 (GtkSignalFunc
)gtk_scrollbar_button_press_callback
,
158 gtk_signal_connect( GTK_OBJECT(m_widget
),
159 "button_release_event",
160 (GtkSignalFunc
)gtk_scrollbar_button_release_callback
,
163 m_parent
->DoAddChild( this );
167 SetBackgroundColour( parent
->GetBackgroundColour() );
174 int wxScrollBar::GetThumbPosition(void) const
176 return (int)(m_adjust
->value
+0.5);
179 int wxScrollBar::GetThumbSize() const
181 return (int)(m_adjust
->page_size
+0.5);
184 int wxScrollBar::GetPageSize() const
186 return (int)(m_adjust
->page_increment
+0.5);
189 int wxScrollBar::GetRange() const
191 return (int)(m_adjust
->upper
+0.5);
194 void wxScrollBar::SetThumbPosition( int viewStart
)
196 if (m_isScrolling
) return;
198 float fpos
= (float)viewStart
;
200 if (fabs(fpos
-m_adjust
->value
) < 0.2) return;
201 m_adjust
->value
= fpos
;
203 gtk_signal_emit_by_name( GTK_OBJECT(m_adjust
), "value_changed" );
206 void wxScrollBar::SetScrollbar( int position
, int thumbSize
, int range
, int pageSize
,
207 bool WXUNUSED(refresh
) )
209 float fpos
= (float)position
;
210 float frange
= (float)range
;
211 float fthumb
= (float)thumbSize
;
212 float fpage
= (float)pageSize
;
214 if ((fabs(frange
-m_adjust
->upper
) < 0.2) &&
215 (fabs(fthumb
-m_adjust
->page_size
) < 0.2) &&
216 (fabs(fpage
-m_adjust
->page_increment
) < 0.2))
218 SetThumbPosition( position
);
224 m_adjust
->lower
= 0.0;
225 m_adjust
->upper
= frange
;
226 m_adjust
->value
= fpos
;
227 m_adjust
->step_increment
= 1.0;
228 m_adjust
->page_increment
= (float)(wxMax(fpage
,0));
229 m_adjust
->page_size
= fthumb
;
231 gtk_signal_emit_by_name( GTK_OBJECT(m_adjust
), "changed" );
234 /* Backward compatibility */
235 int wxScrollBar::GetValue(void) const
237 return GetThumbPosition();
240 void wxScrollBar::SetValue( int viewStart
)
242 SetThumbPosition( viewStart
);
245 void wxScrollBar::GetValues( int *viewStart
, int *viewLength
, int *objectLength
, int *pageLength
) const
247 int pos
= (int)(m_adjust
->value
+0.5);
248 int thumb
= (int)(m_adjust
->page_size
+0.5);
249 int page
= (int)(m_adjust
->page_increment
+0.5);
250 int range
= (int)(m_adjust
->upper
+0.5);
254 *objectLength
= thumb
;
258 int wxScrollBar::GetViewLength() const
260 return (int)(m_adjust
->upper
+0.5);
263 int wxScrollBar::GetObjectLength() const
265 return (int)(m_adjust
->page_size
+0.5);
268 void wxScrollBar::SetPageSize( int pageLength
)
270 int pos
= (int)(m_adjust
->value
+0.5);
271 int thumb
= (int)(m_adjust
->page_size
+0.5);
272 int range
= (int)(m_adjust
->upper
+0.5);
273 SetScrollbar( pos
, thumb
, range
, pageLength
);
276 void wxScrollBar::SetObjectLength( int objectLength
)
278 int pos
= (int)(m_adjust
->value
+0.5);
279 int page
= (int)(m_adjust
->page_increment
+0.5);
280 int range
= (int)(m_adjust
->upper
+0.5);
281 SetScrollbar( pos
, objectLength
, range
, page
);
284 void wxScrollBar::SetViewLength( int viewLength
)
286 int pos
= (int)(m_adjust
->value
+0.5);
287 int thumb
= (int)(m_adjust
->page_size
+0.5);
288 int page
= (int)(m_adjust
->page_increment
+0.5);
289 SetScrollbar( pos
, thumb
, viewLength
, page
);
292 bool wxScrollBar::IsOwnGtkWindow( GdkWindow
*window
)
294 GtkRange
*range
= GTK_RANGE(m_widget
);
295 return ( (window
== GTK_WIDGET(range
)->window
) ||
296 (window
== range
->trough
) ||
297 (window
== range
->slider
) ||
298 (window
== range
->step_forw
) ||
299 (window
== range
->step_back
) );
302 void wxScrollBar::ApplyWidgetStyle()
305 gtk_widget_set_style( m_widget
, m_widgetStyle
);