4 * Copyright 1997, 2002 Dimitrie O. Paun
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
36 #include "wine/heap.h"
37 #include "wine/debug.h"
39 WINE_DEFAULT_DEBUG_CHANNEL(updown
);
43 HWND Self
; /* Handle to this up-down control */
44 HWND Notify
; /* Handle to the parent window */
45 DWORD dwStyle
; /* The GWL_STYLE for this window */
46 UINT AccelCount
; /* Number of elements in AccelVect */
47 UDACCEL
* AccelVect
; /* Vector containing AccelCount elements */
48 INT AccelIndex
; /* Current accel index, -1 if not accel'ing */
49 INT Base
; /* Base to display nr in the buddy window */
50 INT CurVal
; /* Current up-down value */
51 INT MinVal
; /* Minimum up-down value */
52 INT MaxVal
; /* Maximum up-down value */
53 HWND Buddy
; /* Handle to the buddy window */
54 INT BuddyType
; /* Remembers the buddy type BUDDY_TYPE_* */
55 INT Flags
; /* Internal Flags FLAG_* */
56 BOOL UnicodeFormat
; /* Marks the use of Unicode internally */
59 /* Control configuration constants */
61 #define INITIAL_DELAY 500 /* initial timer until auto-inc kicks in */
62 #define AUTOPRESS_DELAY 250 /* time to keep arrow pressed on KEY_DOWN */
63 #define REPEAT_DELAY 50 /* delay between auto-increments */
65 #define DEFAULT_WIDTH 16 /* default width of the ctrl */
66 #define DEFAULT_XSEP 0 /* default separation between buddy and ctrl */
67 #define DEFAULT_ADDTOP 0 /* amount to extend above the buddy window */
68 #define DEFAULT_ADDBOT 0 /* amount to extend below the buddy window */
69 #define DEFAULT_BUDDYBORDER 2 /* Width/height of the buddy border */
70 #define DEFAULT_BUDDYSPACER 2 /* Spacer between the buddy and the ctrl */
71 #define DEFAULT_BUDDYBORDER_THEMED 1 /* buddy border when theming is enabled */
72 #define DEFAULT_BUDDYSPACER_THEMED 0 /* buddy spacer when theming is enabled */
76 #define FLAG_INCR 0x01
77 #define FLAG_DECR 0x02
78 #define FLAG_MOUSEIN 0x04
79 #define FLAG_PRESSED 0x08
80 #define FLAG_BUDDYINT 0x10 /* UDS_SETBUDDYINT was set on creation */
81 #define FLAG_ARROW (FLAG_INCR | FLAG_DECR)
83 #define BUDDY_TYPE_UNKNOWN 0
84 #define BUDDY_TYPE_LISTBOX 1
85 #define BUDDY_TYPE_EDIT 2
87 #define TIMER_AUTOREPEAT 1
89 #define TIMER_AUTOPRESS 3
91 #define UPDOWN_GetInfoPtr(hwnd) ((UPDOWN_INFO *)GetWindowLongPtrW (hwnd,0))
93 /* id used for SetWindowSubclass */
94 #define BUDDY_SUBCLASSID 1
96 static void UPDOWN_DoAction (UPDOWN_INFO
*infoPtr
, int delta
, int action
);
98 /***********************************************************************
100 * Tests if our buddy is an edit control.
102 static inline BOOL
UPDOWN_IsBuddyEdit(const UPDOWN_INFO
*infoPtr
)
104 return infoPtr
->BuddyType
== BUDDY_TYPE_EDIT
;
107 /***********************************************************************
108 * UPDOWN_IsBuddyListbox
109 * Tests if our buddy is a listbox control.
111 static inline BOOL
UPDOWN_IsBuddyListbox(const UPDOWN_INFO
*infoPtr
)
113 return infoPtr
->BuddyType
== BUDDY_TYPE_LISTBOX
;
116 /***********************************************************************
118 * Tests if a given value 'val' is between the Min&Max limits
120 static BOOL
UPDOWN_InBounds(const UPDOWN_INFO
*infoPtr
, int val
)
122 if(infoPtr
->MaxVal
> infoPtr
->MinVal
)
123 return (infoPtr
->MinVal
<= val
) && (val
<= infoPtr
->MaxVal
);
125 return (infoPtr
->MaxVal
<= val
) && (val
<= infoPtr
->MinVal
);
128 /***********************************************************************
130 * Change the current value by delta.
131 * It returns TRUE is the value was changed successfully, or FALSE
132 * if the value was not changed, as it would go out of bounds.
134 static BOOL
UPDOWN_OffsetVal(UPDOWN_INFO
*infoPtr
, int delta
)
136 /* check if we can do the modification first */
137 if(!UPDOWN_InBounds (infoPtr
, infoPtr
->CurVal
+delta
)) {
138 if (infoPtr
->dwStyle
& UDS_WRAP
) {
139 delta
+= (delta
< 0 ? -1 : 1) *
140 (infoPtr
->MaxVal
< infoPtr
->MinVal
? -1 : 1) *
141 (infoPtr
->MinVal
- infoPtr
->MaxVal
) +
142 (delta
< 0 ? 1 : -1);
143 } else if ((infoPtr
->MaxVal
> infoPtr
->MinVal
&& infoPtr
->CurVal
+delta
> infoPtr
->MaxVal
)
144 || (infoPtr
->MaxVal
< infoPtr
->MinVal
&& infoPtr
->CurVal
+delta
< infoPtr
->MaxVal
)) {
145 delta
= infoPtr
->MaxVal
- infoPtr
->CurVal
;
147 delta
= infoPtr
->MinVal
- infoPtr
->CurVal
;
151 infoPtr
->CurVal
+= delta
;
155 /***********************************************************************
156 * UPDOWN_HasBuddyBorder
158 * When we have a buddy set and that we are aligned on our buddy, we
159 * want to draw a sunken edge to make like we are part of that control.
161 static BOOL
UPDOWN_HasBuddyBorder(const UPDOWN_INFO
*infoPtr
)
163 return ( ((infoPtr
->dwStyle
& (UDS_ALIGNLEFT
| UDS_ALIGNRIGHT
)) != 0) &&
164 UPDOWN_IsBuddyEdit(infoPtr
) );
167 /***********************************************************************
168 * UPDOWN_GetArrowRect
169 * wndPtr - pointer to the up-down wnd
170 * rect - will hold the rectangle
171 * arrow - FLAG_INCR to get the "increment" rect (up or right)
172 * FLAG_DECR to get the "decrement" rect (down or left)
174 static void UPDOWN_GetArrowRect (const UPDOWN_INFO
* infoPtr
, RECT
*rect
, unsigned int arrow
)
176 HTHEME theme
= GetWindowTheme (infoPtr
->Self
);
177 const int border
= theme
? DEFAULT_BUDDYBORDER_THEMED
: DEFAULT_BUDDYBORDER
;
178 const int spacer
= theme
? DEFAULT_BUDDYSPACER_THEMED
: DEFAULT_BUDDYSPACER
;
181 assert(arrow
&& (arrow
& (FLAG_INCR
| FLAG_DECR
)) != (FLAG_INCR
| FLAG_DECR
));
183 GetClientRect (infoPtr
->Self
, rect
);
186 * Make sure we calculate the rectangle to fit even if we draw the
189 if (UPDOWN_HasBuddyBorder(infoPtr
)) {
190 if (infoPtr
->dwStyle
& UDS_ALIGNLEFT
)
191 rect
->left
+= border
;
193 rect
->right
-= border
;
195 InflateRect(rect
, 0, -border
);
198 /* now figure out if we need a space away from the buddy */
199 if (IsWindow(infoPtr
->Buddy
) ) {
200 if (infoPtr
->dwStyle
& UDS_ALIGNLEFT
) rect
->right
-= spacer
;
201 else if (infoPtr
->dwStyle
& UDS_ALIGNRIGHT
) rect
->left
+= spacer
;
205 * We're calculating the midpoint to figure-out where the
206 * separation between the buttons will lay.
208 if (infoPtr
->dwStyle
& UDS_HORZ
) {
209 size
= (rect
->right
- rect
->left
) / 2;
210 if (arrow
& FLAG_INCR
)
211 rect
->left
= rect
->right
- size
;
212 else if (arrow
& FLAG_DECR
)
213 rect
->right
= rect
->left
+ size
;
215 size
= (rect
->bottom
- rect
->top
) / 2;
216 if (arrow
& FLAG_INCR
)
217 rect
->bottom
= rect
->top
+ size
;
218 else if (arrow
& FLAG_DECR
)
219 rect
->top
= rect
->bottom
- size
;
223 /***********************************************************************
224 * UPDOWN_GetArrowFromPoint
225 * Returns the rectagle (for the up or down arrow) that contains pt.
226 * If it returns the up rect, it returns FLAG_INCR.
227 * If it returns the down rect, it returns FLAG_DECR.
229 static INT
UPDOWN_GetArrowFromPoint (const UPDOWN_INFO
*infoPtr
, RECT
*rect
, POINT pt
)
231 UPDOWN_GetArrowRect (infoPtr
, rect
, FLAG_INCR
);
232 if(PtInRect(rect
, pt
)) return FLAG_INCR
;
234 UPDOWN_GetArrowRect (infoPtr
, rect
, FLAG_DECR
);
235 if(PtInRect(rect
, pt
)) return FLAG_DECR
;
241 /***********************************************************************
242 * UPDOWN_GetThousandSep
243 * Returns the thousand sep. If an error occurs, it returns ','.
245 static WCHAR
UPDOWN_GetThousandSep(void)
249 if(GetLocaleInfoW(LOCALE_USER_DEFAULT
, LOCALE_STHOUSAND
, sep
, 2) != 1)
255 /***********************************************************************
257 * Tries to read the pos from the buddy window and if it succeeds,
258 * it stores it in the control's CurVal
260 * TRUE - if it read the integer from the buddy successfully
261 * FALSE - if an error occurred
263 static BOOL
UPDOWN_GetBuddyInt (UPDOWN_INFO
*infoPtr
)
265 WCHAR txt
[20], sep
, *src
, *dst
;
268 if (!((infoPtr
->Flags
& FLAG_BUDDYINT
) && IsWindow(infoPtr
->Buddy
)))
271 /*if the buddy is a list window, we must set curr index */
272 if (UPDOWN_IsBuddyListbox(infoPtr
)) {
273 newVal
= SendMessageW(infoPtr
->Buddy
, LB_GETCARETINDEX
, 0, 0);
274 if(newVal
< 0) return FALSE
;
276 /* we have a regular window, so will get the text */
277 /* note that a zero-length string is a legitimate value for 'txt',
278 * and ought to result in a successful conversion to '0'. */
279 if (GetWindowTextW(infoPtr
->Buddy
, txt
, ARRAY_SIZE(txt
)) < 0)
282 sep
= UPDOWN_GetThousandSep();
284 /* now get rid of the separators */
285 for(src
= dst
= txt
; *src
; src
++)
286 if(*src
!= sep
) *dst
++ = *src
;
289 /* try to convert the number and validate it */
290 newVal
= wcstol(txt
, &src
, infoPtr
->Base
);
291 if(*src
|| !UPDOWN_InBounds (infoPtr
, newVal
)) return FALSE
;
294 TRACE("new value(%d) from buddy (old=%d)\n", newVal
, infoPtr
->CurVal
);
295 infoPtr
->CurVal
= newVal
;
300 /***********************************************************************
302 * Tries to set the pos to the buddy window based on current pos
304 * TRUE - if it set the caption of the buddy successfully
305 * FALSE - if an error occurred
307 static BOOL
UPDOWN_SetBuddyInt (const UPDOWN_INFO
*infoPtr
)
310 WCHAR txt
[20], txt_old
[20] = { 0 };
313 if (!((infoPtr
->Flags
& FLAG_BUDDYINT
) && IsWindow(infoPtr
->Buddy
)))
316 TRACE("set new value(%d) to buddy.\n", infoPtr
->CurVal
);
318 /*if the buddy is a list window, we must set curr index */
319 if (UPDOWN_IsBuddyListbox(infoPtr
)) {
320 return SendMessageW(infoPtr
->Buddy
, LB_SETCURSEL
, infoPtr
->CurVal
, 0) != LB_ERR
;
323 /* Regular window, so set caption to the number */
324 fmt
= (infoPtr
->Base
== 16) ? L
"0x%04X" : L
"%d";
325 len
= wsprintfW(txt
, fmt
, infoPtr
->CurVal
);
328 /* Do thousands separation if necessary */
329 if ((infoPtr
->Base
== 10) && !(infoPtr
->dwStyle
& UDS_NOTHOUSANDS
) && (len
> 3)) {
330 WCHAR tmp
[ARRAY_SIZE(txt
)], *src
= tmp
, *dst
= txt
;
331 WCHAR sep
= UPDOWN_GetThousandSep();
334 memcpy(tmp
, txt
, sizeof(txt
));
335 if (start
== 0) start
= 3;
338 for (len
=0; *src
; len
++) {
339 if (len
% 3 == 0) *dst
++ = sep
;
345 /* if nothing changed exit earlier */
346 GetWindowTextW(infoPtr
->Buddy
, txt_old
, ARRAY_SIZE(txt_old
));
347 if (lstrcmpiW(txt_old
, txt
) == 0) return FALSE
;
349 return SetWindowTextW(infoPtr
->Buddy
, txt
);
352 /***********************************************************************
353 * UPDOWN_DrawBuddyBackground
355 * Draw buddy background for visual integration.
357 static BOOL
UPDOWN_DrawBuddyBackground (const UPDOWN_INFO
*infoPtr
, HDC hdc
)
360 HTHEME buddyTheme
= GetWindowTheme (infoPtr
->Buddy
);
361 if (!buddyTheme
) return FALSE
;
363 GetWindowRect (infoPtr
->Buddy
, &br
);
364 MapWindowPoints (NULL
, infoPtr
->Self
, (POINT
*)&br
, 2);
365 GetClientRect (infoPtr
->Self
, &r
);
367 if (infoPtr
->dwStyle
& UDS_ALIGNLEFT
)
369 else if (infoPtr
->dwStyle
& UDS_ALIGNRIGHT
)
371 /* FIXME: take disabled etc. into account */
372 DrawThemeBackground (buddyTheme
, hdc
, 0, 0, &br
, NULL
);
376 /***********************************************************************
379 * Draw the arrows. The background need not be erased.
381 static LRESULT
UPDOWN_Draw (const UPDOWN_INFO
*infoPtr
, HDC hdc
)
383 BOOL uPressed
, uHot
, dPressed
, dHot
;
385 HTHEME theme
= GetWindowTheme (infoPtr
->Self
);
386 int uPart
= 0, uState
= 0, dPart
= 0, dState
= 0;
387 BOOL needBuddyBg
= FALSE
;
389 uPressed
= (infoPtr
->Flags
& FLAG_PRESSED
) && (infoPtr
->Flags
& FLAG_INCR
);
390 uHot
= (infoPtr
->Flags
& FLAG_INCR
) && (infoPtr
->Flags
& FLAG_MOUSEIN
);
391 dPressed
= (infoPtr
->Flags
& FLAG_PRESSED
) && (infoPtr
->Flags
& FLAG_DECR
);
392 dHot
= (infoPtr
->Flags
& FLAG_DECR
) && (infoPtr
->Flags
& FLAG_MOUSEIN
);
394 uPart
= (infoPtr
->dwStyle
& UDS_HORZ
) ? SPNP_UPHORZ
: SPNP_UP
;
395 uState
= (infoPtr
->dwStyle
& WS_DISABLED
) ? DNS_DISABLED
396 : (uPressed
? DNS_PRESSED
: (uHot
? DNS_HOT
: DNS_NORMAL
));
397 dPart
= (infoPtr
->dwStyle
& UDS_HORZ
) ? SPNP_DOWNHORZ
: SPNP_DOWN
;
398 dState
= (infoPtr
->dwStyle
& WS_DISABLED
) ? DNS_DISABLED
399 : (dPressed
? DNS_PRESSED
: (dHot
? DNS_HOT
: DNS_NORMAL
));
400 needBuddyBg
= IsWindow (infoPtr
->Buddy
)
401 && (IsThemeBackgroundPartiallyTransparent (theme
, uPart
, uState
)
402 || IsThemeBackgroundPartiallyTransparent (theme
, dPart
, dState
));
405 /* Draw the common border between ourselves and our buddy */
406 if (UPDOWN_HasBuddyBorder(infoPtr
) || needBuddyBg
) {
407 if (!theme
|| !UPDOWN_DrawBuddyBackground (infoPtr
, hdc
)) {
408 GetClientRect(infoPtr
->Self
, &rect
);
409 DrawEdge(hdc
, &rect
, EDGE_SUNKEN
,
411 (infoPtr
->dwStyle
& UDS_ALIGNLEFT
? BF_LEFT
: BF_RIGHT
));
415 /* Draw the incr button */
416 UPDOWN_GetArrowRect (infoPtr
, &rect
, FLAG_INCR
);
418 DrawThemeBackground(theme
, hdc
, uPart
, uState
, &rect
, NULL
);
420 DrawFrameControl(hdc
, &rect
, DFC_SCROLL
,
421 (infoPtr
->dwStyle
& UDS_HORZ
? DFCS_SCROLLRIGHT
: DFCS_SCROLLUP
) |
422 ((infoPtr
->dwStyle
& UDS_HOTTRACK
) && uHot
? DFCS_HOT
: 0) |
423 (uPressed
? DFCS_PUSHED
: 0) |
424 (infoPtr
->dwStyle
& WS_DISABLED
? DFCS_INACTIVE
: 0) );
427 /* Draw the decr button */
428 UPDOWN_GetArrowRect(infoPtr
, &rect
, FLAG_DECR
);
430 DrawThemeBackground(theme
, hdc
, dPart
, dState
, &rect
, NULL
);
432 DrawFrameControl(hdc
, &rect
, DFC_SCROLL
,
433 (infoPtr
->dwStyle
& UDS_HORZ
? DFCS_SCROLLLEFT
: DFCS_SCROLLDOWN
) |
434 ((infoPtr
->dwStyle
& UDS_HOTTRACK
) && dHot
? DFCS_HOT
: 0) |
435 (dPressed
? DFCS_PUSHED
: 0) |
436 (infoPtr
->dwStyle
& WS_DISABLED
? DFCS_INACTIVE
: 0) );
442 /***********************************************************************
445 * Asynchronous drawing (must ONLY be used in WM_PAINT).
448 static LRESULT
UPDOWN_Paint (const UPDOWN_INFO
*infoPtr
, HDC hdc
)
451 if (hdc
) return UPDOWN_Draw (infoPtr
, hdc
);
452 hdc
= BeginPaint (infoPtr
->Self
, &ps
);
453 UPDOWN_Draw (infoPtr
, hdc
);
454 EndPaint (infoPtr
->Self
, &ps
);
458 /***********************************************************************
461 * Handle key presses (up & down) when we have to do so
463 static LRESULT
UPDOWN_KeyPressed(UPDOWN_INFO
*infoPtr
, int key
)
467 if (key
== VK_UP
) arrow
= FLAG_INCR
;
468 else if (key
== VK_DOWN
) arrow
= FLAG_DECR
;
471 UPDOWN_GetBuddyInt (infoPtr
);
472 infoPtr
->Flags
&= ~FLAG_ARROW
;
473 infoPtr
->Flags
|= FLAG_PRESSED
| arrow
;
474 InvalidateRect (infoPtr
->Self
, NULL
, FALSE
);
475 SetTimer(infoPtr
->Self
, TIMER_AUTOPRESS
, AUTOPRESS_DELAY
, 0);
476 accel
= (infoPtr
->AccelCount
&& infoPtr
->AccelVect
) ? infoPtr
->AccelVect
[0].nInc
: 1;
477 UPDOWN_DoAction (infoPtr
, accel
, arrow
);
481 static int UPDOWN_GetPos(UPDOWN_INFO
*infoPtr
, BOOL
*err
)
483 BOOL succ
= UPDOWN_GetBuddyInt(infoPtr
);
484 int val
= infoPtr
->CurVal
;
486 if(!UPDOWN_InBounds(infoPtr
, val
)) {
487 if((infoPtr
->MinVal
< infoPtr
->MaxVal
&& val
< infoPtr
->MinVal
)
488 || (infoPtr
->MinVal
> infoPtr
->MaxVal
&& val
> infoPtr
->MinVal
))
489 val
= infoPtr
->MinVal
;
491 val
= infoPtr
->MaxVal
;
496 if(err
) *err
= !succ
;
500 static int UPDOWN_SetPos(UPDOWN_INFO
*infoPtr
, int pos
)
502 int ret
= infoPtr
->CurVal
;
504 if(!UPDOWN_InBounds(infoPtr
, pos
)) {
505 if((infoPtr
->MinVal
< infoPtr
->MaxVal
&& pos
< infoPtr
->MinVal
)
506 || (infoPtr
->MinVal
> infoPtr
->MaxVal
&& pos
> infoPtr
->MinVal
))
507 pos
= infoPtr
->MinVal
;
509 pos
= infoPtr
->MaxVal
;
512 infoPtr
->CurVal
= pos
;
513 UPDOWN_SetBuddyInt(infoPtr
);
515 if(!UPDOWN_InBounds(infoPtr
, ret
)) {
516 if((infoPtr
->MinVal
< infoPtr
->MaxVal
&& ret
< infoPtr
->MinVal
)
517 || (infoPtr
->MinVal
> infoPtr
->MaxVal
&& ret
> infoPtr
->MinVal
))
518 ret
= infoPtr
->MinVal
;
520 ret
= infoPtr
->MaxVal
;
526 /***********************************************************************
529 * Handle UDM_SETRANGE, UDM_SETRANGE32
531 * FIXME: handle Max == Min properly:
532 * - arrows should be disabled (without WS_DISABLED set),
533 * visually they can't be pressed and don't respond;
534 * - all input messages should still pass in.
536 static LRESULT
UPDOWN_SetRange(UPDOWN_INFO
*infoPtr
, INT Max
, INT Min
)
538 infoPtr
->MaxVal
= Max
;
539 infoPtr
->MinVal
= Min
;
541 TRACE("UpDown Ctrl new range(%d to %d), hwnd=%p\n",
542 infoPtr
->MinVal
, infoPtr
->MaxVal
, infoPtr
->Self
);
547 /***********************************************************************
550 * Handle mouse wheel scrolling
552 static LRESULT
UPDOWN_MouseWheel(UPDOWN_INFO
*infoPtr
, WPARAM wParam
)
554 int iWheelDelta
= GET_WHEEL_DELTA_WPARAM(wParam
) / WHEEL_DELTA
;
556 if (wParam
& (MK_SHIFT
| MK_CONTROL
))
559 if (iWheelDelta
!= 0)
561 UPDOWN_GetBuddyInt(infoPtr
);
562 UPDOWN_DoAction(infoPtr
, abs(iWheelDelta
), iWheelDelta
> 0 ? FLAG_INCR
: FLAG_DECR
);
569 /***********************************************************************
570 * UPDOWN_Buddy_SubclassProc used to handle messages sent to the buddy
573 static LRESULT CALLBACK
574 UPDOWN_Buddy_SubclassProc(HWND hwnd
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
,
575 UINT_PTR uId
, DWORD_PTR ref_data
)
577 UPDOWN_INFO
*infoPtr
= UPDOWN_GetInfoPtr((HWND
)ref_data
);
579 TRACE("hwnd=%p, uMsg=%04x, wParam=%08lx, lParam=%08lx\n",
580 hwnd
, uMsg
, wParam
, lParam
);
587 UPDOWN_KeyPressed(infoPtr
, (int)wParam
);
588 if (wParam
== VK_UP
|| wParam
== VK_DOWN
)
595 UPDOWN_MouseWheel(infoPtr
, (int)wParam
);
599 RemoveWindowSubclass(hwnd
, UPDOWN_Buddy_SubclassProc
, BUDDY_SUBCLASSID
);
605 return DefSubclassProc(hwnd
, uMsg
, wParam
, lParam
);
608 static void UPDOWN_ResetSubclass (UPDOWN_INFO
*infoPtr
)
610 SetWindowSubclass(infoPtr
->Buddy
, UPDOWN_Buddy_SubclassProc
, BUDDY_SUBCLASSID
, 0);
613 /***********************************************************************
616 * Sets bud as a new Buddy.
617 * Then, it should subclass the buddy
618 * If window has the UDS_ARROWKEYS, it subclasses the buddy window to
619 * process the UP/DOWN arrow keys.
620 * If window has the UDS_ALIGNLEFT or UDS_ALIGNRIGHT style
621 * the size/pos of the buddy and the control are adjusted accordingly.
623 static HWND
UPDOWN_SetBuddy (UPDOWN_INFO
* infoPtr
, HWND bud
)
625 RECT budRect
; /* new coord for the buddy */
626 int x
, width
; /* new x position and width for the up-down */
627 WCHAR buddyClass
[40];
630 TRACE("(hwnd=%p, bud=%p)\n", infoPtr
->Self
, bud
);
632 old_buddy
= infoPtr
->Buddy
;
634 UPDOWN_ResetSubclass (infoPtr
);
636 if (!IsWindow(bud
)) bud
= NULL
;
638 /* Store buddy window handle */
639 infoPtr
->Buddy
= bud
;
642 /* Store buddy window class type */
643 infoPtr
->BuddyType
= BUDDY_TYPE_UNKNOWN
;
644 if (GetClassNameW(bud
, buddyClass
, ARRAY_SIZE(buddyClass
))) {
645 if (lstrcmpiW(buddyClass
, WC_EDITW
) == 0)
646 infoPtr
->BuddyType
= BUDDY_TYPE_EDIT
;
647 else if (lstrcmpiW(buddyClass
, WC_LISTBOXW
) == 0)
648 infoPtr
->BuddyType
= BUDDY_TYPE_LISTBOX
;
651 if (infoPtr
->dwStyle
& UDS_ARROWKEYS
)
652 SetWindowSubclass(bud
, UPDOWN_Buddy_SubclassProc
, BUDDY_SUBCLASSID
,
653 (DWORD_PTR
)infoPtr
->Self
);
655 /* Get the rect of the buddy relative to its parent */
656 GetWindowRect(infoPtr
->Buddy
, &budRect
);
657 MapWindowPoints(HWND_DESKTOP
, GetParent(infoPtr
->Buddy
), (POINT
*)(&budRect
.left
), 2);
659 /* now do the positioning */
660 if (infoPtr
->dwStyle
& UDS_ALIGNLEFT
) {
662 budRect
.left
+= DEFAULT_WIDTH
+ DEFAULT_XSEP
;
663 } else if (infoPtr
->dwStyle
& UDS_ALIGNRIGHT
) {
664 budRect
.right
-= DEFAULT_WIDTH
+ DEFAULT_XSEP
;
665 x
= budRect
.right
+DEFAULT_XSEP
;
671 /* first adjust the buddy to accommodate the up/down */
672 SetWindowPos(infoPtr
->Buddy
, 0, budRect
.left
, budRect
.top
,
673 budRect
.right
- budRect
.left
, budRect
.bottom
- budRect
.top
,
674 SWP_NOACTIVATE
|SWP_NOZORDER
);
676 /* now position the up/down */
677 /* Since the UDS_ALIGN* flags were used, */
678 /* we will pick the position and size of the window. */
679 width
= DEFAULT_WIDTH
;
682 * If the updown has a buddy border, it has to overlap with the buddy
683 * to look as if it is integrated with the buddy control.
684 * We nudge the control or change its size to overlap.
686 if (UPDOWN_HasBuddyBorder(infoPtr
)) {
687 if(infoPtr
->dwStyle
& UDS_ALIGNLEFT
)
688 width
+= DEFAULT_BUDDYBORDER
;
690 x
-= DEFAULT_BUDDYBORDER
;
693 SetWindowPos(infoPtr
->Self
, 0, x
,
694 budRect
.top
- DEFAULT_ADDTOP
, width
,
695 budRect
.bottom
- budRect
.top
+ DEFAULT_ADDTOP
+ DEFAULT_ADDBOT
,
696 SWP_NOACTIVATE
|SWP_FRAMECHANGED
|SWP_NOZORDER
);
697 } else if (!(infoPtr
->dwStyle
& UDS_HORZ
) && old_buddy
!= NULL
) {
699 GetWindowRect(infoPtr
->Self
, &rect
);
700 MapWindowPoints(HWND_DESKTOP
, GetParent(infoPtr
->Self
), (POINT
*)&rect
, 2);
701 SetWindowPos(infoPtr
->Self
, 0, rect
.left
, rect
.top
, DEFAULT_WIDTH
, rect
.bottom
- rect
.top
,
702 SWP_NOACTIVATE
|SWP_FRAMECHANGED
|SWP_NOZORDER
);
708 /***********************************************************************
711 * This function increments/decrements the CurVal by the
712 * 'delta' amount according to the 'action' flag which can be a
713 * combination of FLAG_INCR and FLAG_DECR
714 * It notifies the parent as required.
715 * It handles wrapping and non-wrapping correctly.
716 * It is assumed that delta>0
718 static void UPDOWN_DoAction (UPDOWN_INFO
*infoPtr
, int delta
, int action
)
722 TRACE("%d by %d\n", action
, delta
);
724 /* check if we can do the modification first */
725 delta
*= (action
& FLAG_INCR
? 1 : -1) * (infoPtr
->MaxVal
< infoPtr
->MinVal
? -1 : 1);
726 if ( (action
& FLAG_INCR
) && (action
& FLAG_DECR
) ) delta
= 0;
728 TRACE("current %d, delta: %d\n", infoPtr
->CurVal
, delta
);
730 /* We must notify parent now to obtain permission */
731 ni
.iPos
= infoPtr
->CurVal
;
733 ni
.hdr
.hwndFrom
= infoPtr
->Self
;
734 ni
.hdr
.idFrom
= GetWindowLongPtrW (infoPtr
->Self
, GWLP_ID
);
735 ni
.hdr
.code
= UDN_DELTAPOS
;
736 if (!SendMessageW(infoPtr
->Notify
, WM_NOTIFY
, ni
.hdr
.idFrom
, (LPARAM
)&ni
)) {
737 /* Parent said: OK to adjust */
739 /* Now adjust value with (maybe new) delta */
740 if (UPDOWN_OffsetVal (infoPtr
, ni
.iDelta
)) {
741 TRACE("new %d, delta: %d\n", infoPtr
->CurVal
, ni
.iDelta
);
743 /* Now take care about our buddy */
744 UPDOWN_SetBuddyInt (infoPtr
);
748 /* Also, notify it. This message is sent in any case. */
749 SendMessageW( infoPtr
->Notify
, (infoPtr
->dwStyle
& UDS_HORZ
) ? WM_HSCROLL
: WM_VSCROLL
,
750 MAKELONG(SB_THUMBPOSITION
, infoPtr
->CurVal
), (LPARAM
)infoPtr
->Self
);
753 /***********************************************************************
756 * Returns TRUE if it is enabled as well as its buddy (if any)
759 static BOOL
UPDOWN_IsEnabled (const UPDOWN_INFO
*infoPtr
)
761 if (!IsWindowEnabled(infoPtr
->Self
))
764 return IsWindowEnabled(infoPtr
->Buddy
);
768 /***********************************************************************
771 * Deletes any timers, releases the mouse and does redraw if necessary.
772 * If the control is not in "capture" mode, it does nothing.
773 * If the control was not in cancel mode, it returns FALSE.
774 * If the control was in cancel mode, it returns TRUE.
776 static BOOL
UPDOWN_CancelMode (UPDOWN_INFO
*infoPtr
)
778 if (!(infoPtr
->Flags
& FLAG_PRESSED
)) return FALSE
;
780 KillTimer (infoPtr
->Self
, TIMER_AUTOREPEAT
);
781 KillTimer (infoPtr
->Self
, TIMER_ACCEL
);
782 KillTimer (infoPtr
->Self
, TIMER_AUTOPRESS
);
784 if (GetCapture() == infoPtr
->Self
)
787 infoPtr
->Flags
&= ~FLAG_PRESSED
;
788 InvalidateRect (infoPtr
->Self
, NULL
, FALSE
);
793 /***********************************************************************
794 * UPDOWN_HandleMouseEvent
796 * Handle a mouse event for the updown.
797 * 'pt' is the location of the mouse event in client or
798 * windows coordinates.
800 static void UPDOWN_HandleMouseEvent (UPDOWN_INFO
*infoPtr
, UINT msg
, INT x
, INT y
)
807 TRACE("msg %04x point %s\n", msg
, wine_dbgstr_point(&pt
));
811 case WM_LBUTTONDOWN
: /* Initialise mouse tracking */
813 /* If the buddy is an edit, will set focus to it */
814 if (UPDOWN_IsBuddyEdit(infoPtr
)) SetFocus(infoPtr
->Buddy
);
816 /* Now see which one is the 'active' arrow */
817 arrow
= UPDOWN_GetArrowFromPoint (infoPtr
, &rect
, pt
);
819 /* Update the flags if we are in/out */
820 infoPtr
->Flags
&= ~(FLAG_MOUSEIN
| FLAG_ARROW
);
822 infoPtr
->Flags
|= FLAG_MOUSEIN
| arrow
;
824 if (infoPtr
->AccelIndex
!= -1) infoPtr
->AccelIndex
= 0;
826 if (infoPtr
->Flags
& FLAG_ARROW
) {
828 /* Update the CurVal if necessary */
829 UPDOWN_GetBuddyInt (infoPtr
);
831 /* Set up the correct flags */
832 infoPtr
->Flags
|= FLAG_PRESSED
;
834 /* repaint the control */
835 InvalidateRect (infoPtr
->Self
, NULL
, FALSE
);
837 /* process the click */
838 temp
= (infoPtr
->AccelCount
&& infoPtr
->AccelVect
) ? infoPtr
->AccelVect
[0].nInc
: 1;
839 UPDOWN_DoAction (infoPtr
, temp
, infoPtr
->Flags
& FLAG_ARROW
);
841 /* now capture all mouse messages */
842 SetCapture (infoPtr
->Self
);
844 /* and startup the first timer */
845 SetTimer(infoPtr
->Self
, TIMER_AUTOREPEAT
, INITIAL_DELAY
, 0);
850 /* save the flags to see if any got modified */
851 temp
= infoPtr
->Flags
;
853 /* Now see which one is the 'active' arrow */
854 arrow
= UPDOWN_GetArrowFromPoint (infoPtr
, &rect
, pt
);
856 /* Update the flags if we are in/out */
857 infoPtr
->Flags
&= ~(FLAG_MOUSEIN
| FLAG_ARROW
);
859 infoPtr
->Flags
|= FLAG_MOUSEIN
| arrow
;
861 if(infoPtr
->AccelIndex
!= -1) infoPtr
->AccelIndex
= 0;
864 /* If state changed, redraw the control */
865 if(temp
!= infoPtr
->Flags
)
866 InvalidateRect (infoPtr
->Self
, NULL
, FALSE
);
868 /* Set up tracking so the mousein flags can be reset when the
869 * mouse leaves the control */
870 tme
.cbSize
= sizeof( tme
);
871 tme
.dwFlags
= TME_LEAVE
;
872 tme
.hwndTrack
= infoPtr
->Self
;
873 TrackMouseEvent (&tme
);
877 infoPtr
->Flags
&= ~(FLAG_MOUSEIN
| FLAG_ARROW
);
878 InvalidateRect (infoPtr
->Self
, NULL
, FALSE
);
882 ERR("Impossible case (msg=%x)!\n", msg
);
887 /***********************************************************************
890 static LRESULT WINAPI
UpDownWindowProc(HWND hwnd
, UINT message
, WPARAM wParam
, LPARAM lParam
)
892 UPDOWN_INFO
*infoPtr
= UPDOWN_GetInfoPtr (hwnd
);
895 TRACE("hwnd=%p msg=%04x wparam=%08lx lparam=%08lx\n", hwnd
, message
, wParam
, lParam
);
897 if (!infoPtr
&& (message
!= WM_CREATE
))
898 return DefWindowProcW (hwnd
, message
, wParam
, lParam
);
904 CREATESTRUCTW
*pcs
= (CREATESTRUCTW
*)lParam
;
906 infoPtr
= heap_alloc_zero(sizeof(*infoPtr
));
907 SetWindowLongPtrW (hwnd
, 0, (DWORD_PTR
)infoPtr
);
909 /* initialize the info struct */
910 infoPtr
->Self
= hwnd
;
911 infoPtr
->Notify
= pcs
->hwndParent
;
912 infoPtr
->dwStyle
= pcs
->style
;
913 infoPtr
->AccelCount
= 0;
914 infoPtr
->AccelVect
= 0;
915 infoPtr
->AccelIndex
= -1;
917 infoPtr
->MinVal
= 100;
919 infoPtr
->Base
= 10; /* Default to base 10 */
920 infoPtr
->Buddy
= 0; /* No buddy window yet */
921 infoPtr
->Flags
= (infoPtr
->dwStyle
& UDS_SETBUDDYINT
) ? FLAG_BUDDYINT
: 0;
923 SetWindowLongW (hwnd
, GWL_STYLE
, infoPtr
->dwStyle
& ~WS_BORDER
);
924 if (!(infoPtr
->dwStyle
& UDS_HORZ
))
925 SetWindowPos (hwnd
, NULL
, 0, 0, DEFAULT_WIDTH
, pcs
->cy
,
926 SWP_NOOWNERZORDER
| SWP_NOZORDER
| SWP_NOMOVE
);
928 /* Do we pick the buddy win ourselves? */
929 if (infoPtr
->dwStyle
& UDS_AUTOBUDDY
)
930 UPDOWN_SetBuddy (infoPtr
, GetWindow (hwnd
, GW_HWNDPREV
));
932 OpenThemeData (hwnd
, L
"Spin");
934 TRACE("UpDown Ctrl creation, hwnd=%p\n", hwnd
);
939 heap_free (infoPtr
->AccelVect
);
940 UPDOWN_ResetSubclass (infoPtr
);
942 SetWindowLongPtrW (hwnd
, 0, 0);
943 theme
= GetWindowTheme (hwnd
);
944 CloseThemeData (theme
);
945 TRACE("UpDown Ctrl destruction, hwnd=%p\n", hwnd
);
950 infoPtr
->dwStyle
&= ~WS_DISABLED
;
952 infoPtr
->dwStyle
|= WS_DISABLED
;
953 UPDOWN_CancelMode (infoPtr
);
955 InvalidateRect (infoPtr
->Self
, NULL
, FALSE
);
958 case WM_STYLECHANGED
:
959 if (wParam
== GWL_STYLE
) {
960 infoPtr
->dwStyle
= ((LPSTYLESTRUCT
)lParam
)->styleNew
;
961 InvalidateRect (infoPtr
->Self
, NULL
, FALSE
);
965 case WM_THEMECHANGED
:
966 theme
= GetWindowTheme (hwnd
);
967 CloseThemeData (theme
);
968 OpenThemeData (hwnd
, L
"Spin");
969 InvalidateRect (hwnd
, NULL
, FALSE
);
973 /* is this the auto-press timer? */
974 if(wParam
== TIMER_AUTOPRESS
) {
975 KillTimer(hwnd
, TIMER_AUTOPRESS
);
976 infoPtr
->Flags
&= ~(FLAG_PRESSED
| FLAG_ARROW
);
977 InvalidateRect(infoPtr
->Self
, NULL
, FALSE
);
980 /* if initial timer, kill it and start the repeat timer */
981 if(wParam
== TIMER_AUTOREPEAT
) {
984 KillTimer(hwnd
, TIMER_AUTOREPEAT
);
985 /* if no accel info given, used default timer */
986 if(infoPtr
->AccelCount
==0 || infoPtr
->AccelVect
==0) {
987 infoPtr
->AccelIndex
= -1;
988 delay
= REPEAT_DELAY
;
990 infoPtr
->AccelIndex
= 0; /* otherwise, use it */
991 delay
= infoPtr
->AccelVect
[infoPtr
->AccelIndex
].nSec
* 1000 + 1;
993 SetTimer(hwnd
, TIMER_ACCEL
, delay
, 0);
996 /* now, if the mouse is above us, do the thing...*/
997 if(infoPtr
->Flags
& FLAG_MOUSEIN
) {
1000 temp
= infoPtr
->AccelIndex
== -1 ? 1 : infoPtr
->AccelVect
[infoPtr
->AccelIndex
].nInc
;
1001 UPDOWN_DoAction(infoPtr
, temp
, infoPtr
->Flags
& FLAG_ARROW
);
1003 if(infoPtr
->AccelIndex
!= -1 && infoPtr
->AccelIndex
< infoPtr
->AccelCount
-1) {
1004 KillTimer(hwnd
, TIMER_ACCEL
);
1005 infoPtr
->AccelIndex
++; /* move to the next accel info */
1006 temp
= infoPtr
->AccelVect
[infoPtr
->AccelIndex
].nSec
* 1000 + 1;
1007 /* make sure we have at least 1ms intervals */
1008 SetTimer(hwnd
, TIMER_ACCEL
, temp
, 0);
1014 return UPDOWN_CancelMode (infoPtr
);
1017 if (GetCapture() != infoPtr
->Self
) break;
1019 if ( (infoPtr
->Flags
& FLAG_MOUSEIN
) &&
1020 (infoPtr
->Flags
& FLAG_ARROW
) ) {
1022 SendMessageW( infoPtr
->Notify
,
1023 (infoPtr
->dwStyle
& UDS_HORZ
) ? WM_HSCROLL
: WM_VSCROLL
,
1024 MAKELONG(SB_ENDSCROLL
, infoPtr
->CurVal
),
1026 if (UPDOWN_IsBuddyEdit(infoPtr
))
1027 SendMessageW(infoPtr
->Buddy
, EM_SETSEL
, 0, MAKELONG(0, -1));
1029 UPDOWN_CancelMode(infoPtr
);
1032 case WM_LBUTTONDOWN
:
1035 if(UPDOWN_IsEnabled(infoPtr
))
1036 UPDOWN_HandleMouseEvent (infoPtr
, message
, (SHORT
)LOWORD(lParam
), (SHORT
)HIWORD(lParam
));
1040 UPDOWN_MouseWheel(infoPtr
, wParam
);
1044 if((infoPtr
->dwStyle
& UDS_ARROWKEYS
) && UPDOWN_IsEnabled(infoPtr
))
1045 return UPDOWN_KeyPressed(infoPtr
, (int)wParam
);
1048 case WM_PRINTCLIENT
:
1050 return UPDOWN_Paint (infoPtr
, (HDC
)wParam
);
1053 if (wParam
==0 && lParam
==0) return infoPtr
->AccelCount
;
1054 if (wParam
&& lParam
) {
1055 int temp
= min(infoPtr
->AccelCount
, wParam
);
1056 memcpy((void *)lParam
, infoPtr
->AccelVect
, temp
*sizeof(UDACCEL
));
1063 TRACE("UDM_SETACCEL\n");
1065 if(infoPtr
->AccelVect
) {
1066 heap_free (infoPtr
->AccelVect
);
1067 infoPtr
->AccelCount
= 0;
1068 infoPtr
->AccelVect
= 0;
1070 if(wParam
==0) return TRUE
;
1071 infoPtr
->AccelVect
= heap_alloc(wParam
*sizeof(UDACCEL
));
1072 if(!infoPtr
->AccelVect
) return FALSE
;
1073 memcpy(infoPtr
->AccelVect
, (void*)lParam
, wParam
*sizeof(UDACCEL
));
1074 infoPtr
->AccelCount
= wParam
;
1076 if (TRACE_ON(updown
))
1080 for (i
= 0; i
< wParam
; i
++)
1081 TRACE("%u: nSec %u nInc %u\n", i
,
1082 infoPtr
->AccelVect
[i
].nSec
, infoPtr
->AccelVect
[i
].nInc
);
1088 return infoPtr
->Base
;
1091 TRACE("UpDown Ctrl new base(%ld), hwnd=%p\n", wParam
, hwnd
);
1092 if (wParam
==10 || wParam
==16) {
1093 WPARAM old_base
= infoPtr
->Base
;
1094 infoPtr
->Base
= wParam
;
1096 if (old_base
!= infoPtr
->Base
)
1097 UPDOWN_SetBuddyInt(infoPtr
);
1104 return (LRESULT
)infoPtr
->Buddy
;
1107 return (LRESULT
)UPDOWN_SetBuddy (infoPtr
, (HWND
)wParam
);
1114 pos
= UPDOWN_GetPos(infoPtr
, &err
);
1115 return MAKELONG(pos
, err
);
1119 return UPDOWN_SetPos(infoPtr
, (short)LOWORD(lParam
));
1122 return MAKELONG(infoPtr
->MaxVal
, infoPtr
->MinVal
);
1126 UD_MINVAL <= Max <= UD_MAXVAL
1127 UD_MINVAL <= Min <= UD_MAXVAL
1128 |Max-Min| <= UD_MAXVAL */
1129 UPDOWN_SetRange(infoPtr
, (short)lParam
, (short)HIWORD(lParam
));
1132 case UDM_GETRANGE32
:
1133 if (wParam
) *(LPINT
)wParam
= infoPtr
->MinVal
;
1134 if (lParam
) *(LPINT
)lParam
= infoPtr
->MaxVal
;
1137 case UDM_SETRANGE32
:
1138 UPDOWN_SetRange(infoPtr
, (INT
)lParam
, (INT
)wParam
);
1143 return UPDOWN_GetPos(infoPtr
, (BOOL
*)lParam
);
1147 return UPDOWN_SetPos(infoPtr
, (int)lParam
);
1149 case UDM_GETUNICODEFORMAT
:
1150 /* we lie a bit here, we're always using Unicode internally */
1151 return infoPtr
->UnicodeFormat
;
1153 case UDM_SETUNICODEFORMAT
:
1155 /* do we really need to honour this flag? */
1156 int temp
= infoPtr
->UnicodeFormat
;
1157 infoPtr
->UnicodeFormat
= (BOOL
)wParam
;
1161 if ((message
>= WM_USER
) && (message
< WM_APP
) && !COMCTL32_IsReflectedMessage(message
))
1162 ERR("unknown msg %04x wp=%04lx lp=%08lx\n", message
, wParam
, lParam
);
1163 return DefWindowProcW (hwnd
, message
, wParam
, lParam
);
1169 /***********************************************************************
1170 * UPDOWN_Register [Internal]
1172 * Registers the updown window class.
1174 void UPDOWN_Register(void)
1178 ZeroMemory( &wndClass
, sizeof( WNDCLASSW
) );
1179 wndClass
.style
= CS_GLOBALCLASS
| CS_VREDRAW
| CS_HREDRAW
;
1180 wndClass
.lpfnWndProc
= UpDownWindowProc
;
1181 wndClass
.cbClsExtra
= 0;
1182 wndClass
.cbWndExtra
= sizeof(UPDOWN_INFO
*);
1183 wndClass
.hCursor
= LoadCursorW( 0, (LPWSTR
)IDC_ARROW
);
1184 wndClass
.hbrBackground
= (HBRUSH
)(COLOR_BTNFACE
+ 1);
1185 wndClass
.lpszClassName
= UPDOWN_CLASSW
;
1187 RegisterClassW( &wndClass
);
1191 /***********************************************************************
1192 * UPDOWN_Unregister [Internal]
1194 * Unregisters the updown window class.
1196 void UPDOWN_Unregister (void)
1198 UnregisterClassW (UPDOWN_CLASSW
, NULL
);