src/generic/datectlg.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        generic/datectrl.cpp
   3 // Purpose:     generic wxDatePickerCtrl implementation
   4 // Author:      Andreas Pflug
   5 // Modified by:
   6 // Created:     2005-01-19
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) 2005 Andreas Pflug <pgadmin@pse-consulting.de>
   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 #include "wx/datectrl.h"
  27
  28 // ----------------------------------------------------------------------------
  29 // constants
  30 // ----------------------------------------------------------------------------
  31
  32 enum
  33 {
  34     CTRLID_TXT = 101,
  35     CTRLID_CAL
  36     CTRLID_BTN
  37     CTRLID_PAN
  38 };
  39
  40 #ifndef DEFAULT_ITEM_WIDTH
  41     #define DEFAULT_ITEM_WIDTH 100
  42 #endif
  43
  44 // ============================================================================
  45 // wxDatePickerCtrl implementation
  46 // ============================================================================
  47
  48 BEGIN_EVENT_TABLE(wxDatePickerCtrl, wxDatePickerCtrlBase)
  49     EVT_BUTTON(CTRLID_BTN, wxDatePickerCtrl::OnClick)
  50     EVT_TEXT(CTRLID_TXT, wxDatePickerCtrl::OnText)
  51     EVT_CHILD_FOCUS(wxDatePickerCtrl::OnChildSetFocus)
  52 END_EVENT_TABLE()
  53
  54 IMPLEMENT_DYNAMIC_CLASS(wxDatePickerCtrl, wxDatePickerCtrlBase)
  55
  56 // ----------------------------------------------------------------------------
  57 // creation
  58 // ----------------------------------------------------------------------------
  59
  60 wxDatePickerCtrl::wxDatePickerCtrl(wxWindow *parent,
  61                             wxWindowID id,
  62                             const wxDateTime& date,
  63                             const wxPoint& pos,
  64                             const wxSize& size,
  65                             long style,
  66                             const wxString& name)
  67 {
  68     Init();
  69     Create(parent, id, date, pos, size, style, name);
  70 }
  71
  72
  73 bool wxDatePickerCtrl::Create(wxWindow *parent,
  74                             wxWindowID id,
  75                             const wxDateTime& date,
  76                             const wxPoint& pos,
  77                             const wxSize& size,
  78                             long style,
  79                             const wxString& name)
  80 {
  81     wxString txt;
  82     if (date.IsValid())
  83         txt = date.FormatDate();
  84
  85     if ( !wxControl::Create(parent, id, pos, size,
  86                             style | wxCLIP_CHILDREN | wxWANTS_CHARS,
  87                             wxDefaultValidator, name) )
  88
  89     {
  90         return false;
  91     }
  92
  93     SetWindowStyle(style | wxWANTS_CHARS);
  94     InheritAttributes();
  95
  96     wxBitmap bmp(8, 4);
  97     {
  98         wxMemoryDC dc;
  99
 100         dc.SelectObject(bmp);
 101         dc.SetBrush(wxBrush(GetBackgroundColour()));
 102         dc.SetPen(wxPen(GetBackgroundColour()));
 103         dc.DrawRectangle(0,0, 8,4);
 104
 105         dc.SetBrush(wxBrush(GetForegroundColour()));
 106         dc.SetPen(wxPen(GetForegroundColour()));
 107         wxPoint pt[3] = { wxPoint(0,0), wxPoint(6,0), wxPoint(3,3) };
 108         dc.DrawPolygon(3, pt);
 109         dc.SelectObject(wxNullBitmap);
 110     }
 111
 112     m_txt=new wxTextCtrl(this, CTRLID_TXT, txt);
 113     m_txt->Connect(wxID_ANY, wxID_ANY, wxEVT_KEY_DOWN, (wxObjectEventFunction)&wxDatePickerCtrl::OnEditKey, 0, this);
 114     m_txt->Connect(wxID_ANY, wxID_ANY, wxEVT_KILL_FOCUS, (wxObjectEventFunction)&wxDatePickerCtrl::OnKillFocus, 0, this);
 115     SetFormat(wxT("%x"));
 116
 117     m_btn = new wxBitmapButton(this, CTRLID_BTN, bmp);
 118
 119     m_dlg = new wxDialog(this, CTRLID_CAL, wxEmptyString, wxDefaultPosition, wxDefaultSize, wxSIMPLE_BORDER);
 120     m_dlg->SetFont(GetFont());
 121
 122     wxPanel *panel=new wxPanel(m_dlg, CTRLID_PAN, wxPoint(0, 0), wxDefaultSize, wxSUNKEN_BORDER|wxCLIP_CHILDREN);
 123     m_cal = new wxCalendarCtrl(panel, CTRLID_CAL, wxDefaultDateTime, wxPoint(0,0), wxDefaultSize, wxSUNKEN_BORDER);
 124     m_cal->Connect(CTRLID_CAL, CTRLID_CAL, wxEVT_CALENDAR_SEL_CHANGED, (wxObjectEventFunction)&wxDatePickerCtrl::OnSelChange, 0, this);
 125     m_cal->Connect(wxID_ANY, wxID_ANY, wxEVT_KEY_DOWN, (wxObjectEventFunction)&wxDatePickerCtrl::OnCalKey, 0, this);
 126     m_cal->Connect(CTRLID_CAL, CTRLID_CAL, wxEVT_CALENDAR_DOUBLECLICKED, (wxObjectEventFunction)&wxDatePickerCtrl::OnSelChange, 0, this);
 127     m_cal->Connect(CTRLID_CAL, CTRLID_CAL, wxEVT_CALENDAR_DAY_CHANGED, (wxObjectEventFunction)&wxDatePickerCtrl::OnSelChange, 0, this);
 128     m_cal->Connect(CTRLID_CAL, CTRLID_CAL, wxEVT_CALENDAR_MONTH_CHANGED, (wxObjectEventFunction)&wxDatePickerCtrl::OnSelChange, 0, this);
 129     m_cal->Connect(CTRLID_CAL, CTRLID_CAL, wxEVT_CALENDAR_YEAR_CHANGED, (wxObjectEventFunction)&wxDatePickerCtrl::OnSelChange, 0, this);
 130
 131     wxWindow *yearControl = m_cal->GetYearControl();
 132
 133     Connect(wxID_ANY, wxID_ANY, wxEVT_SET_FOCUS, (wxObjectEventFunction)&wxDatePickerCtrl::OnSetFocus);
 134
 135     wxClientDC dc(yearControl);
 136     dc.SetFont(m_font);
 137     wxCoord width, dummy;
 138     dc.GetTextExtent(wxT("2000"), &width, &dummy);
 139     width += ConvertDialogToPixels(wxSize(20,0)).x;
 140
 141     wxSize calSize = m_cal->GetBestSize();
 142     wxSize yearSize = yearControl->GetSize();
 143     yearSize.x = width;
 144
 145     wxPoint yearPosition = yearControl->GetPosition();
 146
 147 #ifdef __WXMSW__
 148 #define CALBORDER   0
 149 #else
 150 #define CALBORDER   4
 151 #endif
 152
 153     width = yearPosition.x + yearSize.x+2+CALBORDER/2;
 154     if (width < calSize.x-4)
 155         width = calSize.x-4;
 156
 157     int calPos = (width-calSize.x)/2;
 158     if (calPos == -1)
 159     {
 160         calPos = 0;
 161         width += 2;
 162     }
 163     m_cal->SetSize(calPos, 0, calSize.x, calSize.y);
 164     yearControl->SetSize(width-yearSize.x-CALBORDER/2, yearPosition.y, yearSize.x, yearSize.y);
 165     m_cal->GetMonthControl()->Move(0, 0);
 166
 167
 168
 169     panel->SetClientSize(width+CALBORDER/2, calSize.y-2+CALBORDER);
 170     m_dlg->SetClientSize(panel->GetSize());
 171
 172     return TRUE;
 173 }
 174
 175
 176 void wxDatePickerCtrl::Init()
 177 {
 178     m_dlg = NULL;
 179     m_txt = NULL;
 180     m_cal = NULL;
 181     m_btn = NULL;
 182
 183     m_dropped = false;
 184     m_ignoreDrop = false;
 185 }
 186
 187
 188 bool wxDatePickerCtrl::Destroy()
 189 {
 190     if (m_cal)
 191         m_cal->Destroy();
 192     if (m_dlg)
 193         m_dlg->Destroy();
 194     if (m_txt)
 195         m_txt->Destroy();
 196     if (m_btn)
 197         m_btn->Destroy();
 198
 199     m_dlg = NULL;
 200     m_txt = NULL;
 201     m_cal = NULL;
 202     m_btn = NULL;
 203
 204     return wxControl::Destroy();
 205 }
 206
 207 // ----------------------------------------------------------------------------
 208 // overridden base class methods
 209 // ----------------------------------------------------------------------------
 210
 211 void wxDatePickerCtrl::DoMoveWindow(int x, int y, int w, int h)
 212 {
 213     wxControl::DoMoveWindow(x, y, w, h);
 214     wxSize bs=m_btn->GetBestSize();
 215     int eh=m_txt->GetBestSize().y;
 216
 217     m_txt->SetSize(0, 0, w-bs.x-1, h > eh ? eh : h);
 218     m_btn->SetSize(w - bs.x, 0, bs.x, h > bs.y ? bs.y : h);
 219
 220     if (m_dropped)
 221         DropDown();
 222 }
 223
 224 wxSize wxDatePickerCtrl::DoGetBestSize() const
 225 {
 226     int bh=m_btn->GetBestSize().y;
 227     int eh=m_txt->GetBestSize().y;
 228     return wxSize(DEFAULT_ITEM_WIDTH, bh > eh ? bh : eh);
 229 }
 230
 231
 232 bool wxDatePickerCtrl::Show(bool show)
 233 {
 234     if ( !wxControl::Show(show) )
 235     {
 236         return FALSE;
 237     }
 238
 239     if (!show)
 240     {
 241         if (m_dlg)
 242         {
 243             m_dlg->Hide();
 244             m_dropped = false;
 245         }
 246     }
 247
 248     return TRUE;
 249 }
 250
 251
 252 bool wxDatePickerCtrl::Enable(bool enable)
 253 {
 254     if ( !wxControl::Enable(enable) )
 255     {
 256         return FALSE;
 257     }
 258
 259     if (!enable)
 260     {
 261         if (m_cal)
 262             m_cal->Hide();
 263     }
 264     if (m_btn)
 265         m_btn->Enable(enable);
 266     return TRUE;
 267 }
 268
 269 // ----------------------------------------------------------------------------
 270 // wxDatePickerCtrl API
 271 // ----------------------------------------------------------------------------
 272
 273 bool wxDatePickerCtrl::SetFormat(const wxChar *fmt)
 274 {
 275     wxDateTime dt;
 276     dt.ParseFormat(wxT("2003-10-13"), wxT("%Y-%m-%d"));
 277     wxString str=dt.Format(fmt);
 278     wxChar *p=(wxChar*)str.c_str();
 279
 280     m_format=wxEmptyString;
 281
 282     while (*p)
 283     {
 284         int n=wxAtoi(p);
 285         if (n == dt.GetDay())
 286         {
 287             m_format.Append(wxT("%d"));
 288             p += 2;
 289         }
 290         else if (n == (int)dt.GetMonth()+1)
 291         {
 292             m_format.Append(wxT("%m"));
 293             p += 2;
 294         }
 295         else if (n == dt.GetYear())
 296         {
 297             m_format.Append(wxT("%Y"));
 298             p += 4;
 299         }
 300         else
 301             m_format.Append(*p++);
 302     }
 303
 304     if (m_txt)
 305     {
 306         wxStringList valList;
 307         wxChar c;
 308         for (c='0'; c <= '9'; c++)
 309             valList.Add(wxString(c, 1));
 310         wxChar *p=(wxChar*)m_format.c_str();
 311         while (*p)
 312         {
 313             if (*p == '%')
 314                 p += 2;
 315             else
 316                 valList.Add(wxString(*p++, 1));
 317         }
 318         wxTextValidator tv(wxFILTER_INCLUDE_CHAR_LIST);
 319         tv.SetIncludeList(valList);
 320
 321         m_txt->SetValidator(tv);
 322     }
 323     return true;
 324 }
 325
 326
 327 wxDateTime wxDatePickerCtrl::GetValue() const
 328 {
 329     wxDateTime dt;
 330     wxString txt=m_txt->GetValue();
 331
 332     if (!txt.IsEmpty())
 333         dt.ParseFormat(txt, m_format);
 334
 335     return dt;
 336 }
 337
 338
 339 void wxDatePickerCtrl::SetValue(const wxDateTime& date)
 340 {
 341     if (m_cal)
 342     {
 343         if (date.IsValid())
 344             m_txt->SetValue(date.FormatDate());
 345         else
 346             m_txt->SetValue(wxEmptyString);
 347     }
 348 }
 349
 350
 351 bool wxDatePickerCtrl::GetRange(wxDateTime *dt1, wxDateTime *dt2) const
 352 {
 353     if (dt1)
 354         *dt1 = GetLowerDateLimit();
 355     if (dt1)
 356         *dt2 = GetUpperDateLimit();
 357     return true;
 358 }
 359
 360
 361 void wxDatePickerCtrl::SetRange(const wxDateTime &dt1, const wxDateTime &dt2)
 362 {
 363     SetLowerDateLimit(dt1);
 364     SetUpperDateLimit(dt2);
 365 }
 366
 367 // ----------------------------------------------------------------------------
 368 // event handlers
 369 // ----------------------------------------------------------------------------
 370
 371 void wxDatePickerCtrl::DropDown(bool down)
 372 {
 373     if (m_dlg)
 374     {
 375         if (down)
 376         {
 377             if (m_txt->GetValue().IsEmpty())
 378                 m_cal->SetDate(wxDateTime::Today());
 379             else
 380             {
 381                 wxDateTime dt;
 382                 dt.ParseFormat(m_txt->GetValue(), m_format);
 383                 m_cal->SetDate(dt);
 384             }
 385             wxPoint pos=GetParent()->ClientToScreen(GetPosition());
 386
 387             m_dlg->Move(pos.x, pos.y + GetSize().y);
 388             m_dlg->Show();
 389             m_dropped = true;
 390         }
 391         else
 392         {
 393             if (m_dropped)
 394                 m_dlg->Hide();
 395             m_dropped = false;
 396         }
 397     }
 398 }
 399
 400
 401 void wxDatePickerCtrl::OnChildSetFocus(wxChildFocusEvent &ev)
 402 {
 403     ev.Skip();
 404     m_ignoreDrop = false;
 405
 406     wxWindow  *w=(wxWindow*)ev.GetEventObject();
 407     while (w)
 408     {
 409         if (w == m_dlg)
 410             return;
 411         w = w->GetParent();
 412     }
 413
 414     if (m_dropped)
 415     {
 416         DropDown(false);
 417         if (ev.GetEventObject() == m_btn)
 418             m_ignoreDrop = true;
 419     }
 420 }
 421
 422
 423 void wxDatePickerCtrl::OnClick(wxCommandEvent& event)
 424 {
 425     if (m_ignoreDrop)
 426     {
 427         m_ignoreDrop = false;
 428         m_txt->SetFocus();
 429     }
 430     else
 431     {
 432         DropDown();
 433         m_cal->SetFocus();
 434     }
 435 }
 436
 437
 438 void wxDatePickerCtrl::OnSetFocus(wxFocusEvent &ev)
 439 {
 440     if (m_txt)
 441     {
 442         m_txt->SetFocus();
 443         m_txt->SetSelection(0, 100);
 444     }
 445 }
 446
 447
 448 void wxDatePickerCtrl::OnKillFocus(wxFocusEvent &ev)
 449 {
 450     ev.Skip();
 451
 452     wxDateTime dt;
 453     dt.ParseFormat(m_txt->GetValue(), m_format);
 454     if (!dt.IsValid())
 455         m_txt->SetValue(wxEmptyString);
 456     else
 457         m_txt->SetValue(dt.Format(m_format));
 458 }
 459
 460
 461 void wxDatePickerCtrl::OnSelChange(wxCalendarEvent &ev)
 462 {
 463     if (m_cal)
 464     {
 465         m_txt->SetValue(m_cal->GetDate().FormatDate());
 466         if (ev.GetEventType() == wxEVT_CALENDAR_DOUBLECLICKED)
 467         {
 468             DropDown(false);
 469             m_txt->SetFocus();
 470         }
 471     }
 472     ev.SetEventObject(this);
 473     ev.SetId(GetId());
 474     GetParent()->ProcessEvent(ev);
 475 }
 476
 477
 478 void wxDatePickerCtrl::OnText(wxCommandEvent &ev)
 479 {
 480     ev.SetEventObject(this);
 481     ev.SetId(GetId());
 482     GetParent()->ProcessEvent(ev);
 483
 484     // We'll create an additional event if the date is valid.
 485     // If the date isn't valid, the user's probable in the middle of typing
 486     wxString txt=m_txt->GetValue();
 487     wxDateTime dt;
 488     if (!txt.IsEmpty())
 489     {
 490         dt.ParseFormat(txt, m_format);
 491         if (!dt.IsValid())
 492             return;
 493     }
 494
 495     wxCalendarEvent cev(m_cal, wxEVT_CALENDAR_SEL_CHANGED);
 496     cev.SetEventObject(this);
 497     cev.SetId(GetId());
 498     cev.SetDate(dt);
 499
 500     GetParent()->ProcessEvent(cev);
 501 }
 502
 503
 504 void wxDatePickerCtrl::OnEditKey(wxKeyEvent & ev)
 505 {
 506     if (ev.GetKeyCode() == WXK_DOWN && !ev.HasModifiers())
 507         DropDown();
 508     else
 509         ev.Skip();
 510 }
 511
 512
 513 void wxDatePickerCtrl::OnCalKey(wxKeyEvent & ev)
 514 {
 515     if (ev.GetKeyCode() == WXK_ESCAPE && !ev.HasModifiers())
 516         DropDown(false);
 517     else
 518         ev.Skip();
 519 }
 520