git.oblomov.eu Git - wine/blob - controls/scroll.c

   1 /*
   2  * Scrollbar control
   3  *
   4  * Copyright 1993 Martin Ayotte
   5  * Copyright 1994, 1996 Alexandre Julliard
   6  */
   7
   8 #include "windows.h"
   9 #include "wine/winuser16.h"
  10 #include "sysmetrics.h"
  11 #include "scroll.h"
  12 #include "heap.h"
  13 #include "win.h"
  14 #include "debug.h"
  15
  16
  17 static HBITMAP32 hUpArrow = 0;
  18 static HBITMAP32 hDnArrow = 0;
  19 static HBITMAP32 hLfArrow = 0;
  20 static HBITMAP32 hRgArrow = 0;
  21 static HBITMAP32 hUpArrowD = 0;
  22 static HBITMAP32 hDnArrowD = 0;
  23 static HBITMAP32 hLfArrowD = 0;
  24 static HBITMAP32 hRgArrowD = 0;
  25 static HBITMAP32 hUpArrowI = 0;
  26 static HBITMAP32 hDnArrowI = 0;
  27 static HBITMAP32 hLfArrowI = 0;
  28 static HBITMAP32 hRgArrowI = 0;
  29
  30 #define TOP_ARROW(flags,pressed) \
  31    (((flags)&ESB_DISABLE_UP) ? hUpArrowI : ((pressed) ? hUpArrowD:hUpArrow))
  32 #define BOTTOM_ARROW(flags,pressed) \
  33    (((flags)&ESB_DISABLE_DOWN) ? hDnArrowI : ((pressed) ? hDnArrowD:hDnArrow))
  34 #define LEFT_ARROW(flags,pressed) \
  35    (((flags)&ESB_DISABLE_LEFT) ? hLfArrowI : ((pressed) ? hLfArrowD:hLfArrow))
  36 #define RIGHT_ARROW(flags,pressed) \
  37    (((flags)&ESB_DISABLE_RIGHT) ? hRgArrowI : ((pressed) ? hRgArrowD:hRgArrow))
  38
  39
  40   /* Minimum size of the rectangle between the arrows */
  41 #define SCROLL_MIN_RECT  4
  42
  43   /* Minimum size of the thumb in pixels */
  44 #define SCROLL_MIN_THUMB 6
  45
  46   /* Overlap between arrows and thumb */
  47 #define SCROLL_ARROW_THUMB_OVERLAP 1
  48
  49   /* Delay (in ms) before first repetition when holding the button down */
  50 #define SCROLL_FIRST_DELAY   200
  51
  52   /* Delay (in ms) between scroll repetitions */
  53 #define SCROLL_REPEAT_DELAY  50
  54
  55   /* Scroll timer id */
  56 #define SCROLL_TIMER   0
  57
  58   /* Scroll-bar hit testing */
  59 enum SCROLL_HITTEST
  60 {
  61     SCROLL_NOWHERE,      /* Outside the scroll bar */
  62     SCROLL_TOP_ARROW,    /* Top or left arrow */
  63     SCROLL_TOP_RECT,     /* Rectangle between the top arrow and the thumb */
  64     SCROLL_THUMB,        /* Thumb rectangle */
  65     SCROLL_BOTTOM_RECT,  /* Rectangle between the thumb and the bottom arrow */
  66     SCROLL_BOTTOM_ARROW  /* Bottom or right arrow */
  67 };
  68
  69  /* What to do after SCROLL_SetScrollInfo() */
  70 #define SA_SSI_HIDE             0x0001
  71 #define SA_SSI_SHOW             0x0002
  72 #define SA_SSI_REFRESH          0x0004
  73 #define SA_SSI_REPAINT_ARROWS   0x0008
  74
  75  /* Thumb-tracking info */
  76 static HWND32 SCROLL_TrackingWin = 0;
  77 static INT32  SCROLL_TrackingBar = 0;
  78 static INT32  SCROLL_TrackingPos = 0;
  79 static INT32  SCROLL_TrackingVal = 0;
  80  /* Hit test code of the last button-down event */
  81 static enum SCROLL_HITTEST SCROLL_trackHitTest;
  82 static BOOL32 SCROLL_trackVertical;
  83
  84  /* Is the moving thumb being displayed? */
  85 static BOOL32 SCROLL_MovingThumb = FALSE;
  86
  87  /* Local functions */
  88 static BOOL32 SCROLL_ShowScrollBar( HWND32 hwnd, INT32 nBar,
  89                                     BOOL32 fShowH, BOOL32 fShowV );
  90 static INT32 SCROLL_SetScrollInfo( HWND32 hwnd, INT32 nBar,
  91                                    const SCROLLINFO *info, INT32 *action );
  92
  93 /***********************************************************************
  94  *           SCROLL_LoadBitmaps
  95  */
  96 static void SCROLL_LoadBitmaps(void)
  97 {
  98     hUpArrow  = LoadBitmap32A( 0, MAKEINTRESOURCE32A(OBM_UPARROW) );
  99     hDnArrow  = LoadBitmap32A( 0, MAKEINTRESOURCE32A(OBM_DNARROW) );
 100     hLfArrow  = LoadBitmap32A( 0, MAKEINTRESOURCE32A(OBM_LFARROW) );
 101     hRgArrow  = LoadBitmap32A( 0, MAKEINTRESOURCE32A(OBM_RGARROW) );
 102     hUpArrowD = LoadBitmap32A( 0, MAKEINTRESOURCE32A(OBM_UPARROWD) );
 103     hDnArrowD = LoadBitmap32A( 0, MAKEINTRESOURCE32A(OBM_DNARROWD) );
 104     hLfArrowD = LoadBitmap32A( 0, MAKEINTRESOURCE32A(OBM_LFARROWD) );
 105     hRgArrowD = LoadBitmap32A( 0, MAKEINTRESOURCE32A(OBM_RGARROWD) );
 106     hUpArrowI = LoadBitmap32A( 0, MAKEINTRESOURCE32A(OBM_UPARROWI) );
 107     hDnArrowI = LoadBitmap32A( 0, MAKEINTRESOURCE32A(OBM_DNARROWI) );
 108     hLfArrowI = LoadBitmap32A( 0, MAKEINTRESOURCE32A(OBM_LFARROWI) );
 109     hRgArrowI = LoadBitmap32A( 0, MAKEINTRESOURCE32A(OBM_RGARROWI) );
 110 }
 111
 112
 113 /***********************************************************************
 114  *           SCROLL_GetPtrScrollInfo
 115  */
 116 static SCROLLBAR_INFO *SCROLL_GetPtrScrollInfo( WND* wndPtr, INT32 nBar )
 117 {
 118     SCROLLBAR_INFO *infoPtr;
 119
 120     if (!wndPtr) return NULL;
 121     switch(nBar)
 122     {
 123         case SB_HORZ: infoPtr = (SCROLLBAR_INFO *)wndPtr->pHScroll; break;
 124         case SB_VERT: infoPtr = (SCROLLBAR_INFO *)wndPtr->pVScroll; break;
 125         case SB_CTL:  infoPtr = (SCROLLBAR_INFO *)wndPtr->wExtra; break;
 126         default:      return NULL;
 127     }
 128
 129     if (!infoPtr)  /* Create the info structure if needed */
 130     {
 131         if ((infoPtr = HeapAlloc( SystemHeap, 0, sizeof(SCROLLBAR_INFO) )))
 132         {
 133             infoPtr->MinVal = infoPtr->CurVal = infoPtr->Page = 0;
 134             infoPtr->MaxVal = 100;
 135             infoPtr->flags  = ESB_ENABLE_BOTH;
 136             if (nBar == SB_HORZ) wndPtr->pHScroll = infoPtr;
 137             else wndPtr->pVScroll = infoPtr;
 138         }
 139         if (!hUpArrow) SCROLL_LoadBitmaps();
 140     }
 141     return infoPtr;
 142 }
 143
 144
 145 /***********************************************************************
 146  *           SCROLL_GetScrollInfo
 147  */
 148 static SCROLLBAR_INFO *SCROLL_GetScrollInfo( HWND32 hwnd, INT32 nBar )
 149 {
 150    WND *wndPtr = WIN_FindWndPtr( hwnd );
 151    return SCROLL_GetPtrScrollInfo( wndPtr, nBar );
 152 }
 153
 154
 155 /***********************************************************************
 156  *           SCROLL_GetScrollBarRect
 157  *
 158  * Compute the scroll bar rectangle, in drawing coordinates (i.e. client
 159  * coords for SB_CTL, window coords for SB_VERT and SB_HORZ).
 160  * 'arrowSize' returns the width or height of an arrow (depending on
 161  * the orientation of the scrollbar), 'thumbSize' returns the size of
 162  * the thumb, and 'thumbPos' returns the position of the thumb
 163  * relative to the left or to the top.
 164  * Return TRUE if the scrollbar is vertical, FALSE if horizontal.
 165  */
 166 static BOOL32 SCROLL_GetScrollBarRect( HWND32 hwnd, INT32 nBar, RECT32 *lprect,
 167                                        INT32 *arrowSize, INT32 *thumbSize,
 168                                        INT32 *thumbPos )
 169 {
 170     INT32 pixels;
 171     BOOL32 vertical;
 172     WND *wndPtr = WIN_FindWndPtr( hwnd );
 173
 174     switch(nBar)
 175     {
 176       case SB_HORZ:
 177         lprect->left   = wndPtr->rectClient.left - wndPtr->rectWindow.left;
 178         lprect->top    = wndPtr->rectClient.bottom - wndPtr->rectWindow.top;
 179         lprect->right  = wndPtr->rectClient.right - wndPtr->rectWindow.left;
 180         lprect->bottom = lprect->top + SYSMETRICS_CYHSCROLL;
 181         if(wndPtr->dwStyle & WS_BORDER) {
 182           lprect->left--;
 183           lprect->right++;
 184         } else if(wndPtr->dwStyle & WS_VSCROLL)
 185           lprect->right++;
 186         vertical = FALSE;
 187         break;
 188
 189       case SB_VERT:
 190         lprect->left   = wndPtr->rectClient.right - wndPtr->rectWindow.left;
 191         lprect->top    = wndPtr->rectClient.top - wndPtr->rectWindow.top;
 192         lprect->right  = lprect->left + SYSMETRICS_CXVSCROLL;
 193         lprect->bottom = wndPtr->rectClient.bottom - wndPtr->rectWindow.top;
 194         if(wndPtr->dwStyle & WS_BORDER) {
 195           lprect->top--;
 196           lprect->bottom++;
 197         } else if(wndPtr->dwStyle & WS_HSCROLL)
 198           lprect->bottom++;
 199         vertical = TRUE;
 200         break;
 201
 202       case SB_CTL:
 203         GetClientRect32( hwnd, lprect );
 204         vertical = ((wndPtr->dwStyle & SBS_VERT) != 0);
 205         break;
 206
 207     default:
 208         return FALSE;
 209     }
 210
 211     if (vertical) pixels = lprect->bottom - lprect->top;
 212     else pixels = lprect->right - lprect->left;
 213
 214     if (pixels <= 2*SYSMETRICS_CXVSCROLL + SCROLL_MIN_RECT)
 215     {
 216         if (pixels > SCROLL_MIN_RECT)
 217             *arrowSize = (pixels - SCROLL_MIN_RECT) / 2;
 218         else
 219             *arrowSize = 0;
 220         *thumbPos = *thumbSize = 0;
 221     }
 222     else
 223     {
 224         SCROLLBAR_INFO *info = SCROLL_GetPtrScrollInfo( wndPtr, nBar );
 225
 226         *arrowSize = SYSMETRICS_CXVSCROLL;
 227         pixels -= (2 * (SYSMETRICS_CXVSCROLL - SCROLL_ARROW_THUMB_OVERLAP));
 228
 229         if (info->Page)
 230         {
 231             *thumbSize = pixels * info->Page / (info->MaxVal-info->MinVal+1);
 232             if (*thumbSize < SCROLL_MIN_THUMB) *thumbSize = SCROLL_MIN_THUMB;
 233         }
 234         else *thumbSize = SYSMETRICS_CXVSCROLL;
 235
 236         if (((pixels -= *thumbSize ) < 0) ||
 237             ((info->flags & ESB_DISABLE_BOTH) == ESB_DISABLE_BOTH))
 238         {
 239             /* Rectangle too small or scrollbar disabled -> no thumb */
 240             *thumbPos = *thumbSize = 0;
 241         }
 242         else
 243         {
 244             INT32 max = info->MaxVal - MAX( info->Page-1, 0 );
 245             if (info->MinVal >= max)
 246                 *thumbPos = *arrowSize - SCROLL_ARROW_THUMB_OVERLAP;
 247             else
 248                 *thumbPos = *arrowSize - SCROLL_ARROW_THUMB_OVERLAP
 249                  + pixels * (info->CurVal-info->MinVal) / (max - info->MinVal);
 250         }
 251     }
 252     return vertical;
 253 }
 254
 255
 256 /***********************************************************************
 257  *           SCROLL_GetThumbVal
 258  *
 259  * Compute the current scroll position based on the thumb position in pixels
 260  * from the top of the scroll-bar.
 261  */
 262 static UINT32 SCROLL_GetThumbVal( SCROLLBAR_INFO *infoPtr, RECT32 *rect,
 263                                   BOOL32 vertical, INT32 pos )
 264 {
 265     INT32 thumbSize;
 266     INT32 pixels = vertical ? rect->bottom-rect->top : rect->right-rect->left;
 267
 268     if ((pixels -= 2*(SYSMETRICS_CXVSCROLL - SCROLL_ARROW_THUMB_OVERLAP)) <= 0)
 269         return infoPtr->MinVal;
 270
 271     if (infoPtr->Page)
 272     {
 273         thumbSize = pixels * infoPtr->Page/(infoPtr->MaxVal-infoPtr->MinVal+1);
 274         if (thumbSize < SCROLL_MIN_THUMB) thumbSize = SCROLL_MIN_THUMB;
 275     }
 276     else thumbSize = SYSMETRICS_CXVSCROLL;
 277
 278     if ((pixels -= thumbSize) <= 0) return infoPtr->MinVal;
 279
 280     pos = MAX( 0, pos - (SYSMETRICS_CXVSCROLL - SCROLL_ARROW_THUMB_OVERLAP) );
 281     if (pos > pixels) pos = pixels;
 282
 283     if (!infoPtr->Page) pos *= infoPtr->MaxVal - infoPtr->MinVal;
 284     else pos *= infoPtr->MaxVal - infoPtr->MinVal - infoPtr->Page + 1;
 285     return infoPtr->MinVal + ((pos + pixels / 2) / pixels);
 286 }
 287
 288 /***********************************************************************
 289  *           SCROLL_PtInRectEx
 290  */
 291 static BOOL32 SCROLL_PtInRectEx( LPRECT32 lpRect, POINT32 pt, BOOL32 vertical )
 292 {
 293     RECT32 rect = *lpRect;
 294
 295     if (vertical)
 296     {
 297         rect.left -= lpRect->right - lpRect->left;
 298         rect.right += lpRect->right - lpRect->left;
 299     }
 300     else
 301     {
 302         rect.top -= lpRect->bottom - lpRect->top;
 303         rect.bottom += lpRect->bottom - lpRect->top;
 304     }
 305     return PtInRect32( &rect, pt );
 306 }
 307
 308 /***********************************************************************
 309  *           SCROLL_ClipPos
 310  */
 311 static POINT32 SCROLL_ClipPos( LPRECT32 lpRect, POINT32 pt )
 312 {
 313     if( pt.x < lpRect->left )
 314         pt.x = lpRect->left;
 315     else
 316     if( pt.x > lpRect->right )
 317         pt.x = lpRect->right;
 318
 319     if( pt.y < lpRect->top )
 320         pt.y = lpRect->top;
 321     else
 322     if( pt.y > lpRect->bottom )
 323         pt.y = lpRect->bottom;
 324
 325     return pt;
 326 }
 327
 328
 329 /***********************************************************************
 330  *           SCROLL_HitTest
 331  *
 332  * Scroll-bar hit testing (don't confuse this with WM_NCHITTEST!).
 333  */
 334 static enum SCROLL_HITTEST SCROLL_HitTest( HWND32 hwnd, INT32 nBar,
 335                                            POINT32 pt, BOOL32 bDragging )
 336 {
 337     INT32 arrowSize, thumbSize, thumbPos;
 338     RECT32 rect;
 339
 340     BOOL32 vertical = SCROLL_GetScrollBarRect( hwnd, nBar, &rect,
 341                                            &arrowSize, &thumbSize, &thumbPos );
 342
 343     if ( (bDragging && !SCROLL_PtInRectEx( &rect, pt, vertical )) ||
 344          (!PtInRect32( &rect, pt )) ) return SCROLL_NOWHERE;
 345
 346     if (vertical)
 347     {
 348         if (pt.y < rect.top + arrowSize) return SCROLL_TOP_ARROW;
 349         if (pt.y >= rect.bottom - arrowSize) return SCROLL_BOTTOM_ARROW;
 350         if (!thumbPos) return SCROLL_TOP_RECT;
 351         pt.y -= rect.top;
 352         if (pt.y < thumbPos) return SCROLL_TOP_RECT;
 353         if (pt.y >= thumbPos + thumbSize) return SCROLL_BOTTOM_RECT;
 354     }
 355     else  /* horizontal */
 356     {
 357         if (pt.x < rect.left + arrowSize) return SCROLL_TOP_ARROW;
 358         if (pt.x >= rect.right - arrowSize) return SCROLL_BOTTOM_ARROW;
 359         if (!thumbPos) return SCROLL_TOP_RECT;
 360         pt.x -= rect.left;
 361         if (pt.x < thumbPos) return SCROLL_TOP_RECT;
 362         if (pt.x >= thumbPos + thumbSize) return SCROLL_BOTTOM_RECT;
 363     }
 364     return SCROLL_THUMB;
 365 }
 366
 367
 368 /***********************************************************************
 369  *           SCROLL_DrawArrows
 370  *
 371  * Draw the scroll bar arrows.
 372  */
 373 static void SCROLL_DrawArrows( HDC32 hdc, SCROLLBAR_INFO *infoPtr,
 374                                RECT32 *rect, INT32 arrowSize, BOOL32 vertical,
 375                                BOOL32 top_pressed, BOOL32 bottom_pressed )
 376 {
 377     HDC32 hdcMem = CreateCompatibleDC32( hdc );
 378     HBITMAP32 hbmpPrev = SelectObject32( hdcMem, vertical ?
 379                                     TOP_ARROW(infoPtr->flags, top_pressed)
 380                                     : LEFT_ARROW(infoPtr->flags, top_pressed));
 381
 382     SetStretchBltMode32( hdc, STRETCH_DELETESCANS );
 383     StretchBlt32( hdc, rect->left, rect->top,
 384                   vertical ? rect->right-rect->left : arrowSize,
 385                   vertical ? arrowSize : rect->bottom-rect->top,
 386                   hdcMem, 0, 0,
 387                   SYSMETRICS_CXVSCROLL, SYSMETRICS_CYHSCROLL,
 388                   SRCCOPY );
 389
 390     SelectObject32( hdcMem, vertical ?
 391                     BOTTOM_ARROW( infoPtr->flags, bottom_pressed )
 392                     : RIGHT_ARROW( infoPtr->flags, bottom_pressed ) );
 393     if (vertical)
 394         StretchBlt32( hdc, rect->left, rect->bottom - arrowSize,
 395                       rect->right - rect->left, arrowSize,
 396                       hdcMem, 0, 0,
 397                       SYSMETRICS_CXVSCROLL, SYSMETRICS_CYHSCROLL,
 398                       SRCCOPY );
 399     else
 400         StretchBlt32( hdc, rect->right - arrowSize, rect->top,
 401                       arrowSize, rect->bottom - rect->top,
 402                       hdcMem, 0, 0,
 403                       SYSMETRICS_CXVSCROLL, SYSMETRICS_CYHSCROLL,
 404                       SRCCOPY );
 405     SelectObject32( hdcMem, hbmpPrev );
 406     DeleteDC32( hdcMem );
 407 }
 408
 409
 410 /***********************************************************************
 411  *           SCROLL_DrawMovingThumb
 412  *
 413  * Draw the moving thumb rectangle.
 414  */
 415 static void SCROLL_DrawMovingThumb( HDC32 hdc, RECT32 *rect, BOOL32 vertical,
 416                                     INT32 arrowSize, INT32 thumbSize )
 417 {
 418     RECT32 r = *rect;
 419     if (vertical)
 420     {
 421         r.top += SCROLL_TrackingPos;
 422         if (r.top < rect->top + arrowSize - SCROLL_ARROW_THUMB_OVERLAP)
 423             r.top = rect->top + arrowSize - SCROLL_ARROW_THUMB_OVERLAP;
 424         if (r.top + thumbSize >
 425                        rect->bottom - (arrowSize - SCROLL_ARROW_THUMB_OVERLAP))
 426             r.top = rect->bottom - (arrowSize - SCROLL_ARROW_THUMB_OVERLAP)
 427                                                                   - thumbSize;
 428         r.bottom = r.top + thumbSize;
 429     }
 430     else
 431     {
 432         r.left += SCROLL_TrackingPos;
 433         if (r.left < rect->left + arrowSize - SCROLL_ARROW_THUMB_OVERLAP)
 434             r.left = rect->left + arrowSize - SCROLL_ARROW_THUMB_OVERLAP;
 435         if (r.left + thumbSize >
 436                        rect->right - (arrowSize - SCROLL_ARROW_THUMB_OVERLAP))
 437             r.left = rect->right - (arrowSize - SCROLL_ARROW_THUMB_OVERLAP)
 438                                                                   - thumbSize;
 439         r.right = r.left + thumbSize;
 440     }
 441     DrawFocusRect32( hdc, &r );
 442     SCROLL_MovingThumb = !SCROLL_MovingThumb;
 443 }
 444
 445
 446 /***********************************************************************
 447  *           SCROLL_DrawInterior
 448  *
 449  * Draw the scroll bar interior (everything except the arrows).
 450  */
 451 static void SCROLL_DrawInterior( HWND32 hwnd, HDC32 hdc, INT32 nBar,
 452                                  RECT32 *rect, INT32 arrowSize,
 453                                  INT32 thumbSize, INT32 thumbPos,
 454                                  UINT32 flags, BOOL32 vertical,
 455                                  BOOL32 top_selected, BOOL32 bottom_selected )
 456 {
 457     RECT32 r;
 458
 459       /* Select the correct brush and pen */
 460
 461     SelectObject32( hdc, GetSysColorPen32(COLOR_WINDOWFRAME) );
 462     if ((flags & ESB_DISABLE_BOTH) == ESB_DISABLE_BOTH)
 463     {
 464           /* This ought to be the color of the parent window */
 465         SelectObject32( hdc, GetSysColorBrush32(COLOR_WINDOW) );
 466     }
 467     else
 468     {
 469         if (nBar == SB_CTL)  /* Only scrollbar controls send WM_CTLCOLOR */
 470         {
 471             HBRUSH32 hbrush = SendMessage32A(GetParent32(hwnd),
 472                                              WM_CTLCOLORSCROLLBAR, hdc, hwnd );
 473             SelectObject32( hdc, hbrush );
 474         }
 475         else SelectObject32( hdc, GetSysColorBrush32(COLOR_SCROLLBAR) );
 476     }
 477
 478       /* Calculate the scroll rectangle */
 479
 480     r = *rect;
 481     if (vertical)
 482     {
 483         r.top    += arrowSize - SCROLL_ARROW_THUMB_OVERLAP;
 484         r.bottom -= (arrowSize - SCROLL_ARROW_THUMB_OVERLAP);
 485     }
 486     else
 487     {
 488         r.left  += arrowSize - SCROLL_ARROW_THUMB_OVERLAP;
 489         r.right -= (arrowSize - SCROLL_ARROW_THUMB_OVERLAP);
 490     }
 491
 492       /* Draw the scroll bar frame */
 493
 494     Rectangle32( hdc, r.left, r.top, r.right, r.bottom );
 495
 496       /* Draw the scroll rectangles and thumb */
 497
 498     if (!thumbPos)  /* No thumb to draw */
 499     {
 500         PatBlt32( hdc, r.left+1, r.top+1, r.right - r.left - 2,
 501                   r.bottom - r.top - 2, PATCOPY );
 502         return;
 503     }
 504
 505     if (vertical)
 506     {
 507         PatBlt32( hdc, r.left + 1, r.top + 1,
 508                   r.right - r.left - 2,
 509                   thumbPos - (arrowSize - SCROLL_ARROW_THUMB_OVERLAP) - 1,
 510                   top_selected ? 0x0f0000 : PATCOPY );
 511         r.top += thumbPos - (arrowSize - SCROLL_ARROW_THUMB_OVERLAP);
 512         PatBlt32( hdc, r.left + 1, r.top + thumbSize,
 513                   r.right - r.left - 2,
 514                   r.bottom - r.top - thumbSize - 1,
 515                   bottom_selected ? 0x0f0000 : PATCOPY );
 516         r.bottom = r.top + thumbSize;
 517     }
 518     else  /* horizontal */
 519     {
 520         PatBlt32( hdc, r.left + 1, r.top + 1,
 521                   thumbPos - (arrowSize - SCROLL_ARROW_THUMB_OVERLAP) - 1,
 522                   r.bottom - r.top - 2,
 523                   top_selected ? 0x0f0000 : PATCOPY );
 524         r.left += thumbPos - (arrowSize - SCROLL_ARROW_THUMB_OVERLAP);
 525         PatBlt32( hdc, r.left + thumbSize, r.top + 1,
 526                   r.right - r.left - thumbSize - 1,
 527                   r.bottom - r.top - 2,
 528                   bottom_selected ? 0x0f0000 : PATCOPY );
 529         r.right = r.left + thumbSize;
 530     }
 531
 532       /* Draw the thumb */
 533
 534     SelectObject32( hdc, GetSysColorBrush32(COLOR_BTNFACE) );
 535     Rectangle32( hdc, r.left, r.top, r.right, r.bottom );
 536     r.top++, r.left++;
 537     DrawEdge32( hdc, &r, EDGE_RAISED, BF_RECT );
 538     if (SCROLL_MovingThumb &&
 539         (SCROLL_TrackingWin == hwnd) &&
 540         (SCROLL_TrackingBar == nBar))
 541     {
 542         SCROLL_DrawMovingThumb( hdc, rect, vertical, arrowSize, thumbSize );
 543         SCROLL_MovingThumb = TRUE;
 544     }
 545 }
 546
 547
 548 /***********************************************************************
 549  *           SCROLL_DrawScrollBar
 550  *
 551  * Redraw the whole scrollbar.
 552  */
 553 void SCROLL_DrawScrollBar( HWND32 hwnd, HDC32 hdc, INT32 nBar,
 554                            BOOL32 arrows, BOOL32 interior )
 555 {
 556     INT32 arrowSize, thumbSize, thumbPos;
 557     RECT32 rect;
 558     BOOL32 vertical;
 559     WND *wndPtr = WIN_FindWndPtr( hwnd );
 560     SCROLLBAR_INFO *infoPtr = SCROLL_GetPtrScrollInfo( wndPtr, nBar );
 561
 562     if (!wndPtr || !infoPtr ||
 563         ((nBar == SB_VERT) && !(wndPtr->dwStyle & WS_VSCROLL)) ||
 564         ((nBar == SB_HORZ) && !(wndPtr->dwStyle & WS_HSCROLL))) return;
 565     if (!WIN_IsWindowDrawable( wndPtr, FALSE )) return;
 566
 567     vertical = SCROLL_GetScrollBarRect( hwnd, nBar, &rect,
 568                                         &arrowSize, &thumbSize, &thumbPos );
 569
 570       /* Draw the arrows */
 571
 572     if (arrows && arrowSize)
 573     {
 574         if( vertical == SCROLL_trackVertical && GetCapture32() == hwnd )
 575             SCROLL_DrawArrows( hdc, infoPtr, &rect, arrowSize, vertical,
 576                                (SCROLL_trackHitTest == SCROLL_TOP_ARROW),
 577                                (SCROLL_trackHitTest == SCROLL_BOTTOM_ARROW) );
 578         else
 579             SCROLL_DrawArrows( hdc, infoPtr, &rect, arrowSize, vertical,
 580                                                                FALSE, FALSE );
 581     }
 582     if( interior )
 583         SCROLL_DrawInterior( hwnd, hdc, nBar, &rect, arrowSize, thumbSize,
 584                          thumbPos, infoPtr->flags, vertical, FALSE, FALSE );
 585 }
 586
 587
 588 /***********************************************************************
 589  *           SCROLL_RefreshScrollBar
 590  *
 591  * Repaint the scroll bar interior after a SetScrollRange() or
 592  * SetScrollPos() call.
 593  */
 594 static void SCROLL_RefreshScrollBar( HWND32 hwnd, INT32 nBar,
 595                                      BOOL32 arrows, BOOL32 interior )
 596 {
 597     HDC32 hdc = GetDCEx32( hwnd, 0,
 598                            DCX_CACHE | ((nBar == SB_CTL) ? 0 : DCX_WINDOW) );
 599     if (!hdc) return;
 600
 601     SCROLL_DrawScrollBar( hwnd, hdc, nBar, arrows, interior );
 602     ReleaseDC32( hwnd, hdc );
 603 }
 604
 605
 606 /***********************************************************************
 607  *           SCROLL_HandleKbdEvent
 608  *
 609  * Handle a keyboard event (only for SB_CTL scrollbars).
 610  */
 611 static void SCROLL_HandleKbdEvent( HWND32 hwnd, WPARAM32 wParam )
 612 {
 613     WND *wndPtr = WIN_FindWndPtr( hwnd );
 614     WPARAM32 msg;
 615
 616     switch(wParam)
 617     {
 618     case VK_PRIOR: msg = SB_PAGEUP; break;
 619     case VK_NEXT:  msg = SB_PAGEDOWN; break;
 620     case VK_HOME:  msg = SB_TOP; break;
 621     case VK_END:   msg = SB_BOTTOM; break;
 622     case VK_UP:    msg = SB_LINEUP; break;
 623     case VK_DOWN:  msg = SB_LINEDOWN; break;
 624     default:
 625         return;
 626     }
 627     SendMessage32A( GetParent32(hwnd),
 628                     (wndPtr->dwStyle & SBS_VERT) ? WM_VSCROLL : WM_HSCROLL,
 629                     msg, hwnd );
 630 }
 631
 632
 633 /***********************************************************************
 634  *           SCROLL_HandleScrollEvent
 635  *
 636  * Handle a mouse or timer event for the scrollbar.
 637  * 'pt' is the location of the mouse event in client (for SB_CTL) or
 638  * windows coordinates.
 639  */
 640 void SCROLL_HandleScrollEvent( HWND32 hwnd, INT32 nBar, UINT32 msg, POINT32 pt)
 641 {
 642       /* Previous mouse position for timer events */
 643     static POINT32 prevPt;
 644       /* Thumb position when tracking started. */
 645     static UINT32 trackThumbPos;
 646       /* Position in the scroll-bar of the last button-down event. */
 647     static INT32 lastClickPos;
 648       /* Position in the scroll-bar of the last mouse event. */
 649     static INT32 lastMousePos;
 650
 651     enum SCROLL_HITTEST hittest;
 652     HWND32 hwndOwner, hwndCtl;
 653     BOOL32 vertical;
 654     INT32 arrowSize, thumbSize, thumbPos;
 655     RECT32 rect;
 656     HDC32 hdc;
 657
 658     SCROLLBAR_INFO *infoPtr = SCROLL_GetScrollInfo( hwnd, nBar );
 659     if (!infoPtr) return;
 660     if ((SCROLL_trackHitTest == SCROLL_NOWHERE) && (msg != WM_LBUTTONDOWN))
 661                   return;
 662
 663     hdc = GetDCEx32( hwnd, 0, DCX_CACHE | ((nBar == SB_CTL) ? 0 : DCX_WINDOW));
 664     vertical = SCROLL_GetScrollBarRect( hwnd, nBar, &rect,
 665                                         &arrowSize, &thumbSize, &thumbPos );
 666     hwndOwner = (nBar == SB_CTL) ? GetParent32(hwnd) : hwnd;
 667     hwndCtl   = (nBar == SB_CTL) ? hwnd : 0;
 668
 669     switch(msg)
 670     {
 671       case WM_LBUTTONDOWN:  /* Initialise mouse tracking */
 672           SCROLL_trackVertical = vertical;
 673           SCROLL_trackHitTest  = hittest = SCROLL_HitTest( hwnd, nBar, pt, FALSE );
 674           lastClickPos  = vertical ? (pt.y - rect.top) : (pt.x - rect.left);
 675           lastMousePos  = lastClickPos;
 676           trackThumbPos = thumbPos;
 677           prevPt = pt;
 678           SetCapture32( hwnd );
 679           if (nBar == SB_CTL) SetFocus32( hwnd );
 680           break;
 681
 682       case WM_MOUSEMOVE:
 683           hittest = SCROLL_HitTest( hwnd, nBar, pt, TRUE );
 684           prevPt = pt;
 685           break;
 686
 687       case WM_LBUTTONUP:
 688           hittest = SCROLL_NOWHERE;
 689           ReleaseCapture();
 690           break;
 691
 692       case WM_SYSTIMER:
 693           pt = prevPt;
 694           hittest = SCROLL_HitTest( hwnd, nBar, pt, FALSE );
 695           break;
 696
 697       default:
 698           return;  /* Should never happen */
 699     }
 700
 701     TRACE(scroll, "Event: hwnd=%04x bar=%d msg=%x pt=%d,%d hit=%d\n",
 702                  hwnd, nBar, msg, pt.x, pt.y, hittest );
 703
 704     switch(SCROLL_trackHitTest)
 705     {
 706     case SCROLL_NOWHERE:  /* No tracking in progress */
 707         break;
 708
 709     case SCROLL_TOP_ARROW:
 710         SCROLL_DrawArrows( hdc, infoPtr, &rect, arrowSize, vertical,
 711                            (hittest == SCROLL_trackHitTest), FALSE );
 712         if (hittest == SCROLL_trackHitTest)
 713         {
 714             if ((msg == WM_LBUTTONDOWN) || (msg == WM_SYSTIMER))
 715             {
 716                 SendMessage32A( hwndOwner, vertical ? WM_VSCROLL : WM_HSCROLL,
 717                                 SB_LINEUP, hwndCtl );
 718                 SetSystemTimer32( hwnd, SCROLL_TIMER, (msg == WM_LBUTTONDOWN) ?
 719                                   SCROLL_FIRST_DELAY : SCROLL_REPEAT_DELAY,
 720                                   (TIMERPROC32)0 );
 721             }
 722         }
 723         else KillSystemTimer32( hwnd, SCROLL_TIMER );
 724         break;
 725
 726     case SCROLL_TOP_RECT:
 727         SCROLL_DrawInterior( hwnd, hdc, nBar, &rect, arrowSize, thumbSize,
 728                              thumbPos, infoPtr->flags, vertical,
 729                              (hittest == SCROLL_trackHitTest), FALSE );
 730         if (hittest == SCROLL_trackHitTest)
 731         {
 732             if ((msg == WM_LBUTTONDOWN) || (msg == WM_SYSTIMER))
 733             {
 734                 SendMessage32A( hwndOwner, vertical ? WM_VSCROLL : WM_HSCROLL,
 735                                 SB_PAGEUP, hwndCtl );
 736                 SetSystemTimer32( hwnd, SCROLL_TIMER, (msg == WM_LBUTTONDOWN) ?
 737                                   SCROLL_FIRST_DELAY : SCROLL_REPEAT_DELAY,
 738                                   (TIMERPROC32)0 );
 739             }
 740         }
 741         else KillSystemTimer32( hwnd, SCROLL_TIMER );
 742         break;
 743
 744     case SCROLL_THUMB:
 745         if (msg == WM_LBUTTONDOWN)
 746         {
 747             SCROLL_TrackingWin = hwnd;
 748             SCROLL_TrackingBar = nBar;
 749             SCROLL_TrackingPos = trackThumbPos + lastMousePos - lastClickPos;
 750             SCROLL_DrawMovingThumb(hdc, &rect, vertical, arrowSize, thumbSize);
 751         }
 752         else if (msg == WM_LBUTTONUP)
 753         {
 754             SCROLL_TrackingWin = 0;
 755             SCROLL_MovingThumb = FALSE;
 756             SCROLL_DrawInterior( hwnd, hdc, nBar, &rect, arrowSize, thumbSize,
 757                                  thumbPos, infoPtr->flags, vertical,
 758                                  FALSE, FALSE );
 759         }
 760         else  /* WM_MOUSEMOVE */
 761         {
 762             UINT32 pos;
 763
 764             if (!SCROLL_PtInRectEx( &rect, pt, vertical )) pos = lastClickPos;
 765             else
 766             {
 767                 pt = SCROLL_ClipPos( &rect, pt );
 768                 pos = vertical ? (pt.y - rect.top) : (pt.x - rect.left);
 769             }
 770             if (pos != lastMousePos)
 771             {
 772                 SCROLL_DrawMovingThumb( hdc, &rect, vertical,
 773                                         arrowSize, thumbSize );
 774                 lastMousePos = pos;
 775                 SCROLL_TrackingPos = trackThumbPos + pos - lastClickPos;
 776                 SCROLL_TrackingVal = SCROLL_GetThumbVal( infoPtr, &rect,
 777                                                          vertical,
 778                                                          SCROLL_TrackingPos );
 779                 SendMessage32A( hwndOwner, vertical ? WM_VSCROLL : WM_HSCROLL,
 780                                 MAKEWPARAM( SB_THUMBTRACK, SCROLL_TrackingVal),
 781                                 hwndCtl );
 782                 SCROLL_DrawMovingThumb( hdc, &rect, vertical,
 783                                         arrowSize, thumbSize );
 784             }
 785         }
 786         break;
 787
 788     case SCROLL_BOTTOM_RECT:
 789         SCROLL_DrawInterior( hwnd, hdc, nBar, &rect, arrowSize, thumbSize,
 790                              thumbPos, infoPtr->flags, vertical,
 791                              FALSE, (hittest == SCROLL_trackHitTest) );
 792         if (hittest == SCROLL_trackHitTest)
 793         {
 794             if ((msg == WM_LBUTTONDOWN) || (msg == WM_SYSTIMER))
 795             {
 796                 SendMessage32A( hwndOwner, vertical ? WM_VSCROLL : WM_HSCROLL,
 797                                 SB_PAGEDOWN, hwndCtl );
 798                 SetSystemTimer32( hwnd, SCROLL_TIMER, (msg == WM_LBUTTONDOWN) ?
 799                                   SCROLL_FIRST_DELAY : SCROLL_REPEAT_DELAY,
 800                                   (TIMERPROC32)0 );
 801             }
 802         }
 803         else KillSystemTimer32( hwnd, SCROLL_TIMER );
 804         break;
 805
 806     case SCROLL_BOTTOM_ARROW:
 807         SCROLL_DrawArrows( hdc, infoPtr, &rect, arrowSize, vertical,
 808                            FALSE, (hittest == SCROLL_trackHitTest) );
 809         if (hittest == SCROLL_trackHitTest)
 810         {
 811             if ((msg == WM_LBUTTONDOWN) || (msg == WM_SYSTIMER))
 812             {
 813                 SendMessage32A( hwndOwner, vertical ? WM_VSCROLL : WM_HSCROLL,
 814                                 SB_LINEDOWN, hwndCtl );
 815                 SetSystemTimer32( hwnd, SCROLL_TIMER, (msg == WM_LBUTTONDOWN) ?
 816                                   SCROLL_FIRST_DELAY : SCROLL_REPEAT_DELAY,
 817                                   (TIMERPROC32)0 );
 818             }
 819         }
 820         else KillSystemTimer32( hwnd, SCROLL_TIMER );
 821         break;
 822     }
 823
 824     if (msg == WM_LBUTTONUP)
 825     {
 826         hittest = SCROLL_trackHitTest;
 827         SCROLL_trackHitTest = SCROLL_NOWHERE;  /* Terminate tracking */
 828
 829         if (hittest == SCROLL_THUMB)
 830         {
 831             UINT32 val = SCROLL_GetThumbVal( infoPtr, &rect, vertical,
 832                                  trackThumbPos + lastMousePos - lastClickPos );
 833             SendMessage32A( hwndOwner, vertical ? WM_VSCROLL : WM_HSCROLL,
 834                             MAKEWPARAM( SB_THUMBPOSITION, val ), hwndCtl );
 835         }
 836         else
 837             SendMessage32A( hwndOwner, vertical ? WM_VSCROLL : WM_HSCROLL,
 838                             SB_ENDSCROLL, hwndCtl );
 839     }
 840
 841     ReleaseDC32( hwnd, hdc );
 842 }
 843
 844
 845 /***********************************************************************
 846  *           ScrollBarWndProc
 847  */
 848 LRESULT WINAPI ScrollBarWndProc( HWND32 hwnd, UINT32 message, WPARAM32 wParam,
 849                                  LPARAM lParam )
 850 {
 851     switch(message)
 852     {
 853     case WM_CREATE:
 854         {
 855             CREATESTRUCT32A *lpCreat = (CREATESTRUCT32A *)lParam;
 856             if (lpCreat->style & SBS_SIZEBOX)
 857             {
 858                 FIXME(scroll, "Unimplemented style SBS_SIZEBOX.\n" );
 859                 return 0;
 860             }
 861
 862             if (lpCreat->style & SBS_VERT)
 863             {
 864                 if (lpCreat->style & SBS_LEFTALIGN)
 865                     MoveWindow32( hwnd, lpCreat->x, lpCreat->y,
 866                                   SYSMETRICS_CXVSCROLL+1, lpCreat->cy, FALSE );
 867                 else if (lpCreat->style & SBS_RIGHTALIGN)
 868                     MoveWindow32( hwnd,
 869                                   lpCreat->x+lpCreat->cx-SYSMETRICS_CXVSCROLL-1,
 870                                   lpCreat->y,
 871                                   SYSMETRICS_CXVSCROLL+1, lpCreat->cy, FALSE );
 872             }
 873             else  /* SBS_HORZ */
 874             {
 875                 if (lpCreat->style & SBS_TOPALIGN)
 876                     MoveWindow32( hwnd, lpCreat->x, lpCreat->y,
 877                                   lpCreat->cx, SYSMETRICS_CYHSCROLL+1, FALSE );
 878                 else if (lpCreat->style & SBS_BOTTOMALIGN)
 879                     MoveWindow32( hwnd,
 880                                   lpCreat->x,
 881                                   lpCreat->y+lpCreat->cy-SYSMETRICS_CYHSCROLL-1,
 882                                   lpCreat->cx, SYSMETRICS_CYHSCROLL+1, FALSE );
 883             }
 884         }
 885         if (!hUpArrow) SCROLL_LoadBitmaps();
 886         TRACE(scroll, "ScrollBar creation, hwnd=%04x\n", hwnd );
 887         return 0;
 888
 889     case WM_LBUTTONDOWN:
 890     case WM_LBUTTONUP:
 891     case WM_MOUSEMOVE:
 892     case WM_SYSTIMER:
 893         {
 894             POINT32 pt;
 895             CONV_POINT16TO32( (POINT16 *)&lParam, &pt );
 896             SCROLL_HandleScrollEvent( hwnd, SB_CTL, message, pt );
 897         }
 898         break;
 899
 900     case WM_KEYDOWN:
 901         SCROLL_HandleKbdEvent( hwnd, wParam );
 902         break;
 903
 904     case WM_ERASEBKGND:
 905          return 1;
 906
 907     case WM_GETDLGCODE:
 908          return DLGC_WANTARROWS; /* Windows returns this value */
 909
 910     case WM_PAINT:
 911         {
 912             PAINTSTRUCT32 ps;
 913             HDC32 hdc = BeginPaint32( hwnd, &ps );
 914             SCROLL_DrawScrollBar( hwnd, hdc, SB_CTL, TRUE, TRUE );
 915             EndPaint32( hwnd, &ps );
 916         }
 917         break;
 918
 919     case SBM_SETPOS16:
 920     case SBM_SETPOS32:
 921         return SetScrollPos32( hwnd, SB_CTL, wParam, (BOOL32)lParam );
 922
 923     case SBM_GETPOS16:
 924     case SBM_GETPOS32:
 925         return GetScrollPos32( hwnd, SB_CTL );
 926
 927     case SBM_SETRANGE16:
 928         SetScrollRange32( hwnd, SB_CTL, LOWORD(lParam), HIWORD(lParam),
 929                           wParam  /* FIXME: Is this correct? */ );
 930         return 0;
 931
 932     case SBM_SETRANGE32:
 933         SetScrollRange32( hwnd, SB_CTL, wParam, lParam, FALSE );
 934         return 0;  /* FIXME: return previous position */
 935
 936     case SBM_GETRANGE16:
 937         FIXME(scroll, "don't know how to handle SBM_GETRANGE16 (wp=%04x,lp=%08lx)\n", wParam, lParam );
 938         return 0;
 939
 940     case SBM_GETRANGE32:
 941         GetScrollRange32( hwnd, SB_CTL, (LPINT32)wParam, (LPINT32)lParam );
 942         return 0;
 943
 944     case SBM_ENABLE_ARROWS16:
 945     case SBM_ENABLE_ARROWS32:
 946         return EnableScrollBar32( hwnd, SB_CTL, wParam );
 947
 948     case SBM_SETRANGEREDRAW32:
 949         SetScrollRange32( hwnd, SB_CTL, wParam, lParam, TRUE );
 950         return 0;  /* FIXME: return previous position */
 951
 952     case SBM_SETSCROLLINFO32:
 953         return SetScrollInfo32( hwnd, SB_CTL, (SCROLLINFO *)lParam, wParam );
 954
 955     case SBM_GETSCROLLINFO32:
 956         return GetScrollInfo32( hwnd, SB_CTL, (SCROLLINFO *)lParam );
 957
 958     case 0x00e5:
 959     case 0x00e7:
 960     case 0x00e8:
 961     case 0x00eb:
 962     case 0x00ec:
 963     case 0x00ed:
 964     case 0x00ee:
 965     case 0x00ef:
 966         ERR(scroll, "unknown Win32 msg %04x wp=%08x lp=%08lx\n",
 967                     message, wParam, lParam );
 968         break;
 969
 970     default:
 971         if (message >= WM_USER)
 972             WARN(scroll, "unknown msg %04x wp=%04x lp=%08lx\n",
 973                          message, wParam, lParam );
 974         return DefWindowProc32A( hwnd, message, wParam, lParam );
 975     }
 976     return 0;
 977 }
 978
 979
 980 /*************************************************************************
 981  *           SetScrollInfo16   (USER.475)
 982  */
 983 INT16 WINAPI SetScrollInfo16( HWND16 hwnd, INT16 nBar, const SCROLLINFO *info,
 984                               BOOL16 bRedraw )
 985 {
 986     return (INT16)SetScrollInfo32( hwnd, nBar, info, bRedraw );
 987 }
 988
 989
 990 /*************************************************************************
 991  *           SetScrollInfo32   (USER32.501)
 992  * SetScrollInfo32 can be used to set the position, upper bound,
 993  * lower bound, and page size of a scrollbar control.
 994  *
 995  * RETURNS
 996  *    Scrollbar position
 997  *
 998  * NOTE
 999  *    For 100 lines of text to be displayed in a window of 25 lines,
1000  *  one would for instance use info->nMin=0, info->nMax=75
1001  *  (corresponding to the 76 different positions of the window on
1002  *  the text), and info->nPage=25.
1003  */
1004 INT32 WINAPI SetScrollInfo32(
1005 HWND32 hwnd /* [I] Handle of window whose scrollbar will be affected */,
1006 INT32 nBar /* [I] One of SB_HORZ, SB_VERT, or SB_CTL */,
1007 const SCROLLINFO *info /* [I] Specifies what to change and new values */,
1008 BOOL32 bRedraw /* [I] Should scrollbar be redrawn afterwards ? */)
1009 {
1010     INT32 action;
1011     INT32 retVal = SCROLL_SetScrollInfo( hwnd, nBar, info, &action );
1012
1013     if( action & SA_SSI_HIDE )
1014         SCROLL_ShowScrollBar( hwnd, nBar, FALSE, FALSE );
1015     else
1016     {
1017         if( action & SA_SSI_SHOW )
1018             if( SCROLL_ShowScrollBar( hwnd, nBar, TRUE, TRUE ) )
1019                 return retVal; /* SetWindowPos() already did the painting */
1020
1021         if( bRedraw && (action & SA_SSI_REFRESH))
1022             SCROLL_RefreshScrollBar( hwnd, nBar, TRUE, TRUE );
1023         else if( action & SA_SSI_REPAINT_ARROWS )
1024             SCROLL_RefreshScrollBar( hwnd, nBar, TRUE, FALSE );
1025     }
1026     return retVal;
1027 }
1028
1029 INT32 SCROLL_SetScrollInfo( HWND32 hwnd, INT32 nBar,
1030                             const SCROLLINFO *info, INT32 *action  )
1031 {
1032     /* Update the scrollbar state and set action flags according to
1033      * what has to be done graphics wise. */
1034
1035     SCROLLBAR_INFO *infoPtr;
1036     UINT32 new_flags;
1037
1038     dbg_decl_str(scroll, 256);
1039
1040    *action = 0;
1041
1042     if (!(infoPtr = SCROLL_GetScrollInfo(hwnd, nBar))) return 0;
1043     if (info->fMask & ~(SIF_ALL | SIF_DISABLENOSCROLL)) return 0;
1044     if ((info->cbSize != sizeof(*info)) &&
1045         (info->cbSize != sizeof(*info)-sizeof(info->nTrackPos))) return 0;
1046
1047     /* Set the page size */
1048
1049     if (info->fMask & SIF_PAGE)
1050     {
1051         dsprintf(scroll, " page=%d", info->nPage );
1052         if( infoPtr->Page != info->nPage )
1053         {
1054             infoPtr->Page = info->nPage;
1055            *action |= SA_SSI_REFRESH;
1056         }
1057     }
1058
1059     /* Set the scroll pos */
1060
1061     if (info->fMask & SIF_POS)
1062     {
1063         dsprintf(scroll, " pos=%d", info->nPos );
1064         if( infoPtr->CurVal != info->nPos )
1065         {
1066             infoPtr->CurVal = info->nPos;
1067            *action |= SA_SSI_REFRESH;
1068         }
1069     }
1070
1071     /* Set the scroll range */
1072
1073     if (info->fMask & SIF_RANGE)
1074     {
1075         dsprintf(scroll, " min=%d max=%d", info->nMin, info->nMax );
1076
1077         /* Invalid range -> range is set to (0,0) */
1078         if ((info->nMin > info->nMax) ||
1079             ((UINT32)(info->nMax - info->nMin) >= 0x80000000))
1080         {
1081             infoPtr->MinVal = 0;
1082             infoPtr->MaxVal = 0;
1083         }
1084         else
1085         {
1086             if( infoPtr->MinVal != info->nMin ||
1087                 infoPtr->MaxVal != info->nMax )
1088             {
1089                *action |= SA_SSI_REFRESH;
1090                 infoPtr->MinVal = info->nMin;
1091                 infoPtr->MaxVal = info->nMax;
1092             }
1093         }
1094     }
1095
1096     TRACE(scroll, "hwnd=%04x bar=%d %s\n",
1097                     hwnd, nBar, dbg_str(scroll));
1098
1099     /* Make sure the page size is valid */
1100
1101     if (infoPtr->Page < 0) infoPtr->Page = 0;
1102     else if (infoPtr->Page > infoPtr->MaxVal - infoPtr->MinVal + 1 )
1103         infoPtr->Page = infoPtr->MaxVal - infoPtr->MinVal + 1;
1104
1105     /* Make sure the pos is inside the range */
1106
1107     if (infoPtr->CurVal < infoPtr->MinVal)
1108         infoPtr->CurVal = infoPtr->MinVal;
1109     else if (infoPtr->CurVal > infoPtr->MaxVal - MAX( infoPtr->Page-1, 0 ))
1110         infoPtr->CurVal = infoPtr->MaxVal - MAX( infoPtr->Page-1, 0 );
1111
1112     TRACE(scroll, "    new values: page=%d pos=%d min=%d max=%d\n",
1113                  infoPtr->Page, infoPtr->CurVal,
1114                  infoPtr->MinVal, infoPtr->MaxVal );
1115
1116     /* Check if the scrollbar should be hidden or disabled */
1117
1118     if (info->fMask & (SIF_RANGE | SIF_PAGE | SIF_DISABLENOSCROLL))
1119     {
1120         new_flags = infoPtr->flags;
1121         if (infoPtr->MinVal >= infoPtr->MaxVal - MAX( infoPtr->Page-1, 0 ))
1122         {
1123             /* Hide or disable scroll-bar */
1124             if (info->fMask & SIF_DISABLENOSCROLL)
1125             {
1126                 new_flags = ESB_DISABLE_BOTH;
1127                *action |= SA_SSI_REFRESH;
1128             }
1129             else if (nBar != SB_CTL)
1130             {
1131                 *action = SA_SSI_HIDE;
1132                 goto done;
1133             }
1134         }
1135         else  /* Show and enable scroll-bar */
1136         {
1137             new_flags = 0;
1138             if (nBar != SB_CTL)
1139                 *action |= SA_SSI_SHOW;
1140         }
1141
1142         if (infoPtr->flags != new_flags) /* check arrow flags */
1143         {
1144             infoPtr->flags = new_flags;
1145            *action |= SA_SSI_REPAINT_ARROWS;
1146         }
1147     }
1148
1149 done:
1150     /* Return current position */
1151
1152     return infoPtr->CurVal;
1153 }
1154
1155
1156 /*************************************************************************
1157  *           GetScrollInfo16   (USER.476)
1158  */
1159 BOOL16 WINAPI GetScrollInfo16( HWND16 hwnd, INT16 nBar, LPSCROLLINFO info )
1160 {
1161     return GetScrollInfo32( hwnd, nBar, info );
1162 }
1163
1164
1165 /*************************************************************************
1166  *           GetScrollInfo32   (USER32.284)
1167  * GetScrollInfo32 can be used to retrieve the position, upper bound,
1168  * lower bound, and page size of a scrollbar control.
1169  *
1170  * RETURNS STD
1171  */
1172 BOOL32 WINAPI GetScrollInfo32(
1173   HWND32 hwnd /* [I] Handle of window */ ,
1174   INT32 nBar /* [I] One of SB_HORZ, SB_VERT, or SB_CTL */,
1175   LPSCROLLINFO info /* [IO] (info.fMask [I] specifies which values are to retrieve) */)
1176 {
1177     SCROLLBAR_INFO *infoPtr;
1178
1179     if (!(infoPtr = SCROLL_GetScrollInfo( hwnd, nBar ))) return FALSE;
1180     if (info->fMask & ~(SIF_ALL | SIF_DISABLENOSCROLL)) return FALSE;
1181     if ((info->cbSize != sizeof(*info)) &&
1182         (info->cbSize != sizeof(*info)-sizeof(info->nTrackPos))) return FALSE;
1183
1184     if (info->fMask & SIF_PAGE) info->nPage = infoPtr->Page;
1185     if (info->fMask & SIF_POS) info->nPos = infoPtr->CurVal;
1186     if ((info->fMask & SIF_TRACKPOS) && (info->cbSize == sizeof(*info)))
1187         info->nTrackPos = (SCROLL_TrackingWin==hwnd) ? SCROLL_TrackingVal : 0;
1188     if (info->fMask & SIF_RANGE)
1189     {
1190         info->nMin = infoPtr->MinVal;
1191         info->nMax = infoPtr->MaxVal;
1192     }
1193     return (info->fMask & SIF_ALL) != 0;
1194 }
1195
1196
1197 /*************************************************************************
1198  *           SetScrollPos16   (USER.62)
1199  */
1200 INT16 WINAPI SetScrollPos16( HWND16 hwnd, INT16 nBar, INT16 nPos,
1201                              BOOL16 bRedraw )
1202 {
1203     return (INT16)SetScrollPos32( hwnd, nBar, nPos, bRedraw );
1204 }
1205
1206
1207 /*************************************************************************
1208  *           SetScrollPos32   (USER32.502)
1209  *
1210  * RETURNS
1211  *    Success: Scrollbar position
1212  *    Failure: 0
1213  *
1214  * REMARKS
1215  *    Note the ambiguity when 0 is returned.  Use GetLastError
1216  *    to make sure there was an error (and to know which one).
1217  */
1218 INT32 WINAPI SetScrollPos32(
1219 HWND32 hwnd /* [I] Handle of window whose scrollbar will be affected */,
1220 INT32 nBar /* [I] One of SB_HORZ, SB_VERT, or SB_CTL */,
1221 INT32 nPos /* [I] New value */,
1222 BOOL32 bRedraw /* [I] Should scrollbar be redrawn afterwards ? */ )
1223 {
1224     SCROLLINFO info;
1225     SCROLLBAR_INFO *infoPtr;
1226     INT32 oldPos;
1227
1228     if (!(infoPtr = SCROLL_GetScrollInfo( hwnd, nBar ))) return 0;
1229     oldPos      = infoPtr->CurVal;
1230     info.cbSize = sizeof(info);
1231     info.nPos   = nPos;
1232     info.fMask  = SIF_POS;
1233     SetScrollInfo32( hwnd, nBar, &info, bRedraw );
1234     return oldPos;
1235 }
1236
1237
1238 /*************************************************************************
1239  *           GetScrollPos16   (USER.63)
1240  */
1241 INT16 WINAPI GetScrollPos16( HWND16 hwnd, INT16 nBar )
1242 {
1243     return (INT16)GetScrollPos32( hwnd, nBar );
1244 }
1245
1246
1247 /*************************************************************************
1248  *           GetScrollPos32   (USER32.285)
1249  *
1250  * RETURNS
1251  *    Success: Current position
1252  *    Failure: 0
1253  *
1254  * REMARKS
1255  *    Note the ambiguity when 0 is returned.  Use GetLastError
1256  *    to make sure there was an error (and to know which one).
1257  */
1258 INT32 WINAPI GetScrollPos32(
1259 HWND32 hwnd, /* [I] Handle of window */
1260 INT32 nBar /* [I] One of SB_HORZ, SB_VERT, or SB_CTL */)
1261 {
1262     SCROLLBAR_INFO *infoPtr;
1263
1264     if (!(infoPtr = SCROLL_GetScrollInfo( hwnd, nBar ))) return 0;
1265     return infoPtr->CurVal;
1266 }
1267
1268
1269 /*************************************************************************
1270  *           SetScrollRange16   (USER.64)
1271  */
1272 void WINAPI SetScrollRange16( HWND16 hwnd, INT16 nBar,
1273                               INT16 MinVal, INT16 MaxVal, BOOL16 bRedraw )
1274 {
1275     /* Invalid range -> range is set to (0,0) */
1276     if ((INT32)MaxVal - (INT32)MinVal > 0x7fff) MinVal = MaxVal = 0;
1277     SetScrollRange32( hwnd, nBar, MinVal, MaxVal, bRedraw );
1278 }
1279
1280
1281 /*************************************************************************
1282  *           SetScrollRange32   (USER32.503)
1283  *
1284  * RETURNS STD
1285  */
1286 BOOL32 WINAPI SetScrollRange32(
1287 HWND32 hwnd, /* [I] Handle of window whose scrollbar will be affected */
1288 INT32 nBar, /* [I] One of SB_HORZ, SB_VERT, or SB_CTL */
1289 INT32 MinVal, /* [I] New minimum value */
1290 INT32 MaxVal, /* [I] New maximum value */
1291 BOOL32 bRedraw /* [I] Should scrollbar be redrawn afterwards ? */)
1292 {
1293     SCROLLINFO info;
1294
1295     info.cbSize = sizeof(info);
1296     info.nMin   = MinVal;
1297     info.nMax   = MaxVal;
1298     info.fMask  = SIF_RANGE;
1299     SetScrollInfo32( hwnd, nBar, &info, bRedraw );
1300     return TRUE;
1301 }
1302
1303
1304 /*************************************************************************
1305  *           SCROLL_SetNCSbState
1306  *
1307  * Updates both scrollbars at the same time. Used by MDI CalcChildScroll().
1308  */
1309 INT32 SCROLL_SetNCSbState(WND* wndPtr, int vMin, int vMax, int vPos,
1310                                        int hMin, int hMax, int hPos)
1311 {
1312     INT32 vA, hA;
1313     SCROLLINFO vInfo, hInfo;
1314
1315     vInfo.cbSize = hInfo.cbSize = sizeof(SCROLLINFO);
1316     vInfo.nMin   = vMin;         hInfo.nMin   = hMin;
1317     vInfo.nMax   = vMax;         hInfo.nMax   = hMax;
1318     vInfo.nPos   = vPos;         hInfo.nPos   = hPos;
1319     vInfo.fMask  = hInfo.fMask = SIF_RANGE | SIF_POS;
1320
1321     SCROLL_SetScrollInfo( wndPtr->hwndSelf, SB_VERT, &vInfo, &vA );
1322     SCROLL_SetScrollInfo( wndPtr->hwndSelf, SB_HORZ, &hInfo, &hA );
1323
1324     if( !SCROLL_ShowScrollBar( wndPtr->hwndSelf, SB_BOTH,
1325                               (hA & SA_SSI_SHOW),(vA & SA_SSI_SHOW) ) )
1326     {
1327         /* SetWindowPos() wasn't called, just redraw the scrollbars if needed */
1328         if( vA & SA_SSI_REFRESH )
1329             SCROLL_RefreshScrollBar( wndPtr->hwndSelf, SB_VERT, FALSE, TRUE );
1330
1331         if( hA & SA_SSI_REFRESH )
1332             SCROLL_RefreshScrollBar( wndPtr->hwndSelf, SB_HORZ, FALSE, TRUE );
1333     }
1334     return 0;
1335 }
1336
1337
1338 /*************************************************************************
1339  *           GetScrollRange16   (USER.65)
1340  */
1341 BOOL16 WINAPI GetScrollRange16( HWND16 hwnd, INT16 nBar,
1342                                 LPINT16 lpMin, LPINT16 lpMax)
1343 {
1344     INT32 min, max;
1345     BOOL16 ret = GetScrollRange32( hwnd, nBar, &min, &max );
1346     if (lpMin) *lpMin = min;
1347     if (lpMax) *lpMax = max;
1348     return ret;
1349 }
1350
1351
1352 /*************************************************************************
1353  *           GetScrollRange32   (USER32.286)
1354  *
1355  * RETURNS STD
1356  */
1357 BOOL32 WINAPI GetScrollRange32(
1358 HWND32 hwnd, /* [I] Handle of window */
1359 INT32 nBar, /* [I] One of SB_HORZ, SB_VERT, or SB_CTL  */
1360 LPINT32 lpMin, /* [O] Where to store minimum value */
1361 LPINT32 lpMax /* [O] Where to store maximum value */)
1362 {
1363     SCROLLBAR_INFO *infoPtr;
1364
1365     if (!(infoPtr = SCROLL_GetScrollInfo( hwnd, nBar )))
1366     {
1367         if (lpMin) lpMin = 0;
1368         if (lpMax) lpMax = 0;
1369         return FALSE;
1370     }
1371     if (lpMin) *lpMin = infoPtr->MinVal;
1372     if (lpMax) *lpMax = infoPtr->MaxVal;
1373     return TRUE;
1374 }
1375
1376
1377 /*************************************************************************
1378  *           SCROLL_ShowScrollBar()
1379  *
1380  * Back-end for ShowScrollBar(). Returns FALSE if no action was taken.
1381  * NOTE: fShowV/fShowH must be zero when nBar is SB_HORZ/SB_VERT.
1382  */
1383 BOOL32 SCROLL_ShowScrollBar( HWND32 hwnd, INT32 nBar,
1384                              BOOL32 fShowH, BOOL32 fShowV )
1385 {
1386     WND *wndPtr = WIN_FindWndPtr( hwnd );
1387
1388     if (!wndPtr) return FALSE;
1389     TRACE(scroll, "hwnd=%04x bar=%d horz=%d, vert=%d\n",
1390                     hwnd, nBar, fShowH, fShowV );
1391
1392     switch(nBar)
1393     {
1394     case SB_CTL:
1395         ShowWindow32( hwnd, fShowH ? SW_SHOW : SW_HIDE );
1396         return TRUE;
1397
1398     case SB_BOTH:
1399     case SB_HORZ:
1400         if (fShowH)
1401         {
1402             fShowH = !(wndPtr->dwStyle & WS_HSCROLL);
1403             wndPtr->dwStyle |= WS_HSCROLL;
1404         }
1405         else  /* hide it */
1406         {
1407             fShowH = (wndPtr->dwStyle & WS_HSCROLL);
1408             wndPtr->dwStyle &= ~WS_HSCROLL;
1409         }
1410         if( nBar == SB_HORZ ) break;
1411         /* fall through */
1412
1413     case SB_VERT:
1414         if (fShowV)
1415         {
1416             fShowV = !(wndPtr->dwStyle & WS_VSCROLL);
1417             wndPtr->dwStyle |= WS_VSCROLL;
1418         }
1419         else  /* hide it */
1420         {
1421             fShowV = (wndPtr->dwStyle & WS_VSCROLL);
1422             wndPtr->dwStyle &= ~WS_VSCROLL;
1423         }
1424         break;
1425
1426     default:
1427         return FALSE;  /* Nothing to do! */
1428     }
1429
1430     if( fShowH || fShowV ) /* frame has been changed, let the window redraw itself */
1431     {
1432         SetWindowPos32( hwnd, 0, 0, 0, 0, 0, SWP_NOSIZE | SWP_NOMOVE
1433                     | SWP_NOACTIVATE | SWP_NOZORDER | SWP_FRAMECHANGED );
1434         return TRUE;
1435     }
1436
1437     return FALSE; /* no frame changes */
1438 }
1439
1440
1441 /*************************************************************************
1442  *           ShowScrollBar16   (USER.267)
1443  */
1444 void WINAPI ShowScrollBar16( HWND16 hwnd, INT16 nBar, BOOL16 fShow )
1445 {
1446     SCROLL_ShowScrollBar( hwnd, nBar, (nBar == SB_VERT) ? 0 : fShow,
1447                                       (nBar == SB_HORZ) ? 0 : fShow );
1448 }
1449
1450
1451 /*************************************************************************
1452  *           ShowScrollBar32   (USER32.532)
1453  *
1454  * RETURNS STD
1455  */
1456 BOOL32 WINAPI ShowScrollBar32(
1457 HWND32 hwnd, /* [I] Handle of window whose scrollbar(s) will be affected   */
1458 INT32 nBar, /* [I] One of SB_HORZ, SB_VERT, SB_BOTH or SB_CTL */
1459 BOOL32 fShow /* [I] TRUE = show, FALSE = hide  */)
1460 {
1461     SCROLL_ShowScrollBar( hwnd, nBar, (nBar == SB_VERT) ? 0 : fShow,
1462                                       (nBar == SB_HORZ) ? 0 : fShow );
1463     return TRUE;
1464 }
1465
1466
1467 /*************************************************************************
1468  *           EnableScrollBar16   (USER.482)
1469  */
1470 BOOL16 WINAPI EnableScrollBar16( HWND16 hwnd, INT16 nBar, UINT16 flags )
1471 {
1472     return EnableScrollBar32( hwnd, nBar, flags );
1473 }
1474
1475
1476 /*************************************************************************
1477  *           EnableScrollBar32   (USER32.171)
1478  */
1479 BOOL32 WINAPI EnableScrollBar32( HWND32 hwnd, INT32 nBar, UINT32 flags )
1480 {
1481     BOOL32 bFineWithMe;
1482     SCROLLBAR_INFO *infoPtr;
1483
1484     TRACE(scroll, "%04x %d %d\n", hwnd, nBar, flags );
1485
1486     flags &= ESB_DISABLE_BOTH;
1487
1488     if (nBar == SB_BOTH)
1489     {
1490         if (!(infoPtr = SCROLL_GetScrollInfo( hwnd, SB_VERT ))) return FALSE;
1491         if (!(bFineWithMe = (infoPtr->flags == flags)) )
1492         {
1493             infoPtr->flags = flags;
1494             SCROLL_RefreshScrollBar( hwnd, SB_VERT, TRUE, TRUE );
1495         }
1496         nBar = SB_HORZ;
1497     }
1498     else
1499         bFineWithMe = TRUE;
1500
1501     if (!(infoPtr = SCROLL_GetScrollInfo( hwnd, nBar ))) return FALSE;
1502     if (bFineWithMe && infoPtr->flags == flags) return FALSE;
1503     infoPtr->flags = flags;
1504
1505     SCROLL_RefreshScrollBar( hwnd, nBar, TRUE, TRUE );
1506     return TRUE;
1507 }