2 * Interface code to SCROLLBAR widget
4 * Copyright Martin Ayotte, 1993
5 * Copyright Alexandre Julliard, 1994
7 * Small fixes and implemented SB_THUMBPOSITION
8 * by Peter Broadhurst, 940611
13 #include <sys/types.h>
17 #include "sysmetrics.h"
23 /* #define DEBUG_SCROLL */
27 static HBITMAP hUpArrow
= 0;
28 static HBITMAP hDnArrow
= 0;
29 static HBITMAP hLfArrow
= 0;
30 static HBITMAP hRgArrow
= 0;
31 static HBITMAP hUpArrowD
= 0;
32 static HBITMAP hDnArrowD
= 0;
33 static HBITMAP hLfArrowD
= 0;
34 static HBITMAP hRgArrowD
= 0;
35 static HBITMAP hUpArrowI
= 0;
36 static HBITMAP hDnArrowI
= 0;
37 static HBITMAP hLfArrowI
= 0;
38 static HBITMAP hRgArrowI
= 0;
40 #define TOP_ARROW(flags,pressed) \
41 (((flags)&ESB_DISABLE_UP) ? hUpArrowI : ((pressed) ? hUpArrowD:hUpArrow))
42 #define BOTTOM_ARROW(flags,pressed) \
43 (((flags)&ESB_DISABLE_DOWN) ? hDnArrowI : ((pressed) ? hDnArrowD:hDnArrow))
44 #define LEFT_ARROW(flags,pressed) \
45 (((flags)&ESB_DISABLE_LEFT) ? hLfArrowI : ((pressed) ? hLfArrowD:hLfArrow))
46 #define RIGHT_ARROW(flags,pressed) \
47 (((flags)&ESB_DISABLE_RIGHT) ? hRgArrowI : ((pressed) ? hRgArrowD:hRgArrow))
50 /* Minimum size of the rectangle between the arrows */
51 #define SCROLL_MIN_RECT 4
53 /* Delay (in ms) before first repetition when holding the button down */
54 #define SCROLL_FIRST_DELAY 200
56 /* Delay (in ms) between scroll repetitions */
57 #define SCROLL_REPEAT_DELAY 100
60 #define SCROLL_TIMER 0
62 /* Scroll-bar hit testing */
65 SCROLL_NOWHERE
, /* Outside the scroll bar */
66 SCROLL_TOP_ARROW
, /* Top or left arrow */
67 SCROLL_TOP_RECT
, /* Rectangle between the top arrow and the thumb */
68 SCROLL_THUMB
, /* Thumb rectangle */
69 SCROLL_BOTTOM_RECT
, /* Rectangle between the thumb and the bottom arrow */
70 SCROLL_BOTTOM_ARROW
/* Bottom or right arrow */
74 /***********************************************************************
77 static void SCROLL_LoadBitmaps(void)
79 hUpArrow
= LoadBitmap((HINSTANCE
)NULL
, MAKEINTRESOURCE(OBM_UPARROW
));
80 hDnArrow
= LoadBitmap((HINSTANCE
)NULL
, MAKEINTRESOURCE(OBM_DNARROW
));
81 hLfArrow
= LoadBitmap((HINSTANCE
)NULL
, MAKEINTRESOURCE(OBM_LFARROW
));
82 hRgArrow
= LoadBitmap((HINSTANCE
)NULL
, MAKEINTRESOURCE(OBM_RGARROW
));
83 hUpArrowD
= LoadBitmap((HINSTANCE
)NULL
, MAKEINTRESOURCE(OBM_UPARROWD
));
84 hDnArrowD
= LoadBitmap((HINSTANCE
)NULL
, MAKEINTRESOURCE(OBM_DNARROWD
));
85 hLfArrowD
= LoadBitmap((HINSTANCE
)NULL
, MAKEINTRESOURCE(OBM_LFARROWD
));
86 hRgArrowD
= LoadBitmap((HINSTANCE
)NULL
, MAKEINTRESOURCE(OBM_RGARROWD
));
87 hUpArrowI
= LoadBitmap((HINSTANCE
)NULL
, MAKEINTRESOURCE(OBM_UPARROWI
));
88 hDnArrowI
= LoadBitmap((HINSTANCE
)NULL
, MAKEINTRESOURCE(OBM_DNARROWI
));
89 hLfArrowI
= LoadBitmap((HINSTANCE
)NULL
, MAKEINTRESOURCE(OBM_LFARROWI
));
90 hRgArrowI
= LoadBitmap((HINSTANCE
)NULL
, MAKEINTRESOURCE(OBM_RGARROWI
));
94 /***********************************************************************
95 * SCROLL_GetScrollInfo
97 static SCROLLINFO
*SCROLL_GetScrollInfo( HWND hwnd
, int nBar
)
100 WND
*wndPtr
= WIN_FindWndPtr( hwnd
);
102 if (!wndPtr
) return NULL
;
105 case SB_HORZ
: handle
= wndPtr
->hHScroll
; break;
106 case SB_VERT
: handle
= wndPtr
->hVScroll
; break;
107 case SB_CTL
: return (SCROLLINFO
*)wndPtr
->wExtra
;
108 default: return NULL
;
111 if (!handle
) /* Create the info structure if needed */
113 if ((handle
= USER_HEAP_ALLOC( sizeof(SCROLLINFO
) )))
115 SCROLLINFO
*infoPtr
= (SCROLLINFO
*) USER_HEAP_LIN_ADDR( handle
);
116 infoPtr
->MinVal
= infoPtr
->CurVal
= 0;
117 infoPtr
->MaxVal
= 100;
118 infoPtr
->flags
= ESB_ENABLE_BOTH
;
119 if (nBar
== SB_HORZ
) wndPtr
->hHScroll
= handle
;
120 else wndPtr
->hVScroll
= handle
;
122 if (!hUpArrow
) SCROLL_LoadBitmaps();
124 return (SCROLLINFO
*) USER_HEAP_LIN_ADDR( handle
);
128 /***********************************************************************
129 * SCROLL_GetScrollBarRect
131 * Compute the scroll bar rectangle, in drawing coordinates (i.e. client
132 * coords for SB_CTL, window coords for SB_VERT and SB_HORZ).
133 * 'arrowSize' returns the width or height of an arrow (depending on the
134 * orientation of the scrollbar), and 'thumbPos' returns the position of
135 * the thumb relative to the left or to the top.
136 * Return TRUE if the scrollbar is vertical, FALSE if horizontal.
138 static BOOL
SCROLL_GetScrollBarRect( HWND hwnd
, int nBar
, RECT
*lprect
,
139 WORD
*arrowSize
, WORD
*thumbPos
)
143 WND
*wndPtr
= WIN_FindWndPtr( hwnd
);
148 lprect
->left
= wndPtr
->rectClient
.left
- wndPtr
->rectWindow
.left
- 1;
149 lprect
->top
= wndPtr
->rectClient
.bottom
- wndPtr
->rectWindow
.top
;
150 lprect
->right
= wndPtr
->rectClient
.right
- wndPtr
->rectWindow
.left
+1;
151 lprect
->bottom
= lprect
->top
+ SYSMETRICS_CYHSCROLL
+ 1;
156 lprect
->left
= wndPtr
->rectClient
.right
- wndPtr
->rectWindow
.left
;
157 lprect
->top
= wndPtr
->rectClient
.top
- wndPtr
->rectWindow
.top
- 1;
158 lprect
->right
= lprect
->left
+ SYSMETRICS_CXVSCROLL
+ 1;
159 lprect
->bottom
= wndPtr
->rectClient
.bottom
- wndPtr
->rectWindow
.top
+1;
164 GetClientRect( hwnd
, lprect
);
165 vertical
= ((wndPtr
->dwStyle
& SBS_VERT
) != 0);
172 if (vertical
) pixels
= lprect
->bottom
- lprect
->top
;
173 else pixels
= lprect
->right
- lprect
->left
;
175 if (pixels
> 2*SYSMETRICS_CXVSCROLL
+ SCROLL_MIN_RECT
)
177 *arrowSize
= SYSMETRICS_CXVSCROLL
;
179 else if (pixels
> SCROLL_MIN_RECT
)
181 *arrowSize
= (pixels
- SCROLL_MIN_RECT
) / 2;
185 if ((pixels
-= 3*SYSMETRICS_CXVSCROLL
+1) > 0)
187 SCROLLINFO
*info
= SCROLL_GetScrollInfo( hwnd
, nBar
);
188 if ((info
->flags
& ESB_DISABLE_BOTH
) == ESB_DISABLE_BOTH
)
190 else if (info
->MinVal
== info
->MaxVal
)
191 *thumbPos
= *arrowSize
;
193 *thumbPos
= *arrowSize
+ pixels
* (info
->CurVal
- info
->MinVal
) /
194 (info
->MaxVal
- info
->MinVal
);
201 /***********************************************************************
204 * Compute the current scroll position based on the thumb position in pixels
205 * from the top of the scroll-bar.
207 static UINT
SCROLL_GetThumbVal( SCROLLINFO
*infoPtr
, RECT
*rect
,
208 BOOL vertical
, WORD pos
)
210 int pixels
= vertical
? rect
->bottom
-rect
->top
: rect
->right
-rect
->left
;
211 if ((pixels
-= 3*SYSMETRICS_CXVSCROLL
+1) <= 0) return infoPtr
->MinVal
;
212 pos
= max( 0, pos
- SYSMETRICS_CXVSCROLL
);
213 if (pos
> pixels
) pos
= pixels
;
214 dprintf_scroll(stddeb
,"GetThumbVal: pos=%d ret=%d\n", pos
,
216 + (UINT
)(((int)pos
* (infoPtr
->MaxVal
-infoPtr
->MinVal
) + pixels
/2)
218 return (infoPtr
->MinVal
219 + (UINT
)(((int)pos
* (infoPtr
->MaxVal
-infoPtr
->MinVal
) + pixels
/2)
224 /***********************************************************************
227 * Scroll-bar hit testing (don't confuse this with WM_NCHITTEST!).
229 static enum SCROLL_HITTEST
SCROLL_HitTest( HWND hwnd
, int nBar
, POINT pt
)
231 WORD arrowSize
, thumbPos
;
234 BOOL vertical
= SCROLL_GetScrollBarRect( hwnd
, nBar
, &rect
,
235 &arrowSize
, &thumbPos
);
236 if (!PtInRect( &rect
, pt
)) return SCROLL_NOWHERE
;
240 if (pt
.y
<= rect
.top
+ arrowSize
+ 1) return SCROLL_TOP_ARROW
;
241 if (pt
.y
>= rect
.bottom
- arrowSize
) return SCROLL_BOTTOM_ARROW
;
242 if (!thumbPos
) return SCROLL_TOP_RECT
;
244 if (pt
.y
< (INT
)thumbPos
) return SCROLL_TOP_RECT
;
245 if (pt
.y
> thumbPos
+SYSMETRICS_CYHSCROLL
) return SCROLL_BOTTOM_RECT
;
248 else /* horizontal */
250 if (pt
.x
<= rect
.left
+ arrowSize
) return SCROLL_TOP_ARROW
;
251 if (pt
.x
>= rect
.right
- arrowSize
) return SCROLL_BOTTOM_ARROW
;
252 if (!thumbPos
) return SCROLL_TOP_RECT
;
254 if (pt
.x
< (INT
)thumbPos
) return SCROLL_TOP_RECT
;
255 if (pt
.x
> thumbPos
+SYSMETRICS_CXVSCROLL
) return SCROLL_BOTTOM_RECT
;
261 /***********************************************************************
264 * Draw the scroll bar arrows.
266 static void SCROLL_DrawArrows( HDC hdc
, SCROLLINFO
*infoPtr
, RECT
*rect
,
267 WORD arrowSize
, BOOL vertical
,
268 BOOL top_pressed
, BOOL bottom_pressed
)
270 HDC hdcMem
= CreateCompatibleDC( hdc
);
271 HBITMAP hbmpPrev
= SelectObject( hdcMem
, vertical
?
272 TOP_ARROW(infoPtr
->flags
, top_pressed
)
273 : LEFT_ARROW(infoPtr
->flags
, top_pressed
));
274 SetStretchBltMode( hdc
, STRETCH_DELETESCANS
);
275 StretchBlt( hdc
, rect
->left
, rect
->top
,
276 vertical
? rect
->right
-rect
->left
: arrowSize
+1,
277 vertical
? arrowSize
+1 : rect
->bottom
-rect
->top
,
279 SYSMETRICS_CXVSCROLL
+ 1, SYSMETRICS_CYHSCROLL
+ 1,
282 SelectObject( hdcMem
, vertical
?
283 BOTTOM_ARROW( infoPtr
->flags
, bottom_pressed
)
284 : RIGHT_ARROW( infoPtr
->flags
, bottom_pressed
) );
286 StretchBlt( hdc
, rect
->left
, rect
->bottom
- arrowSize
- 1,
287 rect
->right
- rect
->left
, arrowSize
+ 1,
289 SYSMETRICS_CXVSCROLL
+ 1, SYSMETRICS_CYHSCROLL
+ 1,
292 StretchBlt( hdc
, rect
->right
- arrowSize
- 1, rect
->top
,
293 arrowSize
+ 1, rect
->bottom
- rect
->top
,
295 SYSMETRICS_CXVSCROLL
+ 1, SYSMETRICS_CYHSCROLL
+ 1,
297 SelectObject( hdcMem
, hbmpPrev
);
302 /***********************************************************************
303 * SCROLL_DrawMovingThumb
305 * Draw the moving thumb rectangle.
307 static void SCROLL_DrawMovingThumb( HDC hdc
, RECT
*rect
, BOOL vertical
,
308 WORD arrowSize
, WORD thumbPos
)
314 if (r
.top
< rect
->top
+ arrowSize
) r
.top
= rect
->top
+ arrowSize
;
315 if (r
.top
+ SYSMETRICS_CYHSCROLL
>= rect
->bottom
- arrowSize
)
316 r
.top
= rect
->bottom
- arrowSize
- SYSMETRICS_CYHSCROLL
- 1;
317 r
.bottom
= r
.top
+ SYSMETRICS_CYHSCROLL
+ 1;
322 if (r
.left
< rect
->left
+ arrowSize
) r
.left
= rect
->left
+ arrowSize
;
323 if (r
.left
+ SYSMETRICS_CXVSCROLL
>= rect
->right
- arrowSize
)
324 r
.left
= rect
->right
- arrowSize
- SYSMETRICS_CXVSCROLL
- 1;
325 r
.right
= r
.left
+ SYSMETRICS_CXVSCROLL
+ 1;
327 InflateRect( &r
, -1, -1 );
328 DrawFocusRect( hdc
, &r
);
332 /***********************************************************************
333 * SCROLL_DrawInterior
335 * Draw the scroll bar interior (everything except the arrows).
337 static void SCROLL_DrawInterior( HWND hwnd
, HDC hdc
, int nBar
, RECT
*rect
,
338 WORD arrowSize
, WORD thumbPos
, WORD flags
,
339 BOOL vertical
, BOOL top_selected
,
340 BOOL bottom_selected
)
344 /* Select the correct brush and pen */
346 SelectObject( hdc
, sysColorObjects
.hpenWindowFrame
);
347 if ((flags
& ESB_DISABLE_BOTH
) == ESB_DISABLE_BOTH
)
349 /* This ought to be the color of the parent window */
350 SelectObject( hdc
, sysColorObjects
.hbrushWindow
);
354 if (nBar
== SB_CTL
) /* Only scrollbar controls send WM_CTLCOLOR */
356 HBRUSH hbrush
= SendMessage( GetParent(hwnd
), WM_CTLCOLOR
, hdc
,
357 MAKELONG(hwnd
, CTLCOLOR_SCROLLBAR
) );
358 SelectObject( hdc
, hbrush
);
360 else SelectObject( hdc
, sysColorObjects
.hbrushScrollbar
);
363 /* Calculate the scroll rectangle */
369 r
.bottom
-= arrowSize
;
374 r
.right
-= arrowSize
;
377 /* Draw the scroll bar frame */
379 MoveTo( hdc
, r
.left
, r
.top
);
380 LineTo( hdc
, r
.right
-1, r
.top
);
381 LineTo( hdc
, r
.right
-1, r
.bottom
-1 );
382 LineTo( hdc
, r
.left
, r
.bottom
-1 );
383 LineTo( hdc
, r
.left
, r
.top
);
385 /* Draw the scroll rectangles and thumb */
387 if (!thumbPos
) /* No thumb to draw */
389 PatBlt( hdc
, r
.left
+1, r
.top
+1, r
.right
- r
.left
- 2,
390 r
.bottom
- r
.top
- 2, PATCOPY
);
396 PatBlt( hdc
, r
.left
+ 1, r
.top
+ 1,
397 r
.right
- r
.left
- 2,
398 thumbPos
- arrowSize
,
399 top_selected
? 0x0f0000 : PATCOPY
);
400 r
.top
+= thumbPos
- arrowSize
;
401 PatBlt( hdc
, r
.left
+ 1, r
.top
+ SYSMETRICS_CYHSCROLL
+ 1,
402 r
.right
- r
.left
- 2,
403 r
.bottom
- r
.top
- SYSMETRICS_CYHSCROLL
- 2,
404 bottom_selected
? 0x0f0000 : PATCOPY
);
405 r
.bottom
= r
.top
+ SYSMETRICS_CYHSCROLL
+ 1;
407 else /* horizontal */
409 PatBlt( hdc
, r
.left
+ 1, r
.top
+ 1,
410 thumbPos
- arrowSize
,
411 r
.bottom
- r
.top
- 2,
412 top_selected
? 0x0f0000 : PATCOPY
);
413 r
.left
+= thumbPos
- arrowSize
;
414 PatBlt( hdc
, r
.left
+ SYSMETRICS_CYHSCROLL
+ 1, r
.top
+ 1,
415 r
.right
- r
.left
- SYSMETRICS_CYHSCROLL
- 2,
416 r
.bottom
- r
.top
- 2,
417 bottom_selected
? 0x0f0000 : PATCOPY
);
418 r
.right
= r
.left
+ SYSMETRICS_CXVSCROLL
+ 1;
423 SelectObject( hdc
, sysColorObjects
.hbrushBtnFace
);
424 Rectangle( hdc
, r
.left
, r
.top
, r
.right
, r
.bottom
);
425 InflateRect( &r
, -1, -1 );
426 GRAPH_DrawReliefRect( hdc
, &r
, 1, 2, FALSE
);
430 /***********************************************************************
431 * SCROLL_DrawScrollBar
433 * Redraw the whole scrollbar.
435 void SCROLL_DrawScrollBar( HWND hwnd
, HDC hdc
, int nBar
)
437 WORD arrowSize
, thumbPos
;
440 WND
*wndPtr
= WIN_FindWndPtr( hwnd
);
441 SCROLLINFO
*infoPtr
= SCROLL_GetScrollInfo( hwnd
, nBar
);
443 if (!wndPtr
|| !infoPtr
||
444 ((nBar
== SB_VERT
) && !(wndPtr
->dwStyle
& WS_VSCROLL
)) ||
445 ((nBar
== SB_HORZ
) && !(wndPtr
->dwStyle
& WS_HSCROLL
))) return;
447 vertical
= SCROLL_GetScrollBarRect( hwnd
, nBar
, &rect
,
448 &arrowSize
, &thumbPos
);
449 /* Draw the arrows */
451 if (arrowSize
) SCROLL_DrawArrows( hdc
, infoPtr
, &rect
, arrowSize
,
452 vertical
, FALSE
, FALSE
);
454 SCROLL_DrawInterior( hwnd
, hdc
, nBar
, &rect
, arrowSize
, thumbPos
,
455 infoPtr
->flags
, vertical
, FALSE
, FALSE
);
459 /***********************************************************************
460 * SCROLL_RefreshScrollBar
462 * Repaint the scroll bar interior after a SetScrollRange() or
463 * SetScrollPos() call.
465 static void SCROLL_RefreshScrollBar( HWND hwnd
, int nBar
)
467 WORD arrowSize
, thumbPos
;
471 WND
*wndPtr
= WIN_FindWndPtr( hwnd
);
472 SCROLLINFO
*infoPtr
= SCROLL_GetScrollInfo( hwnd
, nBar
);
474 if (!wndPtr
|| !infoPtr
||
475 ((nBar
== SB_VERT
) && !(wndPtr
->dwStyle
& WS_VSCROLL
)) ||
476 ((nBar
== SB_HORZ
) && !(wndPtr
->dwStyle
& WS_HSCROLL
))) return;
478 vertical
= SCROLL_GetScrollBarRect( hwnd
, nBar
, &rect
,
479 &arrowSize
, &thumbPos
);
480 hdc
= (nBar
== SB_CTL
) ? GetDC(hwnd
) : GetWindowDC(hwnd
);
482 SCROLL_DrawInterior( hwnd
, hdc
, nBar
, &rect
, arrowSize
, thumbPos
,
483 infoPtr
->flags
, vertical
, FALSE
, FALSE
);
484 ReleaseDC( hwnd
, hdc
);
488 /***********************************************************************
489 * SCROLL_HandleKbdEvent
491 * Handle a keyboard event (only for SB_CTL scrollbars).
493 static void SCROLL_HandleKbdEvent( HWND hwnd
, WORD wParam
)
495 WND
*wndPtr
= WIN_FindWndPtr( hwnd
);
500 case VK_PRIOR
: msg
= SB_PAGEUP
; break;
501 case VK_NEXT
: msg
= SB_PAGEDOWN
; break;
502 case VK_HOME
: msg
= SB_TOP
; break;
503 case VK_END
: msg
= SB_BOTTOM
; break;
504 case VK_UP
: msg
= SB_LINEUP
; break;
505 case VK_DOWN
: msg
= SB_LINEDOWN
; break;
509 SendMessage( GetParent(hwnd
),
510 (wndPtr
->dwStyle
& SBS_VERT
) ? WM_VSCROLL
: WM_HSCROLL
,
511 msg
, MAKELONG( 0, hwnd
));
515 /***********************************************************************
516 * SCROLL_HandleScrollEvent
518 * Handle a mouse or timer event for the scrollbar.
519 * 'pt' is the location of the mouse event in client (for SB_CTL) or
520 * windows coordinates.
522 void SCROLL_HandleScrollEvent( HWND hwnd
, int nBar
, WORD msg
, POINT pt
)
524 /* Previous mouse position for timer events */
526 /* Hit test code of the last button-down event */
527 static enum SCROLL_HITTEST trackHitTest
;
528 /* Thumb position when tracking started. */
529 static UINT trackThumbPos
;
530 /* Position in the scroll-bar of the last button-down event. */
531 static int lastClickPos
;
532 /* Position in the scroll-bar of the last mouse event. */
533 static int lastMousePos
;
535 enum SCROLL_HITTEST hittest
;
536 HWND hwndOwner
, hwndCtl
;
538 WORD arrowSize
, thumbPos
;
542 SCROLLINFO
*infoPtr
= SCROLL_GetScrollInfo( hwnd
, nBar
);
543 if (!infoPtr
) return;
544 if ((trackHitTest
== SCROLL_NOWHERE
) && (msg
!= WM_LBUTTONDOWN
)) return;
546 hdc
= (nBar
== SB_CTL
) ? GetDC(hwnd
) : GetWindowDC(hwnd
);
547 vertical
= SCROLL_GetScrollBarRect( hwnd
, nBar
, &rect
,
548 &arrowSize
, &thumbPos
);
549 hwndOwner
= (nBar
== SB_CTL
) ? GetParent(hwnd
) : hwnd
;
550 hwndCtl
= (nBar
== SB_CTL
) ? hwnd
: 0;
554 case WM_LBUTTONDOWN
: /* Initialise mouse tracking */
555 trackHitTest
= hittest
= SCROLL_HitTest( hwnd
, nBar
, pt
);
556 lastClickPos
= vertical
? (pt
.y
- rect
.top
) : (pt
.x
- rect
.left
);
557 lastMousePos
= lastClickPos
;
558 trackThumbPos
= thumbPos
;
561 if (nBar
== SB_CTL
) SetFocus( hwnd
);
565 hittest
= SCROLL_HitTest( hwnd
, nBar
, pt
);
570 hittest
= SCROLL_NOWHERE
;
576 hittest
= SCROLL_HitTest( hwnd
, nBar
, pt
);
580 return; /* Should never happen */
583 dprintf_scroll( stddeb
, "ScrollBar Event: hwnd=%x bar=%d msg=%x pt=%d,%d hit=%d\n",
584 hwnd
, nBar
, msg
, pt
.x
, pt
.y
, hittest
);
588 case SCROLL_NOWHERE
: /* No tracking in progress */
591 case SCROLL_TOP_ARROW
:
592 SCROLL_DrawArrows( hdc
, infoPtr
, &rect
, arrowSize
, vertical
,
593 (hittest
== trackHitTest
), FALSE
);
594 if (hittest
== trackHitTest
)
596 if ((msg
== WM_LBUTTONDOWN
) || (msg
== WM_SYSTIMER
))
598 SetSystemTimer( hwnd
, SCROLL_TIMER
, (msg
== WM_LBUTTONDOWN
) ?
599 SCROLL_FIRST_DELAY
: SCROLL_REPEAT_DELAY
,
601 SendMessage( hwndOwner
, vertical
? WM_VSCROLL
: WM_HSCROLL
,
602 SB_LINEUP
, MAKELONG( 0, hwndCtl
));
605 else KillSystemTimer( hwnd
, SCROLL_TIMER
);
608 case SCROLL_TOP_RECT
:
609 SCROLL_DrawInterior( hwnd
, hdc
, nBar
, &rect
, arrowSize
, thumbPos
,
610 infoPtr
->flags
, vertical
,
611 (hittest
== trackHitTest
), FALSE
);
612 if (hittest
== trackHitTest
)
614 if ((msg
== WM_LBUTTONDOWN
) || (msg
== WM_SYSTIMER
))
616 SetSystemTimer( hwnd
, SCROLL_TIMER
, (msg
== WM_LBUTTONDOWN
) ?
617 SCROLL_FIRST_DELAY
: SCROLL_REPEAT_DELAY
,
619 SendMessage( hwndOwner
, vertical
? WM_VSCROLL
: WM_HSCROLL
,
620 SB_PAGEUP
, MAKELONG( 0, hwndCtl
));
623 else KillSystemTimer( hwnd
, SCROLL_TIMER
);
627 if (msg
== WM_LBUTTONDOWN
)
628 SCROLL_DrawMovingThumb( hdc
, &rect
, vertical
, arrowSize
,
629 trackThumbPos
+ lastMousePos
- lastClickPos
);
630 else if (msg
== WM_LBUTTONUP
)
631 SCROLL_DrawInterior( hwnd
, hdc
, nBar
, &rect
, arrowSize
, thumbPos
,
632 infoPtr
->flags
, vertical
, FALSE
, FALSE
);
633 else /* WM_MOUSEMOVE */
637 if (!PtInRect( &rect
, pt
)) pos
= lastClickPos
;
638 else pos
= vertical
? (pt
.y
- rect
.top
) : (pt
.x
- rect
.left
);
639 if (pos
!= lastMousePos
)
641 SCROLL_DrawMovingThumb( hdc
, &rect
, vertical
, arrowSize
,
642 trackThumbPos
+ lastMousePos
- lastClickPos
);
643 SCROLL_DrawMovingThumb( hdc
, &rect
, vertical
, arrowSize
,
644 trackThumbPos
+ pos
- lastClickPos
);
646 val
= SCROLL_GetThumbVal( infoPtr
, &rect
, vertical
,
647 trackThumbPos
+ lastMousePos
- lastClickPos
);
648 SendMessage( hwndOwner
, vertical
? WM_VSCROLL
: WM_HSCROLL
,
649 SB_THUMBTRACK
, MAKELONG( val
, hwndCtl
));
654 case SCROLL_BOTTOM_RECT
:
655 SCROLL_DrawInterior( hwnd
, hdc
, nBar
, &rect
, arrowSize
, thumbPos
,
656 infoPtr
->flags
, vertical
,
657 FALSE
, (hittest
== trackHitTest
) );
658 if (hittest
== trackHitTest
)
660 if ((msg
== WM_LBUTTONDOWN
) || (msg
== WM_SYSTIMER
))
662 SetSystemTimer( hwnd
, SCROLL_TIMER
, (msg
== WM_LBUTTONDOWN
) ?
663 SCROLL_FIRST_DELAY
: SCROLL_REPEAT_DELAY
,
665 SendMessage( hwndOwner
, vertical
? WM_VSCROLL
: WM_HSCROLL
,
666 SB_PAGEDOWN
, MAKELONG( 0, hwndCtl
));
669 else KillSystemTimer( hwnd
, SCROLL_TIMER
);
672 case SCROLL_BOTTOM_ARROW
:
673 SCROLL_DrawArrows( hdc
, infoPtr
, &rect
, arrowSize
, vertical
,
674 FALSE
, (hittest
== trackHitTest
) );
675 if (hittest
== trackHitTest
)
677 if ((msg
== WM_LBUTTONDOWN
) || (msg
== WM_SYSTIMER
))
679 SetSystemTimer( hwnd
, SCROLL_TIMER
, (msg
== WM_LBUTTONDOWN
) ?
680 SCROLL_FIRST_DELAY
: SCROLL_REPEAT_DELAY
,
682 SendMessage( hwndOwner
, vertical
? WM_VSCROLL
: WM_HSCROLL
,
683 SB_LINEDOWN
, MAKELONG( 0, hwndCtl
));
686 else KillSystemTimer( hwnd
, SCROLL_TIMER
);
690 if (msg
== WM_LBUTTONUP
)
692 if (trackHitTest
== SCROLL_THUMB
)
694 UINT val
= SCROLL_GetThumbVal( infoPtr
, &rect
, vertical
,
695 trackThumbPos
+ lastMousePos
- lastClickPos
);
696 SendMessage( hwndOwner
, vertical
? WM_VSCROLL
: WM_HSCROLL
,
697 SB_THUMBPOSITION
, MAKELONG( val
, hwndCtl
) );
700 SendMessage( hwndOwner
, vertical
? WM_VSCROLL
: WM_HSCROLL
,
701 SB_ENDSCROLL
, MAKELONG( 0, hwndCtl
) );
702 trackHitTest
= SCROLL_NOWHERE
; /* Terminate tracking */
705 ReleaseDC( hwnd
, hdc
);
709 /***********************************************************************
712 LONG
ScrollBarWndProc( HWND hwnd
, WORD message
, WORD wParam
, LONG lParam
)
718 CREATESTRUCT
*lpCreat
= (CREATESTRUCT
*)PTR_SEG_TO_LIN(lParam
);
719 if (lpCreat
->style
& SBS_SIZEBOX
)
721 fprintf( stdnimp
, "Unimplemented style SBS_SIZEBOX.\n" );
725 if (lpCreat
->style
& SBS_VERT
)
727 if (lpCreat
->style
& SBS_LEFTALIGN
)
728 MoveWindow( hwnd
, lpCreat
->x
, lpCreat
->y
,
729 SYSMETRICS_CXVSCROLL
+1, lpCreat
->cy
, FALSE
);
730 else if (lpCreat
->style
& SBS_RIGHTALIGN
)
732 lpCreat
->x
+lpCreat
->cx
-SYSMETRICS_CXVSCROLL
-1,
734 SYSMETRICS_CXVSCROLL
+ 1, lpCreat
->cy
, FALSE
);
738 if (lpCreat
->style
& SBS_TOPALIGN
)
739 MoveWindow( hwnd
, lpCreat
->x
, lpCreat
->y
,
740 lpCreat
->cx
, SYSMETRICS_CYHSCROLL
+1, FALSE
);
741 else if (lpCreat
->style
& SBS_BOTTOMALIGN
)
744 lpCreat
->y
+lpCreat
->cy
-SYSMETRICS_CYHSCROLL
-1,
745 lpCreat
->cx
, SYSMETRICS_CYHSCROLL
+1, FALSE
);
748 if (!hUpArrow
) SCROLL_LoadBitmaps();
749 dprintf_scroll( stddeb
, "ScrollBar creation, hwnd=%d\n", hwnd
);
756 SCROLL_HandleScrollEvent( hwnd
, SB_CTL
, message
, MAKEPOINT(lParam
) );
760 SCROLL_HandleKbdEvent( hwnd
, wParam
);
769 HDC hdc
= BeginPaint( hwnd
, &ps
);
770 SCROLL_DrawScrollBar( hwnd
, hdc
, SB_CTL
);
771 EndPaint( hwnd
, &ps
);
776 return DefWindowProc( hwnd
, message
, wParam
, lParam
);
782 /*************************************************************************
783 * SetScrollPos (USER.62)
785 int SetScrollPos( HWND hwnd
, int nBar
, int nPos
, BOOL bRedraw
)
790 if (!(infoPtr
= SCROLL_GetScrollInfo( hwnd
, nBar
))) return 0;
792 dprintf_scroll( stddeb
,"SetScrollPos min=%d max=%d pos=%d\n",
793 infoPtr
->MinVal
, infoPtr
->MaxVal
, nPos
);
795 if (nPos
< infoPtr
->MinVal
) nPos
= infoPtr
->MinVal
;
796 else if (nPos
> infoPtr
->MaxVal
) nPos
= infoPtr
->MaxVal
;
797 oldPos
= infoPtr
->CurVal
;
798 infoPtr
->CurVal
= nPos
;
799 if (bRedraw
) SCROLL_RefreshScrollBar( hwnd
, nBar
);
804 /*************************************************************************
805 * GetScrollPos (USER.63)
807 int GetScrollPos( HWND hwnd
, int nBar
)
811 if (!(infoPtr
= SCROLL_GetScrollInfo( hwnd
, nBar
))) return 0;
812 return infoPtr
->CurVal
;
816 /*************************************************************************
817 * SetScrollRange (USER.64)
819 void SetScrollRange(HWND hwnd
, int nBar
, int MinVal
, int MaxVal
, BOOL bRedraw
)
823 if (!(infoPtr
= SCROLL_GetScrollInfo( hwnd
, nBar
))) return;
825 dprintf_scroll( stddeb
,"SetScrollRange hwnd=%x bar=%d min=%d max=%d\n",
826 hwnd
, nBar
, MinVal
, MaxVal
);
828 /* Invalid range -> range is set to (0,0) */
829 if ((MinVal
> MaxVal
) || ((long)MaxVal
- MinVal
> 32767L))
831 if (infoPtr
->CurVal
< MinVal
) infoPtr
->CurVal
= MinVal
;
832 else if (infoPtr
->CurVal
> MaxVal
) infoPtr
->CurVal
= MaxVal
;
833 infoPtr
->MinVal
= MinVal
;
834 infoPtr
->MaxVal
= MaxVal
;
836 /* Non-client scroll-bar is hidden if min==max */
837 if (nBar
!= SB_CTL
) ShowScrollBar( hwnd
, nBar
, (MinVal
!= MaxVal
) );
838 if (bRedraw
) SCROLL_RefreshScrollBar( hwnd
, nBar
);
842 /*************************************************************************
843 * GetScrollRange (USER.65)
845 void GetScrollRange(HWND hwnd
, int nBar
, LPINT lpMin
, LPINT lpMax
)
849 if (!(infoPtr
= SCROLL_GetScrollInfo( hwnd
, nBar
))) return;
850 if (lpMin
) *lpMin
= infoPtr
->MinVal
;
851 if (lpMax
) *lpMax
= infoPtr
->MaxVal
;
855 /*************************************************************************
856 * ShowScrollBar (USER.267)
858 void ShowScrollBar( HWND hwnd
, WORD wBar
, BOOL fShow
)
860 WND
*wndPtr
= WIN_FindWndPtr( hwnd
);
863 dprintf_scroll( stddeb
, "ShowScrollBar: hwnd=%x bar=%d on=%d\n", hwnd
, wBar
, fShow
);
868 ShowWindow( hwnd
, fShow
? SW_SHOW
: SW_HIDE
);
874 if (wndPtr
->dwStyle
& WS_HSCROLL
) return;
875 wndPtr
->dwStyle
|= WS_HSCROLL
;
879 if (!(wndPtr
->dwStyle
& WS_HSCROLL
)) return;
880 wndPtr
->dwStyle
&= ~WS_HSCROLL
;
887 if (wndPtr
->dwStyle
& WS_VSCROLL
) return;
888 wndPtr
->dwStyle
|= WS_VSCROLL
;
892 if (!(wndPtr
->dwStyle
& WS_VSCROLL
)) return;
893 wndPtr
->dwStyle
&= ~WS_VSCROLL
;
900 if ((wndPtr
->dwStyle
& WS_HSCROLL
)
901 && (wndPtr
->dwStyle
& WS_VSCROLL
)) return;
902 wndPtr
->dwStyle
|= WS_HSCROLL
| WS_VSCROLL
;
906 if (!(wndPtr
->dwStyle
& WS_HSCROLL
)
907 && !(wndPtr
->dwStyle
& WS_HSCROLL
)) return;
908 wndPtr
->dwStyle
&= ~(WS_HSCROLL
| WS_VSCROLL
);
913 return; /* Nothing to do! */
915 SetWindowPos( hwnd
, 0, 0, 0, 0, 0, SWP_NOSIZE
| SWP_NOMOVE
916 | SWP_NOACTIVATE
| SWP_NOZORDER
| SWP_FRAMECHANGED
);
920 /*************************************************************************
921 * EnableScrollBar (USER.482)
923 BOOL
EnableScrollBar( HWND hwnd
, INT nBar
, UINT flags
)
928 if (!(infoPtr
= SCROLL_GetScrollInfo( hwnd
, nBar
))) return FALSE
;
929 dprintf_scroll( stddeb
, "EnableScrollBar: %x %d %d\n", hwnd
, nBar
, flags
);
930 flags
&= ESB_DISABLE_BOTH
;
931 if (infoPtr
->flags
== flags
) return FALSE
;
932 infoPtr
->flags
= flags
;
934 /* Redraw the whole scroll bar */
935 hdc
= (nBar
== SB_CTL
) ? GetDC(hwnd
) : GetWindowDC(hwnd
);
936 SCROLL_DrawScrollBar( hwnd
, hdc
, nBar
);
937 ReleaseDC( hwnd
, hdc
);