updown.c 38.1 KB
Newer Older
1
/*
Alexandre Julliard's avatar
Alexandre Julliard committed
2 3
 * Updown control
 *
4
 * Copyright 1997, 2002 Dimitrie O. Paun
Alexandre Julliard's avatar
Alexandre Julliard committed
5
 *
6 7 8 9 10 11 12 13 14 15 16 17
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
18
 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19
 *
20 21 22 23 24 25 26 27 28
 * NOTE
 * 
 * This code was audited for completeness against the documented features
 * of Comctl32.dll version 6.0 on Sep. 9, 2002, by Dimitrie O. Paun.
 * 
 * Unless otherwise noted, we believe this code to be complete, as per
 * the specification mentioned above.
 * If you discover missing features, or bugs, please note them below.
 * 
Alexandre Julliard's avatar
Alexandre Julliard committed
29 30 31
 */

#include <stdlib.h>
32
#include <string.h>
33
#include <stdarg.h>
34
#include <stdio.h>
35

36
#include "windef.h"
37
#include "winbase.h"
38
#include "wingdi.h"
39
#include "winuser.h"
Alexandre Julliard's avatar
Alexandre Julliard committed
40
#include "winnls.h"
41
#include "commctrl.h"
42
#include "comctl32.h"
43 44
#include "uxtheme.h"
#include "tmschema.h"
45
#include "wine/unicode.h"
46
#include "wine/debug.h"
Alexandre Julliard's avatar
Alexandre Julliard committed
47

48
WINE_DEFAULT_DEBUG_CHANNEL(updown);
49

50 51
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 56 57 58 59 60 61 62
    UINT      AccelCount;      /* Number of elements in AccelVect */
    UDACCEL*  AccelVect;       /* Vector containing AccelCount elements */
    INT       AccelIndex;      /* Current accel index, -1 if not accel'ing */
    INT       Base;            /* Base to display nr in the buddy window */
    INT       CurVal;          /* Current up-down value */
    INT       MinVal;          /* Minimum up-down value */
    INT       MaxVal;          /* Maximum up-down value */
    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 67
} UPDOWN_INFO;

Alexandre Julliard's avatar
Alexandre Julliard committed
68 69
/* Control configuration constants */

70 71 72
#define INITIAL_DELAY	500    /* initial timer until auto-inc kicks in */
#define AUTOPRESS_DELAY	250    /* time to keep arrow pressed on KEY_DOWN */
#define REPEAT_DELAY	50     /* delay between auto-increments */
Alexandre Julliard's avatar
Alexandre Julliard committed
73

74
#define DEFAULT_WIDTH	    16 /* default width of the ctrl */
75 76 77 78 79
#define DEFAULT_XSEP         0 /* default separation between buddy and ctrl */
#define DEFAULT_ADDTOP       0 /* amount to extend above the buddy window */
#define DEFAULT_ADDBOT       0 /* amount to extend below the buddy window */
#define DEFAULT_BUDDYBORDER  2 /* Width/height of the buddy border */
#define DEFAULT_BUDDYSPACER  2 /* Spacer between the buddy and the ctrl */
80 81
#define DEFAULT_BUDDYBORDER_THEMED  1 /* buddy border when theming is enabled */
#define DEFAULT_BUDDYSPACER_THEMED  0 /* buddy spacer when theming is enabled */
Alexandre Julliard's avatar
Alexandre Julliard committed
82 83 84

/* Work constants */

85 86 87 88
#define FLAG_INCR	0x01
#define FLAG_DECR	0x02
#define FLAG_MOUSEIN	0x04
#define FLAG_PRESSED	0x08
89
#define FLAG_BUDDYINT	0x10 /* UDS_SETBUDDYINT was set on creation */
90
#define FLAG_ARROW	(FLAG_INCR | FLAG_DECR)
Alexandre Julliard's avatar
Alexandre Julliard committed
91

92 93 94 95
#define BUDDY_TYPE_UNKNOWN 0
#define BUDDY_TYPE_LISTBOX 1
#define BUDDY_TYPE_EDIT    2

96 97 98 99
#define TIMER_AUTOREPEAT   1
#define TIMER_ACCEL        2
#define TIMER_AUTOPRESS    3

100
#define UPDOWN_GetInfoPtr(hwnd) ((UPDOWN_INFO *)GetWindowLongPtrW (hwnd,0))
101
#define COUNT_OF(a) (sizeof(a)/sizeof(a[0]))
Alexandre Julliard's avatar
Alexandre Julliard committed
102

103 104
static const WCHAR BUDDY_UPDOWN_HWND[] = { 'b', 'u', 'd', 'd', 'y', 'U', 'p', 'D', 'o', 'w', 'n', 'H', 'W', 'N', 'D', 0 };
static const WCHAR BUDDY_SUPERCLASS_WNDPROC[] = { 'b', 'u', 'd', 'd', 'y', 'S', 'u', 'p', 'p', 'e', 'r', 
105
						  'C', 'l', 'a', 's', 's', 'W', 'n', 'd', 'P', 'r', 'o', 'c', 0 };
106
static void UPDOWN_DoAction (UPDOWN_INFO *infoPtr, int delta, int action);
Alexandre Julliard's avatar
Alexandre Julliard committed
107

108 109 110 111
/***********************************************************************
 *           UPDOWN_IsBuddyEdit
 * Tests if our buddy is an edit control.
 */
112
static inline BOOL UPDOWN_IsBuddyEdit(const UPDOWN_INFO *infoPtr)
113 114 115 116 117 118 119 120
{
    return infoPtr->BuddyType == BUDDY_TYPE_EDIT;
}

/***********************************************************************
 *           UPDOWN_IsBuddyListbox
 * Tests if our buddy is a listbox control.
 */
121
static inline BOOL UPDOWN_IsBuddyListbox(const UPDOWN_INFO *infoPtr)
122 123 124 125
{
    return infoPtr->BuddyType == BUDDY_TYPE_LISTBOX;
}

Alexandre Julliard's avatar
Alexandre Julliard committed
126 127 128 129
/***********************************************************************
 *           UPDOWN_InBounds
 * Tests if a given value 'val' is between the Min&Max limits
 */
130
static BOOL UPDOWN_InBounds(const UPDOWN_INFO *infoPtr, int val)
Alexandre Julliard's avatar
Alexandre Julliard committed
131
{
132 133 134 135
    if(infoPtr->MaxVal > infoPtr->MinVal)
        return (infoPtr->MinVal <= val) && (val <= infoPtr->MaxVal);
    else
        return (infoPtr->MaxVal <= val) && (val <= infoPtr->MinVal);
Alexandre Julliard's avatar
Alexandre Julliard committed
136 137 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.
Alexandre Julliard's avatar
Alexandre Julliard committed
143
 */
Dimitrie O. Paun's avatar
Dimitrie O. Paun committed
144
static BOOL UPDOWN_OffsetVal(UPDOWN_INFO *infoPtr, int delta)
Alexandre Julliard's avatar
Alexandre Julliard committed
145
{
146 147
    /* check if we can do the modification first */
    if(!UPDOWN_InBounds (infoPtr, infoPtr->CurVal+delta)) {
148
        if (infoPtr->dwStyle & UDS_WRAP) {
149 150 151 152 153
            delta += (delta < 0 ? -1 : 1) *
		     (infoPtr->MaxVal < infoPtr->MinVal ? -1 : 1) *
		     (infoPtr->MinVal - infoPtr->MaxVal) +
		     (delta < 0 ? 1 : -1);
        } else return FALSE;
154
    }
Alexandre Julliard's avatar
Alexandre Julliard committed
155

156 157
    infoPtr->CurVal += delta;
    return TRUE;
Alexandre Julliard's avatar
Alexandre Julliard committed
158 159
}

160
/***********************************************************************
161
 * UPDOWN_HasBuddyBorder
162 163 164 165
 *
 * When we have a buddy set and that we are aligned on our buddy, we
 * want to draw a sunken edge to make like we are part of that control.
 */
166
static BOOL UPDOWN_HasBuddyBorder(const UPDOWN_INFO *infoPtr)
167
{
168
    return  ( ((infoPtr->dwStyle & (UDS_ALIGNLEFT | UDS_ALIGNRIGHT)) != 0) &&
169
	      UPDOWN_IsBuddyEdit(infoPtr) );
170 171
}

Alexandre Julliard's avatar
Alexandre Julliard committed
172
/***********************************************************************
Alexandre Julliard's avatar
Alexandre Julliard committed
173
 *           UPDOWN_GetArrowRect
Alexandre Julliard's avatar
Alexandre Julliard committed
174 175
 * wndPtr   - pointer to the up-down wnd
 * rect     - will hold the rectangle
176 177
 * arrow    - FLAG_INCR to get the "increment" rect (up or right)
 *            FLAG_DECR to get the "decrement" rect (down or left)
178
 *            If both flags are present, the envelope is returned.
Alexandre Julliard's avatar
Alexandre Julliard committed
179
 */
180
static void UPDOWN_GetArrowRect (const UPDOWN_INFO* infoPtr, RECT *rect, int arrow)
Alexandre Julliard's avatar
Alexandre Julliard committed
181
{
182 183 184
    HTHEME theme = GetWindowTheme (infoPtr->Self);
    const int border = theme ? DEFAULT_BUDDYBORDER_THEMED : DEFAULT_BUDDYBORDER;
    const int spacer = theme ? DEFAULT_BUDDYSPACER_THEMED : DEFAULT_BUDDYSPACER;
185 186 187 188 189 190 191
    GetClientRect (infoPtr->Self, rect);

    /*
     * Make sure we calculate the rectangle to fit even if we draw the
     * border.
     */
    if (UPDOWN_HasBuddyBorder(infoPtr)) {
192
        if (infoPtr->dwStyle & UDS_ALIGNLEFT)
193
            rect->left += border;
194
        else
195
            rect->right -= border;
196

197
        InflateRect(rect, 0, -border);
198 199
    }

200
    /* now figure out if we need a space away from the buddy */
201 202
    if (IsWindow(infoPtr->Buddy) ) {
	if (infoPtr->dwStyle & UDS_ALIGNLEFT) rect->right -= spacer;
203
	else if (infoPtr->dwStyle & UDS_ALIGNRIGHT) rect->left += spacer;
204
    }
205

206 207 208 209 210
    /*
     * We're calculating the midpoint to figure-out where the
     * separation between the buttons will lay. We make sure that we
     * round the uneven numbers by adding 1.
     */
211
    if (infoPtr->dwStyle & UDS_HORZ) {
212 213
        int len = rect->right - rect->left + 1; /* compute the width */
        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 219
        int len = rect->bottom - rect->top + 1; /* compute the height */
        if (arrow & FLAG_INCR)
220
            rect->bottom =  rect->top + len/2 - (theme ? 0 : 1);
221
        if (arrow & FLAG_DECR)
222 223
            rect->top =  rect->top + len/2;
    }
Alexandre Julliard's avatar
Alexandre Julliard committed
224 225 226 227 228
}

/***********************************************************************
 *           UPDOWN_GetArrowFromPoint
 * Returns the rectagle (for the up or down arrow) that contains pt.
229 230
 * If it returns the up rect, it returns FLAG_INCR.
 * If it returns the down rect, it returns FLAG_DECR.
Alexandre Julliard's avatar
Alexandre Julliard committed
231
 */
232
static INT UPDOWN_GetArrowFromPoint (const UPDOWN_INFO *infoPtr, RECT *rect, POINT pt)
Alexandre Julliard's avatar
Alexandre Julliard committed
233
{
234 235 236 237 238
    UPDOWN_GetArrowRect (infoPtr, rect, FLAG_INCR);
    if(PtInRect(rect, pt)) return FLAG_INCR;

    UPDOWN_GetArrowRect (infoPtr, rect, FLAG_DECR);
    if(PtInRect(rect, pt)) return FLAG_DECR;
Alexandre Julliard's avatar
Alexandre Julliard committed
239

240
    return 0;
Alexandre Julliard's avatar
Alexandre Julliard committed
241 242 243 244 245 246 247
}


/***********************************************************************
 *           UPDOWN_GetThousandSep
 * Returns the thousand sep. If an error occurs, it returns ','.
 */
248
static WCHAR UPDOWN_GetThousandSep(void)
Alexandre Julliard's avatar
Alexandre Julliard committed
249
{
250
    WCHAR sep[2];
Alexandre Julliard's avatar
Alexandre Julliard committed
251

252 253
    if(GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_STHOUSAND, sep, 2) != 1)
        sep[0] = ',';
Alexandre Julliard's avatar
Alexandre Julliard committed
254

255
    return sep[0];
Alexandre Julliard's avatar
Alexandre Julliard committed
256 257 258 259 260 261 262 263
}

/***********************************************************************
 *           UPDOWN_GetBuddyInt
 * Tries to read the pos from the buddy window and if it succeeds,
 * it stores it in the control's CurVal
 * returns:
 *   TRUE  - if it read the integer from the buddy successfully
Andreas Mohr's avatar
Andreas Mohr committed
264
 *   FALSE - if an error occurred
Alexandre Julliard's avatar
Alexandre Julliard committed
265
 */
Dimitrie O. Paun's avatar
Dimitrie O. Paun committed
266
static BOOL UPDOWN_GetBuddyInt (UPDOWN_INFO *infoPtr)
Alexandre Julliard's avatar
Alexandre Julliard committed
267
{
268 269
    WCHAR txt[20], sep, *src, *dst;
    int newVal;
Alexandre Julliard's avatar
Alexandre Julliard committed
270

271
    if (!((infoPtr->Flags & FLAG_BUDDYINT) && IsWindow(infoPtr->Buddy)))
272
        return FALSE;
Alexandre Julliard's avatar
Alexandre Julliard committed
273

274 275 276 277 278 279
    /*if the buddy is a list window, we must set curr index */
    if (UPDOWN_IsBuddyListbox(infoPtr)) {
        newVal = SendMessageW(infoPtr->Buddy, LB_GETCARETINDEX, 0, 0);
        if(newVal < 0) return FALSE;
    } else {
        /* we have a regular window, so will get the text */
280 281 282 283
        /* note that a zero-length string is a legitimate value for 'txt',
         * and ought to result in a successful conversion to '0'. */
        if (GetWindowTextW(infoPtr->Buddy, txt, COUNT_OF(txt)) < 0)
            return FALSE;
Alexandre Julliard's avatar
Alexandre Julliard committed
284

285
        sep = UPDOWN_GetThousandSep();
286 287 288 289 290 291 292

        /* now get rid of the separators */
        for(src = dst = txt; *src; src++)
            if(*src != sep) *dst++ = *src;
        *dst = 0;

        /* try to convert the number and validate it */
293
        newVal = strtolW(txt, &src, infoPtr->Base);
294 295
        if(*src || !UPDOWN_InBounds (infoPtr, newVal)) return FALSE;
    }
296

297 298 299
    TRACE("new value(%d) from buddy (old=%d)\n", newVal, infoPtr->CurVal);
    infoPtr->CurVal = newVal;
    return TRUE;
Alexandre Julliard's avatar
Alexandre Julliard committed
300 301 302 303 304 305 306 307
}


/***********************************************************************
 *           UPDOWN_SetBuddyInt
 * Tries to set the pos to the buddy window based on current pos
 * returns:
 *   TRUE  - if it set the caption of the  buddy successfully
Andreas Mohr's avatar
Andreas Mohr committed
308
 *   FALSE - if an error occurred
Alexandre Julliard's avatar
Alexandre Julliard committed
309
 */
310
static BOOL UPDOWN_SetBuddyInt (const UPDOWN_INFO *infoPtr)
Alexandre Julliard's avatar
Alexandre Julliard committed
311
{
312 313 314
    WCHAR fmt[3] = { '%', 'd', '\0' };
    WCHAR txt[20];
    int len;
Alexandre Julliard's avatar
Alexandre Julliard committed
315

316
    if (!((infoPtr->Flags & FLAG_BUDDYINT) && IsWindow(infoPtr->Buddy)))
317
        return FALSE;
Alexandre Julliard's avatar
Alexandre Julliard committed
318

319
    TRACE("set new value(%d) to buddy.\n", infoPtr->CurVal);
Alexandre Julliard's avatar
Alexandre Julliard committed
320

321 322 323 324
    /*if the buddy is a list window, we must set curr index */
    if (UPDOWN_IsBuddyListbox(infoPtr)) {
        return SendMessageW(infoPtr->Buddy, LB_SETCURSEL, infoPtr->CurVal, 0) != LB_ERR;
    }
325

326 327
    /* Regular window, so set caption to the number */
    if (infoPtr->Base == 16) fmt[1] = 'X';
328
    len = wsprintfW(txt, fmt, infoPtr->CurVal);
Alexandre Julliard's avatar
Alexandre Julliard committed
329 330


Francois Gouget's avatar
Francois Gouget committed
331
    /* Do thousands separation if necessary */
332
    if ((infoPtr->Base == 10) && !(infoPtr->dwStyle & UDS_NOTHOUSANDS) && (len > 3)) {
333 334 335
        WCHAR tmp[COUNT_OF(txt)], *src = tmp, *dst = txt;
        WCHAR sep = UPDOWN_GetThousandSep();
	int start = len % 3;
336

337 338 339 340 341 342 343 344 345
	memcpy(tmp, txt, sizeof(txt));
	if (start == 0) start = 3;
	dst += start;
	src += start;
        for (len=0; *src; len++) {
	    if (len % 3 == 0) *dst++ = sep;
	    *dst++ = *src++;
        }
        *dst = 0;
Alexandre Julliard's avatar
Alexandre Julliard committed
346
    }
347

348
    return SetWindowTextW(infoPtr->Buddy, txt);
349
}
Alexandre Julliard's avatar
Alexandre Julliard committed
350

351 352 353 354 355
/***********************************************************************
 * UPDOWN_DrawBuddyBackground
 *
 * Draw buddy background for visual integration.
 */
356
static BOOL UPDOWN_DrawBuddyBackground (const UPDOWN_INFO *infoPtr, HDC hdc)
357 358 359 360 361 362 363 364 365 366 367 368
{
    RECT br;
    HTHEME buddyTheme = GetWindowTheme (infoPtr->Buddy);
    if (!buddyTheme) return FALSE;

    GetClientRect (infoPtr->Buddy, &br);
    MapWindowPoints (infoPtr->Buddy, infoPtr->Self, (POINT*)&br, 2);
    /* FIXME: take disabled etc. into account */
    DrawThemeBackground (buddyTheme, hdc, 0, 0, &br, NULL);
    return TRUE;
}

Alexandre Julliard's avatar
Alexandre Julliard committed
369
/***********************************************************************
370
 * UPDOWN_Draw
Alexandre Julliard's avatar
Alexandre Julliard committed
371
 *
Alexandre Julliard's avatar
Alexandre Julliard committed
372 373
 * Draw the arrows. The background need not be erased.
 */
374
static LRESULT UPDOWN_Draw (const UPDOWN_INFO *infoPtr, HDC hdc)
Alexandre Julliard's avatar
Alexandre Julliard committed
375
{
376
    BOOL uPressed, uHot, dPressed, dHot;
377
    RECT rect;
378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396
    HTHEME theme = GetWindowTheme (infoPtr->Self);
    int uPart = 0, uState = 0, dPart = 0, dState = 0;
    BOOL needBuddyBg = FALSE;

    uPressed = (infoPtr->Flags & FLAG_PRESSED) && (infoPtr->Flags & FLAG_INCR);
    uHot = (infoPtr->Flags & FLAG_INCR) && (infoPtr->Flags & FLAG_MOUSEIN);
    dPressed = (infoPtr->Flags & FLAG_PRESSED) && (infoPtr->Flags & FLAG_DECR);
    dHot = (infoPtr->Flags & FLAG_DECR) && (infoPtr->Flags & FLAG_MOUSEIN);
    if (theme) {
        uPart = (infoPtr->dwStyle & UDS_HORZ) ? SPNP_UPHORZ : SPNP_UP;
        uState = (infoPtr->dwStyle & WS_DISABLED) ? DNS_DISABLED 
            : (uPressed ? DNS_PRESSED : (uHot ? DNS_HOT : DNS_NORMAL));
        dPart = (infoPtr->dwStyle & UDS_HORZ) ? SPNP_DOWNHORZ : SPNP_DOWN;
        dState = (infoPtr->dwStyle & WS_DISABLED) ? DNS_DISABLED 
            : (dPressed ? DNS_PRESSED : (dHot ? DNS_HOT : DNS_NORMAL));
        needBuddyBg = IsWindow (infoPtr->Buddy)
            && (IsThemeBackgroundPartiallyTransparent (theme, uPart, uState)
              || IsThemeBackgroundPartiallyTransparent (theme, dPart, dState));
    }
397 398

    /* Draw the common border between ourselves and our buddy */
399 400 401 402 403 404 405
    if (UPDOWN_HasBuddyBorder(infoPtr) || needBuddyBg) {
        if (!theme || !UPDOWN_DrawBuddyBackground (infoPtr, hdc)) {
            GetClientRect(infoPtr->Self, &rect);
	    DrawEdge(hdc, &rect, EDGE_SUNKEN,
		     BF_BOTTOM | BF_TOP |
		     (infoPtr->dwStyle & UDS_ALIGNLEFT ? BF_LEFT : BF_RIGHT));
        }
406
    }
407

408
    /* Draw the incr button */
409
    UPDOWN_GetArrowRect (infoPtr, &rect, FLAG_INCR);
410 411 412 413 414 415 416 417 418
    if (theme) {
        DrawThemeBackground(theme, hdc, uPart, uState, &rect, NULL);
    } else {
        DrawFrameControl(hdc, &rect, DFC_SCROLL,
            (infoPtr->dwStyle & UDS_HORZ ? DFCS_SCROLLRIGHT : DFCS_SCROLLUP) |
            ((infoPtr->dwStyle & UDS_HOTTRACK) && uHot ? DFCS_HOT : 0) |
            (uPressed ? DFCS_PUSHED : 0) |
            (infoPtr->dwStyle & WS_DISABLED ? DFCS_INACTIVE : 0) );
    }
Alexandre Julliard's avatar
Alexandre Julliard committed
419

420
    /* Draw the decr button */
421
    UPDOWN_GetArrowRect(infoPtr, &rect, FLAG_DECR);
422 423 424 425 426 427 428 429 430
    if (theme) {
        DrawThemeBackground(theme, hdc, dPart, dState, &rect, NULL);
    } else {
        DrawFrameControl(hdc, &rect, DFC_SCROLL,
            (infoPtr->dwStyle & UDS_HORZ ? DFCS_SCROLLLEFT : DFCS_SCROLLDOWN) |
            ((infoPtr->dwStyle & UDS_HOTTRACK) && dHot ? DFCS_HOT : 0) |
            (dPressed ? DFCS_PUSHED : 0) |
            (infoPtr->dwStyle & WS_DISABLED ? DFCS_INACTIVE : 0) );
    }
431 432

    return 0;
Alexandre Julliard's avatar
Alexandre Julliard committed
433 434 435
}

/***********************************************************************
436
 * UPDOWN_Paint
Alexandre Julliard's avatar
Alexandre Julliard committed
437
 *
438
 * Asynchronous drawing (must ONLY be used in WM_PAINT).
Alexandre Julliard's avatar
Alexandre Julliard committed
439 440
 * Calls UPDOWN_Draw.
 */
441
static LRESULT UPDOWN_Paint (const UPDOWN_INFO *infoPtr, HDC hdc)
Alexandre Julliard's avatar
Alexandre Julliard committed
442
{
443 444 445 446 447 448
    PAINTSTRUCT ps;
    if (hdc) return UPDOWN_Draw (infoPtr, hdc);
    hdc = BeginPaint (infoPtr->Self, &ps);
    UPDOWN_Draw (infoPtr, hdc);
    EndPaint (infoPtr->Self, &ps);
    return 0;
Alexandre Julliard's avatar
Alexandre Julliard committed
449
}
Alexandre Julliard's avatar
Alexandre Julliard committed
450

Alexandre Julliard's avatar
Alexandre Julliard committed
451
/***********************************************************************
452
 * UPDOWN_KeyPressed
Alexandre Julliard's avatar
Alexandre Julliard committed
453
 *
454
 * Handle key presses (up & down) when we have to do so
Alexandre Julliard's avatar
Alexandre Julliard committed
455
 */
456
static LRESULT UPDOWN_KeyPressed(UPDOWN_INFO *infoPtr, int key)
Alexandre Julliard's avatar
Alexandre Julliard committed
457
{
458
    int arrow;
459

460 461 462
    if (key == VK_UP) arrow = FLAG_INCR;
    else if (key == VK_DOWN) arrow = FLAG_DECR;
    else return 1;
463

464 465 466 467 468 469 470 471 472
    UPDOWN_GetBuddyInt (infoPtr);
    infoPtr->Flags &= ~FLAG_ARROW;
    infoPtr->Flags |= FLAG_PRESSED | arrow;
    InvalidateRect (infoPtr->Self, NULL, FALSE);
    SetTimer(infoPtr->Self, TIMER_AUTOPRESS, AUTOPRESS_DELAY, 0);
    UPDOWN_DoAction (infoPtr, 1, arrow);
    return 0;
}

473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493
/***********************************************************************
 * UPDOWN_SetRange
 *
 * Handle UDM_SETRANGE, UDM_SETRANGE32
 *
 * FIXME: handle Max == Min properly:
 *        - arrows should be disabled (without WS_DISABLED set),
 *          visually they can't be pressed and don't respond;
 *        - all input messages should still pass in.
 */
static LRESULT UPDOWN_SetRange(UPDOWN_INFO *infoPtr, INT Max, INT Min)
{
    infoPtr->MaxVal = Max;
    infoPtr->MinVal = Min;

    TRACE("UpDown Ctrl new range(%d to %d), hwnd=%p\n",
           infoPtr->MinVal, infoPtr->MaxVal, infoPtr->Self);

    return 0;
}

494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515
/***********************************************************************
 * UPDOWN_MouseWheel
 *
 * Handle mouse wheel scrolling
 */
static LRESULT UPDOWN_MouseWheel(UPDOWN_INFO *infoPtr, WPARAM wParam)
{
    int iWheelDelta = GET_WHEEL_DELTA_WPARAM(wParam) / WHEEL_DELTA;

    if (wParam & (MK_SHIFT | MK_CONTROL))
        return 0;

    if (iWheelDelta != 0)
    {
        UPDOWN_GetBuddyInt(infoPtr);
        UPDOWN_DoAction(infoPtr, abs(iWheelDelta), iWheelDelta > 0 ? FLAG_INCR : FLAG_DECR);
    }

    return 1;
}


516
/***********************************************************************
517
 * UPDOWN_Buddy_SubclassProc used to handle messages sent to the buddy
518 519
 *                           control.
 */
520
static LRESULT CALLBACK
521 522
UPDOWN_Buddy_SubclassProc(HWND  hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
523
    WNDPROC superClassWndProc = (WNDPROC)GetPropW(hwnd, BUDDY_SUPERCLASS_WNDPROC);
524 525
    HWND upDownHwnd = GetPropW(hwnd, BUDDY_UPDOWN_HWND);
    UPDOWN_INFO *infoPtr = UPDOWN_GetInfoPtr(upDownHwnd);
526

527
    TRACE("hwnd=%p, wndProc=%p, uMsg=%04x, wParam=%08lx, lParam=%08lx\n",
528
          hwnd, superClassWndProc, uMsg, wParam, lParam);
Dimitrie O. Paun's avatar
Dimitrie O. Paun committed
529

530 531 532 533
    switch(uMsg)
    {
    case WM_KEYDOWN:
	UPDOWN_KeyPressed(infoPtr, (int)wParam);
534
	if ((wParam == VK_UP) || (wParam == VK_DOWN)) return 0;
535 536 537 538 539
	break;

    case WM_MOUSEWHEEL:
	UPDOWN_MouseWheel(infoPtr, (int)wParam);
	break;
540

541 542
    default:
	break;
543
    }
544 545

    return CallWindowProcW( superClassWndProc, hwnd, uMsg, wParam, lParam);
Alexandre Julliard's avatar
Alexandre Julliard committed
546 547 548 549
}

/***********************************************************************
 *           UPDOWN_SetBuddy
550 551
 *
 * Sets bud as a new Buddy.
552
 * Then, it should subclass the buddy
Anders Jonsson's avatar
Anders Jonsson committed
553
 * If window has the UDS_ARROWKEYS, it subclasses the buddy window to
Alexandre Julliard's avatar
Alexandre Julliard committed
554 555 556 557
 * process the UP/DOWN arrow keys.
 * If window has the UDS_ALIGNLEFT or UDS_ALIGNRIGHT style
 * the size/pos of the buddy and the control are adjusted accordingly.
 */
558
static HWND UPDOWN_SetBuddy (UPDOWN_INFO* infoPtr, HWND bud)
Alexandre Julliard's avatar
Alexandre Julliard committed
559
{
560 561
    RECT  budRect;  /* new coord for the buddy */
    int   x, width;  /* new x position and width for the up-down */
562
    WNDPROC baseWndProc;
563
    WCHAR buddyClass[40];
564
    HWND ret;
565

566
    TRACE("(hwnd=%p, bud=%p)\n", infoPtr->Self, bud);
567

568 569
    ret = infoPtr->Buddy;

570
    /* there is already a body assigned */
571
    if (infoPtr->Buddy)  RemovePropW(infoPtr->Buddy, BUDDY_UPDOWN_HWND);
572

573 574 575
    if(!IsWindow(bud))
        bud = 0;

576
    /* Store buddy window handle */
577
    infoPtr->Buddy = bud;
578

579
    if(bud) {
580

581
        /* keep upDown ctrl hwnd in a buddy property */
582
        SetPropW( bud, BUDDY_UPDOWN_HWND, infoPtr->Self);
583

584 585
        /* Store buddy window class type */
        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 591
                infoPtr->BuddyType = BUDDY_TYPE_LISTBOX;
        }
592

593
        if (infoPtr->dwStyle & UDS_ARROWKEYS) {
594 595 596
            /* Note that I don't clear the BUDDY_SUPERCLASS_WNDPROC property
               when we reset the upDown ctrl buddy to another buddy because it is not
               good to break the window proc chain. */
597
            if (!GetPropW(bud, BUDDY_SUPERCLASS_WNDPROC)) {
598
                baseWndProc = (WNDPROC)SetWindowLongPtrW(bud, GWLP_WNDPROC, (LPARAM)UPDOWN_Buddy_SubclassProc);
599
                SetPropW(bud, BUDDY_SUPERCLASS_WNDPROC, baseWndProc);
600 601
            }
        }
602

603 604 605 606 607
        /* Get the rect of the buddy relative to its parent */
        GetWindowRect(infoPtr->Buddy, &budRect);
        MapWindowPoints(HWND_DESKTOP, GetParent(infoPtr->Buddy), (POINT *)(&budRect.left), 2);

        /* now do the positioning */
608
        if  (infoPtr->dwStyle & UDS_ALIGNLEFT) {
609 610
            x  = budRect.left;
            budRect.left += DEFAULT_WIDTH + DEFAULT_XSEP;
611
        } else if (infoPtr->dwStyle & UDS_ALIGNRIGHT) {
612 613 614
            budRect.right -= DEFAULT_WIDTH + DEFAULT_XSEP;
            x  = budRect.right+DEFAULT_XSEP;
        } else {
615 616
            /* nothing to do */
            return ret;
617
        }
618

619
        /* first adjust the buddy to accommodate the up/down */
620 621 622 623 624 625 626 627 628 629 630 631
        SetWindowPos(infoPtr->Buddy, 0, budRect.left, budRect.top,
                     budRect.right  - budRect.left, budRect.bottom - budRect.top,
                     SWP_NOACTIVATE|SWP_NOZORDER);

        /* now position the up/down */
        /* Since the UDS_ALIGN* flags were used, */
        /* we will pick the position and size of the window. */
        width = DEFAULT_WIDTH;

        /*
         * If the updown has a buddy border, it has to overlap with the buddy
         * to look as if it is integrated with the buddy control.
632
         * We nudge the control or change its size to overlap.
633 634
         */
        if (UPDOWN_HasBuddyBorder(infoPtr)) {
635
            if(infoPtr->dwStyle & UDS_ALIGNLEFT)
636 637 638 639
                width += DEFAULT_BUDDYBORDER;
            else
                x -= DEFAULT_BUDDYBORDER;
        }
640

641
        SetWindowPos(infoPtr->Self, 0, x,
642 643 644 645 646 647 648 649 650
                     budRect.top - DEFAULT_ADDTOP, width,
                     budRect.bottom - budRect.top + DEFAULT_ADDTOP + DEFAULT_ADDBOT,
                     SWP_NOACTIVATE|SWP_FRAMECHANGED|SWP_NOZORDER);
    } else {
        RECT rect;
        GetWindowRect(infoPtr->Self, &rect);
        MapWindowPoints(HWND_DESKTOP, GetParent(infoPtr->Self), (POINT *)&rect, 2);
        SetWindowPos(infoPtr->Self, 0, rect.left, rect.top, DEFAULT_WIDTH, rect.bottom - rect.top,
                     SWP_NOACTIVATE|SWP_FRAMECHANGED|SWP_NOZORDER);
651
    }
652
    return ret;
653
}
Alexandre Julliard's avatar
Alexandre Julliard committed
654 655 656 657

/***********************************************************************
 *           UPDOWN_DoAction
 *
658
 * This function increments/decrements the CurVal by the
659 660
 * 'delta' amount according to the 'action' flag which can be a
 * combination of FLAG_INCR and FLAG_DECR
Alexandre Julliard's avatar
Alexandre Julliard committed
661
 * It notifies the parent as required.
Anders Jonsson's avatar
Anders Jonsson committed
662
 * It handles wrapping and non-wrapping correctly.
Alexandre Julliard's avatar
Alexandre Julliard committed
663 664
 * It is assumed that delta>0
 */
665
static void UPDOWN_DoAction (UPDOWN_INFO *infoPtr, int delta, int action)
Alexandre Julliard's avatar
Alexandre Julliard committed
666
{
667 668
    NM_UPDOWN ni;

669
    TRACE("%d by %d\n", action, delta);
670 671

    /* check if we can do the modification first */
672 673
    delta *= (action & FLAG_INCR ? 1 : -1) * (infoPtr->MaxVal < infoPtr->MinVal ? -1 : 1);
    if ( (action & FLAG_INCR) && (action & FLAG_DECR) ) delta = 0;
674

675 676
    TRACE("current %d, delta: %d\n", infoPtr->CurVal, delta);

677 678 679 680
    /* We must notify parent now to obtain permission */
    ni.iPos = infoPtr->CurVal;
    ni.iDelta = delta;
    ni.hdr.hwndFrom = infoPtr->Self;
681
    ni.hdr.idFrom   = GetWindowLongPtrW (infoPtr->Self, GWLP_ID);
682
    ni.hdr.code = UDN_DELTAPOS;
683
    if (!SendMessageW(infoPtr->Notify, WM_NOTIFY, ni.hdr.idFrom, (LPARAM)&ni)) {
684 685 686 687
        /* Parent said: OK to adjust */

        /* Now adjust value with (maybe new) delta */
        if (UPDOWN_OffsetVal (infoPtr, ni.iDelta)) {
688 689
            TRACE("new %d, delta: %d\n", infoPtr->CurVal, ni.iDelta);

690
            /* Now take care about our buddy */
691
            UPDOWN_SetBuddyInt (infoPtr);
692 693
        }
    }
694

695
    /* Also, notify it. This message is sent in any case. */
696
    SendMessageW( infoPtr->Notify, (infoPtr->dwStyle & UDS_HORZ) ? WM_HSCROLL : WM_VSCROLL,
697
		  MAKELONG(SB_THUMBPOSITION, infoPtr->CurVal), (LPARAM)infoPtr->Self);
Alexandre Julliard's avatar
Alexandre Julliard committed
698 699 700 701 702 703 704 705
}

/***********************************************************************
 *           UPDOWN_IsEnabled
 *
 * Returns TRUE if it is enabled as well as its buddy (if any)
 *         FALSE otherwise
 */
706
static BOOL UPDOWN_IsEnabled (const UPDOWN_INFO *infoPtr)
Alexandre Julliard's avatar
Alexandre Julliard committed
707
{
708
    if (!IsWindowEnabled(infoPtr->Self))
709 710 711 712
        return FALSE;
    if(infoPtr->Buddy)
        return IsWindowEnabled(infoPtr->Buddy);
    return TRUE;
Alexandre Julliard's avatar
Alexandre Julliard committed
713 714 715 716 717 718 719
}

/***********************************************************************
 *           UPDOWN_CancelMode
 *
 * Deletes any timers, releases the mouse and does  redraw if necessary.
 * If the control is not in "capture" mode, it does nothing.
720
 * If the control was not in cancel mode, it returns FALSE.
Alexandre Julliard's avatar
Alexandre Julliard committed
721 722
 * If the control was in cancel mode, it returns TRUE.
 */
Dimitrie O. Paun's avatar
Dimitrie O. Paun committed
723
static BOOL UPDOWN_CancelMode (UPDOWN_INFO *infoPtr)
Alexandre Julliard's avatar
Alexandre Julliard committed
724
{
725
    if (!(infoPtr->Flags & FLAG_PRESSED)) return FALSE;
726

727 728 729
    KillTimer (infoPtr->Self, TIMER_AUTOREPEAT);
    KillTimer (infoPtr->Self, TIMER_ACCEL);
    KillTimer (infoPtr->Self, TIMER_AUTOPRESS);
730

731 732 733
    if (GetCapture() == infoPtr->Self) {
	NMHDR hdr;
	hdr.hwndFrom = infoPtr->Self;
734
	hdr.idFrom   = GetWindowLongPtrW (infoPtr->Self, GWLP_ID);
735
	hdr.code = NM_RELEASEDCAPTURE;
736
	SendMessageW(infoPtr->Notify, WM_NOTIFY, hdr.idFrom, (LPARAM)&hdr);
737 738
	ReleaseCapture();
    }
739

740 741
    infoPtr->Flags &= ~FLAG_PRESSED;
    InvalidateRect (infoPtr->Self, NULL, FALSE);
742

743
    return TRUE;
Alexandre Julliard's avatar
Alexandre Julliard committed
744 745 746 747 748 749 750
}

/***********************************************************************
 *           UPDOWN_HandleMouseEvent
 *
 * Handle a mouse event for the updown.
 * 'pt' is the location of the mouse event in client or
751
 * windows coordinates.
Alexandre Julliard's avatar
Alexandre Julliard committed
752
 */
753
static void UPDOWN_HandleMouseEvent (UPDOWN_INFO *infoPtr, UINT msg, INT x, INT y)
Alexandre Julliard's avatar
Alexandre Julliard committed
754
{
755
    POINT pt = { x, y };
756
    RECT rect;
757
    int temp, arrow;
758
    TRACKMOUSEEVENT tme;
Alexandre Julliard's avatar
Alexandre Julliard committed
759

760 761
    TRACE("msg %04x point %s\n", msg, wine_dbgstr_point(&pt));

762
    switch(msg)
Alexandre Julliard's avatar
Alexandre Julliard committed
763
    {
764
        case WM_LBUTTONDOWN:  /* Initialise mouse tracking */
Alexandre Julliard's avatar
Alexandre Julliard committed
765

766 767
            /* If the buddy is an edit, will set focus to it */
	    if (UPDOWN_IsBuddyEdit(infoPtr)) SetFocus(infoPtr->Buddy);
Alexandre Julliard's avatar
Alexandre Julliard committed
768

769
            /* Now see which one is the 'active' arrow */
770 771 772 773 774 775 776 777 778
            arrow = UPDOWN_GetArrowFromPoint (infoPtr, &rect, pt);

            /* Update the flags if we are in/out */
            infoPtr->Flags &= ~(FLAG_MOUSEIN | FLAG_ARROW);
            if (arrow)
                infoPtr->Flags |= FLAG_MOUSEIN | arrow;
            else
                if (infoPtr->AccelIndex != -1) infoPtr->AccelIndex = 0;

779
	    if (infoPtr->Flags & FLAG_ARROW) {
Alexandre Julliard's avatar
Alexandre Julliard committed
780

781
            	/* Update the CurVal if necessary */
782
            	UPDOWN_GetBuddyInt (infoPtr);
783

784
            	/* Set up the correct flags */
785 786
            	infoPtr->Flags |= FLAG_PRESSED;

787 788
            	/* repaint the control */
	    	InvalidateRect (infoPtr->Self, NULL, FALSE);
789

790
            	/* process the click */
791 792
		temp = (infoPtr->AccelCount && infoPtr->AccelVect) ? infoPtr->AccelVect[0].nInc : 1;
            	UPDOWN_DoAction (infoPtr, temp, infoPtr->Flags & FLAG_ARROW);
793

794 795
            	/* now capture all mouse messages */
            	SetCapture (infoPtr->Self);
796

797 798 799
            	/* and startup the first timer */
            	SetTimer(infoPtr->Self, TIMER_AUTOREPEAT, INITIAL_DELAY, 0);
	    }
800 801 802 803 804 805
            break;

	case WM_MOUSEMOVE:
            /* save the flags to see if any got modified */
            temp = infoPtr->Flags;

806 807
            /* Now see which one is the 'active' arrow */
            arrow = UPDOWN_GetArrowFromPoint (infoPtr, &rect, pt);
808 809

            /* Update the flags if we are in/out */
810 811 812
	    infoPtr->Flags &= ~(FLAG_MOUSEIN | FLAG_ARROW);
            if(arrow) {
	        infoPtr->Flags |=  FLAG_MOUSEIN | arrow;
813 814 815
            } else {
	        if(infoPtr->AccelIndex != -1) infoPtr->AccelIndex = 0;
            }
816

817
            /* If state changed, redraw the control */
818
            if(temp != infoPtr->Flags)
819 820 821 822 823 824 825 826 827 828 829 830 831
		 InvalidateRect (infoPtr->Self, NULL, FALSE);

            /* Set up tracking so the mousein flags can be reset when the 
             * mouse leaves the control */
            tme.cbSize = sizeof( tme );
            tme.dwFlags = TME_LEAVE;
            tme.hwndTrack = infoPtr->Self;
            TrackMouseEvent (&tme);

            break;
        case WM_MOUSELEAVE:
	    infoPtr->Flags &= ~(FLAG_MOUSEIN | FLAG_ARROW);
            InvalidateRect (infoPtr->Self, NULL, FALSE);
832 833 834 835
            break;

	default:
	    ERR("Impossible case (msg=%x)!\n", msg);
Alexandre Julliard's avatar
Alexandre Julliard committed
836 837 838 839 840 841 842
    }

}

/***********************************************************************
 *           UpDownWndProc
 */
843
static LRESULT WINAPI UpDownWindowProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
Alexandre Julliard's avatar
Alexandre Julliard committed
844
{
845
    UPDOWN_INFO *infoPtr = UPDOWN_GetInfoPtr (hwnd);
846 847
    static const WCHAR themeClass[] = {'S','p','i','n',0};
    HTHEME theme;
848

849
    TRACE("hwnd=%p msg=%04x wparam=%08lx lparam=%08lx\n", hwnd, message, wParam, lParam);
850

851
    if (!infoPtr && (message != WM_CREATE))
852
        return DefWindowProcW (hwnd, message, wParam, lParam);
853 854

    switch(message)
Alexandre Julliard's avatar
Alexandre Julliard committed
855
    {
856
        case WM_CREATE:
857 858 859
	    {
	    CREATESTRUCTW *pcs = (CREATESTRUCTW*)lParam;

860
            infoPtr = Alloc (sizeof(UPDOWN_INFO));
861
	    SetWindowLongPtrW (hwnd, 0, (DWORD_PTR)infoPtr);
862 863 864

	    /* initialize the info struct */
	    infoPtr->Self = hwnd;
865 866
	    infoPtr->Notify  = pcs->hwndParent;
	    infoPtr->dwStyle = pcs->style;
867 868 869
	    infoPtr->AccelCount = 0;
	    infoPtr->AccelVect = 0;
	    infoPtr->AccelIndex = -1;
870
	    infoPtr->CurVal = 0;
871 872
	    infoPtr->MinVal = 100;
	    infoPtr->MaxVal = 0;
873 874
	    infoPtr->Base  = 10; /* Default to base 10  */
	    infoPtr->Buddy = 0;  /* No buddy window yet */
875
	    infoPtr->Flags = (infoPtr->dwStyle & UDS_SETBUDDYINT) ? FLAG_BUDDYINT : 0;
876

877
            SetWindowLongW (hwnd, GWL_STYLE, infoPtr->dwStyle & ~WS_BORDER);
878 879 880
	    if (!(infoPtr->dwStyle & UDS_HORZ))
	        SetWindowPos (hwnd, NULL, 0, 0, DEFAULT_WIDTH, pcs->cy,
	                      SWP_NOOWNERZORDER | SWP_NOMOVE);
881

882
            /* Do we pick the buddy win ourselves? */
883
	    if (infoPtr->dwStyle & UDS_AUTOBUDDY)
884
		UPDOWN_SetBuddy (infoPtr, GetWindow (hwnd, GW_HWNDPREV));
885

886 887
            OpenThemeData (hwnd, themeClass);

888
	    TRACE("UpDown Ctrl creation, hwnd=%p\n", hwnd);
889
	    }
890
	    break;
891

892
	case WM_DESTROY:
893
	    Free (infoPtr->AccelVect);
Alexandre Julliard's avatar
Alexandre Julliard committed
894

895
	    if(infoPtr->Buddy) RemovePropW(infoPtr->Buddy, BUDDY_UPDOWN_HWND);
896

897
	    Free (infoPtr);
898
	    SetWindowLongPtrW (hwnd, 0, 0);
899 900
            theme = GetWindowTheme (hwnd);
            CloseThemeData (theme);
901
	    TRACE("UpDown Ctrl destruction, hwnd=%p\n", hwnd);
902
	    break;
903

904
	case WM_ENABLE:
905 906 907 908 909 910
	    if (wParam) {
		infoPtr->dwStyle &= ~WS_DISABLED;
	    } else {
		infoPtr->dwStyle |= WS_DISABLED;
	    	UPDOWN_CancelMode (infoPtr);
	    }
911
	    InvalidateRect (infoPtr->Self, NULL, FALSE);
912 913
	    break;

914 915 916 917 918 919 920
        case WM_STYLECHANGED:
            if (wParam == GWL_STYLE) {
                infoPtr->dwStyle = ((LPSTYLESTRUCT)lParam)->styleNew;
	        InvalidateRect (infoPtr->Self, NULL, FALSE);
            }
            break;

921 922 923 924 925 926 927
        case WM_THEMECHANGED:
            theme = GetWindowTheme (hwnd);
            CloseThemeData (theme);
            OpenThemeData (hwnd, themeClass);
            InvalidateRect (hwnd, NULL, FALSE);
            break;

928
	case WM_TIMER:
929 930 931 932 933 934 935
	   /* is this the auto-press timer? */
	   if(wParam == TIMER_AUTOPRESS) {
		KillTimer(hwnd, TIMER_AUTOPRESS);
		infoPtr->Flags &= ~(FLAG_PRESSED | FLAG_ARROW);
		InvalidateRect(infoPtr->Self, NULL, FALSE);
	   }

936
	   /* if initial timer, kill it and start the repeat timer */
937
  	   if(wParam == TIMER_AUTOREPEAT) {
938 939
		int temp;

940
		KillTimer(hwnd, TIMER_AUTOREPEAT);
941 942 943 944 945 946 947 948
		/* if no accel info given, used default timer */
		if(infoPtr->AccelCount==0 || infoPtr->AccelVect==0) {
		    infoPtr->AccelIndex = -1;
		    temp = REPEAT_DELAY;
		} else {
		    infoPtr->AccelIndex = 0; /* otherwise, use it */
		    temp = infoPtr->AccelVect[infoPtr->AccelIndex].nSec * 1000 + 1;
		}
949
		SetTimer(hwnd, TIMER_ACCEL, temp, 0);
950 951 952 953
      	    }

	    /* now, if the mouse is above us, do the thing...*/
	    if(infoPtr->Flags & FLAG_MOUSEIN) {
954 955
		int temp;

956
		temp = infoPtr->AccelIndex == -1 ? 1 : infoPtr->AccelVect[infoPtr->AccelIndex].nInc;
957
		UPDOWN_DoAction(infoPtr, temp, infoPtr->Flags & FLAG_ARROW);
958

959
		if(infoPtr->AccelIndex != -1 && infoPtr->AccelIndex < infoPtr->AccelCount-1) {
960
		    KillTimer(hwnd, TIMER_ACCEL);
961 962 963
		    infoPtr->AccelIndex++; /* move to the next accel info */
		    temp = infoPtr->AccelVect[infoPtr->AccelIndex].nSec * 1000 + 1;
	  	    /* make sure we have at least 1ms intervals */
964
		    SetTimer(hwnd, TIMER_ACCEL, temp, 0);
965 966 967 968 969 970 971 972
		}
	    }
	    break;

	case WM_CANCELMODE:
	  return UPDOWN_CancelMode (infoPtr);

	case WM_LBUTTONUP:
973
	    if (GetCapture() != infoPtr->Self) break;
974

975 976
	    if ( (infoPtr->Flags & FLAG_MOUSEIN) &&
		 (infoPtr->Flags & FLAG_ARROW) ) {
977

978
	    	SendMessageW( infoPtr->Notify,
979
			      (infoPtr->dwStyle & UDS_HORZ) ? WM_HSCROLL : WM_VSCROLL,
980 981
                  	      MAKELONG(SB_ENDSCROLL, infoPtr->CurVal),
			      (LPARAM)hwnd);
982 983 984 985
		if (UPDOWN_IsBuddyEdit(infoPtr))
		    SendMessageW(infoPtr->Buddy, EM_SETSEL, 0, MAKELONG(0, -1));
	    }
	    UPDOWN_CancelMode(infoPtr);
986
	    break;
987

988 989
	case WM_LBUTTONDOWN:
	case WM_MOUSEMOVE:
990
        case WM_MOUSELEAVE:
991
	    if(UPDOWN_IsEnabled(infoPtr))
992
		UPDOWN_HandleMouseEvent (infoPtr, message, (SHORT)LOWORD(lParam), (SHORT)HIWORD(lParam));
993 994
	    break;

995 996 997 998
        case WM_MOUSEWHEEL:
            UPDOWN_MouseWheel(infoPtr, wParam);
            break;

999
	case WM_KEYDOWN:
1000
	    if((infoPtr->dwStyle & UDS_ARROWKEYS) && UPDOWN_IsEnabled(infoPtr))
1001
		return UPDOWN_KeyPressed(infoPtr, (int)wParam);
1002
	    break;
1003

1004
	case WM_PRINTCLIENT:
1005
	case WM_PAINT:
1006
	    return UPDOWN_Paint (infoPtr, (HDC)wParam);
1007

1008 1009 1010
	case UDM_GETACCEL:
	    if (wParam==0 && lParam==0) return infoPtr->AccelCount;
	    if (wParam && lParam) {
1011
		int temp = min(infoPtr->AccelCount, wParam);
1012 1013 1014 1015 1016 1017
	        memcpy((void *)lParam, infoPtr->AccelVect, temp*sizeof(UDACCEL));
	        return temp;
      	    }
	    return 0;

	case UDM_SETACCEL:
1018 1019 1020
	{
	    unsigned temp;

1021 1022
	    TRACE("UDM_SETACCEL\n");

1023
	    if(infoPtr->AccelVect) {
1024
		Free (infoPtr->AccelVect);
1025 1026 1027 1028
		infoPtr->AccelCount = 0;
		infoPtr->AccelVect  = 0;
      	    }
	    if(wParam==0) return TRUE;
1029
	    infoPtr->AccelVect = Alloc (wParam*sizeof(UDACCEL));
1030 1031
	    if(infoPtr->AccelVect == 0) return FALSE;
	    memcpy(infoPtr->AccelVect, (void*)lParam, wParam*sizeof(UDACCEL));
1032 1033 1034 1035 1036
            infoPtr->AccelCount = wParam;

            for (temp = 0; temp < wParam; temp++)
                TRACE("%d: nSec %u nInc %u\n", temp, infoPtr->AccelVect[temp].nSec, infoPtr->AccelVect[temp].nInc);

1037
    	    return TRUE;
1038
	}
1039 1040 1041 1042
	case UDM_GETBASE:
	    return infoPtr->Base;

	case UDM_SETBASE:
1043
	    TRACE("UpDown Ctrl new base(%ld), hwnd=%p\n", wParam, hwnd);
1044
	    if (wParam==10 || wParam==16) {
1045
		WPARAM old_base = infoPtr->Base;
1046
		infoPtr->Base = wParam;
1047 1048 1049 1050 1051

		if (old_base != infoPtr->Base)
		    UPDOWN_SetBuddyInt(infoPtr);

		return old_base;
1052 1053 1054 1055
	    }
	    break;

	case UDM_GETBUDDY:
1056
	    return (LRESULT)infoPtr->Buddy;
1057 1058

	case UDM_SETBUDDY:
1059
	    return (LRESULT)UPDOWN_SetBuddy (infoPtr, (HWND)wParam);
1060 1061

	case UDM_GETPOS:
1062
	{
1063 1064
	    BOOL ret = UPDOWN_GetBuddyInt (infoPtr);
	    return MAKELONG(infoPtr->CurVal, ret ? 0 : 1);
1065
	}
1066
	case UDM_SETPOS:
1067 1068 1069
	{
	    int temp = (short)LOWORD(lParam);

1070
	    TRACE("UpDown Ctrl new value(%d), hwnd=%p\n", temp, hwnd);
1071 1072 1073 1074
	    if(!UPDOWN_InBounds(infoPtr, temp)) {
		if(temp < infoPtr->MinVal) temp = infoPtr->MinVal;
		if(temp > infoPtr->MaxVal) temp = infoPtr->MaxVal;
	    }
1075 1076
	    wParam = infoPtr->CurVal;
	    infoPtr->CurVal = temp;
1077
	    UPDOWN_SetBuddyInt (infoPtr);
1078
	    return wParam;            /* return prev value */
1079
	}
1080 1081 1082 1083
	case UDM_GETRANGE:
	    return MAKELONG(infoPtr->MaxVal, infoPtr->MinVal);

	case UDM_SETRANGE:
1084 1085 1086 1087 1088
	    /* we must have:
	    UD_MINVAL <= Max <= UD_MAXVAL
	    UD_MINVAL <= Min <= UD_MAXVAL
	    |Max-Min| <= UD_MAXVAL */
	    UPDOWN_SetRange(infoPtr, (short)lParam, (short)HIWORD(lParam));
1089
	    break;
1090 1091 1092 1093 1094 1095 1096

	case UDM_GETRANGE32:
	    if (wParam) *(LPINT)wParam = infoPtr->MinVal;
	    if (lParam) *(LPINT)lParam = infoPtr->MaxVal;
	    break;

	case UDM_SETRANGE32:
1097
	    UPDOWN_SetRange(infoPtr, (INT)lParam, (INT)wParam);
1098 1099 1100
	    break;

	case UDM_GETPOS32:
1101 1102 1103
	{
	    BOOL ret = UPDOWN_GetBuddyInt (infoPtr);
	    if ((LPBOOL)lParam) *((LPBOOL)lParam) = !ret;
1104
	    return infoPtr->CurVal;
1105
	}
1106
	case UDM_SETPOS32:
1107 1108 1109
	{
	    int temp;

1110 1111 1112 1113 1114 1115
	    if(!UPDOWN_InBounds(infoPtr, (int)lParam)) {
		if((int)lParam < infoPtr->MinVal) lParam = infoPtr->MinVal;
		if((int)lParam > infoPtr->MaxVal) lParam = infoPtr->MaxVal;
	    }
	    temp = infoPtr->CurVal;         /* save prev value   */
	    infoPtr->CurVal = (int)lParam;  /* set the new value */
1116
	    UPDOWN_SetBuddyInt (infoPtr);
1117
	    return temp;                    /* return prev value */
1118
	}
1119 1120 1121 1122 1123
	case UDM_GETUNICODEFORMAT:
	    /* we lie a bit here, we're always using Unicode internally */
	    return infoPtr->UnicodeFormat;

	case UDM_SETUNICODEFORMAT:
1124
	{
1125
	    /* do we really need to honour this flag? */
1126
	    int temp = infoPtr->UnicodeFormat;
1127 1128
	    infoPtr->UnicodeFormat = (BOOL)wParam;
	    return temp;
1129
	}
1130
	default:
1131
	    if ((message >= WM_USER) && (message < WM_APP) && !COMCTL32_IsReflectedMessage(message))
1132
		ERR("unknown msg %04x wp=%04lx lp=%08lx\n", message, wParam, lParam);
1133 1134
	    return DefWindowProcW (hwnd, message, wParam, lParam);
    }
Alexandre Julliard's avatar
Alexandre Julliard committed
1135 1136 1137 1138

    return 0;
}

Alexandre Julliard's avatar
Alexandre Julliard committed
1139
/***********************************************************************
1140
 *		UPDOWN_Register	[Internal]
Alexandre Julliard's avatar
Alexandre Julliard committed
1141 1142 1143
 *
 * Registers the updown window class.
 */
Dimitrie O. Paun's avatar
Dimitrie O. Paun committed
1144
void UPDOWN_Register(void)
Alexandre Julliard's avatar
Alexandre Julliard committed
1145
{
1146
    WNDCLASSW wndClass;
Alexandre Julliard's avatar
Alexandre Julliard committed
1147

1148
    ZeroMemory( &wndClass, sizeof( WNDCLASSW ) );
Huw Davies's avatar
Huw Davies committed
1149
    wndClass.style         = CS_GLOBALCLASS | CS_VREDRAW | CS_HREDRAW;
1150
    wndClass.lpfnWndProc   = UpDownWindowProc;
Alexandre Julliard's avatar
Alexandre Julliard committed
1151
    wndClass.cbClsExtra    = 0;
Alexandre Julliard's avatar
Alexandre Julliard committed
1152
    wndClass.cbWndExtra    = sizeof(UPDOWN_INFO*);
1153
    wndClass.hCursor       = LoadCursorW( 0, (LPWSTR)IDC_ARROW );
1154
    wndClass.hbrBackground = (HBRUSH)(COLOR_BTNFACE + 1);
1155
    wndClass.lpszClassName = UPDOWN_CLASSW;
1156

1157
    RegisterClassW( &wndClass );
Alexandre Julliard's avatar
Alexandre Julliard committed
1158 1159
}

1160 1161 1162 1163 1164 1165

/***********************************************************************
 *		UPDOWN_Unregister	[Internal]
 *
 * Unregisters the updown window class.
 */
Dimitrie O. Paun's avatar
Dimitrie O. Paun committed
1166
void UPDOWN_Unregister (void)
1167
{
1168
    UnregisterClassW (UPDOWN_CLASSW, NULL);
1169
}