1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/generic/scrlwing.cpp
3 // Purpose: wxScrolledWindow implementation
4 // Author: Julian Smart
5 // Modified by: Vadim Zeitlin on 31.08.00: wxScrollHelper allows to implement.
6 // Ron Lee on 10.4.02: virtual size / auto scrollbars et al.
9 // Copyright: (c) wxWidgets team
10 // Licence: wxWindows licence
11 /////////////////////////////////////////////////////////////////////////////
13 // ============================================================================
15 // ============================================================================
17 // ----------------------------------------------------------------------------
19 // ----------------------------------------------------------------------------
21 // For compilers that support precompilation, includes "wx.h".
22 #include "wx/wxprec.h"
28 #include "wx/scrolwin.h"
33 #include "wx/dcclient.h"
36 #include "wx/settings.h"
40 #include "wx/scrolbar.h"
43 #include "wx/recguard.h"
46 #include <windows.h> // for DLGC_WANTARROWS
47 #include "wx/msw/winundef.h"
51 // For wxRETAINED implementation
52 #ifdef __VMS__ //VMS's Xm.h is not (yet) compatible with C++
53 //This code switches off the compiler warnings
54 # pragma message disable nosimpint
58 # pragma message enable nosimpint
64 style wxHSCROLL | wxVSCROLL
67 // ----------------------------------------------------------------------------
68 // wxScrollHelperEvtHandler: intercept the events from the window and forward
69 // them to wxScrollHelper
70 // ----------------------------------------------------------------------------
72 class WXDLLEXPORT wxScrollHelperEvtHandler
: public wxEvtHandler
75 wxScrollHelperEvtHandler(wxScrollHelper
*scrollHelper
)
77 m_scrollHelper
= scrollHelper
;
80 virtual bool ProcessEvent(wxEvent
& event
);
82 void ResetDrawnFlag() { m_hasDrawnWindow
= false; }
85 wxScrollHelper
*m_scrollHelper
;
87 bool m_hasDrawnWindow
;
89 DECLARE_NO_COPY_CLASS(wxScrollHelperEvtHandler
)
93 // ----------------------------------------------------------------------------
94 // wxAutoScrollTimer: the timer used to generate a stream of scroll events when
95 // a captured mouse is held outside the window
96 // ----------------------------------------------------------------------------
98 class wxAutoScrollTimer
: public wxTimer
101 wxAutoScrollTimer(wxWindow
*winToScroll
, wxScrollHelper
*scroll
,
102 wxEventType eventTypeToSend
,
103 int pos
, int orient
);
105 virtual void Notify();
109 wxScrollHelper
*m_scrollHelper
;
110 wxEventType m_eventType
;
114 DECLARE_NO_COPY_CLASS(wxAutoScrollTimer
)
117 // ============================================================================
119 // ============================================================================
121 // ----------------------------------------------------------------------------
123 // ----------------------------------------------------------------------------
125 wxAutoScrollTimer::wxAutoScrollTimer(wxWindow
*winToScroll
,
126 wxScrollHelper
*scroll
,
127 wxEventType eventTypeToSend
,
131 m_scrollHelper
= scroll
;
132 m_eventType
= eventTypeToSend
;
137 void wxAutoScrollTimer::Notify()
139 // only do all this as long as the window is capturing the mouse
140 if ( wxWindow::GetCapture() != m_win
)
144 else // we still capture the mouse, continue generating events
146 // first scroll the window if we are allowed to do it
147 wxScrollWinEvent
event1(m_eventType
, m_pos
, m_orient
);
148 event1
.SetEventObject(m_win
);
149 if ( m_scrollHelper
->SendAutoScrollEvents(event1
) &&
150 m_win
->GetEventHandler()->ProcessEvent(event1
) )
152 // and then send a pseudo mouse-move event to refresh the selection
153 wxMouseEvent
event2(wxEVT_MOTION
);
154 wxGetMousePosition(&event2
.m_x
, &event2
.m_y
);
156 // the mouse event coordinates should be client, not screen as
157 // returned by wxGetMousePosition
158 wxWindow
*parentTop
= m_win
;
159 while ( parentTop
->GetParent() )
160 parentTop
= parentTop
->GetParent();
161 wxPoint ptOrig
= parentTop
->GetPosition();
162 event2
.m_x
-= ptOrig
.x
;
163 event2
.m_y
-= ptOrig
.y
;
165 event2
.SetEventObject(m_win
);
167 // FIXME: we don't fill in the other members - ok?
169 m_win
->GetEventHandler()->ProcessEvent(event2
);
171 else // can't scroll further, stop
179 // ----------------------------------------------------------------------------
180 // wxScrollHelperEvtHandler
181 // ----------------------------------------------------------------------------
183 bool wxScrollHelperEvtHandler::ProcessEvent(wxEvent
& event
)
185 wxEventType evType
= event
.GetEventType();
187 // the explanation of wxEVT_PAINT processing hack: for historic reasons
188 // there are 2 ways to process this event in classes deriving from
189 // wxScrolledWindow. The user code may
191 // 1. override wxScrolledWindow::OnDraw(dc)
192 // 2. define its own OnPaint() handler
194 // In addition, in wxUniversal wxWindow defines OnPaint() itself and
195 // always processes the draw event, so we can't just try the window
196 // OnPaint() first and call our HandleOnPaint() if it doesn't process it
197 // (the latter would never be called in wxUniversal).
199 // So the solution is to have a flag telling us whether the user code drew
200 // anything in the window. We set it to true here but reset it to false in
201 // wxScrolledWindow::OnPaint() handler (which wouldn't be called if the
202 // user code defined OnPaint() in the derived class)
203 m_hasDrawnWindow
= true;
205 // pass it on to the real handler
206 bool processed
= wxEvtHandler::ProcessEvent(event
);
208 // always process the size events ourselves, even if the user code handles
209 // them as well, as we need to AdjustScrollbars()
211 // NB: it is important to do it after processing the event in the normal
212 // way as HandleOnSize() may generate a wxEVT_SIZE itself if the
213 // scrollbar[s] (dis)appear and it should be seen by the user code
215 if ( evType
== wxEVT_SIZE
)
217 m_scrollHelper
->HandleOnSize((wxSizeEvent
&)event
);
224 // normally, nothing more to do here - except if it was a paint event
225 // which wasn't really processed, then we'll try to call our
226 // OnDraw() below (from HandleOnPaint)
227 if ( m_hasDrawnWindow
|| event
.IsCommandEvent() )
233 if ( evType
== wxEVT_PAINT
)
235 m_scrollHelper
->HandleOnPaint((wxPaintEvent
&)event
);
239 if ( evType
== wxEVT_CHILD_FOCUS
)
241 m_scrollHelper
->HandleOnChildFocus((wxChildFocusEvent
&)event
);
245 // reset the skipped flag (which might have been set to true in
246 // ProcessEvent() above) to be able to test it below
247 bool wasSkipped
= event
.GetSkipped();
251 if ( evType
== wxEVT_SCROLLWIN_TOP
||
252 evType
== wxEVT_SCROLLWIN_BOTTOM
||
253 evType
== wxEVT_SCROLLWIN_LINEUP
||
254 evType
== wxEVT_SCROLLWIN_LINEDOWN
||
255 evType
== wxEVT_SCROLLWIN_PAGEUP
||
256 evType
== wxEVT_SCROLLWIN_PAGEDOWN
||
257 evType
== wxEVT_SCROLLWIN_THUMBTRACK
||
258 evType
== wxEVT_SCROLLWIN_THUMBRELEASE
)
260 m_scrollHelper
->HandleOnScroll((wxScrollWinEvent
&)event
);
261 if ( !event
.GetSkipped() )
263 // it makes sense to indicate that we processed the message as we
264 // did scroll the window (and also notice that wxAutoScrollTimer
265 // relies on our return value to stop scrolling when we are at top
266 // or bottom already)
272 if ( evType
== wxEVT_ENTER_WINDOW
)
274 m_scrollHelper
->HandleOnMouseEnter((wxMouseEvent
&)event
);
276 else if ( evType
== wxEVT_LEAVE_WINDOW
)
278 m_scrollHelper
->HandleOnMouseLeave((wxMouseEvent
&)event
);
281 // Use GTK's own scroll wheel handling in GtkScrolledWindow
283 else if ( evType
== wxEVT_MOUSEWHEEL
)
285 m_scrollHelper
->HandleOnMouseWheel((wxMouseEvent
&)event
);
289 #endif // wxUSE_MOUSEWHEEL
290 else if ( evType
== wxEVT_CHAR
)
292 m_scrollHelper
->HandleOnChar((wxKeyEvent
&)event
);
293 if ( !event
.GetSkipped() )
301 event
.Skip(wasSkipped
);
306 // ----------------------------------------------------------------------------
307 // wxScrollHelper construction
308 // ----------------------------------------------------------------------------
310 wxScrollHelper::wxScrollHelper(wxWindow
*win
)
312 wxASSERT_MSG( win
, _T("associated window can't be NULL in wxScrollHelper") );
314 m_xScrollPixelsPerLine
=
315 m_yScrollPixelsPerLine
=
320 m_xScrollLinesPerPage
=
321 m_yScrollLinesPerPage
= 0;
323 m_xScrollingEnabled
=
324 m_yScrollingEnabled
= true;
333 m_targetWindow
= (wxWindow
*)NULL
;
335 m_timerAutoScroll
= (wxTimer
*)NULL
;
341 m_win
->SetScrollHelper( this );
343 // by default, the associated window is also the target window
344 DoSetTargetWindow(win
);
347 wxScrollHelper::~wxScrollHelper()
354 // ----------------------------------------------------------------------------
355 // setting scrolling parameters
356 // ----------------------------------------------------------------------------
358 void wxScrollHelper::SetScrollbars(int pixelsPerUnitX
,
368 CalcUnscrolledPosition(xPos
, yPos
, &xpos
, &ypos
);
371 (noUnitsX
!= 0 && m_xScrollLines
== 0) ||
372 (noUnitsX
< m_xScrollLines
&& xpos
> pixelsPerUnitX
* noUnitsX
) ||
374 (noUnitsY
!= 0 && m_yScrollLines
== 0) ||
375 (noUnitsY
< m_yScrollLines
&& ypos
> pixelsPerUnitY
* noUnitsY
) ||
376 (xPos
!= m_xScrollPosition
) ||
377 (yPos
!= m_yScrollPosition
)
380 m_xScrollPixelsPerLine
= pixelsPerUnitX
;
381 m_yScrollPixelsPerLine
= pixelsPerUnitY
;
382 m_xScrollPosition
= xPos
;
383 m_yScrollPosition
= yPos
;
385 int w
= noUnitsX
* pixelsPerUnitX
;
386 int h
= noUnitsY
* pixelsPerUnitY
;
388 // For better backward compatibility we set persisting limits
389 // here not just the size. It makes SetScrollbars 'sticky'
390 // emulating the old non-autoscroll behaviour.
391 // m_targetWindow->SetVirtualSizeHints( w, h );
393 // The above should arguably be deprecated, this however we still need.
395 // take care not to set 0 virtual size, 0 means that we don't have any
396 // scrollbars and hence we should use the real size instead of the virtual
397 // one which is indicated by using wxDefaultCoord
398 m_targetWindow
->SetVirtualSize( w
? w
: wxDefaultCoord
,
399 h
? h
: wxDefaultCoord
);
401 if (do_refresh
&& !noRefresh
)
402 m_targetWindow
->Refresh(true, GetScrollRect());
404 #ifndef __WXUNIVERSAL__
405 // If the target is not the same as the window with the scrollbars,
406 // then we need to update the scrollbars here, since they won't have
407 // been updated by SetVirtualSize().
408 if ( m_targetWindow
!= m_win
)
409 #endif // !__WXUNIVERSAL__
413 #ifndef __WXUNIVERSAL__
416 // otherwise this has been done by AdjustScrollbars, above
418 #endif // !__WXUNIVERSAL__
421 // ----------------------------------------------------------------------------
422 // [target] window handling
423 // ----------------------------------------------------------------------------
425 void wxScrollHelper::DeleteEvtHandler()
427 // search for m_handler in the handler list
428 if ( m_win
&& m_handler
)
430 if ( m_win
->RemoveEventHandler(m_handler
) )
434 //else: something is very wrong, so better [maybe] leak memory than
435 // risk a crash because of double deletion
441 void wxScrollHelper::ResetDrawnFlag()
443 wxCHECK_RET( m_handler
, "invalid use of ResetDrawnFlag - no handler?" );
444 m_handler
->ResetDrawnFlag();
447 void wxScrollHelper::DoSetTargetWindow(wxWindow
*target
)
449 m_targetWindow
= target
;
451 target
->MacSetClipChildren( true ) ;
454 // install the event handler which will intercept the events we're
455 // interested in (but only do it for our real window, not the target window
456 // which we scroll - we don't need to hijack its events)
457 if ( m_targetWindow
== m_win
)
459 // if we already have a handler, delete it first
462 m_handler
= new wxScrollHelperEvtHandler(this);
463 m_targetWindow
->PushEventHandler(m_handler
);
467 void wxScrollHelper::SetTargetWindow(wxWindow
*target
)
469 wxCHECK_RET( target
, wxT("target window must not be NULL") );
471 if ( target
== m_targetWindow
)
474 DoSetTargetWindow(target
);
477 wxWindow
*wxScrollHelper::GetTargetWindow() const
479 return m_targetWindow
;
482 // ----------------------------------------------------------------------------
483 // scrolling implementation itself
484 // ----------------------------------------------------------------------------
486 void wxScrollHelper::HandleOnScroll(wxScrollWinEvent
& event
)
488 int nScrollInc
= CalcScrollInc(event
);
489 if ( nScrollInc
== 0 )
491 // can't scroll further
497 bool needsRefresh
= false;
500 int orient
= event
.GetOrientation();
501 if (orient
== wxHORIZONTAL
)
503 if ( m_xScrollingEnabled
)
505 dx
= -m_xScrollPixelsPerLine
* nScrollInc
;
514 if ( m_yScrollingEnabled
)
516 dy
= -m_yScrollPixelsPerLine
* nScrollInc
;
526 // flush all pending repaints before we change m_{x,y}ScrollPosition, as
527 // otherwise invalidated area could be updated incorrectly later when
528 // ScrollWindow() makes sure they're repainted before scrolling them
530 // wxWindowMac is taking care of making sure the update area is correctly
531 // set up, while not forcing an immediate redraw
533 m_targetWindow
->Update();
537 if (orient
== wxHORIZONTAL
)
539 m_xScrollPosition
+= nScrollInc
;
540 m_win
->SetScrollPos(wxHORIZONTAL
, m_xScrollPosition
);
544 m_yScrollPosition
+= nScrollInc
;
545 m_win
->SetScrollPos(wxVERTICAL
, m_yScrollPosition
);
550 m_targetWindow
->Refresh(true, GetScrollRect());
554 m_targetWindow
->ScrollWindow(dx
, dy
, GetScrollRect());
558 int wxScrollHelper::CalcScrollInc(wxScrollWinEvent
& event
)
560 int pos
= event
.GetPosition();
561 int orient
= event
.GetOrientation();
564 if (event
.GetEventType() == wxEVT_SCROLLWIN_TOP
)
566 if (orient
== wxHORIZONTAL
)
567 nScrollInc
= - m_xScrollPosition
;
569 nScrollInc
= - m_yScrollPosition
;
571 if (event
.GetEventType() == wxEVT_SCROLLWIN_BOTTOM
)
573 if (orient
== wxHORIZONTAL
)
574 nScrollInc
= m_xScrollLines
- m_xScrollPosition
;
576 nScrollInc
= m_yScrollLines
- m_yScrollPosition
;
578 if (event
.GetEventType() == wxEVT_SCROLLWIN_LINEUP
)
582 if (event
.GetEventType() == wxEVT_SCROLLWIN_LINEDOWN
)
586 if (event
.GetEventType() == wxEVT_SCROLLWIN_PAGEUP
)
588 if (orient
== wxHORIZONTAL
)
589 nScrollInc
= -GetScrollPageSize(wxHORIZONTAL
);
591 nScrollInc
= -GetScrollPageSize(wxVERTICAL
);
593 if (event
.GetEventType() == wxEVT_SCROLLWIN_PAGEDOWN
)
595 if (orient
== wxHORIZONTAL
)
596 nScrollInc
= GetScrollPageSize(wxHORIZONTAL
);
598 nScrollInc
= GetScrollPageSize(wxVERTICAL
);
600 if ((event
.GetEventType() == wxEVT_SCROLLWIN_THUMBTRACK
) ||
601 (event
.GetEventType() == wxEVT_SCROLLWIN_THUMBRELEASE
))
603 if (orient
== wxHORIZONTAL
)
604 nScrollInc
= pos
- m_xScrollPosition
;
606 nScrollInc
= pos
- m_yScrollPosition
;
609 if (orient
== wxHORIZONTAL
)
611 if ( m_xScrollPosition
+ nScrollInc
< 0 )
613 // As -ve as we can go
614 nScrollInc
= -m_xScrollPosition
;
616 else // check for the other bound
618 const int posMax
= m_xScrollLines
- m_xScrollLinesPerPage
;
619 if ( m_xScrollPosition
+ nScrollInc
> posMax
)
621 // As +ve as we can go
622 nScrollInc
= posMax
- m_xScrollPosition
;
628 if ( m_yScrollPosition
+ nScrollInc
< 0 )
630 // As -ve as we can go
631 nScrollInc
= -m_yScrollPosition
;
633 else // check for the other bound
635 const int posMax
= m_yScrollLines
- m_yScrollLinesPerPage
;
636 if ( m_yScrollPosition
+ nScrollInc
> posMax
)
638 // As +ve as we can go
639 nScrollInc
= posMax
- m_yScrollPosition
;
647 // Adjust the scrollbars - new version.
648 void wxScrollHelper::AdjustScrollbars()
650 static wxRecursionGuardFlag s_flagReentrancy
;
651 wxRecursionGuard
guard(s_flagReentrancy
);
652 if ( guard
.IsInside() )
654 // don't reenter AdjustScrollbars() while another call to
655 // AdjustScrollbars() is in progress because this may lead to calling
656 // ScrollWindow() twice and this can really happen under MSW if
657 // SetScrollbar() call below adds or removes the scrollbar which
658 // changes the window size and hence results in another
659 // AdjustScrollbars() call
666 int oldXScroll
= m_xScrollPosition
;
667 int oldYScroll
= m_yScrollPosition
;
669 // VZ: at least under Windows this loop is useless because when scrollbars
670 // [dis]appear we get a WM_SIZE resulting in another call to
671 // AdjustScrollbars() anyhow. As it doesn't seem to do any harm I leave
672 // it here for now but it would be better to ensure that all ports
673 // generate EVT_SIZE when scrollbars [dis]appear, emulating it if
674 // necessary, and remove it later
675 // JACS: Stop potential infinite loop by limiting number of iterations
676 int iterationCount
= 0;
677 const int iterationMax
= 5;
682 GetTargetSize(&w
, 0);
684 // scroll lines per page: if 0, no scrolling is needed
687 if ( m_xScrollPixelsPerLine
== 0 )
689 // scrolling is disabled
691 m_xScrollPosition
= 0;
694 else // might need scrolling
696 // Round up integer division to catch any "leftover" client space.
697 const int wVirt
= m_targetWindow
->GetVirtualSize().GetWidth();
698 m_xScrollLines
= (wVirt
+ m_xScrollPixelsPerLine
- 1) / m_xScrollPixelsPerLine
;
700 // Calculate page size i.e. number of scroll units you get on the
701 // current client window.
702 linesPerPage
= w
/ m_xScrollPixelsPerLine
;
704 // Special case. When client and virtual size are very close but
705 // the client is big enough, kill scrollbar.
706 if ((linesPerPage
< m_xScrollLines
) && (w
>= wVirt
)) ++linesPerPage
;
708 if (linesPerPage
>= m_xScrollLines
)
710 // we're big enough to not need scrolling
713 m_xScrollPosition
= 0;
715 else // we do need a scrollbar
717 if ( linesPerPage
< 1 )
720 // Correct position if greater than extent of canvas minus
721 // the visible portion of it or if below zero
722 const int posMax
= m_xScrollLines
- linesPerPage
;
723 if ( m_xScrollPosition
> posMax
)
724 m_xScrollPosition
= posMax
;
725 else if ( m_xScrollPosition
< 0 )
726 m_xScrollPosition
= 0;
730 m_win
->SetScrollbar(wxHORIZONTAL
, m_xScrollPosition
,
731 linesPerPage
, m_xScrollLines
);
733 // The amount by which we scroll when paging
734 SetScrollPageSize(wxHORIZONTAL
, linesPerPage
);
736 GetTargetSize(0, &h
);
738 if ( m_yScrollPixelsPerLine
== 0 )
740 // scrolling is disabled
742 m_yScrollPosition
= 0;
745 else // might need scrolling
747 // Round up integer division to catch any "leftover" client space.
748 const int hVirt
= m_targetWindow
->GetVirtualSize().GetHeight();
749 m_yScrollLines
= ( hVirt
+ m_yScrollPixelsPerLine
- 1 ) / m_yScrollPixelsPerLine
;
751 // Calculate page size i.e. number of scroll units you get on the
752 // current client window.
753 linesPerPage
= h
/ m_yScrollPixelsPerLine
;
755 // Special case. When client and virtual size are very close but
756 // the client is big enough, kill scrollbar.
757 if ((linesPerPage
< m_yScrollLines
) && (h
>= hVirt
)) ++linesPerPage
;
759 if (linesPerPage
>= m_yScrollLines
)
761 // we're big enough to not need scrolling
764 m_yScrollPosition
= 0;
766 else // we do need a scrollbar
768 if ( linesPerPage
< 1 )
771 // Correct position if greater than extent of canvas minus
772 // the visible portion of it or if below zero
773 const int posMax
= m_yScrollLines
- linesPerPage
;
774 if ( m_yScrollPosition
> posMax
)
775 m_yScrollPosition
= posMax
;
776 else if ( m_yScrollPosition
< 0 )
777 m_yScrollPosition
= 0;
781 m_win
->SetScrollbar(wxVERTICAL
, m_yScrollPosition
,
782 linesPerPage
, m_yScrollLines
);
784 // The amount by which we scroll when paging
785 SetScrollPageSize(wxVERTICAL
, linesPerPage
);
788 // If a scrollbar (dis)appeared as a result of this, adjust them again.
792 GetTargetSize( &w
, &h
);
793 } while ( (w
!= oldw
|| h
!= oldh
) && (iterationCount
< iterationMax
) );
796 // Sorry, some Motif-specific code to implement a backing pixmap
797 // for the wxRETAINED style. Implementing a backing store can't
798 // be entirely generic because it relies on the wxWindowDC implementation
799 // to duplicate X drawing calls for the backing pixmap.
801 if ( m_targetWindow
->GetWindowStyle() & wxRETAINED
)
803 Display
* dpy
= XtDisplay((Widget
)m_targetWindow
->GetMainWidget());
805 int totalPixelWidth
= m_xScrollLines
* m_xScrollPixelsPerLine
;
806 int totalPixelHeight
= m_yScrollLines
* m_yScrollPixelsPerLine
;
807 if (m_targetWindow
->GetBackingPixmap() &&
808 !((m_targetWindow
->GetPixmapWidth() == totalPixelWidth
) &&
809 (m_targetWindow
->GetPixmapHeight() == totalPixelHeight
)))
811 XFreePixmap (dpy
, (Pixmap
) m_targetWindow
->GetBackingPixmap());
812 m_targetWindow
->SetBackingPixmap((WXPixmap
) 0);
815 if (!m_targetWindow
->GetBackingPixmap() &&
816 (m_xScrollLines
!= 0) && (m_yScrollLines
!= 0))
818 int depth
= wxDisplayDepth();
819 m_targetWindow
->SetPixmapWidth(totalPixelWidth
);
820 m_targetWindow
->SetPixmapHeight(totalPixelHeight
);
821 m_targetWindow
->SetBackingPixmap((WXPixmap
) XCreatePixmap (dpy
, RootWindow (dpy
, DefaultScreen (dpy
)),
822 m_targetWindow
->GetPixmapWidth(), m_targetWindow
->GetPixmapHeight(), depth
));
828 if (oldXScroll
!= m_xScrollPosition
)
830 if (m_xScrollingEnabled
)
831 m_targetWindow
->ScrollWindow( m_xScrollPixelsPerLine
* (oldXScroll
- m_xScrollPosition
), 0,
834 m_targetWindow
->Refresh(true, GetScrollRect());
837 if (oldYScroll
!= m_yScrollPosition
)
839 if (m_yScrollingEnabled
)
840 m_targetWindow
->ScrollWindow( 0, m_yScrollPixelsPerLine
* (oldYScroll
-m_yScrollPosition
),
843 m_targetWindow
->Refresh(true, GetScrollRect());
847 void wxScrollHelper::DoPrepareDC(wxDC
& dc
)
849 wxPoint pt
= dc
.GetDeviceOrigin();
851 // It may actually be correct to always query
852 // the m_sign from the DC here, but I leve the
853 // #ifdef GTK for now.
854 if (m_win
->GetLayoutDirection() == wxLayout_RightToLeft
)
855 dc
.SetDeviceOrigin( pt
.x
+ m_xScrollPosition
* m_xScrollPixelsPerLine
,
856 pt
.y
- m_yScrollPosition
* m_yScrollPixelsPerLine
);
859 dc
.SetDeviceOrigin( pt
.x
- m_xScrollPosition
* m_xScrollPixelsPerLine
,
860 pt
.y
- m_yScrollPosition
* m_yScrollPixelsPerLine
);
861 dc
.SetUserScale( m_scaleX
, m_scaleY
);
864 void wxScrollHelper::SetScrollRate( int xstep
, int ystep
)
866 int old_x
= m_xScrollPixelsPerLine
* m_xScrollPosition
;
867 int old_y
= m_yScrollPixelsPerLine
* m_yScrollPosition
;
869 m_xScrollPixelsPerLine
= xstep
;
870 m_yScrollPixelsPerLine
= ystep
;
872 int new_x
= m_xScrollPixelsPerLine
* m_xScrollPosition
;
873 int new_y
= m_yScrollPixelsPerLine
* m_yScrollPosition
;
875 m_win
->SetScrollPos( wxHORIZONTAL
, m_xScrollPosition
);
876 m_win
->SetScrollPos( wxVERTICAL
, m_yScrollPosition
);
877 m_targetWindow
->ScrollWindow( old_x
- new_x
, old_y
- new_y
);
882 void wxScrollHelper::GetScrollPixelsPerUnit (int *x_unit
, int *y_unit
) const
885 *x_unit
= m_xScrollPixelsPerLine
;
887 *y_unit
= m_yScrollPixelsPerLine
;
891 int wxScrollHelper::GetScrollLines( int orient
) const
893 if ( orient
== wxHORIZONTAL
)
894 return m_xScrollLines
;
896 return m_yScrollLines
;
899 int wxScrollHelper::GetScrollPageSize(int orient
) const
901 if ( orient
== wxHORIZONTAL
)
902 return m_xScrollLinesPerPage
;
904 return m_yScrollLinesPerPage
;
907 void wxScrollHelper::SetScrollPageSize(int orient
, int pageSize
)
909 if ( orient
== wxHORIZONTAL
)
910 m_xScrollLinesPerPage
= pageSize
;
912 m_yScrollLinesPerPage
= pageSize
;
916 * Scroll to given position (scroll position, not pixel position)
918 void wxScrollHelper::Scroll( int x_pos
, int y_pos
)
923 if (((x_pos
== -1) || (x_pos
== m_xScrollPosition
)) &&
924 ((y_pos
== -1) || (y_pos
== m_yScrollPosition
))) return;
927 GetTargetSize(&w
, &h
);
929 // compute new position:
930 int new_x
= m_xScrollPosition
;
931 int new_y
= m_yScrollPosition
;
933 if ((x_pos
!= -1) && (m_xScrollPixelsPerLine
))
937 // Calculate page size i.e. number of scroll units you get on the
938 // current client window
939 int noPagePositions
= w
/m_xScrollPixelsPerLine
;
940 if (noPagePositions
< 1) noPagePositions
= 1;
942 // Correct position if greater than extent of canvas minus
943 // the visible portion of it or if below zero
944 new_x
= wxMin( m_xScrollLines
-noPagePositions
, new_x
);
945 new_x
= wxMax( 0, new_x
);
947 if ((y_pos
!= -1) && (m_yScrollPixelsPerLine
))
951 // Calculate page size i.e. number of scroll units you get on the
952 // current client window
953 int noPagePositions
= h
/m_yScrollPixelsPerLine
;
954 if (noPagePositions
< 1) noPagePositions
= 1;
956 // Correct position if greater than extent of canvas minus
957 // the visible portion of it or if below zero
958 new_y
= wxMin( m_yScrollLines
-noPagePositions
, new_y
);
959 new_y
= wxMax( 0, new_y
);
962 if ( new_x
== m_xScrollPosition
&& new_y
== m_yScrollPosition
)
963 return; // nothing to do, the position didn't change
965 // flush all pending repaints before we change m_{x,y}ScrollPosition, as
966 // otherwise invalidated area could be updated incorrectly later when
967 // ScrollWindow() makes sure they're repainted before scrolling them
968 m_targetWindow
->Update();
970 // update the position and scroll the window now:
971 if (m_xScrollPosition
!= new_x
)
973 int old_x
= m_xScrollPosition
;
974 m_xScrollPosition
= new_x
;
975 m_win
->SetScrollPos( wxHORIZONTAL
, new_x
);
976 m_targetWindow
->ScrollWindow( (old_x
-new_x
)*m_xScrollPixelsPerLine
, 0,
980 if (m_yScrollPosition
!= new_y
)
982 int old_y
= m_yScrollPosition
;
983 m_yScrollPosition
= new_y
;
984 m_win
->SetScrollPos( wxVERTICAL
, new_y
);
985 m_targetWindow
->ScrollWindow( 0, (old_y
-new_y
)*m_yScrollPixelsPerLine
,
990 void wxScrollHelper::EnableScrolling (bool x_scroll
, bool y_scroll
)
992 m_xScrollingEnabled
= x_scroll
;
993 m_yScrollingEnabled
= y_scroll
;
996 // Where the current view starts from
997 void wxScrollHelper::GetViewStart (int *x
, int *y
) const
1000 *x
= m_xScrollPosition
;
1002 *y
= m_yScrollPosition
;
1005 void wxScrollHelper::DoCalcScrolledPosition(int x
, int y
, int *xx
, int *yy
) const
1008 *xx
= x
- m_xScrollPosition
* m_xScrollPixelsPerLine
;
1010 *yy
= y
- m_yScrollPosition
* m_yScrollPixelsPerLine
;
1013 void wxScrollHelper::DoCalcUnscrolledPosition(int x
, int y
, int *xx
, int *yy
) const
1016 *xx
= x
+ m_xScrollPosition
* m_xScrollPixelsPerLine
;
1018 *yy
= y
+ m_yScrollPosition
* m_yScrollPixelsPerLine
;
1021 // ----------------------------------------------------------------------------
1023 // ----------------------------------------------------------------------------
1025 bool wxScrollHelper::ScrollLayout()
1027 if ( m_win
->GetSizer() && m_targetWindow
== m_win
)
1029 // If we're the scroll target, take into account the
1030 // virtual size and scrolled position of the window.
1032 int x
= 0, y
= 0, w
= 0, h
= 0;
1033 CalcScrolledPosition(0,0, &x
,&y
);
1034 m_win
->GetVirtualSize(&w
, &h
);
1035 m_win
->GetSizer()->SetDimension(x
, y
, w
, h
);
1039 // fall back to default for LayoutConstraints
1040 return m_win
->wxWindow::Layout();
1043 void wxScrollHelper::ScrollDoSetVirtualSize(int x
, int y
)
1045 m_win
->wxWindow::DoSetVirtualSize( x
, y
);
1048 if (m_win
->GetAutoLayout())
1052 // wxWindow's GetBestVirtualSize returns the actual window size,
1053 // whereas we want to return the virtual size
1054 wxSize
wxScrollHelper::ScrollGetBestVirtualSize() const
1056 wxSize
clientSize(m_win
->GetClientSize());
1057 if ( m_win
->GetSizer() )
1058 clientSize
.IncTo(m_win
->GetSizer()->CalcMin());
1063 // ----------------------------------------------------------------------------
1065 // ----------------------------------------------------------------------------
1067 // Default OnSize resets scrollbars, if any
1068 void wxScrollHelper::HandleOnSize(wxSizeEvent
& WXUNUSED(event
))
1070 if ( m_targetWindow
->GetAutoLayout() )
1072 wxSize size
= m_targetWindow
->GetBestVirtualSize();
1074 // This will call ::Layout() and ::AdjustScrollbars()
1075 m_win
->SetVirtualSize( size
);
1083 // This calls OnDraw, having adjusted the origin according to the current
1085 void wxScrollHelper::HandleOnPaint(wxPaintEvent
& WXUNUSED(event
))
1087 // don't use m_targetWindow here, this is always called for ourselves
1088 wxPaintDC
dc(m_win
);
1094 // kbd handling: notice that we use OnChar() and not OnKeyDown() for
1095 // compatibility here - if we used OnKeyDown(), the programs which process
1096 // arrows themselves in their OnChar() would never get the message and like
1097 // this they always have the priority
1098 void wxScrollHelper::HandleOnChar(wxKeyEvent
& event
)
1100 int stx
= 0, sty
= 0, // view origin
1101 szx
= 0, szy
= 0, // view size (total)
1102 clix
= 0, cliy
= 0; // view size (on screen)
1104 GetViewStart(&stx
, &sty
);
1105 GetTargetSize(&clix
, &cliy
);
1106 m_targetWindow
->GetVirtualSize(&szx
, &szy
);
1108 if( m_xScrollPixelsPerLine
)
1110 clix
/= m_xScrollPixelsPerLine
;
1111 szx
/= m_xScrollPixelsPerLine
;
1118 if( m_yScrollPixelsPerLine
)
1120 cliy
/= m_yScrollPixelsPerLine
;
1121 szy
/= m_yScrollPixelsPerLine
;
1129 int xScrollOld
= m_xScrollPosition
,
1130 yScrollOld
= m_yScrollPosition
;
1133 switch ( event
.GetKeyCode() )
1136 dsty
= sty
- (5 * cliy
/ 6);
1137 Scroll(-1, (dsty
== -1) ? 0 : dsty
);
1141 Scroll(-1, sty
+ (5 * cliy
/ 6));
1145 Scroll(0, event
.ControlDown() ? 0 : -1);
1149 Scroll(szx
- clix
, event
.ControlDown() ? szy
- cliy
: -1);
1153 Scroll(-1, sty
- 1);
1157 Scroll(-1, sty
+ 1);
1161 Scroll(stx
- 1, -1);
1165 Scroll(stx
+ 1, -1);
1173 if ( m_xScrollPosition
!= xScrollOld
)
1175 wxScrollWinEvent
evt(wxEVT_SCROLLWIN_THUMBTRACK
, m_xScrollPosition
,
1177 evt
.SetEventObject(m_win
);
1178 m_win
->GetEventHandler()->ProcessEvent(evt
);
1181 if ( m_yScrollPosition
!= yScrollOld
)
1183 wxScrollWinEvent
evt(wxEVT_SCROLLWIN_THUMBTRACK
, m_yScrollPosition
,
1185 evt
.SetEventObject(m_win
);
1186 m_win
->GetEventHandler()->ProcessEvent(evt
);
1190 // ----------------------------------------------------------------------------
1191 // autoscroll stuff: these functions deal with sending fake scroll events when
1192 // a captured mouse is being held outside the window
1193 // ----------------------------------------------------------------------------
1195 bool wxScrollHelper::SendAutoScrollEvents(wxScrollWinEvent
& event
) const
1197 // only send the event if the window is scrollable in this direction
1198 wxWindow
*win
= (wxWindow
*)event
.GetEventObject();
1199 return win
->HasScrollbar(event
.GetOrientation());
1202 void wxScrollHelper::StopAutoScrolling()
1205 if ( m_timerAutoScroll
)
1207 delete m_timerAutoScroll
;
1208 m_timerAutoScroll
= (wxTimer
*)NULL
;
1213 void wxScrollHelper::HandleOnMouseEnter(wxMouseEvent
& event
)
1215 StopAutoScrolling();
1220 void wxScrollHelper::HandleOnMouseLeave(wxMouseEvent
& event
)
1222 // don't prevent the usual processing of the event from taking place
1225 // when a captured mouse leave a scrolled window we start generate
1226 // scrolling events to allow, for example, extending selection beyond the
1227 // visible area in some controls
1228 if ( wxWindow::GetCapture() == m_targetWindow
)
1230 // where is the mouse leaving?
1232 wxPoint pt
= event
.GetPosition();
1235 orient
= wxHORIZONTAL
;
1238 else if ( pt
.y
< 0 )
1240 orient
= wxVERTICAL
;
1243 else // we're lower or to the right of the window
1245 wxSize size
= m_targetWindow
->GetClientSize();
1246 if ( pt
.x
> size
.x
)
1248 orient
= wxHORIZONTAL
;
1249 pos
= m_xScrollLines
;
1251 else if ( pt
.y
> size
.y
)
1253 orient
= wxVERTICAL
;
1254 pos
= m_yScrollLines
;
1256 else // this should be impossible
1258 // but seems to happen sometimes under wxMSW - maybe it's a bug
1259 // there but for now just ignore it
1261 //wxFAIL_MSG( _T("can't understand where has mouse gone") );
1267 // only start the auto scroll timer if the window can be scrolled in
1269 if ( !m_targetWindow
->HasScrollbar(orient
) )
1273 delete m_timerAutoScroll
;
1274 m_timerAutoScroll
= new wxAutoScrollTimer
1276 m_targetWindow
, this,
1277 pos
== 0 ? wxEVT_SCROLLWIN_LINEUP
1278 : wxEVT_SCROLLWIN_LINEDOWN
,
1282 m_timerAutoScroll
->Start(50); // FIXME: make configurable
1289 #if wxUSE_MOUSEWHEEL
1291 void wxScrollHelper::HandleOnMouseWheel(wxMouseEvent
& event
)
1293 m_wheelRotation
+= event
.GetWheelRotation();
1294 int lines
= m_wheelRotation
/ event
.GetWheelDelta();
1295 m_wheelRotation
-= lines
* event
.GetWheelDelta();
1300 wxScrollWinEvent newEvent
;
1302 newEvent
.SetPosition(0);
1303 newEvent
.SetOrientation( event
.GetWheelAxis() == 0 ? wxVERTICAL
: wxHORIZONTAL
);
1304 newEvent
.SetEventObject(m_win
);
1306 if (event
.IsPageScroll())
1309 newEvent
.SetEventType(wxEVT_SCROLLWIN_PAGEUP
);
1311 newEvent
.SetEventType(wxEVT_SCROLLWIN_PAGEDOWN
);
1313 m_win
->GetEventHandler()->ProcessEvent(newEvent
);
1317 lines
*= event
.GetLinesPerAction();
1319 newEvent
.SetEventType(wxEVT_SCROLLWIN_LINEUP
);
1321 newEvent
.SetEventType(wxEVT_SCROLLWIN_LINEDOWN
);
1323 int times
= abs(lines
);
1324 for (; times
> 0; times
--)
1325 m_win
->GetEventHandler()->ProcessEvent(newEvent
);
1330 #endif // wxUSE_MOUSEWHEEL
1332 void wxScrollHelper::HandleOnChildFocus(wxChildFocusEvent
& event
)
1334 // this event should be processed by all windows in parenthood chain,
1335 // e.g. so that nested wxScrolledWindows work correctly
1338 // find the immediate child under which the window receiving focus is:
1339 wxWindow
*win
= event
.GetWindow();
1341 if ( win
== m_targetWindow
)
1342 return; // nothing to do
1345 if (wxDynamicCast(win
, wxScrollBar
))
1349 // Fixing ticket: http://trac.wxwidgets.org/ticket/9563
1350 // When a child inside a wxControlContainer receives a focus, the
1351 // wxControlContainer generates an artificial wxChildFocusEvent for
1352 // itself, telling its parent that 'it' received the focus. The effect is
1353 // that this->HandleOnChildFocus is called twice, first with the
1354 // artificial wxChildFocusEvent and then with the original event. We need
1355 // to ignore the artificial event here or otherwise HandleOnChildFocus
1356 // would first scroll the target window to make the entire
1357 // wxControlContainer visible and immediately afterwards scroll the target
1358 // window again to make the child widget visible. This leads to ugly
1359 // flickering when using nested wxPanels/wxScrolledWindows.
1361 // Ignore this event if 'win' is derived from wxControlContainer AND its
1362 // parent is the m_targetWindow AND 'win' is not actually reciving the
1363 // focus (win != FindFocus). TODO: This affects all wxControlContainer
1364 // objects, but wxControlContainer is not part of the wxWidgets RTTI and
1365 // so wxDynamicCast(win, wxControlContainer) does not compile. Find a way
1366 // to determine if 'win' derives from wxControlContainer. Until then,
1367 // testing if 'win' derives from wxPanel will probably get >90% of all
1370 wxWindow
*actual_focus
=wxWindow::FindFocus();
1371 if (win
!= actual_focus
&&
1372 wxDynamicCast(win
, wxPanel
) != 0 &&
1373 win
->GetParent() == m_targetWindow
)
1374 // if win is a wxPanel and receives the focus, it should not be
1375 // scrolled into view
1378 wxSize
view(m_targetWindow
->GetClientSize());
1380 // For composite controls such as wxComboCtrl we should try to fit the
1381 // entire control inside the visible area of the target window, not just
1382 // the focused child of the control. Otherwise we'd make only the textctrl
1383 // part of a wxComboCtrl visible and the button would still be outside the
1384 // scrolled area. But do so only if the parent fits *entirely* inside the
1385 // scrolled window. In other situations, such as nested wxPanel or
1386 // wxScrolledWindows, the parent might be way to big to fit inside the
1387 // scrolled window. If that is the case, then make only the focused window
1389 if ( win
->GetParent() != m_targetWindow
)
1391 wxWindow
*parent
=win
->GetParent();
1392 wxSize parent_size
=parent
->GetSize();
1393 if (parent_size
.GetWidth() <= view
.GetWidth() &&
1394 parent_size
.GetHeight() <= view
.GetHeight())
1395 // make the immediate parent visible instead of the focused control
1399 // if the child is not fully visible, try to scroll it into view:
1401 GetScrollPixelsPerUnit(&stepx
, &stepy
);
1403 // 'win' position coordinates are relative to it's parent
1404 // convert them so that they are relative to the m_targetWindow viewing area
1405 wxRect
winrect(m_targetWindow
->ScreenToClient(win
->GetScreenPosition()),
1409 GetViewStart(&startx
, &starty
);
1411 // first in vertical direction:
1416 if ( winrect
.GetTop() < 0 )
1418 diff
= winrect
.GetTop();
1420 else if ( winrect
.GetBottom() > view
.y
)
1422 diff
= winrect
.GetBottom() - view
.y
+ 1;
1423 // round up to next scroll step if we can't get exact position,
1424 // so that the window is fully visible:
1428 starty
= (starty
* stepy
+ diff
) / stepy
;
1436 if ( winrect
.GetLeft() < 0 )
1438 diff
= winrect
.GetLeft();
1440 else if ( winrect
.GetRight() > view
.x
)
1442 diff
= winrect
.GetRight() - view
.x
+ 1;
1443 // round up to next scroll step if we can't get exact position,
1444 // so that the window is fully visible:
1448 startx
= (startx
* stepx
+ diff
) / stepx
;
1451 Scroll(startx
, starty
);
1454 // ----------------------------------------------------------------------------
1455 // wxScrolled<T> and wxScrolledWindow implementation
1456 // ----------------------------------------------------------------------------
1458 wxSize
wxScrolledT_Helper::FilterBestSize(const wxWindow
*win
,
1459 const wxScrollHelperNative
*helper
,
1460 const wxSize
& origBest
)
1462 // NB: We don't do this in WX_FORWARD_TO_SCROLL_HELPER, because not
1463 // all scrollable windows should behave like this, only those that
1464 // contain children controls within scrollable area
1465 // (i.e., wxScrolledWindow) and other some scrollable windows may
1466 // have different DoGetBestSize() implementation (e.g. wxTreeCtrl).
1468 wxSize best
= origBest
;
1470 if ( win
->GetAutoLayout() )
1472 // Only use the content to set the window size in the direction
1473 // where there's no scrolling; otherwise we're going to get a huge
1474 // window in the direction in which scrolling is enabled
1476 helper
->GetScrollPixelsPerUnit(&ppuX
, &ppuY
);
1478 // NB: This code used to use *current* size if min size wasn't
1479 // specified, presumably to get some reasonable (i.e., larger than
1480 // minimal) size. But that's a wrong thing to do in GetBestSize(),
1481 // so we use minimal size as specified. If the app needs some
1482 // minimal size for its scrolled window, it should set it and put
1483 // the window into sizer as expandable so that it can use all space
1486 // See also http://svn.wxwidgets.org/viewvc/wx?view=rev&revision=45864
1488 wxSize minSize
= win
->GetMinSize();
1491 best
.x
= minSize
.x
+ wxSystemSettings::GetMetric(wxSYS_VSCROLL_X
);
1494 best
.y
= minSize
.y
+ wxSystemSettings::GetMetric(wxSYS_HSCROLL_Y
);
1501 WXLRESULT
wxScrolledT_Helper::FilterMSWWindowProc(WXUINT nMsg
, WXLRESULT rc
)
1504 // we need to process arrows ourselves for scrolling
1505 if ( nMsg
== WM_GETDLGCODE
)
1507 rc
|= DLGC_WANTARROWS
;
1514 // NB: skipping wxScrolled<T> in wxRTTI information because being a templte,
1515 // it doesn't and can't implement wxRTTI support
1516 IMPLEMENT_DYNAMIC_CLASS(wxScrolledWindow
, wxPanel
)