configure: Changes from running autconf after previous patch.
[wine/hacks.git] / dlls / comctl32 / updown.c
blob75653e18d6709e7a4eec1f8fefad2684ed123d6b
1 /*
2 * Updown control
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
20 * NOTE
22 * This code was audited for completeness against the documented features
23 * of Comctl32.dll version 6.0 on Sep. 9, 2002, by Dimitrie O. Paun.
25 * Unless otherwise noted, we believe this code to be complete, as per
26 * the specification mentioned above.
27 * If you discover missing features, or bugs, please note them below.
31 #include <stdlib.h>
32 #include <string.h>
33 #include <stdarg.h>
34 #include <stdio.h>
36 #include "windef.h"
37 #include "winbase.h"
38 #include "wingdi.h"
39 #include "winuser.h"
40 #include "winnls.h"
41 #include "commctrl.h"
42 #include "comctl32.h"
43 #include "uxtheme.h"
44 #include "tmschema.h"
45 #include "wine/unicode.h"
46 #include "wine/debug.h"
48 WINE_DEFAULT_DEBUG_CHANNEL(updown);
50 typedef struct
52 HWND Self; /* Handle to this up-down control */
53 HWND Notify; /* Handle to the parent window */
54 DWORD dwStyle; /* The GWL_STYLE for this window */
55 UINT AccelCount; /* Number of elements in AccelVect */
56 UDACCEL* AccelVect; /* Vector containing AccelCount elements */
57 INT AccelIndex; /* Current accel index, -1 if not accel'ing */
58 INT Base; /* Base to display nr in the buddy window */
59 INT CurVal; /* Current up-down value */
60 INT MinVal; /* Minimum up-down value */
61 INT MaxVal; /* Maximum up-down value */
62 HWND Buddy; /* Handle to the buddy window */
63 INT BuddyType; /* Remembers the buddy type BUDDY_TYPE_* */
64 INT Flags; /* Internal Flags FLAG_* */
65 BOOL UnicodeFormat; /* Marks the use of Unicode internally */
66 } UPDOWN_INFO;
68 /* Control configuration constants */
70 #define INITIAL_DELAY 500 /* initial timer until auto-inc kicks in */
71 #define AUTOPRESS_DELAY 250 /* time to keep arrow pressed on KEY_DOWN */
72 #define REPEAT_DELAY 50 /* delay between auto-increments */
74 #define DEFAULT_WIDTH 16 /* default width of the ctrl */
75 #define DEFAULT_XSEP 0 /* default separation between buddy and ctrl */
76 #define DEFAULT_ADDTOP 0 /* amount to extend above the buddy window */
77 #define DEFAULT_ADDBOT 0 /* amount to extend below the buddy window */
78 #define DEFAULT_BUDDYBORDER 2 /* Width/height of the buddy border */
79 #define DEFAULT_BUDDYSPACER 2 /* Spacer between the buddy and the ctrl */
80 #define DEFAULT_BUDDYBORDER_THEMED 1 /* buddy border when theming is enabled */
81 #define DEFAULT_BUDDYSPACER_THEMED 0 /* buddy spacer when theming is enabled */
83 /* Work constants */
85 #define FLAG_INCR 0x01
86 #define FLAG_DECR 0x02
87 #define FLAG_MOUSEIN 0x04
88 #define FLAG_PRESSED 0x08
89 #define FLAG_BUDDYINT 0x10 /* UDS_SETBUDDYINT was set on creation */
90 #define FLAG_ARROW (FLAG_INCR | FLAG_DECR)
92 #define BUDDY_TYPE_UNKNOWN 0
93 #define BUDDY_TYPE_LISTBOX 1
94 #define BUDDY_TYPE_EDIT 2
96 #define TIMER_AUTOREPEAT 1
97 #define TIMER_ACCEL 2
98 #define TIMER_AUTOPRESS 3
100 #define UPDOWN_GetInfoPtr(hwnd) ((UPDOWN_INFO *)GetWindowLongPtrW (hwnd,0))
101 #define COUNT_OF(a) (sizeof(a)/sizeof(a[0]))
103 /* id used for SetWindowSubclass */
104 #define BUDDY_SUBCLASSID 1
106 static void UPDOWN_DoAction (UPDOWN_INFO *infoPtr, int delta, int action);
108 /***********************************************************************
109 * UPDOWN_IsBuddyEdit
110 * Tests if our buddy is an edit control.
112 static inline BOOL UPDOWN_IsBuddyEdit(const UPDOWN_INFO *infoPtr)
114 return infoPtr->BuddyType == BUDDY_TYPE_EDIT;
117 /***********************************************************************
118 * UPDOWN_IsBuddyListbox
119 * Tests if our buddy is a listbox control.
121 static inline BOOL UPDOWN_IsBuddyListbox(const UPDOWN_INFO *infoPtr)
123 return infoPtr->BuddyType == BUDDY_TYPE_LISTBOX;
126 /***********************************************************************
127 * UPDOWN_InBounds
128 * Tests if a given value 'val' is between the Min&Max limits
130 static BOOL UPDOWN_InBounds(const UPDOWN_INFO *infoPtr, int val)
132 if(infoPtr->MaxVal > infoPtr->MinVal)
133 return (infoPtr->MinVal <= val) && (val <= infoPtr->MaxVal);
134 else
135 return (infoPtr->MaxVal <= val) && (val <= infoPtr->MinVal);
138 /***********************************************************************
139 * UPDOWN_OffsetVal
140 * Change the current value by delta.
141 * It returns TRUE is the value was changed successfully, or FALSE
142 * if the value was not changed, as it would go out of bounds.
144 static BOOL UPDOWN_OffsetVal(UPDOWN_INFO *infoPtr, int delta)
146 /* check if we can do the modification first */
147 if(!UPDOWN_InBounds (infoPtr, infoPtr->CurVal+delta)) {
148 if (infoPtr->dwStyle & UDS_WRAP) {
149 delta += (delta < 0 ? -1 : 1) *
150 (infoPtr->MaxVal < infoPtr->MinVal ? -1 : 1) *
151 (infoPtr->MinVal - infoPtr->MaxVal) +
152 (delta < 0 ? 1 : -1);
153 } else return FALSE;
156 infoPtr->CurVal += delta;
157 return TRUE;
160 /***********************************************************************
161 * UPDOWN_HasBuddyBorder
163 * When we have a buddy set and that we are aligned on our buddy, we
164 * want to draw a sunken edge to make like we are part of that control.
166 static BOOL UPDOWN_HasBuddyBorder(const UPDOWN_INFO *infoPtr)
168 return ( ((infoPtr->dwStyle & (UDS_ALIGNLEFT | UDS_ALIGNRIGHT)) != 0) &&
169 UPDOWN_IsBuddyEdit(infoPtr) );
172 /***********************************************************************
173 * UPDOWN_GetArrowRect
174 * wndPtr - pointer to the up-down wnd
175 * rect - will hold the rectangle
176 * arrow - FLAG_INCR to get the "increment" rect (up or right)
177 * FLAG_DECR to get the "decrement" rect (down or left)
178 * If both flags are present, the envelope is returned.
180 static void UPDOWN_GetArrowRect (const UPDOWN_INFO* infoPtr, RECT *rect, int arrow)
182 HTHEME theme = GetWindowTheme (infoPtr->Self);
183 const int border = theme ? DEFAULT_BUDDYBORDER_THEMED : DEFAULT_BUDDYBORDER;
184 const int spacer = theme ? DEFAULT_BUDDYSPACER_THEMED : DEFAULT_BUDDYSPACER;
185 GetClientRect (infoPtr->Self, rect);
188 * Make sure we calculate the rectangle to fit even if we draw the
189 * border.
191 if (UPDOWN_HasBuddyBorder(infoPtr)) {
192 if (infoPtr->dwStyle & UDS_ALIGNLEFT)
193 rect->left += border;
194 else
195 rect->right -= border;
197 InflateRect(rect, 0, -border);
200 /* now figure out if we need a space away from the buddy */
201 if (IsWindow(infoPtr->Buddy) ) {
202 if (infoPtr->dwStyle & UDS_ALIGNLEFT) rect->right -= spacer;
203 else if (infoPtr->dwStyle & UDS_ALIGNRIGHT) rect->left += spacer;
207 * We're calculating the midpoint to figure-out where the
208 * separation between the buttons will lay. We make sure that we
209 * round the uneven numbers by adding 1.
211 if (infoPtr->dwStyle & UDS_HORZ) {
212 int len = rect->right - rect->left + 1; /* compute the width */
213 if (arrow & FLAG_INCR)
214 rect->left = rect->left + len/2;
215 if (arrow & FLAG_DECR)
216 rect->right = rect->left + len/2 - (theme ? 0 : 1);
217 } else {
218 int len = rect->bottom - rect->top + 1; /* compute the height */
219 if (arrow & FLAG_INCR)
220 rect->bottom = rect->top + len/2 - (theme ? 0 : 1);
221 if (arrow & FLAG_DECR)
222 rect->top = rect->top + len/2;
226 /***********************************************************************
227 * UPDOWN_GetArrowFromPoint
228 * Returns the rectagle (for the up or down arrow) that contains pt.
229 * If it returns the up rect, it returns FLAG_INCR.
230 * If it returns the down rect, it returns FLAG_DECR.
232 static INT UPDOWN_GetArrowFromPoint (const UPDOWN_INFO *infoPtr, RECT *rect, POINT pt)
234 UPDOWN_GetArrowRect (infoPtr, rect, FLAG_INCR);
235 if(PtInRect(rect, pt)) return FLAG_INCR;
237 UPDOWN_GetArrowRect (infoPtr, rect, FLAG_DECR);
238 if(PtInRect(rect, pt)) return FLAG_DECR;
240 return 0;
244 /***********************************************************************
245 * UPDOWN_GetThousandSep
246 * Returns the thousand sep. If an error occurs, it returns ','.
248 static WCHAR UPDOWN_GetThousandSep(void)
250 WCHAR sep[2];
252 if(GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_STHOUSAND, sep, 2) != 1)
253 sep[0] = ',';
255 return sep[0];
258 /***********************************************************************
259 * UPDOWN_GetBuddyInt
260 * Tries to read the pos from the buddy window and if it succeeds,
261 * it stores it in the control's CurVal
262 * returns:
263 * TRUE - if it read the integer from the buddy successfully
264 * FALSE - if an error occurred
266 static BOOL UPDOWN_GetBuddyInt (UPDOWN_INFO *infoPtr)
268 WCHAR txt[20], sep, *src, *dst;
269 int newVal;
271 if (!((infoPtr->Flags & FLAG_BUDDYINT) && IsWindow(infoPtr->Buddy)))
272 return FALSE;
274 /*if the buddy is a list window, we must set curr index */
275 if (UPDOWN_IsBuddyListbox(infoPtr)) {
276 newVal = SendMessageW(infoPtr->Buddy, LB_GETCARETINDEX, 0, 0);
277 if(newVal < 0) return FALSE;
278 } else {
279 /* we have a regular window, so will get the text */
280 /* note that a zero-length string is a legitimate value for 'txt',
281 * and ought to result in a successful conversion to '0'. */
282 if (GetWindowTextW(infoPtr->Buddy, txt, COUNT_OF(txt)) < 0)
283 return FALSE;
285 sep = UPDOWN_GetThousandSep();
287 /* now get rid of the separators */
288 for(src = dst = txt; *src; src++)
289 if(*src != sep) *dst++ = *src;
290 *dst = 0;
292 /* try to convert the number and validate it */
293 newVal = strtolW(txt, &src, infoPtr->Base);
294 if(*src || !UPDOWN_InBounds (infoPtr, newVal)) return FALSE;
297 TRACE("new value(%d) from buddy (old=%d)\n", newVal, infoPtr->CurVal);
298 infoPtr->CurVal = newVal;
299 return TRUE;
303 /***********************************************************************
304 * UPDOWN_SetBuddyInt
305 * Tries to set the pos to the buddy window based on current pos
306 * returns:
307 * TRUE - if it set the caption of the buddy successfully
308 * FALSE - if an error occurred
310 static BOOL UPDOWN_SetBuddyInt (const UPDOWN_INFO *infoPtr)
312 static const WCHAR fmt_hex[] = { '0', 'x', '%', '0', '4', 'X', 0 };
313 static const WCHAR fmt_dec_oct[] = { '%', 'd', '\0' };
314 const WCHAR *fmt;
315 WCHAR txt[20], txt_old[20] = { 0 };
316 int len;
318 if (!((infoPtr->Flags & FLAG_BUDDYINT) && IsWindow(infoPtr->Buddy)))
319 return FALSE;
321 TRACE("set new value(%d) to buddy.\n", infoPtr->CurVal);
323 /*if the buddy is a list window, we must set curr index */
324 if (UPDOWN_IsBuddyListbox(infoPtr)) {
325 return SendMessageW(infoPtr->Buddy, LB_SETCURSEL, infoPtr->CurVal, 0) != LB_ERR;
328 /* Regular window, so set caption to the number */
329 fmt = (infoPtr->Base == 16) ? fmt_hex : fmt_dec_oct;
330 len = wsprintfW(txt, fmt, infoPtr->CurVal);
333 /* Do thousands separation if necessary */
334 if ((infoPtr->Base == 10) && !(infoPtr->dwStyle & UDS_NOTHOUSANDS) && (len > 3)) {
335 WCHAR tmp[COUNT_OF(txt)], *src = tmp, *dst = txt;
336 WCHAR sep = UPDOWN_GetThousandSep();
337 int start = len % 3;
339 memcpy(tmp, txt, sizeof(txt));
340 if (start == 0) start = 3;
341 dst += start;
342 src += start;
343 for (len=0; *src; len++) {
344 if (len % 3 == 0) *dst++ = sep;
345 *dst++ = *src++;
347 *dst = 0;
350 /* if nothing changed exit earlier */
351 GetWindowTextW(infoPtr->Buddy, txt_old, sizeof(txt_old)/sizeof(WCHAR));
352 if (lstrcmpiW(txt_old, txt) == 0) return 0;
354 return SetWindowTextW(infoPtr->Buddy, txt);
357 /***********************************************************************
358 * UPDOWN_DrawBuddyBackground
360 * Draw buddy background for visual integration.
362 static BOOL UPDOWN_DrawBuddyBackground (const UPDOWN_INFO *infoPtr, HDC hdc)
364 RECT br;
365 HTHEME buddyTheme = GetWindowTheme (infoPtr->Buddy);
366 if (!buddyTheme) return FALSE;
368 GetClientRect (infoPtr->Buddy, &br);
369 MapWindowPoints (infoPtr->Buddy, infoPtr->Self, (POINT*)&br, 2);
370 /* FIXME: take disabled etc. into account */
371 DrawThemeBackground (buddyTheme, hdc, 0, 0, &br, NULL);
372 return TRUE;
375 /***********************************************************************
376 * UPDOWN_Draw
378 * Draw the arrows. The background need not be erased.
380 static LRESULT UPDOWN_Draw (const UPDOWN_INFO *infoPtr, HDC hdc)
382 BOOL uPressed, uHot, dPressed, dHot;
383 RECT rect;
384 HTHEME theme = GetWindowTheme (infoPtr->Self);
385 int uPart = 0, uState = 0, dPart = 0, dState = 0;
386 BOOL needBuddyBg = FALSE;
388 uPressed = (infoPtr->Flags & FLAG_PRESSED) && (infoPtr->Flags & FLAG_INCR);
389 uHot = (infoPtr->Flags & FLAG_INCR) && (infoPtr->Flags & FLAG_MOUSEIN);
390 dPressed = (infoPtr->Flags & FLAG_PRESSED) && (infoPtr->Flags & FLAG_DECR);
391 dHot = (infoPtr->Flags & FLAG_DECR) && (infoPtr->Flags & FLAG_MOUSEIN);
392 if (theme) {
393 uPart = (infoPtr->dwStyle & UDS_HORZ) ? SPNP_UPHORZ : SPNP_UP;
394 uState = (infoPtr->dwStyle & WS_DISABLED) ? DNS_DISABLED
395 : (uPressed ? DNS_PRESSED : (uHot ? DNS_HOT : DNS_NORMAL));
396 dPart = (infoPtr->dwStyle & UDS_HORZ) ? SPNP_DOWNHORZ : SPNP_DOWN;
397 dState = (infoPtr->dwStyle & WS_DISABLED) ? DNS_DISABLED
398 : (dPressed ? DNS_PRESSED : (dHot ? DNS_HOT : DNS_NORMAL));
399 needBuddyBg = IsWindow (infoPtr->Buddy)
400 && (IsThemeBackgroundPartiallyTransparent (theme, uPart, uState)
401 || IsThemeBackgroundPartiallyTransparent (theme, dPart, dState));
404 /* Draw the common border between ourselves and our buddy */
405 if (UPDOWN_HasBuddyBorder(infoPtr) || needBuddyBg) {
406 if (!theme || !UPDOWN_DrawBuddyBackground (infoPtr, hdc)) {
407 GetClientRect(infoPtr->Self, &rect);
408 DrawEdge(hdc, &rect, EDGE_SUNKEN,
409 BF_BOTTOM | BF_TOP |
410 (infoPtr->dwStyle & UDS_ALIGNLEFT ? BF_LEFT : BF_RIGHT));
414 /* Draw the incr button */
415 UPDOWN_GetArrowRect (infoPtr, &rect, FLAG_INCR);
416 if (theme) {
417 DrawThemeBackground(theme, hdc, uPart, uState, &rect, NULL);
418 } else {
419 DrawFrameControl(hdc, &rect, DFC_SCROLL,
420 (infoPtr->dwStyle & UDS_HORZ ? DFCS_SCROLLRIGHT : DFCS_SCROLLUP) |
421 ((infoPtr->dwStyle & UDS_HOTTRACK) && uHot ? DFCS_HOT : 0) |
422 (uPressed ? DFCS_PUSHED : 0) |
423 (infoPtr->dwStyle & WS_DISABLED ? DFCS_INACTIVE : 0) );
426 /* Draw the decr button */
427 UPDOWN_GetArrowRect(infoPtr, &rect, FLAG_DECR);
428 if (theme) {
429 DrawThemeBackground(theme, hdc, dPart, dState, &rect, NULL);
430 } else {
431 DrawFrameControl(hdc, &rect, DFC_SCROLL,
432 (infoPtr->dwStyle & UDS_HORZ ? DFCS_SCROLLLEFT : DFCS_SCROLLDOWN) |
433 ((infoPtr->dwStyle & UDS_HOTTRACK) && dHot ? DFCS_HOT : 0) |
434 (dPressed ? DFCS_PUSHED : 0) |
435 (infoPtr->dwStyle & WS_DISABLED ? DFCS_INACTIVE : 0) );
438 return 0;
441 /***********************************************************************
442 * UPDOWN_Paint
444 * Asynchronous drawing (must ONLY be used in WM_PAINT).
445 * Calls UPDOWN_Draw.
447 static LRESULT UPDOWN_Paint (const UPDOWN_INFO *infoPtr, HDC hdc)
449 PAINTSTRUCT ps;
450 if (hdc) return UPDOWN_Draw (infoPtr, hdc);
451 hdc = BeginPaint (infoPtr->Self, &ps);
452 UPDOWN_Draw (infoPtr, hdc);
453 EndPaint (infoPtr->Self, &ps);
454 return 0;
457 /***********************************************************************
458 * UPDOWN_KeyPressed
460 * Handle key presses (up & down) when we have to do so
462 static LRESULT UPDOWN_KeyPressed(UPDOWN_INFO *infoPtr, int key)
464 int arrow, accel;
466 if (key == VK_UP) arrow = FLAG_INCR;
467 else if (key == VK_DOWN) arrow = FLAG_DECR;
468 else return 1;
470 UPDOWN_GetBuddyInt (infoPtr);
471 infoPtr->Flags &= ~FLAG_ARROW;
472 infoPtr->Flags |= FLAG_PRESSED | arrow;
473 InvalidateRect (infoPtr->Self, NULL, FALSE);
474 SetTimer(infoPtr->Self, TIMER_AUTOPRESS, AUTOPRESS_DELAY, 0);
475 accel = (infoPtr->AccelCount && infoPtr->AccelVect) ? infoPtr->AccelVect[0].nInc : 1;
476 UPDOWN_DoAction (infoPtr, accel, arrow);
477 return 0;
480 /***********************************************************************
481 * UPDOWN_SetRange
483 * Handle UDM_SETRANGE, UDM_SETRANGE32
485 * FIXME: handle Max == Min properly:
486 * - arrows should be disabled (without WS_DISABLED set),
487 * visually they can't be pressed and don't respond;
488 * - all input messages should still pass in.
490 static LRESULT UPDOWN_SetRange(UPDOWN_INFO *infoPtr, INT Max, INT Min)
492 infoPtr->MaxVal = Max;
493 infoPtr->MinVal = Min;
495 TRACE("UpDown Ctrl new range(%d to %d), hwnd=%p\n",
496 infoPtr->MinVal, infoPtr->MaxVal, infoPtr->Self);
498 return 0;
501 /***********************************************************************
502 * UPDOWN_MouseWheel
504 * Handle mouse wheel scrolling
506 static LRESULT UPDOWN_MouseWheel(UPDOWN_INFO *infoPtr, WPARAM wParam)
508 int iWheelDelta = GET_WHEEL_DELTA_WPARAM(wParam) / WHEEL_DELTA;
510 if (wParam & (MK_SHIFT | MK_CONTROL))
511 return 0;
513 if (iWheelDelta != 0)
515 UPDOWN_GetBuddyInt(infoPtr);
516 UPDOWN_DoAction(infoPtr, abs(iWheelDelta), iWheelDelta > 0 ? FLAG_INCR : FLAG_DECR);
519 return 1;
523 /***********************************************************************
524 * UPDOWN_Buddy_SubclassProc used to handle messages sent to the buddy
525 * control.
527 static LRESULT CALLBACK
528 UPDOWN_Buddy_SubclassProc(HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam,
529 UINT_PTR uId, DWORD_PTR ref_data)
531 UPDOWN_INFO *infoPtr = UPDOWN_GetInfoPtr((HWND)ref_data);
533 TRACE("hwnd=%p, uMsg=%04x, wParam=%08lx, lParam=%08lx\n",
534 hwnd, uMsg, wParam, lParam);
536 switch(uMsg)
538 case WM_KEYDOWN:
539 UPDOWN_KeyPressed(infoPtr, (int)wParam);
540 if ((wParam == VK_UP) || (wParam == VK_DOWN)) return 0;
541 break;
543 case WM_MOUSEWHEEL:
544 UPDOWN_MouseWheel(infoPtr, (int)wParam);
545 break;
547 default:
548 break;
551 return DefSubclassProc(hwnd, uMsg, wParam, lParam);
554 /***********************************************************************
555 * UPDOWN_SetBuddy
557 * Sets bud as a new Buddy.
558 * Then, it should subclass the buddy
559 * If window has the UDS_ARROWKEYS, it subclasses the buddy window to
560 * process the UP/DOWN arrow keys.
561 * If window has the UDS_ALIGNLEFT or UDS_ALIGNRIGHT style
562 * the size/pos of the buddy and the control are adjusted accordingly.
564 static HWND UPDOWN_SetBuddy (UPDOWN_INFO* infoPtr, HWND bud)
566 RECT budRect; /* new coord for the buddy */
567 int x, width; /* new x position and width for the up-down */
568 WCHAR buddyClass[40];
569 HWND ret;
571 TRACE("(hwnd=%p, bud=%p)\n", infoPtr->Self, bud);
573 ret = infoPtr->Buddy;
575 /* there is already a buddy assigned */
576 if (infoPtr->Buddy) RemoveWindowSubclass(infoPtr->Buddy, UPDOWN_Buddy_SubclassProc,
577 BUDDY_SUBCLASSID);
578 if (!IsWindow(bud)) bud = NULL;
580 /* Store buddy window handle */
581 infoPtr->Buddy = bud;
583 if(bud) {
584 /* Store buddy window class type */
585 infoPtr->BuddyType = BUDDY_TYPE_UNKNOWN;
586 if (GetClassNameW(bud, buddyClass, COUNT_OF(buddyClass))) {
587 if (lstrcmpiW(buddyClass, WC_EDITW) == 0)
588 infoPtr->BuddyType = BUDDY_TYPE_EDIT;
589 else if (lstrcmpiW(buddyClass, WC_LISTBOXW) == 0)
590 infoPtr->BuddyType = BUDDY_TYPE_LISTBOX;
593 if (infoPtr->dwStyle & UDS_ARROWKEYS)
594 SetWindowSubclass(bud, UPDOWN_Buddy_SubclassProc, BUDDY_SUBCLASSID,
595 (DWORD_PTR)infoPtr->Self);
597 /* Get the rect of the buddy relative to its parent */
598 GetWindowRect(infoPtr->Buddy, &budRect);
599 MapWindowPoints(HWND_DESKTOP, GetParent(infoPtr->Buddy), (POINT *)(&budRect.left), 2);
601 /* now do the positioning */
602 if (infoPtr->dwStyle & UDS_ALIGNLEFT) {
603 x = budRect.left;
604 budRect.left += DEFAULT_WIDTH + DEFAULT_XSEP;
605 } else if (infoPtr->dwStyle & UDS_ALIGNRIGHT) {
606 budRect.right -= DEFAULT_WIDTH + DEFAULT_XSEP;
607 x = budRect.right+DEFAULT_XSEP;
608 } else {
609 /* nothing to do */
610 return ret;
613 /* first adjust the buddy to accommodate the up/down */
614 SetWindowPos(infoPtr->Buddy, 0, budRect.left, budRect.top,
615 budRect.right - budRect.left, budRect.bottom - budRect.top,
616 SWP_NOACTIVATE|SWP_NOZORDER);
618 /* now position the up/down */
619 /* Since the UDS_ALIGN* flags were used, */
620 /* we will pick the position and size of the window. */
621 width = DEFAULT_WIDTH;
624 * If the updown has a buddy border, it has to overlap with the buddy
625 * to look as if it is integrated with the buddy control.
626 * We nudge the control or change its size to overlap.
628 if (UPDOWN_HasBuddyBorder(infoPtr)) {
629 if(infoPtr->dwStyle & UDS_ALIGNLEFT)
630 width += DEFAULT_BUDDYBORDER;
631 else
632 x -= DEFAULT_BUDDYBORDER;
635 SetWindowPos(infoPtr->Self, 0, x,
636 budRect.top - DEFAULT_ADDTOP, width,
637 budRect.bottom - budRect.top + DEFAULT_ADDTOP + DEFAULT_ADDBOT,
638 SWP_NOACTIVATE|SWP_FRAMECHANGED|SWP_NOZORDER);
639 } else {
640 RECT rect;
641 GetWindowRect(infoPtr->Self, &rect);
642 MapWindowPoints(HWND_DESKTOP, GetParent(infoPtr->Self), (POINT *)&rect, 2);
643 SetWindowPos(infoPtr->Self, 0, rect.left, rect.top, DEFAULT_WIDTH, rect.bottom - rect.top,
644 SWP_NOACTIVATE|SWP_FRAMECHANGED|SWP_NOZORDER);
646 return ret;
649 /***********************************************************************
650 * UPDOWN_DoAction
652 * This function increments/decrements the CurVal by the
653 * 'delta' amount according to the 'action' flag which can be a
654 * combination of FLAG_INCR and FLAG_DECR
655 * It notifies the parent as required.
656 * It handles wrapping and non-wrapping correctly.
657 * It is assumed that delta>0
659 static void UPDOWN_DoAction (UPDOWN_INFO *infoPtr, int delta, int action)
661 NM_UPDOWN ni;
663 TRACE("%d by %d\n", action, delta);
665 /* check if we can do the modification first */
666 delta *= (action & FLAG_INCR ? 1 : -1) * (infoPtr->MaxVal < infoPtr->MinVal ? -1 : 1);
667 if ( (action & FLAG_INCR) && (action & FLAG_DECR) ) delta = 0;
669 TRACE("current %d, delta: %d\n", infoPtr->CurVal, delta);
671 /* We must notify parent now to obtain permission */
672 ni.iPos = infoPtr->CurVal;
673 ni.iDelta = delta;
674 ni.hdr.hwndFrom = infoPtr->Self;
675 ni.hdr.idFrom = GetWindowLongPtrW (infoPtr->Self, GWLP_ID);
676 ni.hdr.code = UDN_DELTAPOS;
677 if (!SendMessageW(infoPtr->Notify, WM_NOTIFY, ni.hdr.idFrom, (LPARAM)&ni)) {
678 /* Parent said: OK to adjust */
680 /* Now adjust value with (maybe new) delta */
681 if (UPDOWN_OffsetVal (infoPtr, ni.iDelta)) {
682 TRACE("new %d, delta: %d\n", infoPtr->CurVal, ni.iDelta);
684 /* Now take care about our buddy */
685 UPDOWN_SetBuddyInt (infoPtr);
689 /* Also, notify it. This message is sent in any case. */
690 SendMessageW( infoPtr->Notify, (infoPtr->dwStyle & UDS_HORZ) ? WM_HSCROLL : WM_VSCROLL,
691 MAKELONG(SB_THUMBPOSITION, infoPtr->CurVal), (LPARAM)infoPtr->Self);
694 /***********************************************************************
695 * UPDOWN_IsEnabled
697 * Returns TRUE if it is enabled as well as its buddy (if any)
698 * FALSE otherwise
700 static BOOL UPDOWN_IsEnabled (const UPDOWN_INFO *infoPtr)
702 if (!IsWindowEnabled(infoPtr->Self))
703 return FALSE;
704 if(infoPtr->Buddy)
705 return IsWindowEnabled(infoPtr->Buddy);
706 return TRUE;
709 /***********************************************************************
710 * UPDOWN_CancelMode
712 * Deletes any timers, releases the mouse and does redraw if necessary.
713 * If the control is not in "capture" mode, it does nothing.
714 * If the control was not in cancel mode, it returns FALSE.
715 * If the control was in cancel mode, it returns TRUE.
717 static BOOL UPDOWN_CancelMode (UPDOWN_INFO *infoPtr)
719 if (!(infoPtr->Flags & FLAG_PRESSED)) return FALSE;
721 KillTimer (infoPtr->Self, TIMER_AUTOREPEAT);
722 KillTimer (infoPtr->Self, TIMER_ACCEL);
723 KillTimer (infoPtr->Self, TIMER_AUTOPRESS);
725 if (GetCapture() == infoPtr->Self) {
726 NMHDR hdr;
727 hdr.hwndFrom = infoPtr->Self;
728 hdr.idFrom = GetWindowLongPtrW (infoPtr->Self, GWLP_ID);
729 hdr.code = NM_RELEASEDCAPTURE;
730 SendMessageW(infoPtr->Notify, WM_NOTIFY, hdr.idFrom, (LPARAM)&hdr);
731 ReleaseCapture();
734 infoPtr->Flags &= ~FLAG_PRESSED;
735 InvalidateRect (infoPtr->Self, NULL, FALSE);
737 return TRUE;
740 /***********************************************************************
741 * UPDOWN_HandleMouseEvent
743 * Handle a mouse event for the updown.
744 * 'pt' is the location of the mouse event in client or
745 * windows coordinates.
747 static void UPDOWN_HandleMouseEvent (UPDOWN_INFO *infoPtr, UINT msg, INT x, INT y)
749 POINT pt = { x, y };
750 RECT rect;
751 int temp, arrow;
752 TRACKMOUSEEVENT tme;
754 TRACE("msg %04x point %s\n", msg, wine_dbgstr_point(&pt));
756 switch(msg)
758 case WM_LBUTTONDOWN: /* Initialise mouse tracking */
760 /* If the buddy is an edit, will set focus to it */
761 if (UPDOWN_IsBuddyEdit(infoPtr)) SetFocus(infoPtr->Buddy);
763 /* Now see which one is the 'active' arrow */
764 arrow = UPDOWN_GetArrowFromPoint (infoPtr, &rect, pt);
766 /* Update the flags if we are in/out */
767 infoPtr->Flags &= ~(FLAG_MOUSEIN | FLAG_ARROW);
768 if (arrow)
769 infoPtr->Flags |= FLAG_MOUSEIN | arrow;
770 else
771 if (infoPtr->AccelIndex != -1) infoPtr->AccelIndex = 0;
773 if (infoPtr->Flags & FLAG_ARROW) {
775 /* Update the CurVal if necessary */
776 UPDOWN_GetBuddyInt (infoPtr);
778 /* Set up the correct flags */
779 infoPtr->Flags |= FLAG_PRESSED;
781 /* repaint the control */
782 InvalidateRect (infoPtr->Self, NULL, FALSE);
784 /* process the click */
785 temp = (infoPtr->AccelCount && infoPtr->AccelVect) ? infoPtr->AccelVect[0].nInc : 1;
786 UPDOWN_DoAction (infoPtr, temp, infoPtr->Flags & FLAG_ARROW);
788 /* now capture all mouse messages */
789 SetCapture (infoPtr->Self);
791 /* and startup the first timer */
792 SetTimer(infoPtr->Self, TIMER_AUTOREPEAT, INITIAL_DELAY, 0);
794 break;
796 case WM_MOUSEMOVE:
797 /* save the flags to see if any got modified */
798 temp = infoPtr->Flags;
800 /* Now see which one is the 'active' arrow */
801 arrow = UPDOWN_GetArrowFromPoint (infoPtr, &rect, pt);
803 /* Update the flags if we are in/out */
804 infoPtr->Flags &= ~(FLAG_MOUSEIN | FLAG_ARROW);
805 if(arrow) {
806 infoPtr->Flags |= FLAG_MOUSEIN | arrow;
807 } else {
808 if(infoPtr->AccelIndex != -1) infoPtr->AccelIndex = 0;
811 /* If state changed, redraw the control */
812 if(temp != infoPtr->Flags)
813 InvalidateRect (infoPtr->Self, NULL, FALSE);
815 /* Set up tracking so the mousein flags can be reset when the
816 * mouse leaves the control */
817 tme.cbSize = sizeof( tme );
818 tme.dwFlags = TME_LEAVE;
819 tme.hwndTrack = infoPtr->Self;
820 TrackMouseEvent (&tme);
822 break;
823 case WM_MOUSELEAVE:
824 infoPtr->Flags &= ~(FLAG_MOUSEIN | FLAG_ARROW);
825 InvalidateRect (infoPtr->Self, NULL, FALSE);
826 break;
828 default:
829 ERR("Impossible case (msg=%x)!\n", msg);
834 /***********************************************************************
835 * UpDownWndProc
837 static LRESULT WINAPI UpDownWindowProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
839 UPDOWN_INFO *infoPtr = UPDOWN_GetInfoPtr (hwnd);
840 static const WCHAR themeClass[] = {'S','p','i','n',0};
841 HTHEME theme;
843 TRACE("hwnd=%p msg=%04x wparam=%08lx lparam=%08lx\n", hwnd, message, wParam, lParam);
845 if (!infoPtr && (message != WM_CREATE))
846 return DefWindowProcW (hwnd, message, wParam, lParam);
848 switch(message)
850 case WM_CREATE:
852 CREATESTRUCTW *pcs = (CREATESTRUCTW*)lParam;
854 infoPtr = Alloc (sizeof(UPDOWN_INFO));
855 SetWindowLongPtrW (hwnd, 0, (DWORD_PTR)infoPtr);
857 /* initialize the info struct */
858 infoPtr->Self = hwnd;
859 infoPtr->Notify = pcs->hwndParent;
860 infoPtr->dwStyle = pcs->style;
861 infoPtr->AccelCount = 0;
862 infoPtr->AccelVect = 0;
863 infoPtr->AccelIndex = -1;
864 infoPtr->CurVal = 0;
865 infoPtr->MinVal = 100;
866 infoPtr->MaxVal = 0;
867 infoPtr->Base = 10; /* Default to base 10 */
868 infoPtr->Buddy = 0; /* No buddy window yet */
869 infoPtr->Flags = (infoPtr->dwStyle & UDS_SETBUDDYINT) ? FLAG_BUDDYINT : 0;
871 SetWindowLongW (hwnd, GWL_STYLE, infoPtr->dwStyle & ~WS_BORDER);
872 if (!(infoPtr->dwStyle & UDS_HORZ))
873 SetWindowPos (hwnd, NULL, 0, 0, DEFAULT_WIDTH, pcs->cy,
874 SWP_NOOWNERZORDER | SWP_NOZORDER | SWP_NOMOVE);
876 /* Do we pick the buddy win ourselves? */
877 if (infoPtr->dwStyle & UDS_AUTOBUDDY)
878 UPDOWN_SetBuddy (infoPtr, GetWindow (hwnd, GW_HWNDPREV));
880 OpenThemeData (hwnd, themeClass);
882 TRACE("UpDown Ctrl creation, hwnd=%p\n", hwnd);
884 break;
886 case WM_DESTROY:
887 Free (infoPtr->AccelVect);
889 if (infoPtr->Buddy)
890 RemoveWindowSubclass(infoPtr->Buddy, UPDOWN_Buddy_SubclassProc,
891 BUDDY_SUBCLASSID);
892 Free (infoPtr);
893 SetWindowLongPtrW (hwnd, 0, 0);
894 theme = GetWindowTheme (hwnd);
895 CloseThemeData (theme);
896 TRACE("UpDown Ctrl destruction, hwnd=%p\n", hwnd);
897 break;
899 case WM_ENABLE:
900 if (wParam) {
901 infoPtr->dwStyle &= ~WS_DISABLED;
902 } else {
903 infoPtr->dwStyle |= WS_DISABLED;
904 UPDOWN_CancelMode (infoPtr);
906 InvalidateRect (infoPtr->Self, NULL, FALSE);
907 break;
909 case WM_STYLECHANGED:
910 if (wParam == GWL_STYLE) {
911 infoPtr->dwStyle = ((LPSTYLESTRUCT)lParam)->styleNew;
912 InvalidateRect (infoPtr->Self, NULL, FALSE);
914 break;
916 case WM_THEMECHANGED:
917 theme = GetWindowTheme (hwnd);
918 CloseThemeData (theme);
919 OpenThemeData (hwnd, themeClass);
920 InvalidateRect (hwnd, NULL, FALSE);
921 break;
923 case WM_TIMER:
924 /* is this the auto-press timer? */
925 if(wParam == TIMER_AUTOPRESS) {
926 KillTimer(hwnd, TIMER_AUTOPRESS);
927 infoPtr->Flags &= ~(FLAG_PRESSED | FLAG_ARROW);
928 InvalidateRect(infoPtr->Self, NULL, FALSE);
931 /* if initial timer, kill it and start the repeat timer */
932 if(wParam == TIMER_AUTOREPEAT) {
933 INT delay;
935 KillTimer(hwnd, TIMER_AUTOREPEAT);
936 /* if no accel info given, used default timer */
937 if(infoPtr->AccelCount==0 || infoPtr->AccelVect==0) {
938 infoPtr->AccelIndex = -1;
939 delay = REPEAT_DELAY;
940 } else {
941 infoPtr->AccelIndex = 0; /* otherwise, use it */
942 delay = infoPtr->AccelVect[infoPtr->AccelIndex].nSec * 1000 + 1;
944 SetTimer(hwnd, TIMER_ACCEL, delay, 0);
947 /* now, if the mouse is above us, do the thing...*/
948 if(infoPtr->Flags & FLAG_MOUSEIN) {
949 int temp;
951 temp = infoPtr->AccelIndex == -1 ? 1 : infoPtr->AccelVect[infoPtr->AccelIndex].nInc;
952 UPDOWN_DoAction(infoPtr, temp, infoPtr->Flags & FLAG_ARROW);
954 if(infoPtr->AccelIndex != -1 && infoPtr->AccelIndex < infoPtr->AccelCount-1) {
955 KillTimer(hwnd, TIMER_ACCEL);
956 infoPtr->AccelIndex++; /* move to the next accel info */
957 temp = infoPtr->AccelVect[infoPtr->AccelIndex].nSec * 1000 + 1;
958 /* make sure we have at least 1ms intervals */
959 SetTimer(hwnd, TIMER_ACCEL, temp, 0);
962 break;
964 case WM_CANCELMODE:
965 return UPDOWN_CancelMode (infoPtr);
967 case WM_LBUTTONUP:
968 if (GetCapture() != infoPtr->Self) break;
970 if ( (infoPtr->Flags & FLAG_MOUSEIN) &&
971 (infoPtr->Flags & FLAG_ARROW) ) {
973 SendMessageW( infoPtr->Notify,
974 (infoPtr->dwStyle & UDS_HORZ) ? WM_HSCROLL : WM_VSCROLL,
975 MAKELONG(SB_ENDSCROLL, infoPtr->CurVal),
976 (LPARAM)hwnd);
977 if (UPDOWN_IsBuddyEdit(infoPtr))
978 SendMessageW(infoPtr->Buddy, EM_SETSEL, 0, MAKELONG(0, -1));
980 UPDOWN_CancelMode(infoPtr);
981 break;
983 case WM_LBUTTONDOWN:
984 case WM_MOUSEMOVE:
985 case WM_MOUSELEAVE:
986 if(UPDOWN_IsEnabled(infoPtr))
987 UPDOWN_HandleMouseEvent (infoPtr, message, (SHORT)LOWORD(lParam), (SHORT)HIWORD(lParam));
988 break;
990 case WM_MOUSEWHEEL:
991 UPDOWN_MouseWheel(infoPtr, wParam);
992 break;
994 case WM_KEYDOWN:
995 if((infoPtr->dwStyle & UDS_ARROWKEYS) && UPDOWN_IsEnabled(infoPtr))
996 return UPDOWN_KeyPressed(infoPtr, (int)wParam);
997 break;
999 case WM_PRINTCLIENT:
1000 case WM_PAINT:
1001 return UPDOWN_Paint (infoPtr, (HDC)wParam);
1003 case UDM_GETACCEL:
1004 if (wParam==0 && lParam==0) return infoPtr->AccelCount;
1005 if (wParam && lParam) {
1006 int temp = min(infoPtr->AccelCount, wParam);
1007 memcpy((void *)lParam, infoPtr->AccelVect, temp*sizeof(UDACCEL));
1008 return temp;
1010 return 0;
1012 case UDM_SETACCEL:
1014 TRACE("UDM_SETACCEL\n");
1016 if(infoPtr->AccelVect) {
1017 Free (infoPtr->AccelVect);
1018 infoPtr->AccelCount = 0;
1019 infoPtr->AccelVect = 0;
1021 if(wParam==0) return TRUE;
1022 infoPtr->AccelVect = Alloc (wParam*sizeof(UDACCEL));
1023 if(infoPtr->AccelVect == 0) return FALSE;
1024 memcpy(infoPtr->AccelVect, (void*)lParam, wParam*sizeof(UDACCEL));
1025 infoPtr->AccelCount = wParam;
1027 if (TRACE_ON(updown))
1029 INT i;
1031 for (i = 0; i < wParam; i++)
1032 TRACE("%d: nSec %u nInc %u\n", i,
1033 infoPtr->AccelVect[i].nSec, infoPtr->AccelVect[i].nInc);
1036 return TRUE;
1038 case UDM_GETBASE:
1039 return infoPtr->Base;
1041 case UDM_SETBASE:
1042 TRACE("UpDown Ctrl new base(%ld), hwnd=%p\n", wParam, hwnd);
1043 if (wParam==10 || wParam==16) {
1044 WPARAM old_base = infoPtr->Base;
1045 infoPtr->Base = wParam;
1047 if (old_base != infoPtr->Base)
1048 UPDOWN_SetBuddyInt(infoPtr);
1050 return old_base;
1052 break;
1054 case UDM_GETBUDDY:
1055 return (LRESULT)infoPtr->Buddy;
1057 case UDM_SETBUDDY:
1058 return (LRESULT)UPDOWN_SetBuddy (infoPtr, (HWND)wParam);
1060 case UDM_GETPOS:
1062 BOOL ret = UPDOWN_GetBuddyInt (infoPtr);
1063 return MAKELONG(infoPtr->CurVal, ret ? 0 : 1);
1065 case UDM_SETPOS:
1067 int temp = (short)LOWORD(lParam);
1069 TRACE("UpDown Ctrl new value(%d), hwnd=%p\n", temp, hwnd);
1070 if(!UPDOWN_InBounds(infoPtr, temp)) {
1071 if(temp < infoPtr->MinVal) temp = infoPtr->MinVal;
1072 if(temp > infoPtr->MaxVal) temp = infoPtr->MaxVal;
1074 wParam = infoPtr->CurVal;
1075 infoPtr->CurVal = temp;
1076 UPDOWN_SetBuddyInt (infoPtr);
1077 return wParam; /* return prev value */
1079 case UDM_GETRANGE:
1080 return MAKELONG(infoPtr->MaxVal, infoPtr->MinVal);
1082 case UDM_SETRANGE:
1083 /* we must have:
1084 UD_MINVAL <= Max <= UD_MAXVAL
1085 UD_MINVAL <= Min <= UD_MAXVAL
1086 |Max-Min| <= UD_MAXVAL */
1087 UPDOWN_SetRange(infoPtr, (short)lParam, (short)HIWORD(lParam));
1088 break;
1090 case UDM_GETRANGE32:
1091 if (wParam) *(LPINT)wParam = infoPtr->MinVal;
1092 if (lParam) *(LPINT)lParam = infoPtr->MaxVal;
1093 break;
1095 case UDM_SETRANGE32:
1096 UPDOWN_SetRange(infoPtr, (INT)lParam, (INT)wParam);
1097 break;
1099 case UDM_GETPOS32:
1101 BOOL ret = UPDOWN_GetBuddyInt (infoPtr);
1102 if ((LPBOOL)lParam) *((LPBOOL)lParam) = !ret;
1103 return infoPtr->CurVal;
1105 case UDM_SETPOS32:
1107 int temp;
1109 if(!UPDOWN_InBounds(infoPtr, (int)lParam)) {
1110 if((int)lParam < infoPtr->MinVal) lParam = infoPtr->MinVal;
1111 if((int)lParam > infoPtr->MaxVal) lParam = infoPtr->MaxVal;
1113 temp = infoPtr->CurVal; /* save prev value */
1114 infoPtr->CurVal = (int)lParam; /* set the new value */
1115 UPDOWN_SetBuddyInt (infoPtr);
1116 return temp; /* return prev value */
1118 case UDM_GETUNICODEFORMAT:
1119 /* we lie a bit here, we're always using Unicode internally */
1120 return infoPtr->UnicodeFormat;
1122 case UDM_SETUNICODEFORMAT:
1124 /* do we really need to honour this flag? */
1125 int temp = infoPtr->UnicodeFormat;
1126 infoPtr->UnicodeFormat = (BOOL)wParam;
1127 return temp;
1129 default:
1130 if ((message >= WM_USER) && (message < WM_APP) && !COMCTL32_IsReflectedMessage(message))
1131 ERR("unknown msg %04x wp=%04lx lp=%08lx\n", message, wParam, lParam);
1132 return DefWindowProcW (hwnd, message, wParam, lParam);
1135 return 0;
1138 /***********************************************************************
1139 * UPDOWN_Register [Internal]
1141 * Registers the updown window class.
1143 void UPDOWN_Register(void)
1145 WNDCLASSW wndClass;
1147 ZeroMemory( &wndClass, sizeof( WNDCLASSW ) );
1148 wndClass.style = CS_GLOBALCLASS | CS_VREDRAW | CS_HREDRAW;
1149 wndClass.lpfnWndProc = UpDownWindowProc;
1150 wndClass.cbClsExtra = 0;
1151 wndClass.cbWndExtra = sizeof(UPDOWN_INFO*);
1152 wndClass.hCursor = LoadCursorW( 0, (LPWSTR)IDC_ARROW );
1153 wndClass.hbrBackground = (HBRUSH)(COLOR_BTNFACE + 1);
1154 wndClass.lpszClassName = UPDOWN_CLASSW;
1156 RegisterClassW( &wndClass );
1160 /***********************************************************************
1161 * UPDOWN_Unregister [Internal]
1163 * Unregisters the updown window class.
1165 void UPDOWN_Unregister (void)
1167 UnregisterClassW (UPDOWN_CLASSW, NULL);