1 /////////////////////////////////////////////////////////////////////////////
2 // Name: univ/scrolbar.cpp
3 // Purpose: wxScrollBar implementation
4 // Author: Vadim Zeitlin
8 // Copyright: (c) 2000 SciTech Software, Inc. (www.scitechsoft.com)
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
12 // ============================================================================
14 // ============================================================================
16 // ----------------------------------------------------------------------------
18 // ----------------------------------------------------------------------------
20 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
21 #pragma implementation "univscrolbar.h"
24 #include "wx/wxprec.h"
35 #include "wx/dcclient.h"
36 #include "wx/scrolbar.h"
37 #include "wx/validate.h"
40 #include "wx/univ/scrtimer.h"
42 #include "wx/univ/renderer.h"
43 #include "wx/univ/inphand.h"
44 #include "wx/univ/theme.h"
47 #define WXDEBUG_SCROLLBAR
50 #undef WXDEBUG_SCROLLBAR
51 #endif // !__WXDEBUG__
53 #if defined(WXDEBUG_SCROLLBAR) && defined(__WXMSW__) && !defined(__WXMICROWIN__)
54 #include "wx/msw/private.h"
57 // ----------------------------------------------------------------------------
58 // wxScrollBarTimer: this class is used to repeatedly scroll the scrollbar
59 // when the mouse is help pressed on the arrow or on the bar. It generates the
60 // given scroll action command periodically.
61 // ----------------------------------------------------------------------------
63 class wxScrollBarTimer
: public wxScrollTimer
66 wxScrollBarTimer(wxStdScrollBarInputHandler
*handler
,
67 const wxControlAction
& action
,
68 wxScrollBar
*control
);
71 virtual bool DoNotify();
74 wxStdScrollBarInputHandler
*m_handler
;
75 wxControlAction m_action
;
76 wxScrollBar
*m_control
;
79 // ============================================================================
81 // ============================================================================
83 IMPLEMENT_DYNAMIC_CLASS(wxScrollBar
, wxControl
)
85 BEGIN_EVENT_TABLE(wxScrollBar
, wxScrollBarBase
)
88 // ----------------------------------------------------------------------------
90 // ----------------------------------------------------------------------------
93 // warning C4355: 'this' : used in base member initializer list
94 #pragma warning(disable:4355) // so what? disable it...
97 wxScrollBar::wxScrollBar()
103 wxScrollBar::wxScrollBar(wxWindow
*parent
,
108 const wxValidator
& validator
,
109 const wxString
& name
)
114 (void)Create(parent
, id
, pos
, size
, style
, validator
, name
);
118 // warning C4355: 'this' : used in base member initializer list
119 #pragma warning(default:4355)
122 void wxScrollBar::Init()
131 for ( size_t n
= 0; n
< WXSIZEOF(m_elementsState
); n
++ )
133 m_elementsState
[n
] = 0;
139 bool wxScrollBar::Create(wxWindow
*parent
,
144 const wxValidator
& validator
,
145 const wxString
&name
)
147 // the scrollbars never have the border
148 style
&= ~wxBORDER_MASK
;
150 if ( !wxControl::Create(parent
, id
, pos
, size
, style
, validator
, name
) )
155 // override the cursor of the target window (if any)
156 SetCursor(wxCURSOR_ARROW
);
158 CreateInputHandler(wxINP_HANDLER_SCROLLBAR
);
163 wxScrollBar::~wxScrollBar()
167 // ----------------------------------------------------------------------------
169 // ----------------------------------------------------------------------------
171 bool wxScrollBar::IsStandalone() const
173 wxWindow
*parent
= GetParent();
179 return (parent
->GetScrollbar(wxHORIZONTAL
) != this) &&
180 (parent
->GetScrollbar(wxVERTICAL
) != this);
183 bool wxScrollBar::AcceptsFocus() const
185 // the window scrollbars never accept focus
186 return wxScrollBarBase::AcceptsFocus() && IsStandalone();
189 // ----------------------------------------------------------------------------
191 // ----------------------------------------------------------------------------
193 void wxScrollBar::DoSetThumb(int pos
)
195 // don't assert hecks here, we're a private function which is meant to be
196 // called with any args at all
201 else if ( pos
> m_range
- m_thumbSize
)
203 pos
= m_range
- m_thumbSize
;
206 if ( m_thumbPos
== pos
)
208 // nothing changed, avoid refreshes which would provoke flicker
212 if ( m_thumbPosOld
== -1 )
214 // remember the old thumb position
215 m_thumbPosOld
= m_thumbPos
;
220 // we have to refresh the part of the bar which was under the thumb and the
222 m_elementsState
[Element_Thumb
] |= wxCONTROL_DIRTY
;
223 m_elementsState
[m_thumbPos
> m_thumbPosOld
224 ? Element_Bar_1
: Element_Bar_2
] |= wxCONTROL_DIRTY
;
228 int wxScrollBar::GetThumbPosition() const
233 int wxScrollBar::GetThumbSize() const
238 int wxScrollBar::GetPageSize() const
243 int wxScrollBar::GetRange() const
248 void wxScrollBar::SetThumbPosition(int pos
)
250 wxCHECK_RET( pos
>= 0 && pos
<= m_range
, _T("thumb position out of range") );
255 void wxScrollBar::SetScrollbar(int position
, int thumbSize
,
256 int range
, int pageSize
,
259 // we only refresh everything when the range changes, thumb position
260 // changes are handled in OnIdle
261 bool needsRefresh
= (range
!= m_range
) ||
262 (thumbSize
!= m_thumbSize
) ||
263 (pageSize
!= m_pageSize
);
265 // set all parameters
267 m_thumbSize
= thumbSize
;
268 SetThumbPosition(position
);
269 m_pageSize
= pageSize
;
271 // ignore refresh parameter unless we really need to refresh everything -
272 // there ir a lot of existing code which just calls SetScrollbar() without
273 // specifying the last parameter even though it doesn't need at all to
274 // refresh the window immediately
275 if ( refresh
&& needsRefresh
)
277 // and update the window
283 // ----------------------------------------------------------------------------
285 // ----------------------------------------------------------------------------
287 wxSize
wxScrollBar::DoGetBestClientSize() const
289 // this dimension is completely arbitrary
290 static const wxCoord SIZE
= 140;
292 wxSize size
= m_renderer
->GetScrollbarArrowSize();
305 wxScrollArrows::Arrow
wxScrollBar::HitTest(const wxPoint
& pt
) const
307 switch ( m_renderer
->HitTestScrollbar(this, pt
) )
309 case wxHT_SCROLLBAR_ARROW_LINE_1
:
310 return wxScrollArrows::Arrow_First
;
312 case wxHT_SCROLLBAR_ARROW_LINE_2
:
313 return wxScrollArrows::Arrow_Second
;
316 return wxScrollArrows::Arrow_None
;
320 // ----------------------------------------------------------------------------
322 // ----------------------------------------------------------------------------
324 void wxScrollBar::OnInternalIdle()
327 wxControl::OnInternalIdle();
330 void wxScrollBar::UpdateThumb()
334 for ( size_t n
= 0; n
< WXSIZEOF(m_elementsState
); n
++ )
336 if ( m_elementsState
[n
] & wxCONTROL_DIRTY
)
338 wxRect rect
= GetRenderer()->GetScrollbarRect(this, (Element
)n
);
340 if ( rect
.width
&& rect
.height
)
342 // we try to avoid redrawing the entire shaft (which might
343 // be quite long) if possible by only redrawing the area
344 // wich really changed
345 if ( (n
== Element_Bar_1
|| n
== Element_Bar_2
) &&
346 (m_thumbPosOld
!= -1) )
348 // the less efficient but more reliable (i.e. this will
349 // probably work everywhere) version: refresh the
350 // distance covered by thumb since the last update
353 GetRenderer()->GetScrollbarRect(this,
358 if ( n
== Element_Bar_1
)
359 rect
.SetTop(rectOld
.GetBottom());
361 rect
.SetBottom(rectOld
.GetBottom());
365 if ( n
== Element_Bar_1
)
366 rect
.SetLeft(rectOld
.GetRight());
368 rect
.SetRight(rectOld
.GetRight());
370 #else // efficient version: only repaint the area occupied by
371 // the thumb previously - we can't do better than this
372 rect
= GetRenderer()->GetScrollbarRect(this,
378 #ifdef WXDEBUG_SCROLLBAR
379 static bool s_refreshDebug
= false;
380 if ( s_refreshDebug
)
383 dc
.SetBrush(*wxCYAN_BRUSH
);
384 dc
.SetPen(*wxTRANSPARENT_PEN
);
385 dc
.DrawRectangle(rect
);
387 // under Unix we use "--sync" X option for this
388 #if defined(__WXMSW__) && !defined(__WXMICROWIN__)
393 #endif // WXDEBUG_SCROLLBAR
395 Refresh(false, &rect
);
398 m_elementsState
[n
] &= ~wxCONTROL_DIRTY
;
406 void wxScrollBar::DoDraw(wxControlRenderer
*renderer
)
408 renderer
->DrawScrollbar(this, m_thumbPosOld
);
410 // clear all dirty flags
415 // ----------------------------------------------------------------------------
417 // ----------------------------------------------------------------------------
419 static inline wxScrollBar::Element
ElementForArrow(wxScrollArrows::Arrow arrow
)
421 return arrow
== wxScrollArrows::Arrow_First
422 ? wxScrollBar::Element_Arrow_Line_1
423 : wxScrollBar::Element_Arrow_Line_2
;
426 int wxScrollBar::GetArrowState(wxScrollArrows::Arrow arrow
) const
428 return GetState(ElementForArrow(arrow
));
431 void wxScrollBar::SetArrowFlag(wxScrollArrows::Arrow arrow
, int flag
, bool set
)
433 Element which
= ElementForArrow(arrow
);
434 int state
= GetState(which
);
440 SetState(which
, state
);
443 int wxScrollBar::GetState(Element which
) const
445 // if the entire scrollbar is disabled, all of its elements are too
446 int flags
= m_elementsState
[which
];
448 flags
|= wxCONTROL_DISABLED
;
453 void wxScrollBar::SetState(Element which
, int flags
)
455 if ( (int)(m_elementsState
[which
] & ~wxCONTROL_DIRTY
) != flags
)
457 m_elementsState
[which
] = flags
| wxCONTROL_DIRTY
;
463 // ----------------------------------------------------------------------------
465 // ----------------------------------------------------------------------------
467 bool wxScrollBar::OnArrow(wxScrollArrows::Arrow arrow
)
469 int oldThumbPos
= GetThumbPosition();
470 PerformAction(arrow
== wxScrollArrows::Arrow_First
471 ? wxACTION_SCROLL_LINE_UP
472 : wxACTION_SCROLL_LINE_DOWN
);
474 // did we scroll till the end?
475 return GetThumbPosition() != oldThumbPos
;
478 bool wxScrollBar::PerformAction(const wxControlAction
& action
,
480 const wxString
& strArg
)
482 int thumbOld
= m_thumbPos
;
484 bool notify
= false; // send an event about the change?
486 wxEventType scrollType
;
488 // test for thumb move first as these events happen in quick succession
489 if ( action
== wxACTION_SCROLL_THUMB_MOVE
)
493 // VS: we have to force redraw here, otherwise the thumb will lack
494 // behind mouse cursor
497 scrollType
= wxEVT_SCROLLWIN_THUMBTRACK
;
499 else if ( action
== wxACTION_SCROLL_LINE_UP
)
501 scrollType
= wxEVT_SCROLLWIN_LINEUP
;
504 else if ( action
== wxACTION_SCROLL_LINE_DOWN
)
506 scrollType
= wxEVT_SCROLLWIN_LINEDOWN
;
509 else if ( action
== wxACTION_SCROLL_PAGE_UP
)
511 scrollType
= wxEVT_SCROLLWIN_PAGEUP
;
514 else if ( action
== wxACTION_SCROLL_PAGE_DOWN
)
516 scrollType
= wxEVT_SCROLLWIN_PAGEDOWN
;
519 else if ( action
== wxACTION_SCROLL_START
)
521 scrollType
= wxEVT_SCROLLWIN_THUMBRELEASE
; // anything better?
524 else if ( action
== wxACTION_SCROLL_END
)
526 scrollType
= wxEVT_SCROLLWIN_THUMBRELEASE
; // anything better?
529 else if ( action
== wxACTION_SCROLL_THUMB_DRAG
)
531 // we won't use it but this line suppresses the compiler
532 // warning about "variable may be used without having been
534 scrollType
= wxEVT_NULL
;
536 else if ( action
== wxACTION_SCROLL_THUMB_RELEASE
)
538 // always notify about this
540 scrollType
= wxEVT_SCROLLWIN_THUMBRELEASE
;
543 return wxControl::PerformAction(action
, numArg
, strArg
);
545 // has scrollbar position changed?
546 bool changed
= m_thumbPos
!= thumbOld
;
547 if ( notify
|| changed
)
549 if ( IsStandalone() )
551 // we should generate EVT_SCROLL events for the standalone
552 // scrollbars and not the EVT_SCROLLWIN ones
554 // NB: we assume that scrollbar events are sequentially numbered
555 // but this should be ok as other code relies on this as well
556 scrollType
+= wxEVT_SCROLL_TOP
- wxEVT_SCROLLWIN_TOP
;
559 wxScrollWinEvent
event(scrollType
, m_thumbPos
,
560 IsVertical() ? wxVERTICAL
: wxHORIZONTAL
);
561 event
.SetEventObject(this);
562 GetParent()->GetEventHandler()->ProcessEvent(event
);
568 void wxScrollBar::ScrollToStart()
573 void wxScrollBar::ScrollToEnd()
575 DoSetThumb(m_range
- m_thumbSize
);
578 bool wxScrollBar::ScrollLines(int nLines
)
580 DoSetThumb(m_thumbPos
+ nLines
);
584 bool wxScrollBar::ScrollPages(int nPages
)
586 DoSetThumb(m_thumbPos
+ nPages
*m_pageSize
);
590 // ============================================================================
591 // scroll bar input handler
592 // ============================================================================
594 // ----------------------------------------------------------------------------
596 // ----------------------------------------------------------------------------
598 wxScrollBarTimer::wxScrollBarTimer(wxStdScrollBarInputHandler
*handler
,
599 const wxControlAction
& action
,
600 wxScrollBar
*control
)
607 bool wxScrollBarTimer::DoNotify()
609 return m_handler
->OnScrollTimer(m_control
, m_action
);
612 // ----------------------------------------------------------------------------
613 // wxStdScrollBarInputHandler
614 // ----------------------------------------------------------------------------
616 wxStdScrollBarInputHandler::wxStdScrollBarInputHandler(wxRenderer
*renderer
,
617 wxInputHandler
*handler
)
618 : wxStdInputHandler(handler
)
620 m_renderer
= renderer
;
622 m_htLast
= wxHT_NOWHERE
;
623 m_timerScroll
= NULL
;
626 wxStdScrollBarInputHandler::~wxStdScrollBarInputHandler()
628 // normally, it's NULL by now but just in case the user somehow managed to
629 // keep the mouse captured until now...
630 delete m_timerScroll
;
633 void wxStdScrollBarInputHandler::SetElementState(wxScrollBar
*control
,
637 if ( m_htLast
> wxHT_SCROLLBAR_FIRST
&& m_htLast
< wxHT_SCROLLBAR_LAST
)
640 elem
= (wxScrollBar::Element
)(m_htLast
- wxHT_SCROLLBAR_FIRST
- 1);
642 int flags
= control
->GetState(elem
);
647 control
->SetState(elem
, flags
);
651 bool wxStdScrollBarInputHandler::OnScrollTimer(wxScrollBar
*scrollbar
,
652 const wxControlAction
& action
)
654 int oldThumbPos
= scrollbar
->GetThumbPosition();
655 scrollbar
->PerformAction(action
);
656 if ( scrollbar
->GetThumbPosition() != oldThumbPos
)
659 // we scrolled till the end
660 m_timerScroll
->Stop();
665 void wxStdScrollBarInputHandler::StopScrolling(wxScrollBar
*control
)
667 // return everything to the normal state
670 m_winCapture
->ReleaseMouse();
678 delete m_timerScroll
;
679 m_timerScroll
= NULL
;
682 // unpress the arrow and highlight the current element
683 Press(control
, false);
687 wxStdScrollBarInputHandler::GetMouseCoord(const wxScrollBar
*scrollbar
,
688 const wxMouseEvent
& event
) const
690 wxPoint pt
= event
.GetPosition();
691 return scrollbar
->GetWindowStyle() & wxVERTICAL
? pt
.y
: pt
.x
;
694 void wxStdScrollBarInputHandler::HandleThumbMove(wxScrollBar
*scrollbar
,
695 const wxMouseEvent
& event
)
697 int thumbPos
= GetMouseCoord(scrollbar
, event
) - m_ofsMouse
;
698 thumbPos
= m_renderer
->PixelToScrollbar(scrollbar
, thumbPos
);
699 scrollbar
->PerformAction(wxACTION_SCROLL_THUMB_MOVE
, thumbPos
);
702 bool wxStdScrollBarInputHandler::HandleKey(wxInputConsumer
*consumer
,
703 const wxKeyEvent
& event
,
706 // we only react to the key presses here
709 wxControlAction action
;
710 switch ( event
.GetKeyCode() )
713 case WXK_RIGHT
: action
= wxACTION_SCROLL_LINE_DOWN
; break;
715 case WXK_LEFT
: action
= wxACTION_SCROLL_LINE_UP
; break;
716 case WXK_HOME
: action
= wxACTION_SCROLL_START
; break;
717 case WXK_END
: action
= wxACTION_SCROLL_END
; break;
719 case WXK_PRIOR
: action
= wxACTION_SCROLL_PAGE_UP
; break;
721 case WXK_NEXT
: action
= wxACTION_SCROLL_PAGE_DOWN
; break;
724 if ( !action
.IsEmpty() )
726 consumer
->PerformAction(action
);
732 return wxStdInputHandler::HandleKey(consumer
, event
, pressed
);
735 bool wxStdScrollBarInputHandler::HandleMouse(wxInputConsumer
*consumer
,
736 const wxMouseEvent
& event
)
738 // is this a click event from an acceptable button?
739 int btn
= event
.GetButton();
740 if ( (btn
!= -1) && IsAllowedButton(btn
) )
742 // determine which part of the window mouse is in
743 wxScrollBar
*scrollbar
= wxStaticCast(consumer
->GetInputWindow(), wxScrollBar
);
744 wxHitTest ht
= m_renderer
->HitTestScrollbar
750 // when the mouse is pressed on any scrollbar element, we capture it
751 // and hold capture until the same mouse button is released
752 if ( event
.ButtonDown() || event
.ButtonDClick() )
757 m_winCapture
= consumer
->GetInputWindow();
758 m_winCapture
->CaptureMouse();
760 // generate the command
761 bool hasAction
= true;
762 wxControlAction action
;
765 case wxHT_SCROLLBAR_ARROW_LINE_1
:
766 action
= wxACTION_SCROLL_LINE_UP
;
769 case wxHT_SCROLLBAR_ARROW_LINE_2
:
770 action
= wxACTION_SCROLL_LINE_DOWN
;
773 case wxHT_SCROLLBAR_BAR_1
:
774 action
= wxACTION_SCROLL_PAGE_UP
;
775 m_ptStartScrolling
= event
.GetPosition();
778 case wxHT_SCROLLBAR_BAR_2
:
779 action
= wxACTION_SCROLL_PAGE_DOWN
;
780 m_ptStartScrolling
= event
.GetPosition();
783 case wxHT_SCROLLBAR_THUMB
:
784 consumer
->PerformAction(wxACTION_SCROLL_THUMB_DRAG
);
785 m_ofsMouse
= GetMouseCoord(scrollbar
, event
) -
786 m_renderer
->ScrollbarToPixel(scrollbar
);
788 // fall through: there is no immediate action
794 // remove highlighting
795 Highlight(scrollbar
, false);
798 // and press the arrow or highlight thumb now instead
799 if ( m_htLast
== wxHT_SCROLLBAR_THUMB
)
800 Highlight(scrollbar
, true);
802 Press(scrollbar
, true);
807 m_timerScroll
= new wxScrollBarTimer(this, action
,
809 m_timerScroll
->StartAutoScroll();
811 //else: no (immediate) action
814 //else: mouse already captured, nothing to do
816 // release mouse if the *same* button went up
817 else if ( btn
== m_btnCapture
)
821 StopScrolling(scrollbar
);
823 // if we were dragging the thumb, send the last event
824 if ( m_htLast
== wxHT_SCROLLBAR_THUMB
)
826 scrollbar
->PerformAction(wxACTION_SCROLL_THUMB_RELEASE
);
830 Highlight(scrollbar
, true);
834 // this is not supposed to happen as the button can't go up
835 // without going down previously and then we'd have
836 // m_winCapture by now
837 wxFAIL_MSG( _T("logic error in mouse capturing code") );
842 return wxStdInputHandler::HandleMouse(consumer
, event
);
845 bool wxStdScrollBarInputHandler::HandleMouseMove(wxInputConsumer
*consumer
,
846 const wxMouseEvent
& event
)
848 wxScrollBar
*scrollbar
= wxStaticCast(consumer
->GetInputWindow(), wxScrollBar
);
852 if ( (m_htLast
== wxHT_SCROLLBAR_THUMB
) && event
.Dragging() )
854 // make the thumb follow the mouse by keeping the same offset
855 // between the mouse position and the top/left of the thumb
856 HandleThumbMove(scrollbar
, event
);
861 // no other changes are possible while the mouse is captured
865 bool isArrow
= scrollbar
->GetArrows().HandleMouseMove(event
);
867 if ( event
.Dragging() )
869 wxHitTest ht
= m_renderer
->HitTestScrollbar
874 if ( ht
== m_htLast
)
881 wxLogDebug("Scrollbar::OnMouseMove: ht = %d", ht
);
882 #endif // DEBUG_MOUSE
884 Highlight(scrollbar
, false);
888 Highlight(scrollbar
, true);
889 //else: already done by wxScrollArrows::HandleMouseMove
891 else if ( event
.Leaving() )
894 Highlight(scrollbar
, false);
896 m_htLast
= wxHT_NOWHERE
;
898 else // event.Entering()
900 // we don't process this event
908 #endif // wxUSE_SCROLLBAR
910 // ----------------------------------------------------------------------------
912 // ----------------------------------------------------------------------------
914 wxScrollTimer::wxScrollTimer()
919 void wxScrollTimer::StartAutoScroll()
921 // start scrolling immediately
924 // ... and end it too
928 // there is an initial delay before the scrollbar starts scrolling -
929 // implement it by ignoring the first timer expiration and only start
930 // scrolling from the second one
932 Start(200); // FIXME: hardcoded delay
935 void wxScrollTimer::Notify()
939 // scroll normally now - reduce the delay
941 Start(50); // FIXME: hardcoded delay
947 // if DoNotify() returns false, we're already deleted by the timer
948 // event handler, so don't do anything else here