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 // ----------------------------------------------------------------------------
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
, wxDefaultValidator
, 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 everythign 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()
329 void wxScrollBar::UpdateThumb()
333 for ( size_t n
= 0; n
< WXSIZEOF(m_elementsState
); n
++ )
335 if ( m_elementsState
[n
] & wxCONTROL_DIRTY
)
337 wxRect rect
= GetRenderer()->GetScrollbarRect(this, (Element
)n
);
339 if ( rect
.width
&& rect
.height
)
341 // we try to avoid redrawing the entire shaft (which might
342 // be quite long) if possible by only redrawing the area
343 // wich really changed
344 if ( (n
== Element_Bar_1
|| n
== Element_Bar_2
) &&
345 (m_thumbPosOld
!= -1) )
347 // the less efficient but more reliable (i.e. this will
348 // probably work everywhere) version: refresh the
349 // distance covered by thumb since the last update
352 GetRenderer()->GetScrollbarRect(this,
357 if ( n
== Element_Bar_1
)
358 rect
.SetTop(rectOld
.GetBottom());
360 rect
.SetBottom(rectOld
.GetBottom());
364 if ( n
== Element_Bar_1
)
365 rect
.SetLeft(rectOld
.GetRight());
367 rect
.SetRight(rectOld
.GetRight());
369 #else // efficient version: only repaint the area occupied by
370 // the thumb previously - we can't do better than this
371 rect
= GetRenderer()->GetScrollbarRect(this,
377 #ifdef WXDEBUG_SCROLLBAR
378 static bool s_refreshDebug
= FALSE
;
379 if ( s_refreshDebug
)
382 dc
.SetBrush(*wxCYAN_BRUSH
);
383 dc
.SetPen(*wxTRANSPARENT_PEN
);
384 dc
.DrawRectangle(rect
);
386 // under Unix we use "--sync" X option for this
387 #if defined(__WXMSW__) && !defined(__WXMICROWIN__)
392 #endif // WXDEBUG_SCROLLBAR
394 Refresh(FALSE
, &rect
);
397 m_elementsState
[n
] &= ~wxCONTROL_DIRTY
;
405 void wxScrollBar::DoDraw(wxControlRenderer
*renderer
)
407 renderer
->DrawScrollbar(this, m_thumbPosOld
);
409 // clear all dirty flags
414 // ----------------------------------------------------------------------------
416 // ----------------------------------------------------------------------------
418 static inline wxScrollBar::Element
ElementForArrow(wxScrollArrows::Arrow arrow
)
420 return arrow
== wxScrollArrows::Arrow_First
421 ? wxScrollBar::Element_Arrow_Line_1
422 : wxScrollBar::Element_Arrow_Line_2
;
425 int wxScrollBar::GetArrowState(wxScrollArrows::Arrow arrow
) const
427 return GetState(ElementForArrow(arrow
));
430 void wxScrollBar::SetArrowFlag(wxScrollArrows::Arrow arrow
, int flag
, bool set
)
432 Element which
= ElementForArrow(arrow
);
433 int state
= GetState(which
);
439 SetState(which
, state
);
442 int wxScrollBar::GetState(Element which
) const
444 // if the entire scrollbar is disabled, all of its elements are too
445 int flags
= m_elementsState
[which
];
447 flags
|= wxCONTROL_DISABLED
;
452 void wxScrollBar::SetState(Element which
, int flags
)
454 if ( (int)(m_elementsState
[which
] & ~wxCONTROL_DIRTY
) != flags
)
456 m_elementsState
[which
] = flags
| wxCONTROL_DIRTY
;
462 // ----------------------------------------------------------------------------
464 // ----------------------------------------------------------------------------
466 bool wxScrollBar::OnArrow(wxScrollArrows::Arrow arrow
)
468 int oldThumbPos
= GetThumbPosition();
469 PerformAction(arrow
== wxScrollArrows::Arrow_First
470 ? wxACTION_SCROLL_LINE_UP
471 : wxACTION_SCROLL_LINE_DOWN
);
473 // did we scroll till the end?
474 return GetThumbPosition() != oldThumbPos
;
477 bool wxScrollBar::PerformAction(const wxControlAction
& action
,
479 const wxString
& strArg
)
481 int thumbOld
= m_thumbPos
;
483 bool notify
= FALSE
; // send an event about the change?
485 wxEventType scrollType
;
487 // test for thumb move first as these events happen in quick succession
488 if ( action
== wxACTION_SCROLL_THUMB_MOVE
)
492 // VS: we have to force redraw here, otherwise the thumb will lack
493 // behind mouse cursor
496 scrollType
= wxEVT_SCROLLWIN_THUMBTRACK
;
498 else if ( action
== wxACTION_SCROLL_LINE_UP
)
500 scrollType
= wxEVT_SCROLLWIN_LINEUP
;
503 else if ( action
== wxACTION_SCROLL_LINE_DOWN
)
505 scrollType
= wxEVT_SCROLLWIN_LINEDOWN
;
508 else if ( action
== wxACTION_SCROLL_PAGE_UP
)
510 scrollType
= wxEVT_SCROLLWIN_PAGEUP
;
513 else if ( action
== wxACTION_SCROLL_PAGE_DOWN
)
515 scrollType
= wxEVT_SCROLLWIN_PAGEDOWN
;
518 else if ( action
== wxACTION_SCROLL_START
)
520 scrollType
= wxEVT_SCROLLWIN_THUMBRELEASE
; // anything better?
523 else if ( action
== wxACTION_SCROLL_END
)
525 scrollType
= wxEVT_SCROLLWIN_THUMBRELEASE
; // anything better?
528 else if ( action
== wxACTION_SCROLL_THUMB_DRAG
)
530 // we won't use it but this line suppresses the compiler
531 // warning about "variable may be used without having been
533 scrollType
= wxEVT_NULL
;
535 else if ( action
== wxACTION_SCROLL_THUMB_RELEASE
)
537 // always notify about this
539 scrollType
= wxEVT_SCROLLWIN_THUMBRELEASE
;
542 return wxControl::PerformAction(action
, numArg
, strArg
);
544 // has scrollbar position changed?
545 bool changed
= m_thumbPos
!= thumbOld
;
546 if ( notify
|| changed
)
548 if ( IsStandalone() )
550 // we should generate EVT_SCROLL events for the standalone
551 // scrollbars and not the EVT_SCROLLWIN ones
553 // NB: we assume that scrollbar events are sequentially numbered
554 // but this should be ok as other code relies on this as well
555 scrollType
+= wxEVT_SCROLL_TOP
- wxEVT_SCROLLWIN_TOP
;
558 wxScrollWinEvent
event(scrollType
, m_thumbPos
,
559 IsVertical() ? wxVERTICAL
: wxHORIZONTAL
);
560 event
.SetEventObject(this);
561 GetParent()->GetEventHandler()->ProcessEvent(event
);
567 void wxScrollBar::ScrollToStart()
572 void wxScrollBar::ScrollToEnd()
574 DoSetThumb(m_range
- m_thumbSize
);
577 bool wxScrollBar::ScrollLines(int nLines
)
579 DoSetThumb(m_thumbPos
+ nLines
);
583 bool wxScrollBar::ScrollPages(int nPages
)
585 DoSetThumb(m_thumbPos
+ nPages
*m_pageSize
);
589 // ============================================================================
590 // scroll bar input handler
591 // ============================================================================
593 // ----------------------------------------------------------------------------
595 // ----------------------------------------------------------------------------
597 wxScrollBarTimer::wxScrollBarTimer(wxStdScrollBarInputHandler
*handler
,
598 const wxControlAction
& action
,
599 wxScrollBar
*control
)
606 bool wxScrollBarTimer::DoNotify()
608 return m_handler
->OnScrollTimer(m_control
, m_action
);
611 // ----------------------------------------------------------------------------
612 // wxStdScrollBarInputHandler
613 // ----------------------------------------------------------------------------
615 wxStdScrollBarInputHandler::wxStdScrollBarInputHandler(wxRenderer
*renderer
,
616 wxInputHandler
*handler
)
617 : wxStdInputHandler(handler
)
619 m_renderer
= renderer
;
621 m_htLast
= wxHT_NOWHERE
;
622 m_timerScroll
= NULL
;
625 wxStdScrollBarInputHandler::~wxStdScrollBarInputHandler()
627 // normally, it's NULL by now but just in case the user somehow managed to
628 // keep the mouse captured until now...
629 delete m_timerScroll
;
632 void wxStdScrollBarInputHandler::SetElementState(wxScrollBar
*control
,
636 if ( m_htLast
> wxHT_SCROLLBAR_FIRST
&& m_htLast
< wxHT_SCROLLBAR_LAST
)
639 elem
= (wxScrollBar::Element
)(m_htLast
- wxHT_SCROLLBAR_FIRST
- 1);
641 int flags
= control
->GetState(elem
);
646 control
->SetState(elem
, flags
);
650 bool wxStdScrollBarInputHandler::OnScrollTimer(wxScrollBar
*scrollbar
,
651 const wxControlAction
& action
)
653 int oldThumbPos
= scrollbar
->GetThumbPosition();
654 scrollbar
->PerformAction(action
);
655 if ( scrollbar
->GetThumbPosition() != oldThumbPos
)
658 // we scrolled till the end
659 m_timerScroll
->Stop();
664 void wxStdScrollBarInputHandler::StopScrolling(wxScrollBar
*control
)
666 // return everything to the normal state
669 m_winCapture
->ReleaseMouse();
677 delete m_timerScroll
;
678 m_timerScroll
= NULL
;
681 // unpress the arrow and highlight the current element
682 Press(control
, FALSE
);
686 wxStdScrollBarInputHandler::GetMouseCoord(const wxScrollBar
*scrollbar
,
687 const wxMouseEvent
& event
) const
689 wxPoint pt
= event
.GetPosition();
690 return scrollbar
->GetWindowStyle() & wxVERTICAL
? pt
.y
: pt
.x
;
693 void wxStdScrollBarInputHandler::HandleThumbMove(wxScrollBar
*scrollbar
,
694 const wxMouseEvent
& event
)
696 int thumbPos
= GetMouseCoord(scrollbar
, event
) - m_ofsMouse
;
697 thumbPos
= m_renderer
->PixelToScrollbar(scrollbar
, thumbPos
);
698 scrollbar
->PerformAction(wxACTION_SCROLL_THUMB_MOVE
, thumbPos
);
701 bool wxStdScrollBarInputHandler::HandleKey(wxInputConsumer
*consumer
,
702 const wxKeyEvent
& event
,
705 // we only react to the key presses here
708 wxControlAction action
;
709 switch ( event
.GetKeyCode() )
712 case WXK_RIGHT
: action
= wxACTION_SCROLL_LINE_DOWN
; break;
714 case WXK_LEFT
: action
= wxACTION_SCROLL_LINE_UP
; break;
715 case WXK_HOME
: action
= wxACTION_SCROLL_START
; break;
716 case WXK_END
: action
= wxACTION_SCROLL_END
; break;
718 case WXK_PRIOR
: action
= wxACTION_SCROLL_PAGE_UP
; break;
720 case WXK_NEXT
: action
= wxACTION_SCROLL_PAGE_DOWN
; break;
725 consumer
->PerformAction(action
);
731 return wxStdInputHandler::HandleKey(consumer
, event
, pressed
);
734 bool wxStdScrollBarInputHandler::HandleMouse(wxInputConsumer
*consumer
,
735 const wxMouseEvent
& event
)
737 // is this a click event from an acceptable button?
738 int btn
= event
.GetButton();
739 if ( (btn
!= -1) && IsAllowedButton(btn
) )
741 // determine which part of the window mouse is in
742 wxScrollBar
*scrollbar
= wxStaticCast(consumer
->GetInputWindow(), wxScrollBar
);
743 wxHitTest ht
= m_renderer
->HitTestScrollbar
749 // when the mouse is pressed on any scrollbar element, we capture it
750 // and hold capture until the same mouse button is released
751 if ( event
.ButtonDown() || event
.ButtonDClick() )
756 m_winCapture
= consumer
->GetInputWindow();
757 m_winCapture
->CaptureMouse();
759 // generate the command
760 bool hasAction
= TRUE
;
761 wxControlAction action
;
764 case wxHT_SCROLLBAR_ARROW_LINE_1
:
765 action
= wxACTION_SCROLL_LINE_UP
;
768 case wxHT_SCROLLBAR_ARROW_LINE_2
:
769 action
= wxACTION_SCROLL_LINE_DOWN
;
772 case wxHT_SCROLLBAR_BAR_1
:
773 action
= wxACTION_SCROLL_PAGE_UP
;
774 m_ptStartScrolling
= event
.GetPosition();
777 case wxHT_SCROLLBAR_BAR_2
:
778 action
= wxACTION_SCROLL_PAGE_DOWN
;
779 m_ptStartScrolling
= event
.GetPosition();
782 case wxHT_SCROLLBAR_THUMB
:
783 consumer
->PerformAction(wxACTION_SCROLL_THUMB_DRAG
);
784 m_ofsMouse
= GetMouseCoord(scrollbar
, event
) -
785 m_renderer
->ScrollbarToPixel(scrollbar
);
787 // fall through: there is no immediate action
793 // remove highlighting
794 Highlight(scrollbar
, FALSE
);
797 // and press the arrow or highlight thumb now instead
798 if ( m_htLast
== wxHT_SCROLLBAR_THUMB
)
799 Highlight(scrollbar
, TRUE
);
801 Press(scrollbar
, TRUE
);
806 m_timerScroll
= new wxScrollBarTimer(this, action
,
808 m_timerScroll
->StartAutoScroll();
810 //else: no (immediate) action
813 //else: mouse already captured, nothing to do
815 // release mouse if the *same* button went up
816 else if ( btn
== m_btnCapture
)
820 StopScrolling(scrollbar
);
822 // if we were dragging the thumb, send the last event
823 if ( m_htLast
== wxHT_SCROLLBAR_THUMB
)
825 scrollbar
->PerformAction(wxACTION_SCROLL_THUMB_RELEASE
);
829 Highlight(scrollbar
, TRUE
);
833 // this is not supposed to happen as the button can't go up
834 // without going down previously and then we'd have
835 // m_winCapture by now
836 wxFAIL_MSG( _T("logic error in mouse capturing code") );
841 return wxStdInputHandler::HandleMouse(consumer
, event
);
844 bool wxStdScrollBarInputHandler::HandleMouseMove(wxInputConsumer
*consumer
,
845 const wxMouseEvent
& event
)
847 wxScrollBar
*scrollbar
= wxStaticCast(consumer
->GetInputWindow(), wxScrollBar
);
851 if ( (m_htLast
== wxHT_SCROLLBAR_THUMB
) && event
.Moving() )
853 // make the thumb follow the mouse by keeping the same offset
854 // between the mouse position and the top/left of the thumb
855 HandleThumbMove(scrollbar
, event
);
860 // no other changes are possible while the mouse is captured
864 bool isArrow
= scrollbar
->GetArrows().HandleMouseMove(event
);
866 if ( event
.Moving() )
868 wxHitTest ht
= m_renderer
->HitTestScrollbar
873 if ( ht
== m_htLast
)
880 wxLogDebug("Scrollbar::OnMouseMove: ht = %d", ht
);
881 #endif // DEBUG_MOUSE
883 Highlight(scrollbar
, FALSE
);
887 Highlight(scrollbar
, TRUE
);
888 //else: already done by wxScrollArrows::HandleMouseMove
890 else if ( event
.Leaving() )
893 Highlight(scrollbar
, FALSE
);
895 m_htLast
= wxHT_NOWHERE
;
897 else // event.Entering()
899 // we don't process this event
907 #endif // wxUSE_SCROLLBAR
909 // ----------------------------------------------------------------------------
911 // ----------------------------------------------------------------------------
913 wxScrollTimer::wxScrollTimer()
918 void wxScrollTimer::StartAutoScroll()
920 // start scrolling immediately
923 // ... and end it too
927 // there is an initial delay before the scrollbar starts scrolling -
928 // implement it by ignoring the first timer expiration and only start
929 // scrolling from the second one
931 Start(200); // FIXME: hardcoded delay
934 void wxScrollTimer::Notify()
938 // scroll normally now - reduce the delay
940 Start(50); // FIXME: hardcoded delay
946 // if DoNotify() returns false, we're already deleted by the timer
947 // event handler, so don't do anything else here