src/msw/datectrl.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/msw/datectrl.cpp
   3 // Purpose:     wxDatePickerCtrl implementation
   4 // Author:      Vadim Zeitlin
   5 // Modified by:
   6 // Created:     2005-01-09
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) 2005 Vadim Zeitlin <vadim@wxwindows.org>
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // ============================================================================
  13 // declarations
  14 // ============================================================================
  15
  16 // ----------------------------------------------------------------------------
  17 // headers
  18 // ----------------------------------------------------------------------------
  19
  20 #include "wx/wxprec.h"
  21
  22 #ifdef __BORLANDC__
  23     #pragma hdrstop
  24 #endif
  25
  26 #if wxUSE_DATEPICKCTRL
  27
  28 #ifndef WX_PRECOMP
  29     #include "wx/app.h"
  30     #include "wx/intl.h"
  31     #include "wx/dcclient.h"
  32     #include "wx/msw/wrapwin.h"
  33     #include "wx/msw/wrapcctl.h"
  34     #include "wx/msw/private.h"
  35 #endif
  36
  37 #include "wx/datectrl.h"
  38 #include "wx/dynlib.h"
  39
  40 #define _WX_DEFINE_DATE_EVENTS_
  41 #include "wx/dateevt.h"
  42
  43 // apparently some versions of mingw define these macros erroneously
  44 #ifndef DateTime_GetSystemtime
  45     #define DateTime_GetSystemtime DateTime_GetSystemTime
  46 #endif
  47
  48 #ifndef DateTime_SetSystemtime
  49     #define DateTime_SetSystemtime DateTime_SetSystemTime
  50 #endif
  51
  52 IMPLEMENT_DYNAMIC_CLASS(wxDatePickerCtrl, wxControl)
  53
  54 // ============================================================================
  55 // implementation
  56 // ============================================================================
  57
  58 // ----------------------------------------------------------------------------
  59 // helpers for wxDateTime <-> SYSTEMTIME conversion
  60 // ----------------------------------------------------------------------------
  61
  62 static inline void wxFromSystemTime(wxDateTime *dt, const SYSTEMTIME& st)
  63 {
  64     dt->Set(st.wDay,
  65             wx_static_cast(wxDateTime::Month, wxDateTime::Jan + st.wMonth - 1),
  66             st.wYear,
  67             0, 0, 0);
  68 }
  69
  70 static inline void wxToSystemTime(SYSTEMTIME *st, const wxDateTime& dt)
  71 {
  72     const wxDateTime::Tm tm(dt.GetTm());
  73
  74     st->wYear = (WXWORD)tm.year;
  75     st->wMonth = (WXWORD)(tm.mon - wxDateTime::Jan + 1);
  76     st->wDay = tm.mday;
  77
  78     st->wDayOfWeek =
  79     st->wHour =
  80     st->wMinute =
  81     st->wSecond =
  82     st->wMilliseconds = 0;
  83 }
  84
  85 // ----------------------------------------------------------------------------
  86 // wxDatePickerCtrl creation
  87 // ----------------------------------------------------------------------------
  88
  89 bool
  90 wxDatePickerCtrl::Create(wxWindow *parent,
  91                          wxWindowID id,
  92                          const wxDateTime& dt,
  93                          const wxPoint& pos,
  94                          const wxSize& size,
  95                          long style,
  96                          const wxValidator& validator,
  97                          const wxString& name)
  98 {
  99     // although we already call InitCommonControls() in app.cpp which is
 100     // supposed to initialize all common controls, in comctl32.dll 4.72 (and
 101     // presumably earlier versions 4.70 and 4.71, date time picker not being
 102     // supported in < 4.70 anyhow) it does not do it and we have to initialize
 103     // it explicitly
 104     static bool s_initDone = false; // MT-ok: used from GUI thread only
 105     if ( !s_initDone )
 106     {
 107         if ( wxApp::GetComCtl32Version() < 470 )
 108         {
 109             wxLogError(_("This system doesn't support date picker control, please upgrade your version of comctl32.dll"));
 110
 111             return false;
 112         }
 113
 114 #if wxUSE_DYNLIB_CLASS
 115         INITCOMMONCONTROLSEX icex;
 116         icex.dwSize = sizeof(icex);
 117         icex.dwICC = ICC_DATE_CLASSES;
 118
 119         wxDynamicLibrary dllComCtl32(_T("comctl32.dll"), wxDL_VERBATIM);
 120
 121         typedef BOOL (WINAPI *ICCEx_t)(INITCOMMONCONTROLSEX *);
 122         wxDYNLIB_FUNCTION( ICCEx_t, InitCommonControlsEx, dllComCtl32 );
 123
 124         if ( pfnInitCommonControlsEx )
 125         {
 126             (*pfnInitCommonControlsEx)(&icex);
 127         }
 128
 129         s_initDone = true;
 130 #endif
 131     }
 132
 133
 134     // use wxDP_SPIN if wxDP_DEFAULT (0) was given as style
 135     if ( !(style & wxDP_DROPDOWN) )
 136         style |= wxDP_SPIN;
 137
 138     // initialize the base class
 139     if ( !CreateControl(parent, id, pos, size, style, validator, name) )
 140         return false;
 141
 142     // create the native control
 143     if ( !MSWCreateControl(DATETIMEPICK_CLASS, wxEmptyString, pos, size) )
 144         return false;
 145
 146     if ( dt.IsValid() || (style & wxDP_ALLOWNONE) )
 147         SetValue(dt);
 148
 149     return true;
 150 }
 151
 152 WXDWORD wxDatePickerCtrl::MSWGetStyle(long style, WXDWORD *exstyle) const
 153 {
 154     WXDWORD styleMSW = wxDatePickerCtrlBase::MSWGetStyle(style, exstyle);
 155
 156     // although MSDN doesn't mention it, DTS_UPDOWN doesn't work with
 157     // comctl32.dll 4.72
 158     if ( wxApp::GetComCtl32Version() > 472 && (style & wxDP_SPIN) )
 159         styleMSW |= DTS_UPDOWN;
 160     //else: drop down by default
 161
 162 #ifdef DTS_SHORTDATECENTURYFORMAT
 163     if ( style & wxDP_SHOWCENTURY )
 164         styleMSW |= DTS_SHORTDATECENTURYFORMAT;
 165     else
 166 #endif // DTS_SHORTDATECENTURYFORMAT
 167         styleMSW |= DTS_SHORTDATEFORMAT;
 168
 169     if ( style & wxDP_ALLOWNONE )
 170         styleMSW |= DTS_SHOWNONE;
 171
 172     return styleMSW;
 173 }
 174
 175 // TODO: handle WM_WININICHANGE
 176
 177 // ----------------------------------------------------------------------------
 178 // wxDatePickerCtrl geometry
 179 // ----------------------------------------------------------------------------
 180
 181 wxSize wxDatePickerCtrl::DoGetBestSize() const
 182 {
 183     wxClientDC dc(wx_const_cast(wxDatePickerCtrl *, this));
 184     dc.SetFont(GetFont());
 185
 186     // we can't use FormatDate() here as the CRT doesn't always use the same
 187     // format as the date picker control
 188     wxString s;
 189     for ( int len = 100; ; len *= 2 )
 190     {
 191         if ( ::GetDateFormat
 192                (
 193                     LOCALE_USER_DEFAULT,    // the control should use the same
 194                     DATE_SHORTDATE,         // the format used by the control
 195                     NULL,                   // use current date (we don't care)
 196                     NULL,                   // no custom format
 197                     wxStringBuffer(s, len), // output buffer
 198                     len                     // and its length
 199                ) )
 200         {
 201             // success
 202             break;
 203         }
 204
 205         const DWORD rc = ::GetLastError();
 206         if ( rc != ERROR_INSUFFICIENT_BUFFER )
 207         {
 208             wxLogApiError(_T("GetDateFormat"), rc);
 209
 210             // fall back on wxDateTime, what else to do?
 211             s = wxDateTime::Today().FormatDate();
 212             break;
 213         }
 214     }
 215
 216     // the control adds a lot of extra space around separators
 217     s.Replace(_T(","), _T("    ,    "));
 218
 219     int x, y;
 220     dc.GetTextExtent(s, &x, &y);
 221
 222     wxSize best(x + 40 /* margin + arrows */, EDIT_HEIGHT_FROM_CHAR_HEIGHT(y));
 223     CacheBestSize(best);
 224     return best;
 225 }
 226
 227 // ----------------------------------------------------------------------------
 228 // wxDatePickerCtrl operations
 229 // ----------------------------------------------------------------------------
 230
 231 void wxDatePickerCtrl::SetValue(const wxDateTime& dt)
 232 {
 233     wxCHECK_RET( dt.IsValid() || HasFlag(wxDP_ALLOWNONE),
 234                     _T("this control requires a valid date") );
 235
 236     SYSTEMTIME st;
 237     if ( dt.IsValid() )
 238         wxToSystemTime(&st, dt);
 239     if ( !DateTime_SetSystemtime(GetHwnd(),
 240                                  dt.IsValid() ? GDT_VALID : GDT_NONE,
 241                                  &st) )
 242     {
 243         wxLogDebug(_T("DateTime_SetSystemtime() failed"));
 244     }
 245 }
 246
 247 wxDateTime wxDatePickerCtrl::GetValue() const
 248 {
 249     wxDateTime dt;
 250     SYSTEMTIME st;
 251     if ( DateTime_GetSystemtime(GetHwnd(), &st) == GDT_VALID )
 252     {
 253         wxFromSystemTime(&dt, st);
 254     }
 255
 256     return dt;
 257 }
 258
 259 void wxDatePickerCtrl::SetRange(const wxDateTime& dt1, const wxDateTime& dt2)
 260 {
 261     SYSTEMTIME st[2];
 262
 263     DWORD flags = 0;
 264     if ( dt1.IsValid() )
 265     {
 266         wxToSystemTime(&st[0], dt1);
 267         flags |= GDTR_MIN;
 268     }
 269
 270     if ( dt2.IsValid() )
 271     {
 272         wxToSystemTime(&st[1], dt2);
 273         flags |= GDTR_MAX;
 274     }
 275
 276     if ( !DateTime_SetRange(GetHwnd(), flags, st) )
 277     {
 278         wxLogDebug(_T("DateTime_SetRange() failed"));
 279     }
 280 }
 281
 282 bool wxDatePickerCtrl::GetRange(wxDateTime *dt1, wxDateTime *dt2) const
 283 {
 284     SYSTEMTIME st[2];
 285
 286     DWORD flags = DateTime_GetRange(GetHwnd(), st);
 287     if ( dt1 )
 288     {
 289         if ( flags & GDTR_MIN )
 290             wxFromSystemTime(dt1, st[0]);
 291         else
 292             *dt1 = wxDefaultDateTime;
 293     }
 294
 295     if ( dt2 )
 296     {
 297         if ( flags & GDTR_MAX )
 298             wxFromSystemTime(dt2, st[1]);
 299         else
 300             *dt2 = wxDefaultDateTime;
 301     }
 302
 303     return flags != 0;
 304 }
 305
 306 // ----------------------------------------------------------------------------
 307 // wxDatePickerCtrl events
 308 // ----------------------------------------------------------------------------
 309
 310 bool
 311 wxDatePickerCtrl::MSWOnNotify(int idCtrl, WXLPARAM lParam, WXLPARAM *result)
 312 {
 313     NMHDR* hdr = (NMHDR *)lParam;
 314     switch ( hdr->code )
 315     {
 316         case DTN_DATETIMECHANGE:
 317         {
 318             NMDATETIMECHANGE *dtch = (NMDATETIMECHANGE *)hdr;
 319             wxDateTime dt;
 320             if ( dtch->dwFlags == GDT_VALID )
 321                 wxFromSystemTime(&dt, dtch->st);
 322
 323             wxDateEvent event(this, dt, wxEVT_DATE_CHANGED);
 324             if ( GetEventHandler()->ProcessEvent(event) )
 325             {
 326                 *result = 0;
 327                 return true;
 328             }
 329         }
 330     }
 331
 332     return wxDatePickerCtrlBase::MSWOnNotify(idCtrl, lParam, result);
 333 }
 334
 335 #endif // wxUSE_DATEPICKCTRL