samples/calendar/calendar.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        calendar.cpp
   3 // Purpose:     wxCalendarCtrl sample
   4 // Author:      Vadim Zeitlin
   5 // Modified by:
   6 // Created:     02.01.00
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Vadim Zeitlin
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // ============================================================================
  13 // declarations
  14 // ============================================================================
  15
  16 // ----------------------------------------------------------------------------
  17 // headers
  18 // ----------------------------------------------------------------------------
  19
  20 // For compilers that support precompilation, includes "wx/wx.h".
  21 #include "wx/wxprec.h"
  22
  23 #ifdef __BORLANDC__
  24     #pragma hdrstop
  25 #endif
  26
  27 // for all others, include the necessary headers
  28 #ifndef WX_PRECOMP
  29     #include "wx/app.h"
  30     #include "wx/log.h"
  31     #include "wx/frame.h"
  32     #include "wx/panel.h"
  33     #include "wx/stattext.h"
  34     #include "wx/menu.h"
  35     #include "wx/layout.h"
  36     #include "wx/msgdlg.h"
  37     #include "wx/icon.h"
  38     #include "wx/button.h"
  39     #include "wx/sizer.h"
  40     #include "wx/textctrl.h"
  41     #include "wx/settings.h"
  42 #endif
  43
  44 #include "wx/calctrl.h"
  45
  46 #if wxUSE_DATEPICKCTRL
  47     #include "wx/datectrl.h"
  48     #if wxUSE_DATEPICKCTRL_GENERIC
  49         #include "wx/generic/datectrl.h"
  50     #endif // wxUSE_DATEPICKCTRL_GENERIC
  51 #endif // wxUSE_DATEPICKCTRL
  52
  53 #include "../sample.xpm"
  54
  55 // ----------------------------------------------------------------------------
  56 // private classes
  57 // ----------------------------------------------------------------------------
  58
  59 // Define a new application type, each program should derive a class from wxApp
  60 class MyApp : public wxApp
  61 {
  62 public:
  63     // override base class virtuals
  64     // ----------------------------
  65
  66     // this one is called on application startup and is a good place for the app
  67     // initialization (doing it here and not in the ctor allows to have an error
  68     // return: if OnInit() returns false, the application terminates)
  69     virtual bool OnInit();
  70 };
  71
  72 class MyPanel : public wxPanel
  73 {
  74 public:
  75     MyPanel(wxFrame *frame);
  76
  77     void OnCalendar(wxCalendarEvent& event);
  78     void OnCalendarWeekDayClick(wxCalendarEvent& event);
  79     void OnCalendarChange(wxCalendarEvent& event);
  80     void OnCalMonthChange(wxCalendarEvent& event);
  81     void OnCalYearChange(wxCalendarEvent& event);
  82
  83     wxCalendarCtrl *GetCal() const { return m_calendar; }
  84
  85     // turn on/off the specified style bit on the calendar control
  86     void ToggleCalStyle(bool on, int style);
  87
  88     void HighlightSpecial(bool on);
  89
  90     wxDateTime GetDate() const { return m_calendar->GetDate(); }
  91     void SetDate(const wxDateTime& dt) { m_calendar->SetDate(dt); }
  92
  93 private:
  94     wxCalendarCtrl *m_calendar;
  95     wxStaticText   *m_date;
  96     wxSizer        *m_sizer;
  97
  98     DECLARE_EVENT_TABLE()
  99 };
 100
 101 // Define a new frame type: this is going to be our main frame
 102 class MyFrame : public wxFrame
 103 {
 104 public:
 105     // ctor(s)
 106     MyFrame(const wxString& title, const wxPoint& pos = wxDefaultPosition, const wxSize& size = wxDefaultSize);
 107
 108     // event handlers (these functions should _not_ be virtual)
 109     void OnQuit(wxCommandEvent& event);
 110     void OnAbout(wxCommandEvent& event);
 111
 112 #if wxUSE_DATEPICKCTRL
 113     void OnAskDate(wxCommandEvent& event);
 114
 115     void OnUpdateUIStartWithNone(wxUpdateUIEvent& event);
 116 #endif // wxUSE_DATEPICKCTRL
 117
 118     void OnCalMonday(wxCommandEvent& event);
 119     void OnCalHolidays(wxCommandEvent& event);
 120     void OnCalSpecial(wxCommandEvent& event);
 121
 122     void OnCalAllowMonth(wxCommandEvent& event);
 123     void OnCalAllowYear(wxCommandEvent& event);
 124
 125     void OnCalSeqMonth(wxCommandEvent& event);
 126     void OnCalShowSurroundingWeeks(wxCommandEvent& event);
 127
 128     void OnSetDate(wxCommandEvent& event);
 129     void OnToday(wxCommandEvent& event);
 130     void OnBeginDST(wxCommandEvent& event);
 131
 132     void OnCalToggleResizable(wxCommandEvent& event);
 133
 134     void OnAllowYearUpdate(wxUpdateUIEvent& event);
 135
 136 private:
 137     MyPanel *m_panel;
 138
 139     // any class wishing to process wxWidgets events must use this macro
 140     DECLARE_EVENT_TABLE()
 141 };
 142
 143 #if wxUSE_DATEPICKCTRL
 144
 145 // Define a simple modal dialog which asks the user for a date
 146 class MyDialog : public wxDialog
 147 {
 148 public:
 149     MyDialog(wxWindow *parent, const wxDateTime& dt, int dtpStyle);
 150
 151     wxDateTime GetDate() const { return m_datePicker->GetValue(); }
 152
 153 private:
 154     void OnDateChange(wxDateEvent& event);
 155
 156
 157     wxDatePickerCtrlBase *m_datePicker;
 158     wxTextCtrl *m_text;
 159
 160
 161     DECLARE_EVENT_TABLE()
 162 };
 163
 164 #endif // wxUSE_DATEPICKCTRL
 165
 166 // ----------------------------------------------------------------------------
 167 // constants
 168 // ----------------------------------------------------------------------------
 169
 170 // IDs for the controls and the menu commands
 171 enum
 172 {
 173     // menu items
 174     Calendar_File_About = wxID_ABOUT,
 175     Calendar_File_Quit = wxID_EXIT,
 176     Calendar_Cal_Monday = 200,
 177     Calendar_Cal_Holidays,
 178     Calendar_Cal_Special,
 179     Calendar_Cal_Month,
 180     Calendar_Cal_Year,
 181     Calendar_Cal_SeqMonth,
 182     Calendar_Cal_SurroundWeeks,
 183     Calendar_Cal_SetDate,
 184     Calendar_Cal_Today,
 185     Calendar_Cal_BeginDST,
 186     Calendar_Cal_Resizable,
 187 #if wxUSE_DATEPICKCTRL
 188     Calendar_DatePicker_AskDate = 300,
 189     Calendar_DatePicker_ShowCentury,
 190     Calendar_DatePicker_DropDown,
 191     Calendar_DatePicker_AllowNone,
 192     Calendar_DatePicker_StartWithNone,
 193 #if wxUSE_DATEPICKCTRL_GENERIC
 194     Calendar_DatePicker_Generic,
 195 #endif // wxUSE_DATEPICKCTRL_GENERIC
 196 #endif // wxUSE_DATEPICKCTRL
 197     Calendar_CalCtrl = 1000
 198 };
 199
 200 // ----------------------------------------------------------------------------
 201 // event tables and other macros for wxWidgets
 202 // ----------------------------------------------------------------------------
 203
 204 // the event tables connect the wxWidgets events with the functions (event
 205 // handlers) which process them. It can be also done at run-time, but for the
 206 // simple menu events like this the static method is much simpler.
 207 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
 208     EVT_MENU(Calendar_File_Quit,  MyFrame::OnQuit)
 209     EVT_MENU(Calendar_File_About, MyFrame::OnAbout)
 210
 211 #if wxUSE_DATEPICKCTRL
 212     EVT_MENU(Calendar_DatePicker_AskDate, MyFrame::OnAskDate)
 213
 214     EVT_UPDATE_UI(Calendar_DatePicker_StartWithNone,
 215                   MyFrame::OnUpdateUIStartWithNone)
 216 #endif // wxUSE_DATEPICKCTRL
 217
 218     EVT_MENU(Calendar_Cal_Monday, MyFrame::OnCalMonday)
 219     EVT_MENU(Calendar_Cal_Holidays, MyFrame::OnCalHolidays)
 220     EVT_MENU(Calendar_Cal_Special, MyFrame::OnCalSpecial)
 221
 222     EVT_MENU(Calendar_Cal_Month, MyFrame::OnCalAllowMonth)
 223     EVT_MENU(Calendar_Cal_Year, MyFrame::OnCalAllowYear)
 224
 225     EVT_MENU(Calendar_Cal_SeqMonth, MyFrame::OnCalSeqMonth)
 226     EVT_MENU(Calendar_Cal_SurroundWeeks, MyFrame::OnCalShowSurroundingWeeks)
 227
 228     EVT_MENU(Calendar_Cal_SetDate, MyFrame::OnSetDate)
 229     EVT_MENU(Calendar_Cal_Today, MyFrame::OnToday)
 230     EVT_MENU(Calendar_Cal_BeginDST, MyFrame::OnBeginDST)
 231
 232     EVT_MENU(Calendar_Cal_Resizable, MyFrame::OnCalToggleResizable)
 233
 234
 235     EVT_UPDATE_UI(Calendar_Cal_Year, MyFrame::OnAllowYearUpdate)
 236 END_EVENT_TABLE()
 237
 238 BEGIN_EVENT_TABLE(MyPanel, wxPanel)
 239     EVT_CALENDAR            (Calendar_CalCtrl,   MyPanel::OnCalendar)
 240     EVT_CALENDAR_MONTH      (Calendar_CalCtrl,   MyPanel::OnCalMonthChange)
 241     EVT_CALENDAR_YEAR       (Calendar_CalCtrl,   MyPanel::OnCalYearChange)
 242     EVT_CALENDAR_SEL_CHANGED(Calendar_CalCtrl,   MyPanel::OnCalendarChange)
 243     EVT_CALENDAR_WEEKDAY_CLICKED(Calendar_CalCtrl, MyPanel::OnCalendarWeekDayClick)
 244 END_EVENT_TABLE()
 245
 246 #if wxUSE_DATEPICKCTRL
 247
 248 BEGIN_EVENT_TABLE(MyDialog, wxDialog)
 249     EVT_DATE_CHANGED(wxID_ANY, MyDialog::OnDateChange)
 250 END_EVENT_TABLE()
 251
 252 #endif // wxUSE_DATEPICKCTRL
 253
 254 // Create a new application object: this macro will allow wxWidgets to create
 255 // the application object during program execution (it's better than using a
 256 // static object for many reasons) and also declares the accessor function
 257 // wxGetApp() which will return the reference of the right type (i.e. MyApp and
 258 // not wxApp)
 259 IMPLEMENT_APP(MyApp)
 260
 261 // ============================================================================
 262 // implementation
 263 // ============================================================================
 264
 265 // ----------------------------------------------------------------------------
 266 // the application class
 267 // ----------------------------------------------------------------------------
 268
 269 // `Main program' equivalent: the program execution "starts" here
 270 bool MyApp::OnInit()
 271 {
 272     if ( !wxApp::OnInit() )
 273         return false;
 274
 275     // Create the main application window
 276     MyFrame *frame = new MyFrame(_T("Calendar wxWidgets sample")
 277 #ifndef __WXWINCE__
 278                                  ,wxPoint(50, 50), wxSize(450, 340)
 279 #endif
 280                                                                  );
 281
 282     frame->Show(true);
 283
 284     // success: wxApp::OnRun() will be called which will enter the main message
 285     // loop and the application will run. If we returned false here, the
 286     // application would exit immediately.
 287     return true;
 288 }
 289
 290 // ----------------------------------------------------------------------------
 291 // main frame
 292 // ----------------------------------------------------------------------------
 293
 294 // frame constructor
 295 MyFrame::MyFrame(const wxString& title, const wxPoint& pos, const wxSize& size)
 296        : wxFrame((wxFrame *)NULL, wxID_ANY, title, pos, size)
 297 {
 298     // set the frame icon
 299     SetIcon(wxIcon(sample_xpm));
 300
 301     // create a menu bar
 302     wxMenu *menuFile = new wxMenu;
 303     menuFile->Append(Calendar_File_About, _T("&About...\tCtrl-A"), _T("Show about dialog"));
 304     menuFile->AppendSeparator();
 305     menuFile->Append(Calendar_File_Quit, _T("E&xit\tAlt-X"), _T("Quit this program"));
 306
 307     wxMenu *menuCal = new wxMenu;
 308     menuCal->Append(Calendar_Cal_Monday,
 309                     _T("Monday &first weekday\tCtrl-F"),
 310                     _T("Toggle between Mon and Sun as the first week day"),
 311                     true);
 312     menuCal->Append(Calendar_Cal_Holidays, _T("Show &holidays\tCtrl-H"),
 313                     _T("Toggle highlighting the holidays"),
 314                     true);
 315     menuCal->Append(Calendar_Cal_Special, _T("Highlight &special dates\tCtrl-S"),
 316                     _T("Test custom highlighting"),
 317                     true);
 318     menuCal->Append(Calendar_Cal_SurroundWeeks,
 319                     _T("Show s&urrounding weeks\tCtrl-W"),
 320                     _T("Show the neighbouring weeks in the prev/next month"),
 321                     true);
 322     menuCal->AppendSeparator();
 323     menuCal->Append(Calendar_Cal_SeqMonth,
 324                     _T("To&ggle month selector style\tCtrl-G"),
 325                     _T("Use another style for the calendar controls"),
 326                     true);
 327     menuCal->Append(Calendar_Cal_Month, _T("&Month can be changed\tCtrl-M"),
 328                     _T("Allow changing the month in the calendar"),
 329                     true);
 330     menuCal->Append(Calendar_Cal_Year, _T("&Year can be changed\tCtrl-Y"),
 331                     _T("Allow changing the year in the calendar"),
 332                     true);
 333     menuCal->AppendSeparator();
 334     menuCal->Append(Calendar_Cal_SetDate, _T("Call &SetDate(2005-12-24)"), _T("Set date to 2005-12-24."));
 335     menuCal->Append(Calendar_Cal_Today, _T("Call &Today()"), _T("Set to the current date."));
 336     menuCal->Append(Calendar_Cal_BeginDST, "Call SetDate(GetBeginDST())");
 337     menuCal->AppendSeparator();
 338     menuCal->AppendCheckItem(Calendar_Cal_Resizable, _T("Make &resizable\tCtrl-R"));
 339
 340 #if wxUSE_DATEPICKCTRL
 341     wxMenu *menuDate = new wxMenu;
 342     menuDate->AppendCheckItem(Calendar_DatePicker_ShowCentury,
 343                               _T("Al&ways show century"));
 344     menuDate->AppendCheckItem(Calendar_DatePicker_DropDown,
 345                               _T("Use &drop down control"));
 346     menuDate->AppendCheckItem(Calendar_DatePicker_AllowNone,
 347                               _T("Allow &no date"));
 348     menuDate->AppendCheckItem(Calendar_DatePicker_StartWithNone,
 349                               _T("Start &with no date"));
 350 #if wxUSE_DATEPICKCTRL_GENERIC
 351     menuDate->AppendCheckItem(Calendar_DatePicker_Generic,
 352                               _T("Use &generic version of the control"));
 353 #endif // wxUSE_DATEPICKCTRL_GENERIC
 354     menuDate->AppendSeparator();
 355     menuDate->Append(Calendar_DatePicker_AskDate, _T("&Choose date...\tCtrl-D"), _T("Show dialog with wxDatePickerCtrl"));
 356 #endif // wxUSE_DATEPICKCTRL
 357
 358     // now append the freshly created menu to the menu bar...
 359     wxMenuBar *menuBar = new wxMenuBar;
 360     menuBar->Append(menuFile, _T("&File"));
 361     menuBar->Append(menuCal, _T("&Calendar"));
 362 #if wxUSE_DATEPICKCTRL
 363     menuBar->Append(menuDate, _T("&Date picker"));
 364 #endif // wxUSE_DATEPICKCTRL
 365
 366     menuBar->Check(Calendar_Cal_Monday, true);
 367     menuBar->Check(Calendar_Cal_Holidays, true);
 368     menuBar->Check(Calendar_Cal_Month, true);
 369     menuBar->Check(Calendar_Cal_Year, true);
 370
 371 #if wxUSE_DATEPICKCTRL
 372     menuBar->Check(Calendar_DatePicker_ShowCentury, true);
 373 #endif // wxUSE_DATEPICKCTRL
 374
 375     // ... and attach this menu bar to the frame
 376     SetMenuBar(menuBar);
 377
 378     m_panel = new MyPanel(this);
 379
 380 #if wxUSE_STATUSBAR
 381     // create a status bar just for fun (by default with 1 pane only)
 382     CreateStatusBar(2);
 383     SetStatusText(_T("Welcome to wxWidgets!"));
 384 #endif // wxUSE_STATUSBAR
 385 }
 386
 387 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
 388 {
 389     // true is to force the frame to close
 390     Close(true);
 391 }
 392
 393 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
 394 {
 395     wxMessageBox(_T("wxCalendarCtrl sample\n(c) 2000 Vadim Zeitlin"),
 396                  _T("About Calendar"), wxOK | wxICON_INFORMATION, this);
 397 }
 398
 399 void MyFrame::OnCalMonday(wxCommandEvent& event)
 400 {
 401     bool enable = GetMenuBar()->IsChecked(event.GetId());
 402
 403     m_panel->ToggleCalStyle(enable, wxCAL_MONDAY_FIRST);
 404 }
 405
 406 void MyFrame::OnCalHolidays(wxCommandEvent& event)
 407 {
 408     bool enable = GetMenuBar()->IsChecked(event.GetId());
 409
 410     m_panel->GetCal()->EnableHolidayDisplay(enable);
 411 }
 412
 413 void MyFrame::OnCalSpecial(wxCommandEvent& event)
 414 {
 415     m_panel->HighlightSpecial(GetMenuBar()->IsChecked(event.GetId()));
 416 }
 417
 418 void MyFrame::OnCalAllowMonth(wxCommandEvent& event)
 419 {
 420     bool allow = GetMenuBar()->IsChecked(event.GetId());
 421
 422     m_panel->GetCal()->EnableMonthChange(allow);
 423 }
 424
 425 void MyFrame::OnCalAllowYear(wxCommandEvent& event)
 426 {
 427     bool allow = GetMenuBar()->IsChecked(event.GetId());
 428
 429     m_panel->GetCal()->EnableYearChange(allow);
 430 }
 431
 432 void MyFrame::OnCalSeqMonth(wxCommandEvent& event)
 433 {
 434     bool allow = GetMenuBar()->IsChecked(event.GetId());
 435
 436     m_panel->ToggleCalStyle(allow, wxCAL_SEQUENTIAL_MONTH_SELECTION);
 437 }
 438
 439 void MyFrame::OnCalShowSurroundingWeeks(wxCommandEvent& event)
 440 {
 441     bool allow = GetMenuBar()->IsChecked(event.GetId());
 442
 443     m_panel->ToggleCalStyle(allow, wxCAL_SHOW_SURROUNDING_WEEKS);
 444 }
 445
 446 void MyFrame::OnAllowYearUpdate(wxUpdateUIEvent& event)
 447 {
 448     event.Enable( GetMenuBar()->IsChecked(Calendar_Cal_Month));
 449 }
 450
 451 void MyFrame::OnSetDate(wxCommandEvent &WXUNUSED(event))
 452 {
 453     m_panel->SetDate(wxDateTime(5, wxDateTime::Apr, 2008, 22, 00, 00));
 454 }
 455
 456 void MyFrame::OnToday(wxCommandEvent &WXUNUSED(event))
 457 {
 458     m_panel->SetDate(wxDateTime::Today());
 459 }
 460
 461 void MyFrame::OnBeginDST(wxCommandEvent &WXUNUSED(event))
 462 {
 463     m_panel->SetDate(wxDateTime::GetBeginDST(m_panel->GetDate().GetYear()));
 464 }
 465
 466 void MyFrame::OnCalToggleResizable(wxCommandEvent& event)
 467 {
 468     wxSizer * const sizer = m_panel->GetSizer();
 469     wxSizerItem * const item = sizer->GetItem(m_panel->GetCal());
 470     if ( event.IsChecked() )
 471     {
 472         item->SetProportion(1);
 473         item->SetFlag(wxEXPAND);
 474     }
 475     else // not resizable
 476     {
 477         item->SetProportion(0);
 478         item->SetFlag(wxALIGN_CENTER);
 479     }
 480
 481     sizer->Layout();
 482 }
 483
 484 #if wxUSE_DATEPICKCTRL
 485
 486 void MyFrame::OnUpdateUIStartWithNone(wxUpdateUIEvent& event)
 487 {
 488     // it only makes sense to start with invalid date if we can have no date
 489     event.Enable( GetMenuBar()->IsChecked(Calendar_DatePicker_AllowNone) );
 490 }
 491
 492 void MyFrame::OnAskDate(wxCommandEvent& WXUNUSED(event))
 493 {
 494     wxDateTime dt = m_panel->GetCal()->GetDate();
 495
 496     int style = wxDP_DEFAULT;
 497     if ( GetMenuBar()->IsChecked(Calendar_DatePicker_ShowCentury) )
 498         style |= wxDP_SHOWCENTURY;
 499     if ( GetMenuBar()->IsChecked(Calendar_DatePicker_DropDown) )
 500         style |= wxDP_DROPDOWN;
 501     if ( GetMenuBar()->IsChecked(Calendar_DatePicker_AllowNone) )
 502     {
 503         style |= wxDP_ALLOWNONE;
 504
 505         if ( GetMenuBar()->IsChecked(Calendar_DatePicker_StartWithNone) )
 506             dt = wxDefaultDateTime;
 507     }
 508
 509     MyDialog dlg(this, dt, style);
 510     if ( dlg.ShowModal() == wxID_OK )
 511     {
 512         dt = dlg.GetDate();
 513         if ( dt.IsValid() )
 514         {
 515             const wxDateTime today = wxDateTime::Today();
 516
 517             if ( dt.GetDay() == today.GetDay() &&
 518                     dt.GetMonth() == today.GetMonth() )
 519             {
 520                 wxMessageBox(_T("Happy birthday!"), _T("Calendar Sample"));
 521             }
 522
 523             m_panel->SetDate(dt);
 524
 525             wxLogStatus(_T("Changed the date to your input"));
 526         }
 527         else
 528         {
 529             wxLogStatus(_T("No date entered"));
 530         }
 531     }
 532 }
 533
 534 #endif // wxUSE_DATEPICKCTRL
 535
 536 // ----------------------------------------------------------------------------
 537 // MyPanel
 538 // ----------------------------------------------------------------------------
 539
 540 MyPanel::MyPanel(wxFrame *frame)
 541        : wxPanel(frame, wxID_ANY)
 542 {
 543     wxString date;
 544     date.Printf(wxT("Selected date: %s"),
 545                 wxDateTime::Today().FormatISODate().c_str());
 546     m_date = new wxStaticText(this, wxID_ANY, date);
 547     m_calendar = new wxCalendarCtrl(this, Calendar_CalCtrl,
 548                                     wxDefaultDateTime,
 549                                     wxDefaultPosition,
 550                                     wxDefaultSize,
 551                                     wxCAL_MONDAY_FIRST |
 552                                     wxCAL_SHOW_HOLIDAYS |
 553                                     wxRAISED_BORDER);
 554
 555     // adjust to vertical/horizontal display, check mostly dedicated to WinCE
 556     bool horizontal = ( wxSystemSettings::GetMetric(wxSYS_SCREEN_X) > wxSystemSettings::GetMetric(wxSYS_SCREEN_Y) );
 557     m_sizer = new wxBoxSizer( horizontal ? wxHORIZONTAL : wxVERTICAL );
 558
 559     m_sizer->Add(m_date, 0, wxALIGN_CENTER | wxALL, 10 );
 560     m_sizer->Add(m_calendar, 0, wxALIGN_CENTER | wxALIGN_LEFT);
 561
 562     SetSizer( m_sizer );
 563     m_sizer->SetSizeHints( this );
 564 }
 565
 566 void MyPanel::OnCalendar(wxCalendarEvent& event)
 567 {
 568     wxLogMessage(wxT("Selected %s from calendar"),
 569                  event.GetDate().FormatISODate().c_str());
 570 }
 571
 572 void MyPanel::OnCalendarChange(wxCalendarEvent& event)
 573 {
 574     wxString s;
 575     s.Printf(wxT("Selected date: %s"), event.GetDate().FormatISODate().c_str());
 576
 577     m_date->SetLabel(s);
 578 }
 579
 580 void MyPanel::OnCalMonthChange(wxCalendarEvent& WXUNUSED(event))
 581 {
 582     wxLogStatus(wxT("Calendar month changed"));
 583 }
 584
 585 void MyPanel::OnCalYearChange(wxCalendarEvent& WXUNUSED(event))
 586 {
 587     wxLogStatus(wxT("Calendar year changed"));
 588 }
 589
 590 void MyPanel::OnCalendarWeekDayClick(wxCalendarEvent& event)
 591 {
 592     wxLogMessage(wxT("Clicked on %s"),
 593                  wxDateTime::GetWeekDayName(event.GetWeekDay()).c_str());
 594 }
 595
 596 void MyPanel::ToggleCalStyle(bool on, int flag)
 597 {
 598     long style = m_calendar->GetWindowStyle();
 599     if ( on )
 600         style |= flag;
 601     else
 602         style &= ~flag;
 603
 604     if ( flag == wxCAL_SEQUENTIAL_MONTH_SELECTION )
 605     {
 606         // changing this style requires recreating the control
 607         wxCalendarCtrl *calendar = new wxCalendarCtrl(this, Calendar_CalCtrl,
 608                                                       m_calendar->GetDate(),
 609                                                       wxDefaultPosition,
 610                                                       wxDefaultSize,
 611                                                       style);
 612         m_sizer->Replace(m_calendar, calendar);
 613         delete m_calendar;
 614         m_calendar = calendar;
 615
 616         m_sizer->Layout();
 617     }
 618     else // just changing the style is enough
 619     {
 620         m_calendar->SetWindowStyle(style);
 621
 622         m_calendar->Refresh();
 623     }
 624 }
 625
 626 void MyPanel::HighlightSpecial(bool on)
 627 {
 628     if ( on )
 629     {
 630         wxCalendarDateAttr
 631             *attrRedCircle = new wxCalendarDateAttr(wxCAL_BORDER_ROUND, *wxRED),
 632             *attrGreenSquare = new wxCalendarDateAttr(wxCAL_BORDER_SQUARE, *wxGREEN),
 633             *attrHeaderLike = new wxCalendarDateAttr(*wxBLUE, *wxLIGHT_GREY);
 634
 635         m_calendar->SetAttr(17, attrRedCircle);
 636         m_calendar->SetAttr(29, attrGreenSquare);
 637         m_calendar->SetAttr(13, attrHeaderLike);
 638     }
 639     else // off
 640     {
 641         m_calendar->ResetAttr(17);
 642         m_calendar->ResetAttr(29);
 643         m_calendar->ResetAttr(13);
 644     }
 645
 646     m_calendar->Refresh();
 647 }
 648
 649 // ----------------------------------------------------------------------------
 650 // MyDialog
 651 // ----------------------------------------------------------------------------
 652
 653 #if wxUSE_DATEPICKCTRL
 654
 655 MyDialog::MyDialog(wxWindow *parent, const wxDateTime& dt, int dtpStyle)
 656         : wxDialog(parent, wxID_ANY, wxString(_T("Calendar: Choose a date")))
 657 {
 658     wxStdDialogButtonSizer *sizerBtns = new wxStdDialogButtonSizer;
 659     sizerBtns->AddButton(new wxButton(this, wxID_OK));
 660     sizerBtns->AddButton(new wxButton(this, wxID_CANCEL));
 661     sizerBtns->Realize();
 662
 663     wxSizer *sizerText = new wxBoxSizer(wxHORIZONTAL);
 664     sizerText->Add(new wxStaticText(this, wxID_ANY, _T("Date in ISO format: ")),
 665                     wxSizerFlags().Border().Align(wxALIGN_CENTRE_VERTICAL));
 666     m_text = new wxTextCtrl(this, wxID_ANY);
 667     sizerText->Add(m_text, wxSizerFlags().
 668                         Expand().Border().Align(wxALIGN_CENTRE_VERTICAL));
 669
 670     wxSizer *sizerTop = new wxBoxSizer(wxVERTICAL);
 671     sizerTop->Add(new wxStaticText
 672                       (
 673                         this, wxID_ANY,
 674                         _T("Enter your birthday date (not before 20th century):")
 675                       ),
 676                     wxSizerFlags().Border());
 677
 678 #if wxUSE_DATEPICKCTRL_GENERIC
 679     wxFrame *frame = (wxFrame *)wxGetTopLevelParent(parent);
 680     if ( frame && frame->GetMenuBar()->IsChecked(Calendar_DatePicker_Generic) )
 681         m_datePicker = new wxDatePickerCtrlGeneric(this, wxID_ANY, dt,
 682                                                    wxDefaultPosition,
 683                                                    wxDefaultSize,
 684                                                    dtpStyle);
 685     else
 686 #endif // wxUSE_DATEPICKCTRL_GENERIC
 687     m_datePicker = new wxDatePickerCtrl(this, wxID_ANY, dt,
 688                                         wxDefaultPosition, wxDefaultSize,
 689                                         dtpStyle);
 690     m_datePicker->SetRange(wxDateTime(1, wxDateTime::Jan, 1900),
 691                             wxDefaultDateTime);
 692     sizerTop->Add(m_datePicker, wxSizerFlags().Expand().Border());
 693
 694     sizerTop->AddStretchSpacer(1);
 695     sizerTop->Add(sizerText);
 696
 697     sizerTop->Add(sizerBtns, wxSizerFlags().Centre().Border());
 698
 699     SetSizerAndFit(sizerTop);
 700     Layout();
 701 }
 702
 703 void MyDialog::OnDateChange(wxDateEvent& event)
 704 {
 705     const wxDateTime dt = event.GetDate();
 706     if ( dt.IsValid() )
 707         m_text->SetValue(dt.FormatISODate());
 708     else
 709         m_text->SetValue(wxEmptyString);
 710 }
 711
 712 #endif // wxUSE_DATEPICKCTRL