2 * Date and time picker control
4 * Copyright 1998, 1999 Eric Kohl
5 * Copyright 1999, 2000 Alex Priem <alexp@sci.kun.nl>
6 * Copyright 2000 Chris Morgan <cmorgan@wpi.edu>
8 * This library is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public
10 * License as published by the Free Software Foundation; either
11 * version 2.1 of the License, or (at your option) any later version.
13 * This library is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * Lesser General Public License for more details.
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with this library; if not, write to the Free Software
20 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
24 * This code was audited for completeness against the documented features
25 * of Comctl32.dll version 6.0 on Oct. 20, 2004, by Dimitrie O. Paun.
27 * Unless otherwise noted, we believe this code to be complete, as per
28 * the specification mentioned above.
29 * If you discover missing features, or bugs, please note them below.
33 * -- DTS_SHORTDATECENTURYFORMAT
55 #include "wine/debug.h"
56 #include "wine/unicode.h"
58 WINE_DEFAULT_DEBUG_CHANNEL(datetime);
70 RECT rcClient; /* rect around the edge of the window */
71 RECT rcDraw; /* rect inside of the border */
72 RECT checkbox; /* checkbox allowing the control to be enabled/disabled */
73 RECT calbutton; /* button that toggles the dropdown of the monthcal control */
74 BOOL bCalDepressed; /* TRUE = cal button is depressed */
77 int nrFieldsAllocated;
85 } DATETIME_INFO, *LPDATETIME_INFO;
88 extern int MONTHCAL_MonthLength(int month, int year);
90 /* this list of defines is closely related to `allowedformatchars' defined
91 * in datetime.c; the high nibble indicates the `base type' of the format
93 * Do not change without first reading DATETIME_UseFormat.
97 #define DT_END_FORMAT 0
98 #define ONEDIGITDAY 0x01
99 #define TWODIGITDAY 0x02
100 #define THREECHARDAY 0x03
102 #define ONEDIGIT12HOUR 0x11
103 #define TWODIGIT12HOUR 0x12
104 #define ONEDIGIT24HOUR 0x21
105 #define TWODIGIT24HOUR 0x22
106 #define ONEDIGITMINUTE 0x31
107 #define TWODIGITMINUTE 0x32
108 #define ONEDIGITMONTH 0x41
109 #define TWODIGITMONTH 0x42
110 #define THREECHARMONTH 0x43
111 #define FULLMONTH 0x44
112 #define ONEDIGITSECOND 0x51
113 #define TWODIGITSECOND 0x52
114 #define ONELETTERAMPM 0x61
115 #define TWOLETTERAMPM 0x62
116 #define ONEDIGITYEAR 0x71
117 #define TWODIGITYEAR 0x72
118 #define INVALIDFULLYEAR 0x73 /* FIXME - yyy is not valid - we'll treat it as yyyy */
119 #define FULLYEAR 0x74
120 #define FORMATCALLBACK 0x81 /* -> maximum of 0x80 callbacks possible */
121 #define FORMATCALLMASK 0x80
122 #define DT_STRING 0x0100
124 #define DTHT_DATEFIELD 0xff /* for hit-testing */
127 #define DTHT_CHECKBOX 0x200 /* these should end at '00' , to make */
128 #define DTHT_MCPOPUP 0x300 /* & DTHT_DATEFIELD 0 when DATETIME_KeyDown */
129 #define DTHT_GOTFOCUS 0x400 /* tests for date-fields */
131 static BOOL DATETIME_SendSimpleNotify (DATETIME_INFO *infoPtr, UINT code);
132 static BOOL DATETIME_SendDateTimeChangeNotify (DATETIME_INFO *infoPtr);
133 extern void MONTHCAL_CopyTime(const SYSTEMTIME *from, SYSTEMTIME *to);
134 static const WCHAR allowedformatchars[] = {'d', 'h', 'H', 'm', 'M', 's', 't', 'y', 'X', '\'', 0};
135 static const int maxrepetition [] = {4,2,2,2,4,2,2,4,-1,-1};
139 DATETIME_GetSystemTime (DATETIME_INFO *infoPtr, SYSTEMTIME *lprgSysTimeArray)
141 if (!lprgSysTimeArray) return GDT_NONE;
143 if ((infoPtr->dwStyle & DTS_SHOWNONE) &&
144 (SendMessageW (infoPtr->hwndCheckbut, BM_GETCHECK, 0, 0) == BST_UNCHECKED))
147 MONTHCAL_CopyTime (&infoPtr->date, lprgSysTimeArray);
154 DATETIME_SetSystemTime (DATETIME_INFO *infoPtr, DWORD flag, SYSTEMTIME *lprgSysTimeArray)
156 if (!lprgSysTimeArray) return 0;
158 TRACE("%04d/%02d/%02d %02d:%02d:%02d\n",
159 lprgSysTimeArray->wYear, lprgSysTimeArray->wMonth, lprgSysTimeArray->wDay,
160 lprgSysTimeArray->wHour, lprgSysTimeArray->wMinute, lprgSysTimeArray->wSecond);
162 if (flag == GDT_VALID) {
163 infoPtr->dateValid = TRUE;
164 MONTHCAL_CopyTime (lprgSysTimeArray, &infoPtr->date);
165 SendMessageW (infoPtr->hMonthCal, MCM_SETCURSEL, 0, (LPARAM)(&infoPtr->date));
166 SendMessageW (infoPtr->hwndCheckbut, BM_SETCHECK, BST_CHECKED, 0);
167 } else if (flag == GDT_NONE) {
168 infoPtr->dateValid = FALSE;
169 SendMessageW (infoPtr->hwndCheckbut, BM_SETCHECK, BST_UNCHECKED, 0);
172 InvalidateRect(infoPtr->hwndSelf, NULL, TRUE);
178 * Split up a formattxt in actions.
179 * See ms documentation for the meaning of the letter codes/'specifiers'.
182 * *'dddddd' is handled as 'dddd' plus 'dd'.
183 * *unrecognized formats are strings (here given the type DT_STRING;
184 * start of the string is encoded in lower bits of DT_STRING.
185 * Therefore, 'string' ends finally up as '<show seconds>tring'.
189 DATETIME_UseFormat (DATETIME_INFO *infoPtr, LPCWSTR formattxt)
193 int *nrFields = &infoPtr->nrFields;
196 infoPtr->fieldspec[*nrFields] = 0;
197 len = strlenW(allowedformatchars);
200 for (i = 0; formattxt[i]; i++) {
201 TRACE ("\n%d %c:", i, formattxt[i]);
202 for (j = 0; j < len; j++) {
203 if (allowedformatchars[j]==formattxt[i]) {
204 TRACE ("%c[%d,%x]", allowedformatchars[j], *nrFields, infoPtr->fieldspec[*nrFields]);
205 if ((*nrFields==0) && (infoPtr->fieldspec[*nrFields]==0)) {
206 infoPtr->fieldspec[*nrFields] = (j<<4) + 1;
209 if (infoPtr->fieldspec[*nrFields] >> 4 != j) {
211 infoPtr->fieldspec[*nrFields] = (j<<4) + 1;
214 if ((infoPtr->fieldspec[*nrFields] & 0x0f) == maxrepetition[j]) {
216 infoPtr->fieldspec[*nrFields] = (j<<4) + 1;
219 infoPtr->fieldspec[*nrFields]++;
221 } /* if allowedformatchar */
224 /* char is not a specifier: handle char like a string */
226 if ((*nrFields==0) && (infoPtr->fieldspec[*nrFields]==0)) {
227 infoPtr->fieldspec[*nrFields] = DT_STRING + k;
228 infoPtr->buflen[*nrFields] = 0;
229 } else if ((infoPtr->fieldspec[*nrFields] & DT_STRING) != DT_STRING) {
231 infoPtr->fieldspec[*nrFields] = DT_STRING + k;
232 infoPtr->buflen[*nrFields] = 0;
234 infoPtr->textbuf[k] = formattxt[i];
236 infoPtr->buflen[*nrFields]++;
239 if (*nrFields == infoPtr->nrFieldsAllocated) {
240 FIXME ("out of memory; should reallocate. crash ahead.\n");
246 if (infoPtr->fieldspec[*nrFields] != 0) (*nrFields)++;
251 DATETIME_SetFormatW (DATETIME_INFO *infoPtr, LPCWSTR lpszFormat)
254 WCHAR format_buf[80];
257 if (infoPtr->dwStyle & DTS_LONGDATEFORMAT)
258 format_item = LOCALE_SLONGDATE;
259 else if (infoPtr->dwStyle & DTS_TIMEFORMAT)
260 format_item = LOCALE_STIMEFORMAT;
261 else /* DTS_SHORTDATEFORMAT */
262 format_item = LOCALE_SSHORTDATE;
263 GetLocaleInfoW( GetSystemDefaultLCID(), format_item, format_buf, sizeof(format_buf)/sizeof(format_buf[0]));
264 lpszFormat = format_buf;
267 DATETIME_UseFormat (infoPtr, lpszFormat);
269 return infoPtr->nrFields;
274 DATETIME_SetFormatA (DATETIME_INFO *infoPtr, LPCSTR lpszFormat)
278 INT len = MultiByteToWideChar(CP_ACP, 0, lpszFormat, -1, NULL, 0);
279 LPWSTR wstr = Alloc(len * sizeof(WCHAR));
280 if (wstr) MultiByteToWideChar(CP_ACP, 0, lpszFormat, -1, wstr, len);
281 retval = DATETIME_SetFormatW (infoPtr, wstr);
286 return DATETIME_SetFormatW (infoPtr, 0);
292 DATETIME_ReturnTxt (DATETIME_INFO *infoPtr, int count, LPWSTR result, int resultSize)
294 static const WCHAR fmt_dW[] = { '%', 'd', 0 };
295 static const WCHAR fmt__2dW[] = { '%', '.', '2', 'd', 0 };
296 static const WCHAR fmt__3sW[] = { '%', '.', '3', 's', 0 };
297 SYSTEMTIME date = infoPtr->date;
302 TRACE ("%d,%d\n", infoPtr->nrFields, count);
303 if (count>infoPtr->nrFields || count < 0) {
304 WARN ("buffer overrun, have %d want %d\n", infoPtr->nrFields, count);
308 if (!infoPtr->fieldspec) return;
310 spec = infoPtr->fieldspec[count];
311 if (spec & DT_STRING) {
312 int txtlen = infoPtr->buflen[count];
314 if (txtlen > resultSize)
315 txtlen = resultSize - 1;
316 memcpy (result, infoPtr->textbuf + (spec &~ DT_STRING), txtlen * sizeof(WCHAR));
318 TRACE ("arg%d=%x->[%s]\n", count, infoPtr->fieldspec[count], debugstr_w(result));
328 wsprintfW (result, fmt_dW, date.wDay);
331 wsprintfW (result, fmt__2dW, date.wDay);
334 GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_SABBREVDAYNAME1+(date.wDayOfWeek+6)%7, result, 4);
335 /*wsprintfW (result,"%.3s",days[date.wDayOfWeek]);*/
338 GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_SDAYNAME1+(date.wDayOfWeek+6)%7, result, resultSize);
341 wsprintfW (result, fmt_dW, date.wHour - (date.wHour > 12 ? 12 : 0));
344 wsprintfW (result, fmt__2dW, date.wHour - (date.wHour > 12 ? 12 : 0));
347 wsprintfW (result, fmt_dW, date.wHour);
350 wsprintfW (result, fmt__2dW, date.wHour);
353 wsprintfW (result, fmt_dW, date.wSecond);
356 wsprintfW (result, fmt__2dW, date.wSecond);
359 wsprintfW (result, fmt_dW, date.wMinute);
362 wsprintfW (result, fmt__2dW, date.wMinute);
365 wsprintfW (result, fmt_dW, date.wMonth);
368 wsprintfW (result, fmt__2dW, date.wMonth);
371 GetLocaleInfoW(GetSystemDefaultLCID(), LOCALE_SMONTHNAME1+date.wMonth -1,
372 buffer, sizeof(buffer)/sizeof(buffer[0]));
373 wsprintfW (result, fmt__3sW, buffer);
376 GetLocaleInfoW(GetSystemDefaultLCID(),LOCALE_SMONTHNAME1+date.wMonth -1,
380 result[0] = (date.wHour < 12 ? 'A' : 'P');
384 result[0] = (date.wHour < 12 ? 'A' : 'P');
389 FIXME ("Not implemented\n");
394 wsprintfW (result, fmt_dW, date.wYear-10* (int) floor(date.wYear/10));
397 wsprintfW (result, fmt__2dW, date.wYear-100* (int) floor(date.wYear/100));
399 case INVALIDFULLYEAR:
401 wsprintfW (result, fmt_dW, date.wYear);
405 TRACE ("arg%d=%x->[%s]\n", count, infoPtr->fieldspec[count], debugstr_w(result));
408 static int wrap(int val, int delta, int minVal, int maxVal)
411 if (delta == INT_MIN || val < minVal) return maxVal;
412 if (delta == INT_MAX || val > maxVal) return minVal;
417 DATETIME_IncreaseField (DATETIME_INFO *infoPtr, int number, int delta)
419 SYSTEMTIME *date = &infoPtr->date;
421 TRACE ("%d\n", number);
422 if ((number > infoPtr->nrFields) || (number < 0)) return;
424 if ((infoPtr->fieldspec[number] & DTHT_DATEFIELD) == 0) return;
426 switch (infoPtr->fieldspec[number]) {
430 date->wYear = wrap(date->wYear, delta, 1752, 9999);
436 date->wMonth = wrap(date->wMonth, delta, 1, 12);
443 date->wDay = wrap(date->wDay, delta, 1, MONTHCAL_MonthLength(date->wMonth, date->wYear));
453 date->wHour = wrap(date->wHour, delta, 0, 23);
457 date->wMinute = wrap(date->wMinute, delta, 0, 59);
461 date->wSecond = wrap(date->wSecond, delta, 0, 59);
464 FIXME ("Not implemented\n");
468 /* FYI: On 1752/9/14 the calendar changed and England and the
469 * American colonies changed to the Gregorian calendar. This change
470 * involved having September 14th follow September 2nd. So no date
471 * algorithm works before that date.
473 if (10000 * date->wYear + 100 * date->wMonth + date->wDay < 17520914) {
485 DATETIME_Refresh (DATETIME_INFO *infoPtr, HDC hdc)
489 RECT *rcDraw = &infoPtr->rcDraw;
490 RECT *rcClient = &infoPtr->rcClient;
491 RECT *calbutton = &infoPtr->calbutton;
492 RECT *checkbox = &infoPtr->checkbox;
494 COLORREF oldTextColor;
496 /* draw control edge */
498 DrawEdge(hdc, rcClient, EDGE_SUNKEN, BF_RECT);
500 if (infoPtr->dateValid) {
501 HFONT oldFont = SelectObject (hdc, infoPtr->hFont);
502 INT oldBkMode = SetBkMode (hdc, TRANSPARENT);
505 DATETIME_ReturnTxt (infoPtr, 0, txt, sizeof(txt)/sizeof(txt[0]));
506 GetTextExtentPoint32W (hdc, txt, strlenW(txt), &size);
507 rcDraw->bottom = size.cy + 2;
509 prevright = checkbox->right = ((infoPtr->dwStyle & DTS_SHOWNONE) ? 18 : 2);
511 for (i = 0; i < infoPtr->nrFields; i++) {
512 DATETIME_ReturnTxt (infoPtr, i, txt, sizeof(txt)/sizeof(txt[0]));
513 GetTextExtentPoint32W (hdc, txt, strlenW(txt), &size);
514 field = &infoPtr->fieldRect[i];
515 field->left = prevright;
516 field->right = prevright+size.cx;
517 field->top = rcDraw->top;
518 field->bottom = rcDraw->bottom;
519 prevright = field->right;
521 if (infoPtr->dwStyle & WS_DISABLED)
522 oldTextColor = SetTextColor (hdc, comctl32_color.clrGrayText);
523 else if ((infoPtr->haveFocus) && (i == infoPtr->select)) {
524 /* fill if focussed */
525 HBRUSH hbr = CreateSolidBrush (comctl32_color.clrActiveCaption);
526 FillRect(hdc, field, hbr);
528 oldTextColor = SetTextColor (hdc, comctl32_color.clrWindow);
531 oldTextColor = SetTextColor (hdc, comctl32_color.clrWindowText);
533 /* draw the date text using the colour set above */
534 DrawTextW (hdc, txt, strlenW(txt), field, DT_RIGHT | DT_VCENTER | DT_SINGLELINE);
535 SetTextColor (hdc, oldTextColor);
537 SetBkMode (hdc, oldBkMode);
538 SelectObject (hdc, oldFont);
541 if (!(infoPtr->dwStyle & DTS_UPDOWN)) {
542 DrawFrameControl(hdc, calbutton, DFC_SCROLL,
543 DFCS_SCROLLDOWN | (infoPtr->bCalDepressed ? DFCS_PUSHED : 0) |
544 (infoPtr->dwStyle & WS_DISABLED ? DFCS_INACTIVE : 0) );
550 DATETIME_HitTest (DATETIME_INFO *infoPtr, POINT pt)
554 TRACE ("%ld, %ld\n", pt.x, pt.y);
556 if (PtInRect (&infoPtr->calbutton, pt)) return DTHT_MCPOPUP;
557 if (PtInRect (&infoPtr->checkbox, pt)) return DTHT_CHECKBOX;
559 for (i=0; i < infoPtr->nrFields; i++) {
560 if (PtInRect (&infoPtr->fieldRect[i], pt)) return i;
568 DATETIME_LButtonDown (DATETIME_INFO *infoPtr, WORD wKey, INT x, INT y)
575 old = infoPtr->select;
576 new = DATETIME_HitTest (infoPtr, pt);
578 /* FIXME: might be conditions where we don't want to update infoPtr->select */
579 infoPtr->select = new;
581 if (infoPtr->select != old)
582 infoPtr->haveFocus = DTHT_GOTFOCUS;
584 if (infoPtr->select == DTHT_MCPOPUP) {
585 /* FIXME: button actually is only depressed during dropdown of the */
586 /* calendar control and when the mouse is over the button window */
587 infoPtr->bCalDepressed = TRUE;
589 /* recalculate the position of the monthcal popup */
590 if(infoPtr->dwStyle & DTS_RIGHTALIGN)
591 infoPtr->monthcal_pos.x = infoPtr->rcClient.right -
592 ((infoPtr->calbutton.right - infoPtr->calbutton.left) + 200);
594 infoPtr->monthcal_pos.x = 8;
596 infoPtr->monthcal_pos.y = infoPtr->rcClient.bottom;
597 ClientToScreen (infoPtr->hwndSelf, &(infoPtr->monthcal_pos));
598 /* FIXME My Windoze has cx=about 200, but it probably depends on font size etc */
599 SetWindowPos(infoPtr->hMonthCal, 0, infoPtr->monthcal_pos.x, infoPtr->monthcal_pos.y, 200, 150, 0);
601 if(IsWindowVisible(infoPtr->hMonthCal)) {
602 ShowWindow(infoPtr->hMonthCal, SW_HIDE);
604 SYSTEMTIME *lprgSysTimeArray = &infoPtr->date;
605 TRACE("update calendar %04d/%02d/%02d\n",
606 lprgSysTimeArray->wYear, lprgSysTimeArray->wMonth, lprgSysTimeArray->wDay);
607 SendMessageW(infoPtr->hMonthCal, MCM_SETCURSEL, 0, (LPARAM)(&infoPtr->date));
608 ShowWindow(infoPtr->hMonthCal, SW_SHOW);
611 TRACE ("dt:%p mc:%p mc parent:%p, desktop:%p\n",
612 infoPtr->hwndSelf, infoPtr->hMonthCal, infoPtr->hwndNotify, GetDesktopWindow ());
613 DATETIME_SendSimpleNotify (infoPtr, DTN_DROPDOWN);
616 InvalidateRect(infoPtr->hwndSelf, NULL, TRUE);
623 DATETIME_LButtonUp (DATETIME_INFO *infoPtr, WORD wKey)
625 if(infoPtr->bCalDepressed) {
626 infoPtr->bCalDepressed = FALSE;
627 InvalidateRect(infoPtr->hwndSelf, &(infoPtr->calbutton), TRUE);
635 DATETIME_Paint (DATETIME_INFO *infoPtr, HDC hdc)
639 hdc = BeginPaint (infoPtr->hwndSelf, &ps);
640 DATETIME_Refresh (infoPtr, hdc);
641 EndPaint (infoPtr->hwndSelf, &ps);
643 DATETIME_Refresh (infoPtr, hdc);
650 DATETIME_Button_Command (DATETIME_INFO *infoPtr, WPARAM wParam, LPARAM lParam)
652 if( HIWORD(wParam) == BN_CLICKED) {
653 DWORD state = SendMessageW((HWND)lParam, BM_GETCHECK, 0, 0);
654 infoPtr->dateValid = (state == BST_CHECKED);
655 InvalidateRect(infoPtr->hwndSelf, NULL, TRUE);
663 DATETIME_Command (DATETIME_INFO *infoPtr, WPARAM wParam, LPARAM lParam)
665 TRACE("hwndbutton = %p\n", infoPtr->hwndCheckbut);
666 if(infoPtr->hwndCheckbut == (HWND)lParam)
667 return DATETIME_Button_Command(infoPtr, wParam, lParam);
673 DATETIME_Enable (DATETIME_INFO *infoPtr, BOOL bEnable)
675 TRACE("%p %s\n", infoPtr, bEnable ? "TRUE" : "FALSE");
677 infoPtr->dwStyle &= ~WS_DISABLED;
679 infoPtr->dwStyle |= WS_DISABLED;
685 DATETIME_EraseBackground (DATETIME_INFO *infoPtr, HDC hdc)
687 HBRUSH hBrush, hSolidBrush = NULL;
690 if (infoPtr->dwStyle & WS_DISABLED)
691 hBrush = hSolidBrush = CreateSolidBrush(comctl32_color.clrBtnFace);
694 hBrush = (HBRUSH)SendMessageW(infoPtr->hwndNotify, WM_CTLCOLOREDIT,
695 (WPARAM)hdc, (LPARAM)infoPtr->hwndSelf);
697 hBrush = hSolidBrush = CreateSolidBrush(comctl32_color.clrWindow);
700 GetClientRect (infoPtr->hwndSelf, &rc);
702 FillRect (hdc, &rc, hBrush);
705 DeleteObject(hSolidBrush);
712 DATETIME_Notify (DATETIME_INFO *infoPtr, int idCtrl, LPNMHDR lpnmh)
714 TRACE ("Got notification %x from %p\n", lpnmh->code, lpnmh->hwndFrom);
715 TRACE ("info: %p %p %p\n", infoPtr->hwndSelf, infoPtr->hMonthCal, infoPtr->hUpdown);
717 if (lpnmh->code == MCN_SELECT) {
718 ShowWindow(infoPtr->hMonthCal, SW_HIDE);
719 infoPtr->dateValid = TRUE;
720 SendMessageW (infoPtr->hMonthCal, MCM_GETCURSEL, 0, (LPARAM)&infoPtr->date);
721 TRACE("got from calendar %04d/%02d/%02d\n",
722 infoPtr->date.wYear, infoPtr->date.wMonth, infoPtr->date.wDay);
723 SendMessageW (infoPtr->hwndCheckbut, BM_SETCHECK, BST_CHECKED, 0);
724 InvalidateRect(infoPtr->hwndSelf, NULL, TRUE);
725 DATETIME_SendDateTimeChangeNotify (infoPtr);
732 DATETIME_KeyDown (DATETIME_INFO *infoPtr, DWORD vkCode, LPARAM flags)
734 int fieldNum = infoPtr->select & DTHT_DATEFIELD;
737 if (!(infoPtr->haveFocus)) return 0;
738 if ((fieldNum==0) && (infoPtr->select)) return 0;
740 if (infoPtr->select & FORMATCALLMASK) {
741 FIXME ("Callbacks not implemented yet\n");
747 DATETIME_IncreaseField (infoPtr, fieldNum, 1);
748 DATETIME_SendDateTimeChangeNotify (infoPtr);
752 DATETIME_IncreaseField (infoPtr, fieldNum, -1);
753 DATETIME_SendDateTimeChangeNotify (infoPtr);
756 DATETIME_IncreaseField (infoPtr, fieldNum, INT_MIN);
757 DATETIME_SendDateTimeChangeNotify (infoPtr);
760 DATETIME_IncreaseField (infoPtr, fieldNum, INT_MAX);
761 DATETIME_SendDateTimeChangeNotify (infoPtr);
765 if (infoPtr->select == 0) {
766 infoPtr->select = infoPtr->nrFields - 1;
771 } while ((infoPtr->fieldspec[infoPtr->select] & DT_STRING) && (wrap<2));
776 if (infoPtr->select==infoPtr->nrFields) {
780 } while ((infoPtr->fieldspec[infoPtr->select] & DT_STRING) && (wrap<2));
784 InvalidateRect(infoPtr->hwndSelf, NULL, FALSE);
791 DATETIME_KillFocus (DATETIME_INFO *infoPtr, HWND lostFocus)
793 if (infoPtr->haveFocus) {
794 DATETIME_SendSimpleNotify (infoPtr, NM_KILLFOCUS);
795 infoPtr->haveFocus = 0;
798 InvalidateRect (infoPtr->hwndSelf, NULL, TRUE);
805 DATETIME_SetFocus (DATETIME_INFO *infoPtr, HWND lostFocus)
807 if (infoPtr->haveFocus == 0) {
808 DATETIME_SendSimpleNotify (infoPtr, NM_SETFOCUS);
809 infoPtr->haveFocus = DTHT_GOTFOCUS;
812 InvalidateRect(infoPtr->hwndSelf, NULL, FALSE);
819 DATETIME_SendDateTimeChangeNotify (DATETIME_INFO *infoPtr)
821 NMDATETIMECHANGE dtdtc;
823 dtdtc.nmhdr.hwndFrom = infoPtr->hwndSelf;
824 dtdtc.nmhdr.idFrom = GetWindowLongPtrW(infoPtr->hwndSelf, GWLP_ID);
825 dtdtc.nmhdr.code = DTN_DATETIMECHANGE;
827 dtdtc.dwFlags = (infoPtr->dwStyle & DTS_SHOWNONE) ? GDT_NONE : GDT_VALID;
829 MONTHCAL_CopyTime (&infoPtr->date, &dtdtc.st);
830 return (BOOL) SendMessageW (infoPtr->hwndNotify, WM_NOTIFY,
831 (WPARAM)dtdtc.nmhdr.idFrom, (LPARAM)&dtdtc);
836 DATETIME_SendSimpleNotify (DATETIME_INFO *infoPtr, UINT code)
841 nmhdr.hwndFrom = infoPtr->hwndSelf;
842 nmhdr.idFrom = GetWindowLongPtrW(infoPtr->hwndSelf, GWLP_ID);
845 return (BOOL) SendMessageW (infoPtr->hwndNotify, WM_NOTIFY,
846 (WPARAM)nmhdr.idFrom, (LPARAM)&nmhdr);
850 DATETIME_Size (DATETIME_INFO *infoPtr, WORD flags, INT width, INT height)
853 infoPtr->rcClient.bottom = height;
854 infoPtr->rcClient.right = width;
856 TRACE("Height=%ld, Width=%ld\n", infoPtr->rcClient.bottom, infoPtr->rcClient.right);
858 memcpy((&infoPtr->rcDraw), (&infoPtr->rcClient), sizeof(infoPtr->rcDraw));
860 /* subract the size of the edge drawn by DrawEdge */
861 InflateRect(&infoPtr->rcDraw, -GetSystemMetrics(SM_CXEDGE),
862 -GetSystemMetrics(SM_CYEDGE));
864 /* set the size of the button that drops the calendar down */
865 /* FIXME: account for style that allows button on left side */
866 infoPtr->calbutton.top = infoPtr->rcDraw.top;
867 infoPtr->calbutton.bottom= infoPtr->rcDraw.bottom;
868 infoPtr->calbutton.left = infoPtr->rcDraw.right-15;
869 infoPtr->calbutton.right = infoPtr->rcDraw.right;
871 /* set enable/disable button size for show none style being enabled */
872 /* FIXME: these dimensions are completely incorrect */
873 infoPtr->checkbox.top = infoPtr->rcDraw.top;
874 infoPtr->checkbox.bottom = infoPtr->rcDraw.bottom;
875 infoPtr->checkbox.left = infoPtr->rcDraw.left;
876 infoPtr->checkbox.right = infoPtr->rcDraw.left + 10;
878 /* update the position of the monthcal control */
879 if(infoPtr->dwStyle & DTS_RIGHTALIGN)
880 infoPtr->monthcal_pos.x = infoPtr->rcClient.right - ((infoPtr->calbutton.right -
881 infoPtr->calbutton.left) + 145);
883 infoPtr->monthcal_pos.x = 8;
885 infoPtr->monthcal_pos.y = infoPtr->rcClient.bottom;
886 ClientToScreen (infoPtr->hwndSelf, &(infoPtr->monthcal_pos));
887 SetWindowPos(infoPtr->hMonthCal, 0, infoPtr->monthcal_pos.x, infoPtr->monthcal_pos.y, 145, 150, 0);
889 InvalidateRect(infoPtr->hwndSelf, NULL, FALSE);
896 DATETIME_StyleChanged(DATETIME_INFO *infoPtr, WPARAM wStyleType, LPSTYLESTRUCT lpss)
898 static const WCHAR buttonW[] = { 'b', 'u', 't', 't', 'o', 'n', 0 };
900 TRACE("(styletype=%x, styleOld=0x%08lx, styleNew=0x%08lx)\n",
901 wStyleType, lpss->styleOld, lpss->styleNew);
903 if (wStyleType != GWL_STYLE) return 0;
905 infoPtr->dwStyle = lpss->styleNew;
907 if ( !(lpss->styleOld & DTS_SHOWNONE) && (lpss->styleNew & DTS_SHOWNONE) ) {
908 infoPtr->hwndCheckbut = CreateWindowExW (0, buttonW, 0, WS_CHILD | WS_VISIBLE | BS_AUTOCHECKBOX,
909 2, 2, 13, 13, infoPtr->hwndSelf, 0,
910 (HINSTANCE)GetWindowLongPtrW (infoPtr->hwndSelf, GWLP_HINSTANCE), 0);
911 SendMessageW (infoPtr->hwndCheckbut, BM_SETCHECK, 1, 0);
913 if ( (lpss->styleOld & DTS_SHOWNONE) && !(lpss->styleNew & DTS_SHOWNONE) ) {
914 DestroyWindow(infoPtr->hwndCheckbut);
915 infoPtr->hwndCheckbut = 0;
917 if ( !(lpss->styleOld & DTS_UPDOWN) && (lpss->styleNew & DTS_UPDOWN) ) {
918 infoPtr->hUpdown = CreateUpDownControl (WS_CHILD | WS_BORDER | WS_VISIBLE, 120, 1, 20, 20,
919 infoPtr->hwndSelf, 1, 0, 0, UD_MAXVAL, UD_MINVAL, 0);
921 if ( (lpss->styleOld & DTS_UPDOWN) && !(lpss->styleNew & DTS_UPDOWN) ) {
922 DestroyWindow(infoPtr->hUpdown);
923 infoPtr->hUpdown = 0;
926 InvalidateRect(infoPtr->hwndSelf, NULL, TRUE);
932 DATETIME_Create (HWND hwnd, LPCREATESTRUCTW lpcs)
934 static const WCHAR SysMonthCal32W[] = { 'S', 'y', 's', 'M', 'o', 'n', 't', 'h', 'C', 'a', 'l', '3', '2', 0 };
935 DATETIME_INFO *infoPtr = (DATETIME_INFO *)Alloc (sizeof(DATETIME_INFO));
936 STYLESTRUCT ss = { 0, lpcs->style };
938 if (!infoPtr) return -1;
940 infoPtr->hwndSelf = hwnd;
941 infoPtr->dwStyle = lpcs->style;
943 infoPtr->nrFieldsAllocated = 32;
944 infoPtr->fieldspec = (int *) Alloc (infoPtr->nrFieldsAllocated * sizeof(int));
945 infoPtr->fieldRect = (RECT *) Alloc (infoPtr->nrFieldsAllocated * sizeof(RECT));
946 infoPtr->buflen = (int *) Alloc (infoPtr->nrFieldsAllocated * sizeof(int));
947 infoPtr->hwndNotify = lpcs->hwndParent;
948 infoPtr->select = -1; /* initially, nothing is selected */
950 DATETIME_StyleChanged(infoPtr, GWL_STYLE, &ss);
951 DATETIME_SetFormatW (infoPtr, 0);
953 /* create the monthcal control */
954 infoPtr->hMonthCal = CreateWindowExW (0, SysMonthCal32W, 0, WS_BORDER | WS_POPUP | WS_CLIPSIBLINGS,
955 0, 0, 0, 0, infoPtr->hwndSelf, 0, 0, 0);
957 /* initialize info structure */
958 GetSystemTime (&infoPtr->date);
959 infoPtr->dateValid = TRUE;
960 infoPtr->hFont = GetStockObject(DEFAULT_GUI_FONT);
962 SetWindowLongPtrW (hwnd, 0, (DWORD_PTR)infoPtr);
970 DATETIME_Destroy (DATETIME_INFO *infoPtr)
972 if (infoPtr->hwndCheckbut)
973 DestroyWindow(infoPtr->hwndCheckbut);
974 if (infoPtr->hUpdown)
975 DestroyWindow(infoPtr->hUpdown);
976 if (infoPtr->hMonthCal)
977 DestroyWindow(infoPtr->hMonthCal);
978 SetWindowLongPtrW( infoPtr->hwndSelf, 0, 0 ); /* clear infoPtr */
984 static LRESULT WINAPI
985 DATETIME_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
987 DATETIME_INFO *infoPtr = ((DATETIME_INFO *)GetWindowLongPtrW (hwnd, 0));
990 TRACE ("%x, %x, %lx\n", uMsg, wParam, lParam);
992 if (!infoPtr && (uMsg != WM_CREATE))
993 return DefWindowProcW( hwnd, uMsg, wParam, lParam );
997 case DTM_GETSYSTEMTIME:
998 return DATETIME_GetSystemTime (infoPtr, (SYSTEMTIME *) lParam);
1000 case DTM_SETSYSTEMTIME:
1001 return DATETIME_SetSystemTime (infoPtr, wParam, (SYSTEMTIME *) lParam);
1004 ret = SendMessageW (infoPtr->hMonthCal, MCM_GETRANGE, wParam, lParam);
1005 return ret ? ret : 1; /* bug emulation */
1008 return SendMessageW (infoPtr->hMonthCal, MCM_SETRANGE, wParam, lParam);
1010 case DTM_SETFORMATA:
1011 return DATETIME_SetFormatA (infoPtr, (LPCSTR)lParam);
1013 case DTM_SETFORMATW:
1014 return DATETIME_SetFormatW (infoPtr, (LPCWSTR)lParam);
1016 case DTM_GETMONTHCAL:
1017 return (LRESULT)infoPtr->hMonthCal;
1019 case DTM_SETMCCOLOR:
1020 return SendMessageW (infoPtr->hMonthCal, MCM_SETCOLOR, wParam, lParam);
1022 case DTM_GETMCCOLOR:
1023 return SendMessageW (infoPtr->hMonthCal, MCM_GETCOLOR, wParam, 0);
1026 return SendMessageW (infoPtr->hMonthCal, WM_SETFONT, wParam, lParam);
1029 return SendMessageW (infoPtr->hMonthCal, WM_GETFONT, wParam, lParam);
1032 return DATETIME_Notify (infoPtr, (int)wParam, (LPNMHDR)lParam);
1035 return DATETIME_Enable (infoPtr, (BOOL)wParam);
1038 return DATETIME_EraseBackground (infoPtr, (HDC)wParam);
1041 return DLGC_WANTARROWS | DLGC_WANTCHARS;
1044 return DATETIME_Paint (infoPtr, (HDC)wParam);
1047 return DATETIME_KeyDown (infoPtr, wParam, lParam);
1050 return DATETIME_KillFocus (infoPtr, (HWND)wParam);
1053 return DATETIME_SetFocus (infoPtr, (HWND)wParam);
1056 return DATETIME_Size (infoPtr, wParam, (SHORT)LOWORD(lParam), (SHORT)HIWORD(lParam));
1058 case WM_LBUTTONDOWN:
1059 return DATETIME_LButtonDown (infoPtr, (WORD)wParam, (SHORT)LOWORD(lParam), (SHORT)HIWORD(lParam));
1062 return DATETIME_LButtonUp (infoPtr, (WORD)wParam);
1065 return DATETIME_Create (hwnd, (LPCREATESTRUCTW)lParam);
1068 return DATETIME_Destroy (infoPtr);
1071 return DATETIME_Command (infoPtr, wParam, lParam);
1073 case WM_STYLECHANGED:
1074 return DATETIME_StyleChanged(infoPtr, wParam, (LPSTYLESTRUCT)lParam);
1077 if ((uMsg >= WM_USER) && (uMsg < WM_APP))
1078 ERR("unknown msg %04x wp=%08x lp=%08lx\n",
1079 uMsg, wParam, lParam);
1080 return DefWindowProcW (hwnd, uMsg, wParam, lParam);
1087 DATETIME_Register (void)
1091 ZeroMemory (&wndClass, sizeof(WNDCLASSW));
1092 wndClass.style = CS_GLOBALCLASS;
1093 wndClass.lpfnWndProc = DATETIME_WindowProc;
1094 wndClass.cbClsExtra = 0;
1095 wndClass.cbWndExtra = sizeof(DATETIME_INFO *);
1096 wndClass.hCursor = LoadCursorW (0, (LPCWSTR)IDC_ARROW);
1097 wndClass.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1);
1098 wndClass.lpszClassName = DATETIMEPICK_CLASSW;
1100 RegisterClassW (&wndClass);
1105 DATETIME_Unregister (void)
1107 UnregisterClassW (DATETIMEPICK_CLASSW, NULL);