X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/feda30118705b9bb6b2fc966655048c39a703563..cb73e6001f891ae46b12a1e4ca39b93649cb6099:/src/msw/scrolbar.cpp diff --git a/src/msw/scrolbar.cpp b/src/msw/scrolbar.cpp index ab6f9668b5..0e1ed500c9 100644 --- a/src/msw/scrolbar.cpp +++ b/src/msw/scrolbar.cpp @@ -1,41 +1,51 @@ ///////////////////////////////////////////////////////////////////////////// -// Name: scrolbar.cpp +// Name: msw/scrolbar.cpp // Purpose: wxScrollBar // Author: Julian Smart // Modified by: // Created: 04/01/98 // RCS-ID: $Id$ -// Copyright: (c) Julian Smart and Markus Holzem -// Licence: wxWindows license +// Copyright: (c) Julian Smart +// Licence: wxWindows licence ///////////////////////////////////////////////////////////////////////////// -#ifdef __GNUG__ -#pragma implementation "scrolbar.h" +#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA) + #pragma implementation "scrolbar.h" #endif // For compilers that support precompilation, includes "wx.h". #include "wx/wxprec.h" #ifdef __BORLANDC__ -#pragma hdrstop + #pragma hdrstop #endif +#if wxUSE_SCROLLBAR + #ifndef WX_PRECOMP -#include "wx/defs.h" -#include "wx/utils.h" + #include "wx/utils.h" #endif #include "wx/scrolbar.h" #include "wx/msw/private.h" -IMPLEMENT_DYNAMIC_CLASS(wxScrollBar, wxControl) +#if wxUSE_EXTENDED_RTTI +IMPLEMENT_DYNAMIC_CLASS_XTI(wxScrollBar, wxControl,"wx/scrolbar.h") -BEGIN_EVENT_TABLE(wxScrollBar, wxControl) -#if WXWIN_COMPATIBILITY - EVT_SCROLL(wxScrollBar::OnScroll) -#endif -END_EVENT_TABLE() +WX_BEGIN_PROPERTIES_TABLE(wxScrollBar) + WX_PROPERTY( ThumbPosition , int , SetThumbPosition, GetThumbPosition, 0 ) + WX_PROPERTY( Range , int , SetRange, GetRange, 0 ) + WX_PROPERTY( ThumbSize , int , SetThumbSize, GetThumbSize, 0 ) + WX_PROPERTY( PageSize , int , SetPageSize, GetPageSize, 0 ) +WX_END_PROPERTIES_TABLE() +WX_BEGIN_HANDLERS_TABLE(wxScrollBar) +WX_END_HANDLERS_TABLE() + +WX_CONSTRUCTOR_5( wxScrollBar , wxWindow* , Parent , wxWindowID , Id , wxPoint , Position , wxSize , Size , long , WindowStyle ) +#else +IMPLEMENT_DYNAMIC_CLASS(wxScrollBar, wxControl) +#endif // Scrollbar bool wxScrollBar::Create(wxWindow *parent, wxWindowID id, @@ -51,7 +61,10 @@ bool wxScrollBar::Create(wxWindow *parent, wxWindowID id, #if wxUSE_VALIDATORS SetValidator(validator); #endif // wxUSE_VALIDATORS - + + if ((style & wxBORDER_MASK) == wxBORDER_DEFAULT) + style |= wxNO_BORDER; + SetBackgroundColour(parent->GetBackgroundColour()) ; SetForegroundColour(parent->GetForegroundColour()) ; m_windowStyle = style; @@ -81,11 +94,14 @@ bool wxScrollBar::Create(wxWindow *parent, wxWindowID id, height = 14; } + WXDWORD exStyle = 0; + WXDWORD wstyle = MSWGetStyle(style, & exStyle) ; + // Now create scrollbar DWORD _direction = (style & wxHORIZONTAL) ? SBS_HORZ: SBS_VERT; - HWND scroll_bar = CreateWindowEx(MakeExtendedStyle(style), wxT("SCROLLBAR"), wxT("scrollbar"), - _direction | WS_CHILD | WS_VISIBLE, + HWND scroll_bar = CreateWindowEx(exStyle, wxT("SCROLLBAR"), wxT("scrollbar"), + _direction | wstyle, 0, 0, 0, 0, (HWND) parent->GetHWND(), (HMENU)m_windowId, wxGetInstance(), NULL); @@ -114,11 +130,44 @@ wxScrollBar::~wxScrollBar(void) } bool wxScrollBar::MSWOnScroll(int WXUNUSED(orientation), WXWORD wParam, - WXWORD pos, WXHWND control) + WXWORD pos, WXHWND WXUNUSED(control)) { - int position = ::GetScrollPos((HWND) control, SB_CTL); - int minPos, maxPos; - ::GetScrollRange((HWND) control, SB_CTL, &minPos, &maxPos); + // current and max positions + int position, + maxPos, trackPos = pos; + + // when we're dragging the scrollbar we can't use pos parameter because it + // is limited to 16 bits + // JACS: now always using GetScrollInfo, since there's no reason + // not to +// if ( wParam == SB_THUMBPOSITION || wParam == SB_THUMBTRACK ) + { + SCROLLINFO scrollInfo; + wxZeroMemory(scrollInfo); + scrollInfo.cbSize = sizeof(SCROLLINFO); + + // also get the range if we call GetScrollInfo() anyhow -- this is less + // expensive than call it once here and then call GetScrollRange() + // below + scrollInfo.fMask = SIF_RANGE | SIF_POS | SIF_TRACKPOS; + + if ( !::GetScrollInfo(GetHwnd(), SB_CTL, &scrollInfo) ) + { + wxLogLastError(_T("GetScrollInfo")); + } + + trackPos = scrollInfo.nTrackPos; + position = scrollInfo.nPos; + maxPos = scrollInfo.nMax; + } +#if 0 + else + { + position = ::GetScrollPos((HWND) control, SB_CTL); + int minPos; + ::GetScrollRange((HWND) control, SB_CTL, &minPos, &maxPos); + } +#endif #if defined(__WIN95__) // A page size greater than one has the effect of reducing the effective @@ -131,16 +180,15 @@ bool wxScrollBar::MSWOnScroll(int WXUNUSED(orientation), WXWORD wParam, wxEventType scrollEvent = wxEVT_NULL; int nScrollInc; - bool isScrolling = TRUE; switch ( wParam ) { - case SB_TOP: + case SB_BOTTOM: nScrollInc = maxPos - position; scrollEvent = wxEVT_SCROLL_TOP; break; - case SB_BOTTOM: - nScrollInc = - position; + case SB_TOP: + nScrollInc = -position; scrollEvent = wxEVT_SCROLL_BOTTOM; break; @@ -165,37 +213,47 @@ bool wxScrollBar::MSWOnScroll(int WXUNUSED(orientation), WXWORD wParam, break; case SB_THUMBPOSITION: - isScrolling = FALSE; - /* fall-through */ + nScrollInc = trackPos - position; + scrollEvent = wxEVT_SCROLL_THUMBRELEASE; + break; case SB_THUMBTRACK: - nScrollInc = pos - position; + nScrollInc = trackPos - position; scrollEvent = wxEVT_SCROLL_THUMBTRACK; break; + case SB_ENDSCROLL: + nScrollInc = 0; + scrollEvent = wxEVT_SCROLL_ENDSCROLL; + break; + default: nScrollInc = 0; } - if (( nScrollInc == 0 ) && isScrolling ) + if ( nScrollInc ) { - // no event to process, so don't process it - // GRG: always process SB_THUMBPOSITION ! - return FALSE; - } + position += nScrollInc; - int new_pos = position + nScrollInc; + if ( position < 0 ) + position = 0; + if ( position > maxPos ) + position = maxPos; - if (new_pos < 0) - new_pos = 0; - if (new_pos > maxPos) - new_pos = maxPos; + SetThumbPosition(position); + } + else if ( scrollEvent != wxEVT_SCROLL_THUMBRELEASE && + scrollEvent != wxEVT_SCROLL_ENDSCROLL ) + { + // don't process the event if there is no displacement, + // unless this is a thumb release or end scroll event. + return FALSE; + } - SetThumbPosition(new_pos); wxScrollEvent event(scrollEvent, m_windowId); - event.SetPosition(new_pos); + event.SetOrientation(IsVertical() ? wxVERTICAL : wxHORIZONTAL); + event.SetPosition(position); event.SetEventObject( this ); - event.SetScrolling(isScrolling); return GetEventHandler()->ProcessEvent(event); } @@ -203,22 +261,32 @@ bool wxScrollBar::MSWOnScroll(int WXUNUSED(orientation), WXWORD wParam, void wxScrollBar::SetThumbPosition(int viewStart) { #if defined(__WIN95__) - SCROLLINFO info; - info.cbSize = sizeof(SCROLLINFO); - info.nPage = 0; - info.nMin = 0; - info.nPos = viewStart; - info.fMask = SIF_POS ; - - ::SetScrollInfo((HWND) GetHWND(), SB_CTL, &info, TRUE); + SCROLLINFO info; + info.cbSize = sizeof(SCROLLINFO); + info.nPage = 0; + info.nMin = 0; + info.nPos = viewStart; + info.fMask = SIF_POS ; + + ::SetScrollInfo((HWND) GetHWND(), SB_CTL, &info, TRUE); #else - ::SetScrollPos((HWND) GetHWND(), SB_CTL, viewStart, TRUE); + ::SetScrollPos((HWND) GetHWND(), SB_CTL, viewStart, TRUE); #endif } int wxScrollBar::GetThumbPosition(void) const { - return ::GetScrollPos((HWND)m_hWnd, SB_CTL); + SCROLLINFO scrollInfo; + wxZeroMemory(scrollInfo); + scrollInfo.cbSize = sizeof(SCROLLINFO); + scrollInfo.fMask = SIF_POS; + + if ( !::GetScrollInfo(GetHwnd(), SB_CTL, &scrollInfo) ) + { + wxLogLastError(_T("GetScrollInfo")); + } + return scrollInfo.nPos; +// return ::GetScrollPos((HWND)m_hWnd, SB_CTL); } void wxScrollBar::SetScrollbar(int position, int thumbSize, int range, int pageSize, @@ -257,78 +325,8 @@ void wxScrollBar::SetScrollbar(int position, int thumbSize, int range, int pageS } -/* From the WIN32 documentation: -In version 4.0 or later, the maximum value that a scroll bar can report -(that is, the maximum scrolling position) depends on the page size. -If the scroll bar has a page size greater than one, the maximum scrolling position -is less than the maximum range value. You can use the following formula to calculate -the maximum scrolling position: - -MaxScrollPos = MaxRangeValue - (PageSize - 1) -*/ - -#if WXWIN_COMPATIBILITY -void wxScrollBar::SetPageSize(int pageLength) -{ - m_pageSize = pageLength; - -#if defined(__WIN95__) - SCROLLINFO info; - info.cbSize = sizeof(SCROLLINFO); - info.nPage = pageLength; - info.fMask = SIF_PAGE ; - - ::SetScrollInfo((HWND) GetHWND(), SB_CTL, &info, TRUE); -#endif -} - -void wxScrollBar::SetObjectLength(int objectLength) -{ - m_objectSize = objectLength; - - // The range (number of scroll steps) is the - // object length minus the view size. - int range = wxMax((objectLength - m_viewSize), 0) ; - -#if defined(__WIN95__) - // Try to adjust the range to cope with page size > 1 - // (see comment for SetPageLength) - if ( m_pageSize > 1 ) - { - range += (m_pageSize - 1); - } - - SCROLLINFO info; - info.cbSize = sizeof(SCROLLINFO); - info.nPage = 0; - info.nMin = 0; - info.nMax = range; - info.nPos = 0; - info.fMask = SIF_RANGE ; - - ::SetScrollInfo((HWND) GetHWND(), SB_CTL, &info, TRUE); -#else - ::SetScrollRange((HWND)m_hWnd, SB_CTL, 0, range, TRUE); -#endif -} - -void wxScrollBar::SetViewLength(int viewLength) -{ - m_viewSize = viewLength; -} - -void wxScrollBar::GetValues(int *viewStart, int *viewLength, int *objectLength, - int *pageLength) const -{ - *viewStart = ::GetScrollPos((HWND)m_hWnd, SB_CTL); - *viewLength = m_viewSize; - *objectLength = m_objectSize; - *pageLength = m_pageSize; -} -#endif - -WXHBRUSH wxScrollBar::OnCtlColor(WXHDC pDC, WXHWND pWnd, WXUINT nCtlColor, - WXUINT message, WXWPARAM wParam, WXLPARAM lParam) +WXHBRUSH wxScrollBar::OnCtlColor(WXHDC WXUNUSED(pDC), WXHWND WXUNUSED(pWnd), WXUINT WXUNUSED(nCtlColor), + WXUINT WXUNUSED(message), WXWPARAM WXUNUSED(wParam), WXLPARAM WXUNUSED(lParam)) { return 0; } @@ -339,17 +337,4 @@ void wxScrollBar::Command(wxCommandEvent& event) ProcessCommand(event); } -#if WXWIN_COMPATIBILITY -// Backward compatibility -void wxScrollBar::OnScroll(wxScrollEvent& event) -{ - wxEventType oldEvent = event.GetEventType(); - event.SetEventType( wxEVT_COMMAND_SCROLLBAR_UPDATED ); - if ( !GetEventHandler()->ProcessEvent(event) ) - { - event.SetEventType( oldEvent ); - if (!GetParent()->GetEventHandler()->ProcessEvent(event)) - event.Skip(); - } -} -#endif +#endif // wxUSE_SCROLLBAR