git.oblomov.eu Git - wine/blob - dlls/comctl32/datetime.c

   1 /*
   2  * Date and time picker control
   3  *
   4  * Copyright 1998, 1999 Eric Kohl
   5  * Copyright 1999, 2000 Alex Priem <alexp@sci.kun.nl>
   6  * Copyright 2000 Chris Morgan <cmorgan@wpi.edu>
   7  *
   8  *
   9  * TODO:
  10  *   - All messages.
  11  *   - All notifications.
  12  *
  13  */
  14
  15 #include <math.h>
  16 #include <string.h>
  17 #include <stdio.h>
  18
  19 #include "winbase.h"
  20 #include "wingdi.h"
  21 #include "commctrl.h"
  22 #include "debugtools.h"
  23
  24 DEFAULT_DEBUG_CHANNEL(datetime);
  25
  26 typedef struct
  27 {
  28         HWND hMonthCal;
  29         HWND hUpdown;
  30         SYSTEMTIME date;
  31         BOOL dateValid;
  32         HWND hwndCheckbut;
  33         RECT rcClient; /* rect around the edge of the window */
  34         RECT rcDraw; /* rect inside of the border */
  35         RECT checkbox;  /* checkbox allowing the control to be enabled/disabled */
  36         RECT calbutton; /* button that toggles the dropdown of the monthcal control */
  37         BOOL bCalDepressed; /* TRUE = cal button is depressed */
  38         int  select;
  39         HFONT hFont;
  40         int nrFieldsAllocated;
  41         int nrFields;
  42         int haveFocus;
  43         int *fieldspec;
  44         RECT *fieldRect;
  45         int  *buflen;
  46         char textbuf[256];
  47         POINT monthcal_pos;
  48 } DATETIME_INFO, *LPDATETIME_INFO;
  49
  50 /* in monthcal.c */
  51 extern const int mdays[];
  52 extern const char * const monthtxt[];
  53
  54 /* this list of defines is closely related to `allowedformatchars' defined
  55  * in datetime.c; the high nibble indicates the `base type' of the format
  56  * specifier.
  57  * Do not change without first reading DATETIME_UseFormat.
  58  *
  59  */
  60
  61 #define DT_END_FORMAT      0
  62 #define ONEDIGITDAY     0x01
  63 #define TWODIGITDAY     0x02
  64 #define THREECHARDAY    0x03
  65 #define FULLDAY         0x04
  66 #define ONEDIGIT12HOUR  0x11
  67 #define TWODIGIT12HOUR  0x12
  68 #define ONEDIGIT24HOUR  0x21
  69 #define TWODIGIT24HOUR  0x22
  70 #define ONEDIGITMINUTE  0x31
  71 #define TWODIGITMINUTE  0x32
  72 #define ONEDIGITMONTH   0x41
  73 #define TWODIGITMONTH   0x42
  74 #define THREECHARMONTH  0x43
  75 #define FULLMONTH       0x44
  76 #define ONEDIGITSECOND  0x51
  77 #define TWODIGITSECOND  0x52
  78 #define ONELETTERAMPM   0x61
  79 #define TWOLETTERAMPM   0x62
  80 #define ONEDIGITYEAR    0x71
  81 #define TWODIGITYEAR    0x72
  82 #define FULLYEAR        0x73
  83 #define FORMATCALLBACK  0x81      /* -> maximum of 0x80 callbacks possible */
  84 #define FORMATCALLMASK  0x80
  85 #define DT_STRING       0x0100
  86
  87 #define DTHT_DATEFIELD  0xff      /* for hit-testing */
  88
  89 #define DTHT_NONE     0
  90 #define DTHT_CHECKBOX 0x200     /* these should end at '00' , to make */
  91 #define DTHT_MCPOPUP  0x300     /* & DTHT_DATEFIELD 0 when DATETIME_KeyDown */
  92 #define DTHT_GOTFOCUS 0x400     /* tests for date-fields */
  93
  94 #define DATETIME_GetInfoPtr(hwnd) ((DATETIME_INFO *)GetWindowLongA (hwnd, 0))
  95
  96 static BOOL DATETIME_SendSimpleNotify (HWND hwnd, UINT code);
  97 static BOOL DATETIME_SendDateTimeChangeNotify (HWND hwnd);
  98 extern void MONTHCAL_CopyTime(const SYSTEMTIME *from, SYSTEMTIME *to);
  99 static const char * const days[] = {"Sunday", "Monday", "Tuesday", "Wednesday",
 100 "Thursday", "Friday", "Saturday", NULL};
 101 static const char *allowedformatchars = {"dhHmMstyX'"};
 102 static const int maxrepetition [] = {4,2,2,2,4,2,2,3,-1,-1};
 103
 104
 105 static LRESULT
 106 DATETIME_GetSystemTime (HWND hwnd, WPARAM wParam, LPARAM lParam )
 107 {
 108   DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd);
 109   DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE);
 110   SYSTEMTIME *lprgSysTimeArray=(SYSTEMTIME *) lParam;
 111
 112   if (!lParam) return GDT_NONE;
 113
 114   if ((dwStyle & DTS_SHOWNONE) &&
 115        (SendMessageA (infoPtr->hwndCheckbut, BM_GETCHECK, 0, 0)))
 116         return GDT_NONE;
 117
 118   MONTHCAL_CopyTime (&infoPtr->date, lprgSysTimeArray);
 119
 120   return GDT_VALID;
 121 }
 122
 123
 124 static LRESULT
 125 DATETIME_SetSystemTime (HWND hwnd, WPARAM wParam, LPARAM lParam )
 126 {
 127   DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd);
 128   SYSTEMTIME *lprgSysTimeArray=(SYSTEMTIME *) lParam;
 129
 130   if (!lParam) return 0;
 131
 132   if (lParam==GDT_VALID)
 133         MONTHCAL_CopyTime (lprgSysTimeArray, &infoPtr->date);
 134   if (lParam==GDT_NONE) {
 135         infoPtr->dateValid=FALSE;
 136     SendMessageA (infoPtr->hwndCheckbut, BM_SETCHECK, 0, 0);
 137         }
 138   return 1;
 139 }
 140
 141
 142 static LRESULT
 143 DATETIME_GetMonthCalColor (HWND hwnd, WPARAM wParam)
 144 {
 145   DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd);
 146
 147   return SendMessageA (infoPtr->hMonthCal, MCM_GETCOLOR, wParam, 0);
 148 }
 149
 150
 151 static LRESULT
 152 DATETIME_SetMonthCalColor (HWND hwnd, WPARAM wParam, LPARAM lParam)
 153 {
 154   DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd);
 155
 156   return SendMessageA (infoPtr->hMonthCal, MCM_SETCOLOR, wParam, lParam);
 157 }
 158
 159
 160 /* FIXME: need to get way to force font into monthcal structure */
 161 static LRESULT
 162 DATETIME_GetMonthCal (HWND hwnd)
 163 {
 164   DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd);
 165
 166   return infoPtr->hMonthCal;
 167 }
 168
 169
 170
 171 /* FIXME: need to get way to force font into monthcal structure */
 172
 173 static LRESULT
 174 DATETIME_GetMonthCalFont (HWND hwnd)
 175 {
 176
 177   return 0;
 178 }
 179
 180
 181 static LRESULT
 182 DATETIME_SetMonthCalFont (HWND hwnd, WPARAM wParam, LPARAM lParam)
 183 {
 184
 185   return 0;
 186 }
 187
 188
 189 /*
 190    Split up a formattxt in actions.
 191    See ms documentation for the meaning of the letter codes/'specifiers'.
 192
 193    Notes:
 194    *'dddddd' is handled as 'dddd' plus 'dd'.
 195    *unrecognized formats are strings (here given the type DT_STRING;
 196    start of the string is encoded in lower bits of DT_STRING.
 197    Therefore, 'string' ends finally up as '<show seconds>tring'.
 198
 199  */
 200
 201
 202 static void
 203 DATETIME_UseFormat (DATETIME_INFO *infoPtr, const char *formattxt)
 204 {
 205  int i,j,k,len;
 206  int *nrFields=& infoPtr->nrFields;
 207
 208  TRACE ("%s\n",formattxt);
 209
 210
 211  *nrFields=0;
 212  infoPtr->fieldspec[*nrFields]=0;
 213  len=strlen(allowedformatchars);
 214  k=0;
 215
 216  for (i=0; i<strlen (formattxt); i++)  {
 217         TRACE ("\n%d %c:",i, formattxt[i]);
 218         for (j=0; j<len; j++) {
 219                 if (allowedformatchars[j]==formattxt[i]) {
 220                         TRACE ("%c[%d,%x]",allowedformatchars[j], *nrFields,
 221                                                          infoPtr->fieldspec[*nrFields]);
 222                         if ((*nrFields==0) && (infoPtr->fieldspec[*nrFields]==0)) {
 223                                 infoPtr->fieldspec[*nrFields]=(j<<4) +1;
 224                                 break;
 225                         }
 226                         if (infoPtr->fieldspec[*nrFields]>>4!=j) {
 227                                 (*nrFields)++;
 228                                 infoPtr->fieldspec[*nrFields]=(j<<4) +1;
 229                                 break;
 230                         }
 231                         if ((infoPtr->fieldspec[*nrFields] & 0x0f)==maxrepetition[j]) {
 232                                 (*nrFields)++;
 233                                 infoPtr->fieldspec[*nrFields]=(j<<4) +1;
 234                                 break;
 235                         }
 236                         infoPtr->fieldspec[*nrFields]++;
 237                         break;
 238                 }   /* if allowedformatchar */
 239          } /* for j */
 240
 241
 242                         /* char is not a specifier: handle char like a string */
 243         if (j==len) {
 244                 if ((*nrFields==0) && (infoPtr->fieldspec[*nrFields]==0)) {
 245                         infoPtr->fieldspec[*nrFields]=DT_STRING+k;
 246                         infoPtr->buflen[*nrFields]=0;
 247         } else
 248                 if ((infoPtr->fieldspec[*nrFields] & DT_STRING)!=DT_STRING)  {
 249                         (*nrFields)++;
 250                         infoPtr->fieldspec[*nrFields]=DT_STRING+k;
 251                         infoPtr->buflen[*nrFields]=0;
 252                 }
 253                 infoPtr->textbuf[k]=formattxt[i];
 254                 k++;
 255                 infoPtr->buflen[*nrFields]++;
 256         }   /* if j=len */
 257
 258         if (*nrFields==infoPtr->nrFieldsAllocated) {
 259                 FIXME ("out of memory; should reallocate. crash ahead.\n");
 260         }
 261
 262   } /* for i */
 263
 264   TRACE("\n");
 265
 266   if (infoPtr->fieldspec[*nrFields]!=0) (*nrFields)++;
 267 }
 268
 269
 270 static LRESULT
 271 DATETIME_SetFormat (HWND hwnd, WPARAM wParam, LPARAM lParam)
 272 {
 273  DATETIME_INFO *infoPtr= DATETIME_GetInfoPtr (hwnd);
 274
 275  if (!lParam) {
 276         DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE);
 277
 278         if (dwStyle & DTS_LONGDATEFORMAT)
 279                 DATETIME_UseFormat (infoPtr, "dddd, MMMM dd, yyy");
 280         else if (dwStyle & DTS_TIMEFORMAT)
 281                 DATETIME_UseFormat (infoPtr, "h:mm:ss tt");
 282         else /* DTS_SHORTDATEFORMAT */
 283                 DATETIME_UseFormat (infoPtr, "M/d/yy");
 284  }
 285  else
 286         DATETIME_UseFormat (infoPtr, (char *) lParam);
 287
 288  return infoPtr->nrFields;
 289 }
 290
 291
 292 static LRESULT
 293 DATETIME_SetFormatW (HWND hwnd, WPARAM wParam, LPARAM lParam)
 294
 295 {
 296  if (lParam) {
 297         LPSTR buf;
 298         int retval;
 299         int len = lstrlenW ((LPWSTR) lParam)+1;
 300
 301         buf = (LPSTR) COMCTL32_Alloc (len);
 302         lstrcpyWtoA (buf, (LPWSTR) lParam);
 303         retval=DATETIME_SetFormat (hwnd, 0, (LPARAM) buf);
 304         COMCTL32_Free (buf);
 305         return retval;
 306  }
 307  else
 308         return DATETIME_SetFormat (hwnd, 0, 0);
 309
 310 }
 311
 312
 313 static void
 314 DATETIME_ReturnTxt (DATETIME_INFO *infoPtr, int count, char *result)
 315 {
 316  SYSTEMTIME date = infoPtr->date;
 317  int spec;
 318
 319  *result=0;
 320  TRACE ("%d,%d\n", infoPtr->nrFields, count);
 321  if ((count>infoPtr->nrFields) || (count<0)) {
 322         WARN ("buffer overrun, have %d want %d\n", infoPtr->nrFields, count);
 323         return;
 324  }
 325
 326  if (!infoPtr->fieldspec) return;
 327
 328  spec=infoPtr->fieldspec[count];
 329  if (spec & DT_STRING) {
 330         int txtlen=infoPtr->buflen[count];
 331
 332         strncpy (result, infoPtr->textbuf + (spec &~ DT_STRING), txtlen);
 333         result[txtlen]=0;
 334         TRACE ("arg%d=%x->[%s]\n",count,infoPtr->fieldspec[count],result);
 335         return;
 336  }
 337
 338
 339  switch (spec) {
 340         case DT_END_FORMAT:
 341                 *result=0;
 342                 break;
 343         case ONEDIGITDAY:
 344                 sprintf (result,"%d",date.wDay);
 345                 break;
 346         case TWODIGITDAY:
 347                 sprintf (result,"%.2d",date.wDay);
 348                 break;
 349         case THREECHARDAY:
 350                 sprintf (result,"%.3s",days[date.wDayOfWeek]);
 351                 break;
 352         case FULLDAY:
 353                 strcpy  (result,days[date.wDayOfWeek]);
 354                 break;
 355         case ONEDIGIT12HOUR:
 356                 if (date.wHour>12)
 357                         sprintf (result,"%d",date.wHour-12);
 358                 else
 359                         sprintf (result,"%d",date.wHour);
 360                 break;
 361         case TWODIGIT12HOUR:
 362                 if (date.wHour>12)
 363                         sprintf (result,"%.2d",date.wHour-12);
 364                 else
 365                         sprintf (result,"%.2d",date.wHour);
 366                 break;
 367         case ONEDIGIT24HOUR:
 368                 sprintf (result,"%d",date.wHour);
 369                 break;
 370         case TWODIGIT24HOUR:
 371                 sprintf (result,"%.2d",date.wHour);
 372                 break;
 373         case ONEDIGITSECOND:
 374                 sprintf (result,"%d",date.wSecond);
 375                 break;
 376         case TWODIGITSECOND:
 377                 sprintf (result,"%.2d",date.wSecond);
 378                 break;
 379         case ONEDIGITMINUTE:
 380                 sprintf (result,"%d",date.wMinute);
 381                 break;
 382         case TWODIGITMINUTE:
 383                 sprintf (result,"%.2d",date.wMinute);
 384                 break;
 385         case ONEDIGITMONTH:
 386                 sprintf (result,"%d",date.wMonth);
 387                 break;
 388         case TWODIGITMONTH:
 389                 sprintf (result,"%.2d",date.wMonth);
 390                 break;
 391         case THREECHARMONTH:
 392                 sprintf (result,"%.3s",monthtxt[date.wMonth-1]);
 393                 break;
 394         case FULLMONTH:
 395                 strcpy (result,monthtxt[date.wMonth-1]);
 396                 break;
 397         case ONELETTERAMPM:
 398                 if (date.wHour<12)
 399                         strcpy (result,"A");
 400                 else
 401                         strcpy (result,"P");
 402                 break;
 403         case TWOLETTERAMPM:
 404                 if (date.wHour<12)
 405                         strcpy (result,"AM");
 406                 else
 407                         strcpy (result,"PM");
 408                 break;
 409         case FORMATCALLBACK:
 410                 FIXME ("Not implemented\n");
 411                 strcpy (result,"xxx");
 412                 break;
 413         case ONEDIGITYEAR:
 414                 sprintf (result,"%d",date.wYear-10* (int) floor(date.wYear/10));
 415                 break;
 416         case TWODIGITYEAR:
 417                 sprintf (result,"%.2d",date.wYear-100* (int) floor(date.wYear/100));
 418                 break;
 419         case FULLYEAR:
 420                 sprintf (result,"%d",date.wYear);
 421                 break;
 422     }
 423
 424         TRACE ("arg%d=%x->[%s]\n",count,infoPtr->fieldspec[count],result);
 425 }
 426
 427
 428 static void
 429 DATETIME_IncreaseField (DATETIME_INFO *infoPtr, int number)
 430 {
 431  SYSTEMTIME *date = &infoPtr->date;
 432  int spec;
 433
 434  TRACE ("%d\n",number);
 435  if ((number>infoPtr->nrFields) || (number<0)) return;
 436
 437  spec=infoPtr->fieldspec[number];
 438  if ((spec & DTHT_DATEFIELD)==0) return;
 439
 440  switch (spec) {
 441         case ONEDIGITDAY:
 442         case TWODIGITDAY:
 443         case THREECHARDAY:
 444         case FULLDAY:
 445                 date->wDay++;
 446                 if (date->wDay>mdays[date->wMonth-1]) date->wDay=1;
 447                 break;
 448         case ONEDIGIT12HOUR:
 449         case TWODIGIT12HOUR:
 450         case ONEDIGIT24HOUR:
 451         case TWODIGIT24HOUR:
 452                 date->wHour++;
 453                 if (date->wHour>23) date->wHour=0;
 454                 break;
 455         case ONEDIGITSECOND:
 456         case TWODIGITSECOND:
 457                 date->wSecond++;
 458                 if (date->wSecond>59) date->wSecond=0;
 459                 break;
 460         case ONEDIGITMINUTE:
 461         case TWODIGITMINUTE:
 462                 date->wMinute++;
 463                 if (date->wMinute>59) date->wMinute=0;
 464                 break;
 465         case ONEDIGITMONTH:
 466         case TWODIGITMONTH:
 467         case THREECHARMONTH:
 468         case FULLMONTH:
 469                 date->wMonth++;
 470                 if (date->wMonth>12) date->wMonth=1;
 471                 if (date->wDay>mdays[date->wMonth-1])
 472                         date->wDay=mdays[date->wMonth-1];
 473                 break;
 474         case ONELETTERAMPM:
 475         case TWOLETTERAMPM:
 476                 date->wHour+=12;
 477                 if (date->wHour>23) date->wHour-=24;
 478                 break;
 479         case FORMATCALLBACK:
 480                 FIXME ("Not implemented\n");
 481                 break;
 482         case ONEDIGITYEAR:
 483         case TWODIGITYEAR:
 484         case FULLYEAR:
 485                 date->wYear++;
 486                 break;
 487         }
 488
 489 }
 490
 491
 492 static void
 493 DATETIME_DecreaseField (DATETIME_INFO *infoPtr, int number)
 494 {
 495  SYSTEMTIME *date = & infoPtr->date;
 496  int spec;
 497
 498  TRACE ("%d\n",number);
 499  if ((number>infoPtr->nrFields) || (number<0)) return;
 500
 501  spec = infoPtr->fieldspec[number];
 502  if ((spec & DTHT_DATEFIELD)==0) return;
 503
 504  TRACE ("%x\n",spec);
 505
 506  switch (spec) {
 507         case ONEDIGITDAY:
 508         case TWODIGITDAY:
 509         case THREECHARDAY:
 510         case FULLDAY:
 511                 date->wDay--;
 512                 if (date->wDay<1) date->wDay=mdays[date->wMonth-1];
 513                 break;
 514         case ONEDIGIT12HOUR:
 515         case TWODIGIT12HOUR:
 516         case ONEDIGIT24HOUR:
 517         case TWODIGIT24HOUR:
 518                 if (date->wHour)
 519                         date->wHour--;
 520                 else
 521                         date->wHour=23;
 522                 break;
 523         case ONEDIGITSECOND:
 524         case TWODIGITSECOND:
 525                 if (date->wHour)
 526                         date->wSecond--;
 527                 else
 528                         date->wHour=59;
 529                 break;
 530         case ONEDIGITMINUTE:
 531         case TWODIGITMINUTE:
 532                 if (date->wMinute)
 533                         date->wMinute--;
 534                 else
 535                         date->wMinute=59;
 536                 break;
 537         case ONEDIGITMONTH:
 538         case TWODIGITMONTH:
 539         case THREECHARMONTH:
 540         case FULLMONTH:
 541                 if (date->wMonth>1)
 542                         date->wMonth--;
 543                 else
 544                         date->wMonth=12;
 545                 if (date->wDay>mdays[date->wMonth-1])
 546                         date->wDay=mdays[date->wMonth-1];
 547                 break;
 548         case ONELETTERAMPM:
 549         case TWOLETTERAMPM:
 550                 if (date->wHour<12)
 551                         date->wHour+=12;
 552                 else
 553                         date->wHour-=12;
 554                 break;
 555         case FORMATCALLBACK:
 556                 FIXME ("Not implemented\n");
 557                 break;
 558         case ONEDIGITYEAR:
 559         case TWODIGITYEAR:
 560         case FULLYEAR:
 561                 date->wYear--;
 562                 break;
 563         }
 564
 565 }
 566
 567
 568 static void
 569 DATETIME_ResetFieldDown (DATETIME_INFO *infoPtr, int number)
 570 {
 571  SYSTEMTIME *date = &infoPtr->date;
 572  int spec;
 573
 574  TRACE ("%d\n",number);
 575  if ((number>infoPtr->nrFields) || (number<0)) return;
 576
 577  spec = infoPtr->fieldspec[number];
 578  if ((spec & DTHT_DATEFIELD)==0) return;
 579
 580
 581  switch (spec) {
 582         case ONEDIGITDAY:
 583         case TWODIGITDAY:
 584         case THREECHARDAY:
 585         case FULLDAY:
 586                 date->wDay = 1;
 587                 break;
 588         case ONEDIGIT12HOUR:
 589         case TWODIGIT12HOUR:
 590         case ONEDIGIT24HOUR:
 591         case TWODIGIT24HOUR:
 592         case ONELETTERAMPM:
 593         case TWOLETTERAMPM:
 594                 date->wHour = 0;
 595                 break;
 596         case ONEDIGITSECOND:
 597         case TWODIGITSECOND:
 598                 date->wSecond = 0;
 599                 break;
 600         case ONEDIGITMINUTE:
 601         case TWODIGITMINUTE:
 602                 date->wMinute = 0;
 603                 break;
 604         case ONEDIGITMONTH:
 605         case TWODIGITMONTH:
 606         case THREECHARMONTH:
 607         case FULLMONTH:
 608                 date->wMonth = 1;
 609         case FORMATCALLBACK:
 610                 FIXME ("Not implemented\n");
 611                 break;
 612         case ONEDIGITYEAR:
 613         case TWODIGITYEAR:
 614         /* FYI: On 9/14/1752 the calender changed and England and the American */
 615         /* colonies changed to the Gregorian calender.  This change involved */
 616         /* having September 14th following September 2nd.  So no date algorithms */
 617         /* work before that date. */
 618         case FULLYEAR:
 619                 date->wSecond = 0;
 620                 date->wMinute = 0;
 621                 date->wHour = 0;
 622                 date->wDay = 14;                /* overactive ms-programmers..*/
 623                 date->wMonth = 9;
 624                 date->wYear = 1752;
 625                 break;
 626         }
 627
 628 }
 629
 630
 631 static void
 632 DATETIME_ResetFieldUp (DATETIME_INFO *infoPtr, int number)
 633 {
 634  SYSTEMTIME *date = & infoPtr->date;
 635  int spec;
 636
 637  if ((number>infoPtr->nrFields) || (number<0)) return;
 638
 639  spec=infoPtr->fieldspec[number];
 640  if ((spec & DTHT_DATEFIELD)==0) return;
 641
 642  switch (spec) {
 643         case ONEDIGITDAY:
 644         case TWODIGITDAY:
 645         case THREECHARDAY:
 646         case FULLDAY:
 647                 date->wDay=mdays[date->wMonth-1];
 648                 break;
 649         case ONEDIGIT12HOUR:
 650         case TWODIGIT12HOUR:
 651         case ONEDIGIT24HOUR:
 652         case TWODIGIT24HOUR:
 653         case ONELETTERAMPM:
 654         case TWOLETTERAMPM:
 655                 date->wHour=23;
 656                 break;
 657         case ONEDIGITSECOND:
 658         case TWODIGITSECOND:
 659                 date->wSecond=59;
 660                 break;
 661         case ONEDIGITMINUTE:
 662         case TWODIGITMINUTE:
 663                 date->wMinute=59;
 664                 break;
 665         case ONEDIGITMONTH:
 666         case TWODIGITMONTH:
 667         case THREECHARMONTH:
 668         case FULLMONTH:
 669                 date->wMonth=12;
 670         case FORMATCALLBACK:
 671                 FIXME ("Not implemented\n");
 672                 break;
 673         case ONEDIGITYEAR:
 674         case TWODIGITYEAR:
 675         case FULLYEAR:
 676                 date->wYear=9999;    /* Y10K problem? naaah. */
 677                 break;
 678         }
 679
 680 }
 681
 682
 683 static void DATETIME_Refresh (HWND hwnd, HDC hdc)
 684
 685 {
 686   DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd);
 687   int i,prevright;
 688   RECT *field;
 689   DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE);
 690   RECT *rcDraw = &infoPtr->rcDraw;
 691   RECT *rcClient = &infoPtr->rcClient;
 692   RECT *calbutton = &infoPtr->calbutton;
 693   RECT *checkbox = &infoPtr->checkbox;
 694   HBRUSH hbr;
 695   SIZE size;
 696   COLORREF oldBk, oldTextColor;
 697
 698   /* draw control edge */
 699   hbr = CreateSolidBrush(RGB(255, 255, 255));
 700   FillRect(hdc, rcClient, hbr);
 701   DrawEdge(hdc, rcClient, EDGE_SUNKEN, BF_RECT);
 702   DeleteObject(hbr);
 703
 704   if (infoPtr->dateValid) {
 705     char txt[80];
 706     HFONT oldFont;
 707     oldFont = SelectObject (hdc, infoPtr->hFont);
 708
 709     DATETIME_ReturnTxt (infoPtr, 0, txt);
 710     GetTextExtentPoint32A (hdc, txt, strlen (txt), &size);
 711     rcDraw->bottom = size.cy+2;
 712
 713     if (dwStyle & DTS_SHOWNONE) checkbox->right = 18;
 714
 715     prevright = checkbox->right;
 716
 717     for (i=0; i<infoPtr->nrFields; i++) {
 718       DATETIME_ReturnTxt (infoPtr, i, txt);
 719       GetTextExtentPoint32A (hdc, txt, strlen (txt), &size);
 720       field = & infoPtr->fieldRect[i];
 721       field->left  = prevright;
 722       field->right = prevright+size.cx;
 723       field->top   = rcDraw->top;
 724       field->bottom = rcDraw->bottom;
 725       prevright = field->right;
 726
 727       if ((infoPtr->haveFocus) && (i==infoPtr->select)) {
 728         hbr = CreateSolidBrush (GetSysColor (COLOR_ACTIVECAPTION));
 729         FillRect(hdc, field, hbr);
 730         oldBk = SetBkColor (hdc, GetSysColor(COLOR_ACTIVECAPTION));
 731         oldTextColor = SetTextColor (hdc, GetSysColor(COLOR_WINDOW));
 732         DeleteObject (hbr);
 733         DrawTextA ( hdc, txt, strlen(txt), field,
 734               DT_RIGHT | DT_VCENTER | DT_SINGLELINE );
 735         SetBkColor (hdc, oldBk);
 736                 SetTextColor (hdc, oldTextColor);
 737       }
 738       else
 739         DrawTextA ( hdc, txt, strlen(txt), field,
 740                          DT_RIGHT | DT_VCENTER | DT_SINGLELINE );
 741     }
 742
 743     SelectObject (hdc, oldFont);
 744   }
 745
 746   if (!(dwStyle & DTS_UPDOWN)) {
 747     DrawFrameControl(hdc, calbutton, DFC_SCROLL,
 748         DFCS_SCROLLDOWN | (infoPtr->bCalDepressed ? DFCS_PUSHED : 0) |
 749         (dwStyle & WS_DISABLED ? DFCS_INACTIVE : 0) );
 750   }
 751 }
 752
 753
 754 static LRESULT
 755 DATETIME_HitTest (HWND hwnd, DATETIME_INFO *infoPtr, POINT pt)
 756 {
 757   int i, retval;
 758
 759   TRACE ("%ld, %ld\n",pt.x,pt.y);
 760
 761   retval = DTHT_NONE;
 762   if (PtInRect (&infoPtr->calbutton, pt))
 763     {retval = DTHT_MCPOPUP; TRACE("Hit in calbutton(DTHT_MCPOPUP)\n"); goto done; }
 764   if (PtInRect (&infoPtr->checkbox, pt))
 765     {retval = DTHT_CHECKBOX; TRACE("Hit in checkbox(DTHT_CHECKBOX)\n"); goto done; }
 766
 767   for (i=0; i<infoPtr->nrFields; i++) {
 768     if (PtInRect (&infoPtr->fieldRect[i], pt)) {
 769       retval = i;
 770       TRACE("Hit in date text in field %d\n", i);
 771       break;
 772     }
 773  }
 774
 775 done:
 776   return retval;
 777 }
 778
 779
 780 static LRESULT
 781 DATETIME_LButtonDown (HWND hwnd, WPARAM wParam, LPARAM lParam)
 782 {
 783   DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd);
 784   DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE);
 785   int old, new;
 786   POINT pt;
 787
 788   TRACE ("\n");
 789
 790   old = infoPtr->select;
 791   pt.x = (INT)LOWORD(lParam);
 792   pt.y = (INT)HIWORD(lParam);
 793
 794   new = DATETIME_HitTest (hwnd, infoPtr, pt);
 795
 796   /* FIXME: might be conditions where we don't want to update infoPtr->select */
 797   infoPtr->select = new;
 798
 799   if (infoPtr->select != old) {
 800     infoPtr->haveFocus = DTHT_GOTFOCUS;
 801    }
 802
 803   if (infoPtr->select == DTHT_MCPOPUP) {
 804     /* FIXME: button actually is only depressed during dropdown of the */
 805     /* calender control and when the mouse is over the button window */
 806     infoPtr->bCalDepressed = TRUE;
 807
 808     /* recalculate the position of the monthcal popup */
 809     if(dwStyle & DTS_RIGHTALIGN)
 810       infoPtr->monthcal_pos.x = infoPtr->rcClient.right - ((infoPtr->calbutton.right -
 811                                 infoPtr->calbutton.left) + 145);
 812     else
 813       infoPtr->monthcal_pos.x = 8;
 814
 815     infoPtr->monthcal_pos.y = infoPtr->rcClient.bottom;
 816     ClientToScreen (hwnd, &(infoPtr->monthcal_pos));
 817     SetWindowPos(infoPtr->hMonthCal, 0, infoPtr->monthcal_pos.x,
 818         infoPtr->monthcal_pos.y, 145, 150, 0);
 819
 820     if(IsWindowVisible(infoPtr->hMonthCal))
 821         ShowWindow(infoPtr->hMonthCal, SW_HIDE);
 822     else
 823         ShowWindow(infoPtr->hMonthCal, SW_SHOW);
 824
 825     TRACE ("dt:%x mc:%x mc parent:%x, desktop:%x, mcpp:%x\n",
 826               hwnd,infoPtr->hMonthCal,
 827               GetParent (infoPtr->hMonthCal),
 828               GetDesktopWindow (),
 829               GetParent (GetParent (infoPtr->hMonthCal)));
 830     DATETIME_SendSimpleNotify (hwnd, DTN_DROPDOWN);
 831   }
 832
 833   InvalidateRect(hwnd, NULL, FALSE);
 834
 835   return 0;
 836 }
 837
 838
 839 static LRESULT
 840 DATETIME_LButtonUp (HWND hwnd, WPARAM wParam, LPARAM lParam)
 841 {
 842   DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd);
 843
 844   TRACE("\n");
 845
 846   if(infoPtr->bCalDepressed == TRUE) {
 847     infoPtr->bCalDepressed = FALSE;
 848     RedrawWindow(hwnd, &(infoPtr->calbutton), 0, RDW_ERASE|RDW_INVALIDATE);
 849   }
 850
 851   return 0;
 852 }
 853
 854
 855 static LRESULT
 856 DATETIME_Paint (HWND hwnd, WPARAM wParam)
 857 {
 858     HDC hdc;
 859     PAINTSTRUCT ps;
 860
 861     hdc = wParam==0 ? BeginPaint (hwnd, &ps) : (HDC)wParam;
 862     DATETIME_Refresh (hwnd, hdc);
 863     if(!wParam)
 864     EndPaint (hwnd, &ps);
 865     return 0;
 866 }
 867
 868
 869 static LRESULT
 870 DATETIME_ParentNotify (HWND hwnd, WPARAM wParam, LPARAM lParam)
 871 {
 872  DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd);
 873  LPNMHDR lpnmh = (LPNMHDR) lParam;
 874
 875  TRACE ("%x,%lx\n",wParam, lParam);
 876  TRACE ("Got notification %x from %x\n", lpnmh->code, lpnmh->hwndFrom);
 877  TRACE ("info: %x %x %x\n",hwnd,infoPtr->hMonthCal,infoPtr->hUpdown);
 878  return 0;
 879 }
 880
 881
 882 static LRESULT
 883 DATETIME_Notify (HWND hwnd, WPARAM wParam, LPARAM lParam)
 884
 885 {
 886  DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd);
 887  LPNMHDR lpnmh = (LPNMHDR) lParam;
 888
 889  TRACE ("%x,%lx\n",wParam, lParam);
 890  TRACE ("Got notification %x from %x\n", lpnmh->code, lpnmh->hwndFrom);
 891  TRACE ("info: %x %x %x\n",hwnd,infoPtr->hMonthCal,infoPtr->hUpdown);
 892  return 0;
 893 }
 894
 895
 896 static LRESULT
 897 DATETIME_KeyDown (HWND hwnd, WPARAM wParam, LPARAM lParam)
 898 {
 899  DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd);
 900  int FieldNum,wrap=0;
 901
 902  TRACE("%x %lx %x\n",wParam, lParam, infoPtr->select);
 903
 904  FieldNum = infoPtr->select & DTHT_DATEFIELD;
 905
 906  if (!(infoPtr->haveFocus)) return 0;
 907  if ((FieldNum==0) && (infoPtr->select)) return 0;
 908
 909  if (infoPtr->select & FORMATCALLMASK) {
 910         FIXME ("Callbacks not implemented yet\n");
 911  }
 912
 913  switch (wParam) {
 914         case VK_ADD:
 915         case VK_UP:
 916                 DATETIME_IncreaseField (infoPtr,FieldNum);
 917                 DATETIME_SendDateTimeChangeNotify (hwnd);
 918                 break;
 919         case VK_SUBTRACT:
 920         case VK_DOWN:
 921                 DATETIME_DecreaseField (infoPtr,FieldNum);
 922                 DATETIME_SendDateTimeChangeNotify (hwnd);
 923                 break;
 924         case VK_HOME:
 925                 DATETIME_ResetFieldDown (infoPtr,FieldNum);
 926                 DATETIME_SendDateTimeChangeNotify (hwnd);
 927                 break;
 928         case VK_END:
 929                 DATETIME_ResetFieldUp(infoPtr,FieldNum);
 930                 DATETIME_SendDateTimeChangeNotify (hwnd);
 931                 break;
 932         case VK_LEFT:
 933                 do {
 934                         if (infoPtr->select==0) {
 935                                 infoPtr->select = infoPtr->nrFields - 1;
 936                                 wrap++;
 937                         } else
 938                         infoPtr->select--;
 939                 }
 940                 while ((infoPtr->fieldspec[infoPtr->select] & DT_STRING) && (wrap<2));
 941                 break;
 942         case VK_RIGHT:
 943                 do {
 944                         infoPtr->select++;
 945                         if (infoPtr->select==infoPtr->nrFields) {
 946                                 infoPtr->select = 0;
 947                                 wrap++;
 948                         }
 949                         }
 950                 while ((infoPtr->fieldspec[infoPtr->select] & DT_STRING) && (wrap<2));
 951                 break;
 952         }
 953
 954   InvalidateRect(hwnd, NULL, FALSE);
 955
 956   return 0;
 957 }
 958
 959
 960 static LRESULT
 961 DATETIME_KillFocus (HWND hwnd, WPARAM wParam, LPARAM lParam)
 962 {
 963     DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd);
 964
 965     TRACE ("\n");
 966
 967     if (infoPtr->haveFocus) {
 968         DATETIME_SendSimpleNotify (hwnd, NM_KILLFOCUS);
 969         infoPtr->haveFocus = 0;
 970     }
 971
 972     InvalidateRect (hwnd, NULL, TRUE);
 973
 974     return 0;
 975 }
 976
 977
 978 static LRESULT
 979 DATETIME_SetFocus (HWND hwnd, WPARAM wParam, LPARAM lParam)
 980 {
 981     DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd);
 982
 983     TRACE ("\n");
 984
 985     if (infoPtr->haveFocus==0) {
 986         DATETIME_SendSimpleNotify (hwnd, NM_SETFOCUS);
 987         infoPtr->haveFocus = DTHT_GOTFOCUS;
 988     }
 989
 990     InvalidateRect(hwnd, NULL, FALSE);
 991
 992     return 0;
 993 }
 994
 995
 996 static BOOL
 997 DATETIME_SendDateTimeChangeNotify (HWND hwnd)
 998
 999 {
1000  DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd);
1001  NMDATETIMECHANGE dtdtc;
1002
1003  TRACE ("\n");
1004  dtdtc.nmhdr.hwndFrom = hwnd;
1005  dtdtc.nmhdr.idFrom   = GetWindowLongA( hwnd, GWL_ID);
1006  dtdtc.nmhdr.code     = DTN_DATETIMECHANGE;
1007
1008  if ((GetWindowLongA (hwnd, GWL_STYLE) & DTS_SHOWNONE))
1009    dtdtc.dwFlags = GDT_NONE;
1010  else
1011    dtdtc.dwFlags = GDT_VALID;
1012
1013  MONTHCAL_CopyTime (&infoPtr->date, &dtdtc.st);
1014  return (BOOL) SendMessageA (GetParent (hwnd), WM_NOTIFY,
1015                               (WPARAM)dtdtc.nmhdr.idFrom, (LPARAM)&dtdtc);
1016 }
1017
1018
1019 static BOOL
1020 DATETIME_SendSimpleNotify (HWND hwnd, UINT code)
1021 {
1022     NMHDR nmhdr;
1023
1024     TRACE("%x\n",code);
1025     nmhdr.hwndFrom = hwnd;
1026     nmhdr.idFrom   = GetWindowLongA( hwnd, GWL_ID);
1027     nmhdr.code     = code;
1028
1029     return (BOOL) SendMessageA (GetParent (hwnd), WM_NOTIFY,
1030                                 (WPARAM)nmhdr.idFrom, (LPARAM)&nmhdr);
1031 }
1032
1033 static LRESULT
1034 DATETIME_Size (HWND hwnd, WPARAM wParam, LPARAM lParam)
1035 {
1036   DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr(hwnd);
1037   DWORD dwStyle = GetWindowLongA(hwnd, GWL_STYLE);
1038
1039   /* set size */
1040   infoPtr->rcClient.bottom = HIWORD(lParam);
1041   infoPtr->rcClient.right = LOWORD(lParam);
1042
1043   TRACE("Height=%d, Width=%d\n", infoPtr->rcClient.bottom, infoPtr->rcClient.right);
1044
1045   /* use DrawEdge to adjust the size of rcEdge to get rcDraw */
1046   memcpy((&infoPtr->rcDraw), (&infoPtr->rcClient), sizeof(infoPtr->rcDraw));
1047
1048   DrawEdge((HDC)NULL, &(infoPtr->rcDraw), EDGE_SUNKEN, BF_RECT | BF_ADJUST);
1049
1050   /* set the size of the button that drops the calender down */
1051   /* FIXME: account for style that allows button on left side */
1052   infoPtr->calbutton.top   = infoPtr->rcDraw.top;
1053   infoPtr->calbutton.bottom= infoPtr->rcDraw.bottom;
1054   infoPtr->calbutton.left  = infoPtr->rcDraw.right-15;
1055   infoPtr->calbutton.right = infoPtr->rcDraw.right;
1056
1057   /* set enable/disable button size for show none style being enabled */
1058   /* FIXME: these dimensions are completely incorrect */
1059   infoPtr->checkbox.top = infoPtr->rcDraw.top;
1060   infoPtr->checkbox.bottom = infoPtr->rcDraw.bottom;
1061   infoPtr->checkbox.left = infoPtr->rcDraw.left;
1062   infoPtr->checkbox.right = infoPtr->rcDraw.left + 10;
1063
1064   /* update the position of the monthcal control */
1065   if(dwStyle & DTS_RIGHTALIGN)
1066     infoPtr->monthcal_pos.x = infoPtr->rcClient.right - ((infoPtr->calbutton.right -
1067                                 infoPtr->calbutton.left) + 145);
1068   else
1069     infoPtr->monthcal_pos.x = 8;
1070
1071   infoPtr->monthcal_pos.y = infoPtr->rcClient.bottom;
1072   ClientToScreen (hwnd, &(infoPtr->monthcal_pos));
1073   SetWindowPos(infoPtr->hMonthCal, 0, infoPtr->monthcal_pos.x,
1074     infoPtr->monthcal_pos.y,
1075     145, 150, 0);
1076
1077   InvalidateRect(hwnd, NULL, FALSE);
1078
1079   return 0;
1080 }
1081
1082
1083 static LRESULT
1084 DATETIME_Create (HWND hwnd, WPARAM wParam, LPARAM lParam)
1085 {
1086   DATETIME_INFO *infoPtr;
1087   DWORD dwStyle = GetWindowLongA (hwnd, GWL_STYLE);
1088
1089   /* allocate memory for info structure */
1090   infoPtr = (DATETIME_INFO *)COMCTL32_Alloc (sizeof(DATETIME_INFO));
1091   if (infoPtr == NULL) {
1092     ERR("could not allocate info memory!\n");
1093     return 0;
1094   }
1095
1096   SetWindowLongA (hwnd, 0, (DWORD)infoPtr);
1097
1098   if (dwStyle & DTS_SHOWNONE) {
1099     infoPtr->hwndCheckbut=CreateWindowExA (0,"button", 0,
1100          WS_CHILD | WS_VISIBLE | BS_AUTOCHECKBOX,
1101          2,2,13,13,
1102          hwnd,
1103          0, GetWindowLongA  (hwnd, GWL_HINSTANCE), 0);
1104          SendMessageA (infoPtr->hwndCheckbut, BM_SETCHECK, 1, 0);
1105   }
1106
1107   if (dwStyle & DTS_UPDOWN) {
1108     infoPtr->hUpdown=CreateUpDownControl (
1109         WS_CHILD | WS_BORDER | WS_VISIBLE,
1110         120,1,20,20,
1111         hwnd,1,0,0,
1112         UD_MAXVAL, UD_MINVAL, 0);
1113   }
1114
1115   infoPtr->fieldspec = (int *) COMCTL32_Alloc (32*sizeof(int));
1116   infoPtr->fieldRect = (RECT *) COMCTL32_Alloc (32*sizeof(RECT));
1117   infoPtr->buflen = (int *) COMCTL32_Alloc (32*sizeof(int));
1118   infoPtr->nrFieldsAllocated = 32;
1119
1120   DATETIME_SetFormat (hwnd, 0, 0);
1121
1122   /* create the monthcal control */
1123     infoPtr->hMonthCal = CreateWindowExA (0,"SysMonthCal32", 0,
1124         WS_BORDER | WS_POPUP | WS_CLIPSIBLINGS,
1125         0, 0, 0, 0,
1126         GetParent(hwnd),
1127         0, 0, 0);
1128
1129   /* initialize info structure */
1130   GetSystemTime (&infoPtr->date);
1131   infoPtr->dateValid = TRUE;
1132   infoPtr->hFont = GetStockObject(DEFAULT_GUI_FONT);
1133   return 0;
1134 }
1135
1136
1137 static LRESULT
1138 DATETIME_Destroy (HWND hwnd, WPARAM wParam, LPARAM lParam)
1139 {
1140     DATETIME_INFO *infoPtr = DATETIME_GetInfoPtr (hwnd);
1141
1142     COMCTL32_Free (infoPtr);
1143     return 0;
1144 }
1145
1146
1147 static LRESULT WINAPI
1148 DATETIME_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
1149 {
1150     switch (uMsg)
1151     {
1152
1153     case DTM_GETSYSTEMTIME:
1154                 DATETIME_GetSystemTime (hwnd, wParam, lParam);
1155
1156     case DTM_SETSYSTEMTIME:
1157                 DATETIME_SetSystemTime (hwnd, wParam, lParam);
1158
1159     case DTM_GETRANGE:
1160         FIXME("Unimplemented msg DTM_GETRANGE\n");
1161         return 0;
1162
1163     case DTM_SETRANGE:
1164         FIXME("Unimplemented msg DTM_SETRANGE\n");
1165         return 1;
1166
1167     case DTM_SETFORMATA:
1168         return DATETIME_SetFormat (hwnd, wParam, lParam);
1169
1170     case DTM_SETFORMATW:
1171         return DATETIME_SetFormatW (hwnd, wParam, lParam);
1172
1173     case DTM_SETMCCOLOR:
1174         return DATETIME_SetMonthCalColor (hwnd, wParam, lParam);
1175
1176     case DTM_GETMCCOLOR:
1177         return DATETIME_GetMonthCalColor (hwnd, wParam);
1178
1179     case DTM_GETMONTHCAL:
1180         return DATETIME_GetMonthCal (hwnd);
1181
1182     case DTM_SETMCFONT:
1183         return DATETIME_SetMonthCalFont (hwnd, wParam, lParam);
1184
1185     case DTM_GETMCFONT:
1186         return DATETIME_GetMonthCalFont (hwnd);
1187
1188     case WM_PARENTNOTIFY:
1189         return DATETIME_ParentNotify (hwnd, wParam, lParam);
1190
1191     case WM_NOTIFY:
1192         return DATETIME_Notify (hwnd, wParam, lParam);
1193
1194     case WM_GETDLGCODE:
1195         return DLGC_WANTARROWS | DLGC_WANTCHARS;
1196
1197     case WM_PAINT:
1198         return DATETIME_Paint (hwnd, wParam);
1199
1200     case WM_KEYDOWN:
1201         return DATETIME_KeyDown (hwnd, wParam, lParam);
1202
1203     case WM_KILLFOCUS:
1204         return DATETIME_KillFocus (hwnd, wParam, lParam);
1205
1206     case WM_SETFOCUS:
1207         return DATETIME_SetFocus (hwnd, wParam, lParam);
1208
1209     case WM_SIZE:
1210         return DATETIME_Size (hwnd, wParam, lParam);
1211
1212     case WM_LBUTTONDOWN:
1213         return DATETIME_LButtonDown (hwnd, wParam, lParam);
1214
1215     case WM_LBUTTONUP:
1216         return DATETIME_LButtonUp (hwnd, wParam, lParam);
1217
1218     case WM_CREATE:
1219         return DATETIME_Create (hwnd, wParam, lParam);
1220
1221     case WM_DESTROY:
1222         return DATETIME_Destroy (hwnd, wParam, lParam);
1223
1224     default:
1225         if (uMsg >= WM_USER)
1226                 ERR("unknown msg %04x wp=%08x lp=%08lx\n",
1227                      uMsg, wParam, lParam);
1228         return DefWindowProcA (hwnd, uMsg, wParam, lParam);
1229     }
1230     return 0;
1231 }
1232
1233
1234 VOID
1235 DATETIME_Register (void)
1236 {
1237     WNDCLASSA wndClass;
1238
1239     ZeroMemory (&wndClass, sizeof(WNDCLASSA));
1240     wndClass.style         = CS_GLOBALCLASS;
1241     wndClass.lpfnWndProc   = (WNDPROC)DATETIME_WindowProc;
1242     wndClass.cbClsExtra    = 0;
1243     wndClass.cbWndExtra    = sizeof(DATETIME_INFO *);
1244     wndClass.hCursor       = LoadCursorA (0, IDC_ARROWA);
1245     wndClass.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1);
1246     wndClass.lpszClassName = DATETIMEPICK_CLASSA;
1247
1248     RegisterClassA (&wndClass);
1249 }
1250
1251
1252 VOID
1253 DATETIME_Unregister (void)
1254 {
1255     UnregisterClassA (DATETIMEPICK_CLASSA, (HINSTANCE)NULL);
1256 }