| /* |
| * Unit tests for scrollbar |
| * |
| * Copyright 2008 Lyutin Anatoly (Etersoft) |
| * |
| * This library is free software; you can redistribute it and/or |
| * modify it under the terms of the GNU Lesser General Public |
| * License as published by the Free Software Foundation; either |
| * version 2.1 of the License, or (at your option) any later version. |
| * |
| * This library is distributed in the hope that it will be useful, |
| * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
| * Lesser General Public License for more details. |
| * |
| * You should have received a copy of the GNU Lesser General Public |
| * License along with this library; if not, write to the Free Software |
| * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA |
| */ |
| |
| #include <assert.h> |
| #include <stdarg.h> |
| #include <stdio.h> |
| #include <windows.h> |
| |
| #include "wine/test.h" |
| |
| static HWND hScroll, hMainWnd; |
| static BOOL bThemeActive = FALSE; |
| |
| static LRESULT CALLBACK MyWndProc( HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam ) |
| { |
| switch(msg) |
| { |
| |
| case WM_CREATE: |
| { |
| hScroll = CreateWindowA( "SCROLLBAR", "", WS_CHILD | WS_VISIBLE, 0, 0, 120, 100, hWnd, (HMENU)100, GetModuleHandleA(0), 0 ); |
| |
| return 0; |
| } |
| case WM_DESTROY: |
| PostQuitMessage(0); |
| break; |
| case WM_HSCROLL: |
| case WM_VSCROLL: |
| /* stop tracking */ |
| ReleaseCapture(); |
| return 0; |
| default: |
| return DefWindowProcA(hWnd, msg, wParam, lParam); |
| } |
| return 0; |
| } |
| static void scrollbar_test_track(void) |
| { |
| /* test that scrollbar tracking is terminated when |
| * the control looses mouse capture */ |
| SendMessage( hScroll, WM_LBUTTONDOWN, 0, MAKELPARAM( 1, 1)); |
| /* a normal return from the sendmessage */ |
| /* not normal for instance by closing the windws */ |
| ok( IsWindow( hScroll), "Scrollbar has gone!\n"); |
| } |
| |
| static void scrollbar_test1(void) |
| { |
| BOOL ret; |
| |
| ret = EnableScrollBar( hScroll, SB_CTL, ESB_DISABLE_BOTH ); |
| ok( ret, "The scrollbar should be disabled.\n" ); |
| ok( !IsWindowEnabled( hScroll ), "The scrollbar window should be disabled.\n" ); |
| |
| ret = EnableScrollBar( hScroll, SB_CTL, ESB_ENABLE_BOTH ); |
| ok( ret, "The scrollbar should be enabled.\n" ); |
| ok( IsWindowEnabled( hScroll ), "The scrollbar window should be enabled.\n" ); |
| |
| /* test buttons separately */ |
| ret = EnableScrollBar( hScroll, SB_CTL, ESB_DISABLE_LTUP ); |
| ok( ret, "The scrollbar LTUP button should be disabled.\n" ); |
| ok( IsWindowEnabled( hScroll ), "The scrollbar window should be enabled.\n" ); |
| ret = EnableScrollBar( hScroll, SB_CTL, ESB_ENABLE_BOTH ); |
| ok( ret, "The scrollbar should be enabled.\n" ); |
| ok( IsWindowEnabled( hScroll ), "The scrollbar window should be enabled.\n" ); |
| |
| ret = EnableScrollBar( hScroll, SB_CTL, ESB_DISABLE_RTDN ); |
| ok( ret, "The scrollbar RTDN button should be disabled.\n" ); |
| ok( IsWindowEnabled( hScroll ), "The scrollbar window should be enabled.\n" ); |
| ret = EnableScrollBar( hScroll, SB_CTL, ESB_ENABLE_BOTH ); |
| ok( ret, "The scrollbar should be enabled.\n" ); |
| ok( IsWindowEnabled( hScroll ), "The scrollbar window should be enabled.\n" ); |
| } |
| |
| static void scrollbar_test2(void) |
| { |
| int ret; |
| |
| trace("The scrollbar is disabled.\n"); |
| |
| EnableWindow( hScroll, FALSE ); |
| ok( !IsWindowEnabled( hScroll ), "The scroll should be disabled.\n" ); |
| |
| ret = SetScrollPos( hScroll, SB_CTL, 30, TRUE); |
| ok( !ret, "The position should not be set.\n" ); |
| |
| ret = GetScrollPos( hScroll, SB_CTL); |
| ok( !ret, "The position should be equal to zero\n"); |
| |
| ret = SetScrollRange( hScroll, SB_CTL, 0, 100, TRUE ); |
| ok( ret, "The range should be set.\n" ); |
| |
| ret = SetScrollPos( hScroll, SB_CTL, 30, TRUE); |
| ok( !ret , "The position should not be set.\n" ); |
| |
| ret = GetScrollPos( hScroll, SB_CTL); |
| ok( ret == 30, "The position should be set!!!\n"); |
| |
| trace("The scrollbar is enabled.\n"); |
| |
| EnableWindow( hScroll, TRUE ); |
| ok( IsWindowEnabled( hScroll ), "The scroll should be enabled.\n" ); |
| |
| ret = SetScrollPos( hScroll, SB_CTL, 30, TRUE); |
| ok( ret == 30, "The position should be set.\n" ); |
| |
| ret = GetScrollPos( hScroll, SB_CTL); |
| ok( ret == 30, "The position should not be equal to zero\n"); |
| |
| ret = SetScrollRange( hScroll, SB_CTL, 0, 100, TRUE ); |
| ok( ret, "The range should be set.\n" ); |
| |
| ret = SetScrollPos( hScroll, SB_CTL, 30, TRUE); |
| ok( ret == 30, "The position should be set.\n" ); |
| |
| ret = GetScrollPos( hScroll, SB_CTL); |
| ok( ret == 30, "The position should not be equal to zero\n"); |
| } |
| |
| static void scrollbar_test3(void) |
| { |
| BOOL ret; |
| |
| ret = ShowScrollBar( hScroll, SB_CTL, FALSE ); |
| ok( ret, "The ShowScrollBar() should not failed.\n" ); |
| ok( !IsWindowVisible( hScroll ), "The scrollbar window should not be visible\n" ); |
| |
| ret = ShowScrollBar( hScroll, SB_CTL, TRUE ); |
| ok( ret, "The ShowScrollBar() should not failed.\n" ); |
| ok( !IsWindowVisible( hScroll ), "The scrollbar window should be visible\n" ); |
| |
| ret = ShowScrollBar( NULL, SB_CTL, TRUE ); |
| ok( !ret, "The ShowScrollBar() should failed.\n" ); |
| |
| } |
| |
| static void scrollbar_test4(void) |
| { |
| BOOL ret; |
| SCROLLBARINFO sbi; |
| RECT rect; |
| BOOL (WINAPI *pGetScrollBarInfo)(HWND, LONG, LPSCROLLBARINFO); |
| |
| pGetScrollBarInfo = (void*)GetProcAddress(GetModuleHandleA("user32.dll"), "GetScrollBarInfo"); |
| if (!pGetScrollBarInfo) |
| { |
| win_skip("GetScrollBarInfo is not available\n"); |
| return; |
| } |
| |
| /* Test GetScrollBarInfo to make sure it returns rcScrollBar in screen |
| * coordinates. */ |
| sbi.cbSize = sizeof(sbi); |
| ret = pGetScrollBarInfo( hScroll, OBJID_CLIENT, &sbi); |
| ok( ret, "The GetScrollBarInfo() call should not fail.\n" ); |
| GetWindowRect( hScroll, &rect ); |
| ok( ret, "The GetWindowRect() call should not fail.\n" ); |
| ok( !(sbi.rgstate[0] & (STATE_SYSTEM_INVISIBLE|STATE_SYSTEM_OFFSCREEN)), |
| "unexpected rgstate(0x%x)\n", sbi.rgstate[0]); |
| ok( EqualRect(&rect, &sbi.rcScrollBar), |
| "WindowRect(%d, %d, %d, %d) != rcScrollBar(%d, %d, %d, %d)\n", |
| rect.top, rect.left, rect.bottom, rect.right, |
| sbi.rcScrollBar.top, sbi.rcScrollBar.left, |
| sbi.rcScrollBar.bottom, sbi.rcScrollBar.right ); |
| |
| /* Test windows horizontal and vertical scrollbar to make sure rcScrollBar |
| * is still returned in screen coordinates by moving the window, and |
| * making sure that it shifts the rcScrollBar value. */ |
| ShowWindow( hMainWnd, SW_SHOW ); |
| sbi.cbSize = sizeof(sbi); |
| ret = pGetScrollBarInfo( hMainWnd, OBJID_HSCROLL, &sbi); |
| ok( ret, "The GetScrollBarInfo() call should not fail.\n" ); |
| GetWindowRect( hMainWnd, &rect ); |
| ok( ret, "The GetWindowRect() call should not fail.\n" ); |
| MoveWindow( hMainWnd, rect.left+5, rect.top+5, |
| rect.right-rect.left, rect.bottom-rect.top, TRUE ); |
| rect = sbi.rcScrollBar; |
| OffsetRect(&rect, 5, 5); |
| ret = pGetScrollBarInfo( hMainWnd, OBJID_HSCROLL, &sbi); |
| ok( ret, "The GetScrollBarInfo() call should not fail.\n" ); |
| ok( EqualRect(&rect, &sbi.rcScrollBar), |
| "PreviousRect(%d, %d, %d, %d) != CurrentRect(%d, %d, %d, %d)\n", |
| rect.top, rect.left, rect.bottom, rect.right, |
| sbi.rcScrollBar.top, sbi.rcScrollBar.left, |
| sbi.rcScrollBar.bottom, sbi.rcScrollBar.right ); |
| |
| sbi.cbSize = sizeof(sbi); |
| ret = pGetScrollBarInfo( hMainWnd, OBJID_VSCROLL, &sbi); |
| ok( ret, "The GetScrollBarInfo() call should not fail.\n" ); |
| GetWindowRect( hMainWnd, &rect ); |
| ok( ret, "The GetWindowRect() call should not fail.\n" ); |
| MoveWindow( hMainWnd, rect.left+5, rect.top+5, |
| rect.right-rect.left, rect.bottom-rect.top, TRUE ); |
| rect = sbi.rcScrollBar; |
| OffsetRect(&rect, 5, 5); |
| ret = pGetScrollBarInfo( hMainWnd, OBJID_VSCROLL, &sbi); |
| ok( ret, "The GetScrollBarInfo() call should not fail.\n" ); |
| ok( EqualRect(&rect, &sbi.rcScrollBar), |
| "PreviousRect(%d, %d, %d, %d) != CurrentRect(%d, %d, %d, %d)\n", |
| rect.top, rect.left, rect.bottom, rect.right, |
| sbi.rcScrollBar.top, sbi.rcScrollBar.left, |
| sbi.rcScrollBar.bottom, sbi.rcScrollBar.right ); |
| } |
| |
| /* some tests designed to show that Horizontal and Vertical |
| * window scroll bar info are not created independently */ |
| static void scrollbar_test_default( DWORD style) |
| { |
| INT min, max, ret; |
| DWORD winstyle; |
| HWND hwnd; |
| SCROLLINFO si = { sizeof( SCROLLINFO), SIF_TRACKPOS }; |
| |
| hwnd = CreateWindowExA( 0, "static", "", WS_POPUP | style, |
| 0, 0, 10, 10, 0, 0, 0, NULL); |
| assert( hwnd != 0); |
| |
| ret = GetScrollRange( hwnd, SB_VERT, &min, &max); |
| ok( ret || |
| broken( !ret) /* Win 9x/ME */ , "GetScrollRange failed.\n"); |
| /* range is 0,0 if there are no H or V scroll bars. 0,100 otherwise */ |
| if( !( style & ( WS_VSCROLL | WS_HSCROLL))) |
| ok( min == 0 && max == 0, |
| "Scroll bar range is %d,%d. Expected 0,0. Style %08x\n", min, max, style); |
| else |
| todo_wine |
| ok(( min == 0 && max == 100) || |
| broken( min == 0 && max == 0), /* Win 9x/ME */ |
| "Scroll bar range is %d,%d. Expected 0,100. Style %08x\n", min, max, style); |
| ret = GetScrollRange( hwnd, SB_HORZ, &min, &max); |
| ok( ret || |
| broken( !ret) /* Win 9x/ME */ , "GetScrollRange failed.\n"); |
| /* range is 0,0 if there are no H or V scroll bars. 0,100 otherwise */ |
| if( !( style & ( WS_VSCROLL | WS_HSCROLL))) |
| ok( min == 0 && max == 0, |
| "Scroll bar range is %d,%d. Expected 0,0. Style %08x\n", min, max, style); |
| else |
| todo_wine |
| ok(( min == 0 && max == 100) || |
| broken( min == 0 && max == 0), /* Win 9x/ME */ |
| "Scroll bar range is %d,%d. Expected 0,100. Style %08x\n", min, max, style); |
| /* test GetScrollInfo, vist for vertical SB */ |
| ret = GetScrollInfo( hwnd, SB_VERT, &si); |
| /* should fail if no H or V scroll bar styles are present. Succeed otherwise */ |
| if( !( style & ( WS_VSCROLL | WS_HSCROLL))) |
| ok( !ret, "GetScrollInfo succeeded unexpectedly. Style is %08x\n", style); |
| else |
| todo_wine |
| ok( ret || |
| broken( !ret), /* Win 9x/ME */ |
| "GetScrollInfo failed unexpectedly. Style is %08x\n", style); |
| /* Same for Horizontal SB */ |
| ret = GetScrollInfo( hwnd, SB_HORZ, &si); |
| /* should fail if no H or V scroll bar styles are present. Succeed otherwise */ |
| if( !( style & ( WS_VSCROLL | WS_HSCROLL))) |
| ok( !ret, "GetScrollInfo succeeded unexpectedly. Style is %08x\n", style); |
| else |
| todo_wine |
| ok( ret || |
| broken( !ret), /* Win 9x/ME */ |
| "GetScrollInfo failed unexpectedly. Style is %08x\n", style); |
| /* now set the Vertical Scroll range to something that could be the default value it |
| * already has */; |
| ret = SetScrollRange( hwnd, SB_VERT, 0, 100, FALSE); |
| ok( ret, "SetScrollRange failed.\n"); |
| /* and request the Horizontal range */ |
| ret = GetScrollRange( hwnd, SB_HORZ, &min, &max); |
| ok( ret, "GetScrollRange failed.\n"); |
| /* now the range should be 0,100 in ALL cases */ |
| ok( min == 0 && max == 100, |
| "Scroll bar range is %d,%d. Expected 0,100. Style %08x\n", min, max, style); |
| /* See what is different now for GetScrollRange */ |
| ret = GetScrollInfo( hwnd, SB_HORZ, &si); |
| /* should succeed in ALL cases */ |
| ok( ret, "GetScrollInfo failed unexpectedly. Style is %08x\n", style); |
| ret = GetScrollInfo( hwnd, SB_VERT, &si); |
| /* should succeed in ALL cases */ |
| ok( ret, "GetScrollInfo failed unexpectedly. Style is %08x\n", style); |
| /* report the windows style */ |
| winstyle = GetWindowLongA( hwnd, GWL_STYLE ); |
| /* WS_VSCROLL added to the window style */ |
| if( !(style & WS_VSCROLL)) |
| { |
| if (bThemeActive || style != WS_HSCROLL) |
| todo_wine |
| ok( (winstyle & (WS_HSCROLL|WS_VSCROLL)) == ( style | WS_VSCROLL), |
| "unexpected style change %08x/%08x\n", winstyle, style); |
| else |
| ok( (winstyle & (WS_HSCROLL|WS_VSCROLL)) == style, |
| "unexpected style change %08x/%08x\n", winstyle, style); |
| } |
| /* do the test again with H and V reversed. |
| * Start with a clean window */ |
| DestroyWindow( hwnd); |
| hwnd = CreateWindowExA( 0, "static", "", WS_POPUP | style, |
| 0, 0, 10, 10, 0, 0, 0, NULL); |
| assert( hwnd != 0); |
| /* Set Horizontal Scroll range to something that could be the default value it |
| * already has */; |
| ret = SetScrollRange( hwnd, SB_HORZ, 0, 100, FALSE); |
| ok( ret, "SetScrollRange failed.\n"); |
| /* and request the Vertical range */ |
| ret = GetScrollRange( hwnd, SB_VERT, &min, &max); |
| ok( ret, "GetScrollRange failed.\n"); |
| /* now the range should be 0,100 in ALL cases */ |
| ok( min == 0 && max == 100, |
| "Scroll bar range is %d,%d. Expected 0,100. Style %08x\n", min, max, style); |
| /* See what is different now for GetScrollRange */ |
| ret = GetScrollInfo( hwnd, SB_HORZ, &si); |
| /* should succeed in ALL cases */ |
| ok( ret, "GetScrollInfo failed unexpectedly. Style is %08x\n", style); |
| ret = GetScrollInfo( hwnd, SB_VERT, &si); |
| /* should succeed in ALL cases */ |
| ok( ret, "GetScrollInfo failed unexpectedly. Style is %08x\n", style); |
| /* report the windows style */ |
| winstyle = GetWindowLongA( hwnd, GWL_STYLE ); |
| /* WS_HSCROLL added to the window style */ |
| if( !(style & WS_HSCROLL)) |
| { |
| if (bThemeActive || style != WS_VSCROLL) |
| todo_wine |
| ok( (winstyle & (WS_HSCROLL|WS_VSCROLL)) == ( style | WS_HSCROLL), |
| "unexpected style change %08x/%08x\n", winstyle, style); |
| else |
| ok( (winstyle & (WS_HSCROLL|WS_VSCROLL)) == style, |
| "unexpected style change %08x/%08x\n", winstyle, style); |
| } |
| /* Slightly change the test to use SetScrollInfo |
| * Start with a clean window */ |
| DestroyWindow( hwnd); |
| hwnd = CreateWindowExA( 0, "static", "", WS_POPUP | style, |
| 0, 0, 10, 10, 0, 0, 0, NULL); |
| assert( hwnd != 0); |
| /* set Horizontal position with SetScrollInfo */ |
| si.nPos = 0; |
| si.nMin = 11; |
| si.nMax = 22; |
| si.fMask |= SIF_RANGE; |
| ret = SetScrollInfo( hwnd, SB_HORZ, &si, FALSE); |
| ok( ret, "SetScrollInfo failed. Style is %08x\n", style); |
| /* and request the Vertical range */ |
| ret = GetScrollRange( hwnd, SB_VERT, &min, &max); |
| ok( ret, "GetScrollRange failed.\n"); |
| /* now the range should be 0,100 in ALL cases */ |
| ok( min == 0 && max == 100, |
| "Scroll bar range is %d,%d. Expected 0,100. Style %08x\n", min, max, style); |
| /* See what is different now for GetScrollRange */ |
| ret = GetScrollInfo( hwnd, SB_HORZ, &si); |
| /* should succeed in ALL cases */ |
| ok( ret, "GetScrollInfo failed unexpectedly. Style is %08x\n", style); |
| ret = GetScrollInfo( hwnd, SB_VERT, &si); |
| /* should succeed in ALL cases */ |
| ok( ret, "GetScrollInfo failed unexpectedly. Style is %08x\n", style); |
| /* also test if the window scroll bars are enabled */ |
| ret = EnableScrollBar( hwnd, SB_VERT, ESB_ENABLE_BOTH); |
| ok( !ret, "Vertical window scroll bar was not enabled\n"); |
| ret = EnableScrollBar( hwnd, SB_HORZ, ESB_ENABLE_BOTH); |
| ok( !ret, "Horizontal window scroll bar was not enabled\n"); |
| DestroyWindow( hwnd); |
| /* finally, check if adding a WS_[HV]SColl style of a window makes the scroll info |
| * available */ |
| if( style & (WS_HSCROLL | WS_VSCROLL)) return;/* only test if not yet set */ |
| /* Start with a clean window */ |
| DestroyWindow( hwnd); |
| hwnd = CreateWindowExA( 0, "static", "", WS_POPUP , |
| 0, 0, 10, 10, 0, 0, 0, NULL); |
| assert( hwnd != 0); |
| ret = GetScrollInfo( hwnd, SB_VERT, &si); |
| /* should fail */ |
| ok( !ret, "GetScrollInfo succeeded unexpectedly. Style is %08x\n", style); |
| /* add scroll styles */ |
| winstyle = GetWindowLongA( hwnd, GWL_STYLE ); |
| SetWindowLongW( hwnd, GWL_STYLE, winstyle | WS_VSCROLL | WS_HSCROLL); |
| ret = GetScrollInfo( hwnd, SB_VERT, &si); |
| /* should still fail */ |
| ok( !ret, "GetScrollInfo succeeded unexpectedly. Style is %08x\n", style); |
| /* clean up */ |
| DestroyWindow( hwnd); |
| } |
| |
| START_TEST ( scroll ) |
| { |
| WNDCLASSA wc; |
| HMODULE hUxtheme; |
| BOOL (WINAPI * pIsThemeActive)(VOID); |
| |
| wc.style = CS_HREDRAW | CS_VREDRAW; |
| wc.cbClsExtra = 0; |
| wc.cbWndExtra = 0; |
| wc.hInstance = GetModuleHandleA(NULL); |
| wc.hIcon = NULL; |
| wc.hCursor = LoadCursorA(NULL, IDC_IBEAM); |
| wc.hbrBackground = GetSysColorBrush(COLOR_WINDOW); |
| wc.lpszMenuName = NULL; |
| wc.lpszClassName = "MyTestWnd"; |
| wc.lpfnWndProc = MyWndProc; |
| RegisterClassA(&wc); |
| |
| hMainWnd = CreateWindowExA( 0, "MyTestWnd", "Scroll", |
| WS_OVERLAPPEDWINDOW|WS_VSCROLL|WS_HSCROLL, |
| CW_USEDEFAULT, CW_USEDEFAULT, 100, 100, NULL, NULL, GetModuleHandleA(NULL), 0 ); |
| |
| ok(hMainWnd != NULL, "Failed to create parent window. Tests aborted.\n"); |
| if (!hMainWnd) return; |
| |
| assert( hScroll ); |
| |
| scrollbar_test1(); |
| scrollbar_test2(); |
| scrollbar_test3(); |
| scrollbar_test4(); |
| scrollbar_test_track(); |
| |
| /* Some test results vary depending of theming being active or not */ |
| hUxtheme = LoadLibraryA("uxtheme.dll"); |
| if (hUxtheme) |
| { |
| pIsThemeActive = (void*)GetProcAddress(hUxtheme, "IsThemeActive"); |
| if (pIsThemeActive) |
| bThemeActive = pIsThemeActive(); |
| FreeLibrary(hUxtheme); |
| } |
| |
| scrollbar_test_default( 0); |
| scrollbar_test_default( WS_HSCROLL); |
| scrollbar_test_default( WS_VSCROLL); |
| scrollbar_test_default( WS_HSCROLL | WS_VSCROLL); |
| |
| DestroyWindow(hScroll); |
| DestroyWindow(hMainWnd); |
| } |