1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/gtk/scrolbar.cpp
4 // Author: Robert Roebling
6 // Copyright: (c) 1998 Robert Roebling
7 // Licence: wxWindows licence
8 /////////////////////////////////////////////////////////////////////////////
10 // For compilers that support precompilation, includes "wx.h".
11 #include "wx/wxprec.h"
15 #include "wx/scrolbar.h"
21 #include "wx/gtk/private.h"
23 //-----------------------------------------------------------------------------
24 // "value_changed" from scrollbar
25 //-----------------------------------------------------------------------------
29 gtk_value_changed(GtkRange
* range
, wxScrollBar
* win
)
31 wxEventType eventType
= win
->GetScrollEventType(range
);
32 if (eventType
!= wxEVT_NULL
)
34 const int orient
= win
->HasFlag(wxSB_VERTICAL
) ? wxVERTICAL
: wxHORIZONTAL
;
35 const int i
= orient
== wxVERTICAL
;
36 const int value
= win
->GetThumbPosition();
37 wxScrollEvent
event(eventType
, win
->GetId(), value
, orient
);
38 event
.SetEventObject(win
);
39 win
->m_blockValueChanged
[i
] = true;
40 win
->GetEventHandler()->ProcessEvent(event
);
41 if (!win
->m_isScrolling
)
43 wxScrollEvent
event(wxEVT_SCROLL_CHANGED
, win
->GetId(), value
, orient
);
44 event
.SetEventObject(win
);
45 win
->GetEventHandler()->ProcessEvent(event
);
47 win
->m_blockValueChanged
[i
] = false;
52 //-----------------------------------------------------------------------------
53 // "button_press_event" from scrollbar
54 //-----------------------------------------------------------------------------
58 gtk_button_press_event(GtkRange
*, GdkEventButton
*, wxScrollBar
* win
)
60 if (g_isIdle
) wxapp_install_idle_handler();
62 win
->m_mouseButtonDown
= true;
67 //-----------------------------------------------------------------------------
68 // "button_release_event" from scrollbar
69 //-----------------------------------------------------------------------------
73 gtk_button_release_event(GtkRange
*, GdkEventButton
*, wxScrollBar
* win
)
76 wxapp_install_idle_handler();
78 win
->m_mouseButtonDown
= false;
80 if (win
->m_isScrolling
)
82 win
->m_isScrolling
= false;
83 const int value
= win
->GetThumbPosition();
84 const int orient
= win
->HasFlag(wxSB_VERTICAL
) ? wxVERTICAL
: wxHORIZONTAL
;
86 wxScrollEvent
event(wxEVT_SCROLL_THUMBRELEASE
, win
->GetId(), value
, orient
);
87 event
.SetEventObject(win
);
88 // To allow setting scroll position from event handler, sending event must
89 // be deferred until after the GtkRange handler for this signal has run
90 win
->GetEventHandler()->AddPendingEvent(event
);
92 wxScrollEvent
event2(wxEVT_SCROLL_CHANGED
, win
->GetId(), value
, orient
);
93 event2
.SetEventObject(win
);
94 win
->GetEventHandler()->AddPendingEvent(event2
);
101 //-----------------------------------------------------------------------------
103 //-----------------------------------------------------------------------------
105 IMPLEMENT_DYNAMIC_CLASS(wxScrollBar
,wxControl
)
107 wxScrollBar::wxScrollBar()
111 wxScrollBar::~wxScrollBar()
115 bool wxScrollBar::Create(wxWindow
*parent
, wxWindowID id
,
116 const wxPoint
& pos
, const wxSize
& size
,
117 long style
, const wxValidator
& validator
, const wxString
& name
)
120 m_acceptsFocus
= true;
122 if (!PreCreation( parent
, pos
, size
) ||
123 !CreateBase( parent
, id
, pos
, size
, style
, validator
, name
))
125 wxFAIL_MSG( wxT("wxScrollBar creation failed") );
129 const bool isVertical
= (style
& wxSB_VERTICAL
) != 0;
131 m_widget
= gtk_vscrollbar_new( (GtkAdjustment
*) NULL
);
133 m_widget
= gtk_hscrollbar_new( (GtkAdjustment
*) NULL
);
135 m_scrollBar
[int(isVertical
)] = (GtkRange
*)m_widget
;
137 g_signal_connect(m_widget
, "value_changed",
138 G_CALLBACK(gtk_value_changed
), this);
139 g_signal_connect(m_widget
, "button_press_event",
140 G_CALLBACK(gtk_button_press_event
), this);
141 g_signal_connect(m_widget
, "button_release_event",
142 G_CALLBACK(gtk_button_release_event
), this);
144 m_parent
->DoAddChild( this );
151 int wxScrollBar::GetThumbPosition() const
153 GtkAdjustment
* adj
= ((GtkRange
*)m_widget
)->adjustment
;
154 return int(adj
->value
+ 0.5);
157 int wxScrollBar::GetThumbSize() const
159 GtkAdjustment
* adj
= ((GtkRange
*)m_widget
)->adjustment
;
160 return int(adj
->page_size
);
163 int wxScrollBar::GetPageSize() const
165 GtkAdjustment
* adj
= ((GtkRange
*)m_widget
)->adjustment
;
166 return int(adj
->page_increment
);
169 int wxScrollBar::GetRange() const
171 GtkAdjustment
* adj
= ((GtkRange
*)m_widget
)->adjustment
;
172 return int(adj
->upper
);
175 void wxScrollBar::SetThumbPosition( int viewStart
)
177 if (GetThumbPosition() != viewStart
)
179 GtkAdjustment
* adj
= ((GtkRange
*)m_widget
)->adjustment
;
180 const int i
= (GtkRange
*)m_widget
== m_scrollBar
[1];
181 const int max
= int(adj
->upper
- adj
->page_size
);
188 adj
->value
= viewStart
;
189 // If a "value_changed" signal emission is not already in progress
190 if (!m_blockValueChanged
[i
])
192 gtk_adjustment_value_changed(adj
);
197 void wxScrollBar::SetScrollbar(int position
, int thumbSize
, int range
, int pageSize
, bool)
201 // GtkRange requires upper > lower
205 if (position
> range
- thumbSize
)
206 position
= range
- thumbSize
;
209 GtkAdjustment
* adj
= ((GtkRange
*)m_widget
)->adjustment
;
210 adj
->step_increment
= 1;
211 adj
->page_increment
= pageSize
;
212 adj
->page_size
= thumbSize
;
214 SetThumbPosition(position
);
215 gtk_adjustment_changed(adj
);
218 void wxScrollBar::SetPageSize( int pageLength
)
220 SetScrollbar(GetThumbPosition(), GetThumbSize(), GetRange(), pageLength
);
223 void wxScrollBar::SetRange(int range
)
225 SetScrollbar(GetThumbPosition(), GetThumbSize(), range
, GetPageSize());
228 bool wxScrollBar::IsOwnGtkWindow( GdkWindow
*window
)
230 GtkRange
*range
= GTK_RANGE(m_widget
);
231 return ( (window
== GTK_WIDGET(range
)->window
) );
236 wxScrollBar::GetClassDefaultAttributes(wxWindowVariant
WXUNUSED(variant
))
238 return GetDefaultAttributesFromGTKWidget(gtk_vscrollbar_new
);
241 #endif // wxUSE_SCROLLBAR