Amebis/wxWidgets
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Support for scrolling

Browse Source 
git-svn-id: https://svn.wxwidgets.org/svn/wx/wxWidgets/trunk@10030 c3d73ce0-8a6f-49c7-b76d-6d57e0e08775
This commit is contained in:
David Webster
2001-05-07 04:17:46 +00:00
parent e7d5dd022c
commit 1c84ee88f6
4 changed files with 116 additions and 32 deletions
Download Patch File Download Diff File Expand all files Collapse all files

72
src/os2/window.cpp
View File

@@ -273,8 +273,9 @@ void wxWindow::Init()
//
// wxWnd
//
m_hMenu = 0;
m_hWnd = 0;
m_hMenu = 0L;
m_hWnd = 0L;
m_hWndScrollBar = 0L;
//
// Pass WM_GETDLGCODE to DefWindowProc()
@@ -687,13 +688,74 @@ void wxWindow::SetScrollbar(
, bool bRefresh
)
{
::WinSendMsg(GetHwnd(), SBM_SETSCROLLBAR, (MPARAM)nPos, MPFROM2SHORT(0, nRange));
if (nOrient == wxHORIZONTAL)
int nOldRange = nRange - nThumbVisible;
int nRange1 = nOldRange;
int nPageSize = nThumbVisible;
SBCDATA vInfo;
HWND hWnd = GetHwnd();
ULONG ulStyle = WS_VISIBLE;
RECTL vRect;
::WinQueryWindowRect(hWnd, &vRect);
if (nPageSize > 1 && nRange > 0)
{
m_nXThumbSize = nThumbVisible;
nRange1 += (nPageSize - 1);
}
vInfo.cb = sizeof(SBCDATA);
vInfo.posFirst = 0;
vInfo.posLast = (SHORT)nRange1;
vInfo.posThumb = nPos;
if (nOrient == wxHORIZONTAL )
{
ulStyle |= SBS_HORZ;
if (m_hWndScrollBar == 0L)
{
m_hWndScrollBar = ::WinCreateWindow( hWnd
,WC_SCROLLBAR
,(PSZ)NULL
,ulStyle
,vRect.xLeft
,vRect.yBottom
,vRect.xRight - vRect.xLeft
,20
,hWnd
,HWND_TOP
,-1
,&vInfo
,NULL
);
}
else
{
::WinSendMsg(m_hWndScrollBar, SBM_SETSCROLLBAR, (MPARAM)nPos, MPFROM2SHORT(0, (SHORT)nRange1));
}
}
else
{
ulStyle |= SBS_VERT;
if (m_hWndScrollBar == 0L)
{
m_hWndScrollBar = ::WinCreateWindow( hWnd
,WC_SCROLLBAR
,(PSZ)NULL
,ulStyle
,vRect.xRight - 20
,vRect.yBottom
,20
,vRect.yTop - vRect.yBottom
,hWnd
,HWND_TOP
,-1
,&vInfo
,NULL
);
}
else
{
::WinSendMsg(m_hWndScrollBar, SBM_SETSCROLLBAR, (MPARAM)nPos, MPFROM2SHORT(0, (SHORT)nRange1));
}
m_nYThumbSize = nThumbVisible;
}
} // end of wxWindow::SetScrollbar