src/generic/calctrl.cpp

   1 ///////////////////////////////////////////////////////////////////////////////
   2 // Name:        generic/calctrl.cpp
   3 // Purpose:     implementation fo the generic wxCalendarCtrl
   4 // Author:      Vadim Zeitlin
   5 // Modified by:
   6 // Created:     29.12.99
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) 1999 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
   9 // Licence:     wxWindows licence
  10 ///////////////////////////////////////////////////////////////////////////////
  11
  12 // ============================================================================
  13 // declarations
  14 // ============================================================================
  15
  16 // ----------------------------------------------------------------------------
  17 // headers
  18 // ----------------------------------------------------------------------------
  19
  20 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
  21     #pragma implementation "calctrl.h"
  22 #endif
  23
  24 // For compilers that support precompilation, includes "wx.h".
  25 #include "wx/wxprec.h"
  26
  27 #ifdef __BORLANDC__
  28     #pragma hdrstop
  29 #endif
  30
  31 #ifndef WX_PRECOMP
  32     #include "wx/dcclient.h"
  33     #include "wx/settings.h"
  34     #include "wx/brush.h"
  35     #include "wx/combobox.h"
  36     #include "wx/listbox.h"
  37     #include "wx/stattext.h"
  38     #include "wx/textctrl.h"
  39 #endif //WX_PRECOMP
  40
  41 #if wxUSE_CALENDARCTRL
  42
  43 #include "wx/spinctrl.h"
  44
  45 // if wxDatePickerCtrl code doesn't define the date event, do it here as we
  46 // need it as well
  47 #if !wxUSE_DATEPICKCTRL
  48     #define _WX_DEFINE_DATE_EVENTS_
  49 #endif
  50
  51 #include "wx/calctrl.h"
  52
  53 #define DEBUG_PAINT 0
  54
  55 // ----------------------------------------------------------------------------
  56 // wxWin macros
  57 // ----------------------------------------------------------------------------
  58
  59 BEGIN_EVENT_TABLE(wxCalendarCtrl, wxControl)
  60     EVT_PAINT(wxCalendarCtrl::OnPaint)
  61
  62     EVT_CHAR(wxCalendarCtrl::OnChar)
  63
  64     EVT_LEFT_DOWN(wxCalendarCtrl::OnClick)
  65     EVT_LEFT_DCLICK(wxCalendarCtrl::OnDClick)
  66 END_EVENT_TABLE()
  67
  68 #if wxUSE_EXTENDED_RTTI
  69 WX_DEFINE_FLAGS( wxCalendarCtrlStyle )
  70
  71 wxBEGIN_FLAGS( wxCalendarCtrlStyle )
  72     // new style border flags, we put them first to
  73     // use them for streaming out
  74     wxFLAGS_MEMBER(wxBORDER_SIMPLE)
  75     wxFLAGS_MEMBER(wxBORDER_SUNKEN)
  76     wxFLAGS_MEMBER(wxBORDER_DOUBLE)
  77     wxFLAGS_MEMBER(wxBORDER_RAISED)
  78     wxFLAGS_MEMBER(wxBORDER_STATIC)
  79     wxFLAGS_MEMBER(wxBORDER_NONE)
  80
  81     // old style border flags
  82     wxFLAGS_MEMBER(wxSIMPLE_BORDER)
  83     wxFLAGS_MEMBER(wxSUNKEN_BORDER)
  84     wxFLAGS_MEMBER(wxDOUBLE_BORDER)
  85     wxFLAGS_MEMBER(wxRAISED_BORDER)
  86     wxFLAGS_MEMBER(wxSTATIC_BORDER)
  87     wxFLAGS_MEMBER(wxBORDER)
  88
  89     // standard window styles
  90     wxFLAGS_MEMBER(wxTAB_TRAVERSAL)
  91     wxFLAGS_MEMBER(wxCLIP_CHILDREN)
  92     wxFLAGS_MEMBER(wxTRANSPARENT_WINDOW)
  93     wxFLAGS_MEMBER(wxWANTS_CHARS)
  94     wxFLAGS_MEMBER(wxFULL_REPAINT_ON_RESIZE)
  95     wxFLAGS_MEMBER(wxALWAYS_SHOW_SB )
  96     wxFLAGS_MEMBER(wxVSCROLL)
  97     wxFLAGS_MEMBER(wxHSCROLL)
  98
  99     wxFLAGS_MEMBER(wxCAL_SUNDAY_FIRST)
 100     wxFLAGS_MEMBER(wxCAL_MONDAY_FIRST)
 101     wxFLAGS_MEMBER(wxCAL_SHOW_HOLIDAYS)
 102     wxFLAGS_MEMBER(wxCAL_NO_YEAR_CHANGE)
 103     wxFLAGS_MEMBER(wxCAL_NO_MONTH_CHANGE)
 104     wxFLAGS_MEMBER(wxCAL_SEQUENTIAL_MONTH_SELECTION)
 105     wxFLAGS_MEMBER(wxCAL_SHOW_SURROUNDING_WEEKS)
 106
 107 wxEND_FLAGS( wxCalendarCtrlStyle )
 108
 109 IMPLEMENT_DYNAMIC_CLASS_XTI(wxCalendarCtrl, wxControl,"wx/calctrl.h")
 110
 111 wxBEGIN_PROPERTIES_TABLE(wxCalendarCtrl)
 112     wxEVENT_RANGE_PROPERTY( Updated , wxEVT_CALENDAR_SEL_CHANGED , wxEVT_CALENDAR_WEEKDAY_CLICKED , wxCalendarEvent )
 113     wxHIDE_PROPERTY( Children )
 114     wxPROPERTY( Date,wxDateTime, SetDate , GetDate, , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
 115     wxPROPERTY_FLAGS( WindowStyle , wxCalendarCtrlStyle , long , SetWindowStyleFlag , GetWindowStyleFlag , , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // style
 116 wxEND_PROPERTIES_TABLE()
 117
 118 wxBEGIN_HANDLERS_TABLE(wxCalendarCtrl)
 119 wxEND_HANDLERS_TABLE()
 120
 121 wxCONSTRUCTOR_6( wxCalendarCtrl , wxWindow* , Parent , wxWindowID , Id , wxDateTime , Date , wxPoint , Position , wxSize , Size , long , WindowStyle )
 122 #else
 123 IMPLEMENT_DYNAMIC_CLASS(wxCalendarCtrl, wxControl)
 124 #endif
 125 IMPLEMENT_DYNAMIC_CLASS(wxCalendarEvent, wxDateEvent)
 126
 127 // ----------------------------------------------------------------------------
 128 // events
 129 // ----------------------------------------------------------------------------
 130
 131 DEFINE_EVENT_TYPE(wxEVT_CALENDAR_SEL_CHANGED)
 132 DEFINE_EVENT_TYPE(wxEVT_CALENDAR_DAY_CHANGED)
 133 DEFINE_EVENT_TYPE(wxEVT_CALENDAR_MONTH_CHANGED)
 134 DEFINE_EVENT_TYPE(wxEVT_CALENDAR_YEAR_CHANGED)
 135 DEFINE_EVENT_TYPE(wxEVT_CALENDAR_DOUBLECLICKED)
 136 DEFINE_EVENT_TYPE(wxEVT_CALENDAR_WEEKDAY_CLICKED)
 137
 138 // ============================================================================
 139 // implementation
 140 // ============================================================================
 141
 142 // ----------------------------------------------------------------------------
 143 // wxCalendarCtrl
 144 // ----------------------------------------------------------------------------
 145
 146 wxCalendarCtrl::wxCalendarCtrl(wxWindow *parent,
 147                    wxWindowID id,
 148                    const wxDateTime& date,
 149                    const wxPoint& pos,
 150                    const wxSize& size,
 151                    long style,
 152                    const wxString& name)
 153 {
 154     Init();
 155
 156     (void)Create(parent, id, date, pos, size, style, name);
 157 }
 158
 159 void wxCalendarCtrl::Init()
 160 {
 161     m_comboMonth = NULL;
 162     m_spinYear = NULL;
 163     m_staticYear = NULL;
 164     m_staticMonth = NULL;
 165
 166     m_userChangedYear = false;
 167
 168     m_widthCol =
 169     m_heightRow = 0;
 170
 171     wxDateTime::WeekDay wd;
 172     for ( wd = wxDateTime::Sun; wd < wxDateTime::Inv_WeekDay; wxNextWDay(wd) )
 173     {
 174         m_weekdays[wd] = wxDateTime::GetWeekDayName(wd, wxDateTime::Name_Abbr);
 175     }
 176
 177     for ( size_t n = 0; n < WXSIZEOF(m_attrs); n++ )
 178     {
 179         m_attrs[n] = NULL;
 180     }
 181
 182     m_colHighlightFg = wxSystemSettings::GetColour(wxSYS_COLOUR_HIGHLIGHTTEXT);
 183     m_colHighlightBg = wxSystemSettings::GetColour(wxSYS_COLOUR_HIGHLIGHT);
 184
 185     m_colHolidayFg = *wxRED;
 186     // don't set m_colHolidayBg - by default, same as our bg colour
 187
 188     m_colHeaderFg = *wxBLUE;
 189     m_colHeaderBg = *wxLIGHT_GREY;
 190 }
 191
 192 bool wxCalendarCtrl::Create(wxWindow *parent,
 193                             wxWindowID id,
 194                             const wxDateTime& date,
 195                             const wxPoint& pos,
 196                             const wxSize& size,
 197                             long style,
 198                             const wxString& name)
 199 {
 200     if ( !wxControl::Create(parent, id, pos, size,
 201                             style | wxCLIP_CHILDREN | wxWANTS_CHARS,
 202                             wxDefaultValidator, name) )
 203     {
 204         return false;
 205     }
 206
 207     // needed to get the arrow keys normally used for the dialog navigation
 208     SetWindowStyle(style | wxWANTS_CHARS);
 209
 210     m_date = date.IsValid() ? date : wxDateTime::Today();
 211
 212     m_lowdate = wxDefaultDateTime;
 213     m_highdate = wxDefaultDateTime;
 214
 215     if ( !HasFlag(wxCAL_SEQUENTIAL_MONTH_SELECTION) )
 216     {
 217         CreateYearSpinCtrl();
 218         m_staticYear = new wxStaticText(GetParent(), wxID_ANY, m_date.Format(_T("%Y")),
 219                                         wxDefaultPosition, wxDefaultSize,
 220                                         wxALIGN_CENTRE);
 221
 222         CreateMonthComboBox();
 223         m_staticMonth = new wxStaticText(GetParent(), wxID_ANY, m_date.Format(_T("%B")),
 224                                          wxDefaultPosition, wxDefaultSize,
 225                                          wxALIGN_CENTRE);
 226     }
 227
 228     ShowCurrentControls();
 229
 230     // we need to set the position as well because the main control position
 231     // is not the same as the one specified in pos if we have the controls
 232     // above it
 233     SetBestSize(size);
 234     SetPosition(pos);
 235
 236     // Since we don't paint the whole background make sure that the platform
 237     // will use the right one.
 238     SetBackgroundColour(GetBackgroundColour());
 239
 240     SetHolidayAttrs();
 241
 242     return true;
 243 }
 244
 245 wxCalendarCtrl::~wxCalendarCtrl()
 246 {
 247     for ( size_t n = 0; n < WXSIZEOF(m_attrs); n++ )
 248     {
 249         delete m_attrs[n];
 250     }
 251 }
 252
 253 // ----------------------------------------------------------------------------
 254 // Create the wxComboBox and wxSpinCtrl
 255 // ----------------------------------------------------------------------------
 256
 257 void wxCalendarCtrl::CreateMonthComboBox()
 258 {
 259     m_comboMonth = new wxComboBox(GetParent(), wxID_ANY,
 260                                   wxEmptyString,
 261                                   wxDefaultPosition,
 262                                   wxDefaultSize,
 263                                   0, NULL,
 264                                   wxCB_READONLY | wxCLIP_SIBLINGS);
 265
 266     wxDateTime::Month m;
 267     for ( m = wxDateTime::Jan; m < wxDateTime::Inv_Month; wxNextMonth(m) )
 268     {
 269         m_comboMonth->Append(wxDateTime::GetMonthName(m));
 270     }
 271
 272     m_comboMonth->SetSelection(GetDate().GetMonth());
 273     m_comboMonth->SetSize(wxDefaultCoord,
 274                           wxDefaultCoord,
 275                           wxDefaultCoord,
 276                           wxDefaultCoord,
 277                           wxSIZE_AUTO_WIDTH|wxSIZE_AUTO_HEIGHT);
 278
 279     m_comboMonth->Connect(wxEVT_COMMAND_COMBOBOX_SELECTED,
 280                           wxCommandEventHandler(wxCalendarCtrl::OnMonthChange),
 281                           NULL, this);
 282 }
 283
 284 void wxCalendarCtrl::CreateYearSpinCtrl()
 285 {
 286     m_spinYear = new wxSpinCtrl(GetParent(), wxID_ANY,
 287                                 GetDate().Format(_T("%Y")),
 288                                 wxDefaultPosition,
 289                                 wxDefaultSize,
 290                                 wxSP_ARROW_KEYS | wxCLIP_SIBLINGS,
 291                                 -4300, 10000, GetDate().GetYear());
 292
 293     m_spinYear->Connect(wxEVT_COMMAND_TEXT_UPDATED,
 294                         wxCommandEventHandler(wxCalendarCtrl::OnYearTextChange),
 295                         NULL, this);
 296
 297     m_spinYear->Connect(wxEVT_COMMAND_SPINCTRL_UPDATED,
 298                         wxCommandEventHandler(wxCalendarCtrl::OnYearChange),
 299                         NULL, this);
 300 }
 301
 302 // ----------------------------------------------------------------------------
 303 // forward wxWin functions to subcontrols
 304 // ----------------------------------------------------------------------------
 305
 306 bool wxCalendarCtrl::Destroy()
 307 {
 308     if ( m_staticYear )
 309         m_staticYear->Destroy();
 310     if ( m_spinYear )
 311         m_spinYear->Destroy();
 312     if ( m_comboMonth )
 313         m_comboMonth->Destroy();
 314     if ( m_staticMonth )
 315         m_staticMonth->Destroy();
 316
 317     m_staticYear = NULL;
 318     m_spinYear = NULL;
 319     m_comboMonth = NULL;
 320     m_staticMonth = NULL;
 321
 322     return wxControl::Destroy();
 323 }
 324
 325 bool wxCalendarCtrl::Show(bool show)
 326 {
 327     if ( !wxControl::Show(show) )
 328     {
 329         return false;
 330     }
 331
 332     if ( !(GetWindowStyle() & wxCAL_SEQUENTIAL_MONTH_SELECTION) )
 333     {
 334         if ( GetMonthControl() )
 335         {
 336             GetMonthControl()->Show(show);
 337             GetYearControl()->Show(show);
 338         }
 339     }
 340
 341     return true;
 342 }
 343
 344 bool wxCalendarCtrl::Enable(bool enable)
 345 {
 346     if ( !wxControl::Enable(enable) )
 347     {
 348         return false;
 349     }
 350
 351     if ( !(GetWindowStyle() & wxCAL_SEQUENTIAL_MONTH_SELECTION) )
 352     {
 353         GetMonthControl()->Enable(enable);
 354         GetYearControl()->Enable(enable);
 355     }
 356
 357     return true;
 358 }
 359
 360 // ----------------------------------------------------------------------------
 361 // enable/disable month/year controls
 362 // ----------------------------------------------------------------------------
 363
 364 void wxCalendarCtrl::ShowCurrentControls()
 365 {
 366     if ( !HasFlag(wxCAL_SEQUENTIAL_MONTH_SELECTION) )
 367     {
 368         if ( AllowMonthChange() )
 369         {
 370             m_comboMonth->Show();
 371             m_staticMonth->Hide();
 372
 373             if ( AllowYearChange() )
 374             {
 375                 m_spinYear->Show();
 376                 m_staticYear->Hide();
 377
 378                 // skip the rest
 379                 return;
 380             }
 381         }
 382         else
 383         {
 384             m_comboMonth->Hide();
 385             m_staticMonth->Show();
 386         }
 387
 388         // year change not allowed here
 389         m_spinYear->Hide();
 390         m_staticYear->Show();
 391     }
 392 }
 393
 394 wxControl *wxCalendarCtrl::GetMonthControl() const
 395 {
 396     return AllowMonthChange() ? (wxControl *)m_comboMonth : (wxControl *)m_staticMonth;
 397 }
 398
 399 wxControl *wxCalendarCtrl::GetYearControl() const
 400 {
 401     return AllowYearChange() ? (wxControl *)m_spinYear : (wxControl *)m_staticYear;
 402 }
 403
 404 void wxCalendarCtrl::EnableYearChange(bool enable)
 405 {
 406     if ( enable != AllowYearChange() )
 407     {
 408         long style = GetWindowStyle();
 409         if ( enable )
 410             style &= ~wxCAL_NO_YEAR_CHANGE;
 411         else
 412             style |= wxCAL_NO_YEAR_CHANGE;
 413         SetWindowStyle(style);
 414
 415         ShowCurrentControls();
 416         if ( GetWindowStyle() & wxCAL_SEQUENTIAL_MONTH_SELECTION )
 417         {
 418             Refresh();
 419         }
 420     }
 421 }
 422
 423 void wxCalendarCtrl::EnableMonthChange(bool enable)
 424 {
 425     if ( enable != AllowMonthChange() )
 426     {
 427         long style = GetWindowStyle();
 428         if ( enable )
 429             style &= ~wxCAL_NO_MONTH_CHANGE;
 430         else
 431             style |= wxCAL_NO_MONTH_CHANGE;
 432         SetWindowStyle(style);
 433
 434         ShowCurrentControls();
 435         if ( GetWindowStyle() & wxCAL_SEQUENTIAL_MONTH_SELECTION )
 436         {
 437             Refresh();
 438         }
 439     }
 440 }
 441
 442 // ----------------------------------------------------------------------------
 443 // changing date
 444 // ----------------------------------------------------------------------------
 445
 446 bool wxCalendarCtrl::SetDate(const wxDateTime& date)
 447 {
 448     bool retval = true;
 449
 450     bool sameMonth = m_date.GetMonth() == date.GetMonth(),
 451          sameYear = m_date.GetYear() == date.GetYear();
 452
 453     if ( IsDateInRange(date) )
 454     {
 455         if ( sameMonth && sameYear )
 456         {
 457             // just change the day
 458             ChangeDay(date);
 459         }
 460         else
 461         {
 462             if ( AllowMonthChange() && (AllowYearChange() || sameYear) )
 463             {
 464                 // change everything
 465                 m_date = date;
 466
 467                 if ( !(GetWindowStyle() & wxCAL_SEQUENTIAL_MONTH_SELECTION) )
 468                 {
 469                     // update the controls
 470                     m_comboMonth->SetSelection(m_date.GetMonth());
 471
 472                     if ( AllowYearChange() )
 473                     {
 474                         if ( !m_userChangedYear )
 475                             m_spinYear->SetValue(m_date.Format(_T("%Y")));
 476                     }
 477                 }
 478
 479                 // as the month changed, holidays did too
 480                 SetHolidayAttrs();
 481
 482                 // update the calendar
 483                 Refresh();
 484             }
 485             else
 486             {
 487                 // forbidden
 488                 retval = false;
 489             }
 490         }
 491     }
 492
 493     m_userChangedYear = false;
 494
 495     return retval;
 496 }
 497
 498 void wxCalendarCtrl::ChangeDay(const wxDateTime& date)
 499 {
 500     if ( m_date != date )
 501     {
 502         // we need to refresh the row containing the old date and the one
 503         // containing the new one
 504         wxDateTime dateOld = m_date;
 505         m_date = date;
 506
 507         RefreshDate(dateOld);
 508
 509         // if the date is in the same row, it was already drawn correctly
 510         if ( GetWeek(m_date) != GetWeek(dateOld) )
 511         {
 512             RefreshDate(m_date);
 513         }
 514     }
 515 }
 516
 517 void wxCalendarCtrl::SetDateAndNotify(const wxDateTime& date)
 518 {
 519     wxDateTime::Tm tm1 = m_date.GetTm(),
 520                    tm2 = date.GetTm();
 521
 522     wxEventType type;
 523     if ( tm1.year != tm2.year )
 524         type = wxEVT_CALENDAR_YEAR_CHANGED;
 525     else if ( tm1.mon != tm2.mon )
 526         type = wxEVT_CALENDAR_MONTH_CHANGED;
 527     else if ( tm1.mday != tm2.mday )
 528         type = wxEVT_CALENDAR_DAY_CHANGED;
 529     else
 530         return;
 531
 532     if ( SetDate(date) )
 533     {
 534         GenerateEvents(type, wxEVT_CALENDAR_SEL_CHANGED);
 535     }
 536 }
 537
 538 // ----------------------------------------------------------------------------
 539 // date range
 540 // ----------------------------------------------------------------------------
 541
 542 bool wxCalendarCtrl::SetLowerDateLimit(const wxDateTime& date /* = wxDefaultDateTime */)
 543 {
 544     bool retval = true;
 545
 546     if ( !(date.IsValid()) || ( ( m_highdate.IsValid() ) ? ( date <= m_highdate ) : true ) )
 547     {
 548         m_lowdate = date;
 549     }
 550     else
 551     {
 552         retval = false;
 553     }
 554
 555     return retval;
 556 }
 557
 558 bool wxCalendarCtrl::SetUpperDateLimit(const wxDateTime& date /* = wxDefaultDateTime */)
 559 {
 560     bool retval = true;
 561
 562     if ( !(date.IsValid()) || ( ( m_lowdate.IsValid() ) ? ( date >= m_lowdate ) : true ) )
 563     {
 564         m_highdate = date;
 565     }
 566     else
 567     {
 568         retval = false;
 569     }
 570
 571     return retval;
 572 }
 573
 574 bool wxCalendarCtrl::SetDateRange(const wxDateTime& lowerdate /* = wxDefaultDateTime */, const wxDateTime& upperdate /* = wxDefaultDateTime */)
 575 {
 576     bool retval = true;
 577
 578     if (
 579         ( !( lowerdate.IsValid() ) || ( ( upperdate.IsValid() ) ? ( lowerdate <= upperdate ) : true ) ) &&
 580         ( !( upperdate.IsValid() ) || ( ( lowerdate.IsValid() ) ? ( upperdate >= lowerdate ) : true ) ) )
 581     {
 582         m_lowdate = lowerdate;
 583         m_highdate = upperdate;
 584     }
 585     else
 586     {
 587         retval = false;
 588     }
 589
 590     return retval;
 591 }
 592
 593 // ----------------------------------------------------------------------------
 594 // date helpers
 595 // ----------------------------------------------------------------------------
 596
 597 wxDateTime wxCalendarCtrl::GetStartDate() const
 598 {
 599     wxDateTime::Tm tm = m_date.GetTm();
 600
 601     wxDateTime date = wxDateTime(1, tm.mon, tm.year);
 602
 603     // rewind back
 604     date.SetToPrevWeekDay(GetWindowStyle() & wxCAL_MONDAY_FIRST
 605                           ? wxDateTime::Mon : wxDateTime::Sun);
 606
 607     if ( GetWindowStyle() & wxCAL_SHOW_SURROUNDING_WEEKS )
 608     {
 609         // We want to offset the calendar if we start on the first..
 610         if ( date.GetDay() == 1 )
 611         {
 612             date -= wxDateSpan::Week();
 613         }
 614     }
 615
 616     return date;
 617 }
 618
 619 bool wxCalendarCtrl::IsDateShown(const wxDateTime& date) const
 620 {
 621     if ( !(GetWindowStyle() & wxCAL_SHOW_SURROUNDING_WEEKS) )
 622     {
 623         return date.GetMonth() == m_date.GetMonth();
 624     }
 625     else
 626     {
 627         return true;
 628     }
 629 }
 630
 631 bool wxCalendarCtrl::IsDateInRange(const wxDateTime& date) const
 632 {
 633     // Check if the given date is in the range specified
 634     return ( ( ( m_lowdate.IsValid() ) ? ( date >= m_lowdate ) : true )
 635         && ( ( m_highdate.IsValid() ) ? ( date <= m_highdate ) : true ) );
 636 }
 637
 638 bool wxCalendarCtrl::ChangeYear(wxDateTime* target) const
 639 {
 640     bool retval = false;
 641
 642     if ( !(IsDateInRange(*target)) )
 643     {
 644         if ( target->GetYear() < m_date.GetYear() )
 645         {
 646             if ( target->GetYear() >= GetLowerDateLimit().GetYear() )
 647             {
 648                 *target = GetLowerDateLimit();
 649                 retval = true;
 650             }
 651             else
 652             {
 653                 *target = m_date;
 654             }
 655         }
 656         else
 657         {
 658             if ( target->GetYear() <= GetUpperDateLimit().GetYear() )
 659             {
 660                 *target = GetUpperDateLimit();
 661                 retval = true;
 662             }
 663             else
 664             {
 665                 *target = m_date;
 666             }
 667         }
 668     }
 669     else
 670     {
 671         retval = true;
 672     }
 673
 674     return retval;
 675 }
 676
 677 bool wxCalendarCtrl::ChangeMonth(wxDateTime* target) const
 678 {
 679     bool retval = true;
 680
 681     if ( !(IsDateInRange(*target)) )
 682     {
 683         retval = false;
 684
 685         if ( target->GetMonth() < m_date.GetMonth() )
 686         {
 687             *target = GetLowerDateLimit();
 688         }
 689         else
 690         {
 691             *target = GetUpperDateLimit();
 692         }
 693     }
 694
 695     return retval;
 696 }
 697
 698 size_t wxCalendarCtrl::GetWeek(const wxDateTime& date) const
 699 {
 700     size_t retval = date.GetWeekOfMonth(GetWindowStyle() & wxCAL_MONDAY_FIRST
 701                                    ? wxDateTime::Monday_First
 702                                    : wxDateTime::Sunday_First);
 703
 704     if ( (GetWindowStyle() & wxCAL_SHOW_SURROUNDING_WEEKS) )
 705     {
 706         // we need to offset an extra week if we "start" on the 1st of the month
 707         wxDateTime::Tm tm = date.GetTm();
 708
 709         wxDateTime datetest = wxDateTime(1, tm.mon, tm.year);
 710
 711         // rewind back
 712         datetest.SetToPrevWeekDay(GetWindowStyle() & wxCAL_MONDAY_FIRST
 713                               ? wxDateTime::Mon : wxDateTime::Sun);
 714
 715         if ( datetest.GetDay() == 1 )
 716         {
 717             retval += 1;
 718         }
 719     }
 720
 721     return retval;
 722 }
 723
 724 // ----------------------------------------------------------------------------
 725 // size management
 726 // ----------------------------------------------------------------------------
 727
 728 // this is a composite control and it must arrange its parts each time its
 729 // size or position changes: the combobox and spinctrl are along the top of
 730 // the available area and the calendar takes up therest of the space
 731
 732 // the static controls are supposed to be always smaller than combo/spin so we
 733 // always use the latter for size calculations and position the static to take
 734 // the same space
 735
 736 // the constants used for the layout
 737 #define VERT_MARGIN     5           // distance between combo and calendar
 738 #ifdef __WXMAC__
 739 #define HORZ_MARGIN    5           //                            spin
 740 #else
 741 #define HORZ_MARGIN    15           //                            spin
 742 #endif
 743 wxSize wxCalendarCtrl::DoGetBestSize() const
 744 {
 745     // calc the size of the calendar
 746     ((wxCalendarCtrl *)this)->RecalcGeometry(); // const_cast
 747
 748     wxCoord width = 7*m_widthCol,
 749             height = 7*m_heightRow + m_rowOffset + VERT_MARGIN;
 750
 751     if ( !HasFlag(wxCAL_SEQUENTIAL_MONTH_SELECTION) )
 752     {
 753         // the combobox doesn't report its height correctly (it returns the
 754         // height including the drop down list) so don't use it
 755         height += m_spinYear->GetBestSize().y;
 756     }
 757
 758         wxCoord w2= m_comboMonth->GetBestSize().x + HORZ_MARGIN + GetCharWidth()*6;
 759         if (width < w2)
 760           width=w2;
 761
 762     if ( !HasFlag(wxBORDER_NONE) )
 763     {
 764         // the border would clip the last line otherwise
 765         height += 6;
 766         width += 4;
 767     }
 768
 769     wxSize best(width, height);
 770     CacheBestSize(best);
 771     return best;
 772 }
 773
 774 void wxCalendarCtrl::DoSetSize(int x, int y,
 775                                int width, int height,
 776                                int sizeFlags)
 777 {
 778     wxControl::DoSetSize(x, y, width, height, sizeFlags);
 779 }
 780
 781 void wxCalendarCtrl::DoMoveWindow(int x, int y, int width, int height)
 782 {
 783     int yDiff;
 784
 785     if ( !HasFlag(wxCAL_SEQUENTIAL_MONTH_SELECTION) )
 786     {
 787         wxSize sizeCombo = m_comboMonth->GetSize();
 788         wxSize sizeStatic = m_staticMonth->GetSize();
 789         wxSize sizeSpin = m_spinYear->GetSize();
 790         int dy = (sizeCombo.y - sizeStatic.y) / 2;
 791         m_comboMonth->Move(x, y);
 792         m_staticMonth->SetSize(x, y + dy, sizeCombo.x, sizeStatic.y);
 793
 794         int xDiff = sizeCombo.x + HORZ_MARGIN;
 795
 796         m_spinYear->SetSize(x + xDiff, y, width - xDiff, sizeCombo.y);
 797         m_staticYear->SetSize(x + xDiff, y + dy, width - xDiff, sizeStatic.y);
 798
 799         yDiff = wxMax(sizeSpin.y, sizeCombo.y) + VERT_MARGIN;
 800     }
 801     else // no controls on the top
 802     {
 803         yDiff = 0;
 804     }
 805
 806     wxControl::DoMoveWindow(x, y + yDiff, width, height - yDiff);
 807 }
 808
 809 void wxCalendarCtrl::DoGetPosition(int *x, int *y) const
 810 {
 811     wxControl::DoGetPosition(x, y);
 812
 813     if ( !(GetWindowStyle() & wxCAL_SEQUENTIAL_MONTH_SELECTION) )
 814     {
 815         // our real top corner is not in this position
 816         if ( y )
 817         {
 818             *y -= GetMonthControl()->GetSize().y + VERT_MARGIN;
 819         }
 820     }
 821 }
 822
 823 void wxCalendarCtrl::DoGetSize(int *width, int *height) const
 824 {
 825     wxControl::DoGetSize(width, height);
 826
 827     if ( !(GetWindowStyle() & wxCAL_SEQUENTIAL_MONTH_SELECTION) )
 828     {
 829         // our real height is bigger
 830         if ( height && GetMonthControl())
 831         {
 832             *height += GetMonthControl()->GetSize().y + VERT_MARGIN;
 833         }
 834     }
 835 }
 836
 837 void wxCalendarCtrl::RecalcGeometry()
 838 {
 839     wxClientDC dc(this);
 840
 841     dc.SetFont(GetFont());
 842
 843     // determine the column width (we assume that the weekday names are always
 844     // wider (in any language) than the numbers)
 845     m_widthCol = 0;
 846     wxDateTime::WeekDay wd;
 847     for ( wd = wxDateTime::Sun; wd < wxDateTime::Inv_WeekDay; wxNextWDay(wd) )
 848     {
 849         wxCoord width;
 850         dc.GetTextExtent(m_weekdays[wd], &width, &m_heightRow);
 851         if ( width > m_widthCol )
 852         {
 853             m_widthCol = width;
 854         }
 855     }
 856
 857     // leave some margins
 858     m_widthCol += 2;
 859     m_heightRow += 2;
 860
 861     m_rowOffset = (GetWindowStyle() & wxCAL_SEQUENTIAL_MONTH_SELECTION) ? m_heightRow : 0; // conditional in relation to style
 862 }
 863
 864 // ----------------------------------------------------------------------------
 865 // drawing
 866 // ----------------------------------------------------------------------------
 867
 868 void wxCalendarCtrl::OnPaint(wxPaintEvent& WXUNUSED(event))
 869 {
 870     wxPaintDC dc(this);
 871
 872     dc.SetFont(GetFont());
 873
 874     RecalcGeometry();
 875
 876 #if DEBUG_PAINT
 877     wxLogDebug("--- starting to paint, selection: %s, week %u\n",
 878            m_date.Format("%a %d-%m-%Y %H:%M:%S").c_str(),
 879            GetWeek(m_date));
 880 #endif
 881
 882     wxCoord y = 0;
 883     wxCoord x0 = (GetSize().x - m_widthCol*7) /2;
 884     if (x0 < 0) x0 = 0;
 885
 886     if ( HasFlag(wxCAL_SEQUENTIAL_MONTH_SELECTION) )
 887     {
 888         // draw the sequential month-selector
 889
 890         dc.SetBackgroundMode(wxTRANSPARENT);
 891         dc.SetTextForeground(*wxBLACK);
 892         dc.SetBrush(wxBrush(m_colHeaderBg, wxSOLID));
 893         dc.SetPen(wxPen(m_colHeaderBg, 1, wxSOLID));
 894         dc.DrawRectangle(x0, y, GetClientSize().x, m_heightRow);
 895
 896         // Get extent of month-name + year
 897         wxCoord monthw, monthh;
 898         wxString headertext = m_date.Format(wxT("%B %Y"));
 899         dc.GetTextExtent(headertext, &monthw, &monthh);
 900
 901         // draw month-name centered above weekdays
 902         wxCoord monthx = ((m_widthCol * 7) - monthw) / 2 + x0;
 903         wxCoord monthy = ((m_heightRow - monthh) / 2) + y;
 904         dc.DrawText(headertext, monthx,  monthy);
 905
 906         // calculate the "month-arrows"
 907         wxPoint leftarrow[3];
 908         wxPoint rightarrow[3];
 909
 910         int arrowheight = monthh / 2;
 911
 912         leftarrow[0] = wxPoint(0, arrowheight / 2);
 913         leftarrow[1] = wxPoint(arrowheight / 2, 0);
 914         leftarrow[2] = wxPoint(arrowheight / 2, arrowheight - 1);
 915
 916         rightarrow[0] = wxPoint(0,0);
 917         rightarrow[1] = wxPoint(arrowheight / 2, arrowheight / 2);
 918         rightarrow[2] = wxPoint(0, arrowheight - 1);
 919
 920         // draw the "month-arrows"
 921
 922         wxCoord arrowy = (m_heightRow - arrowheight) / 2;
 923         wxCoord larrowx = (m_widthCol - (arrowheight / 2)) / 2 + x0;
 924         wxCoord rarrowx = ((m_widthCol - (arrowheight / 2)) / 2) + m_widthCol*6 + x0;
 925         m_leftArrowRect = m_rightArrowRect = wxRect(0,0,0,0);
 926
 927         if ( AllowMonthChange() )
 928         {
 929             wxDateTime ldpm = wxDateTime(1,m_date.GetMonth(), m_date.GetYear()) - wxDateSpan::Day(); // last day prev month
 930             // Check if range permits change
 931             if ( IsDateInRange(ldpm) && ( ( ldpm.GetYear() == m_date.GetYear() ) ? true : AllowYearChange() ) )
 932             {
 933                 m_leftArrowRect = wxRect(larrowx - 3, arrowy - 3, (arrowheight / 2) + 8, (arrowheight + 6));
 934                 dc.SetBrush(wxBrush(*wxBLACK, wxSOLID));
 935                 dc.SetPen(wxPen(*wxBLACK, 1, wxSOLID));
 936                 dc.DrawPolygon(3, leftarrow, larrowx , arrowy, wxWINDING_RULE);
 937                 dc.SetBrush(*wxTRANSPARENT_BRUSH);
 938                 dc.DrawRectangle(m_leftArrowRect);
 939             }
 940             wxDateTime fdnm = wxDateTime(1,m_date.GetMonth(), m_date.GetYear()) + wxDateSpan::Month(); // first day next month
 941             if ( IsDateInRange(fdnm) && ( ( fdnm.GetYear() == m_date.GetYear() ) ? true : AllowYearChange() ) )
 942             {
 943                 m_rightArrowRect = wxRect(rarrowx - 4, arrowy - 3, (arrowheight / 2) + 8, (arrowheight + 6));
 944                 dc.SetBrush(wxBrush(*wxBLACK, wxSOLID));
 945                 dc.SetPen(wxPen(*wxBLACK, 1, wxSOLID));
 946                 dc.DrawPolygon(3, rightarrow, rarrowx , arrowy, wxWINDING_RULE);
 947                 dc.SetBrush(*wxTRANSPARENT_BRUSH);
 948                 dc.DrawRectangle(m_rightArrowRect);
 949             }
 950         }
 951
 952         y += m_heightRow;
 953     }
 954
 955     // first draw the week days
 956     if ( IsExposed(x0, y, 7*m_widthCol, m_heightRow) )
 957     {
 958 #if DEBUG_PAINT
 959         wxLogDebug("painting the header");
 960 #endif
 961
 962         dc.SetBackgroundMode(wxTRANSPARENT);
 963         dc.SetTextForeground(m_colHeaderFg);
 964         dc.SetBrush(wxBrush(m_colHeaderBg, wxSOLID));
 965         dc.SetPen(wxPen(m_colHeaderBg, 1, wxSOLID));
 966         dc.DrawRectangle(0, y, GetClientSize().x, m_heightRow);
 967
 968         bool startOnMonday = (GetWindowStyle() & wxCAL_MONDAY_FIRST) != 0;
 969         for ( size_t wd = 0; wd < 7; wd++ )
 970         {
 971             size_t n;
 972             if ( startOnMonday )
 973                 n = wd == 6 ? 0 : wd + 1;
 974             else
 975                 n = wd;
 976             wxCoord dayw, dayh;
 977             dc.GetTextExtent(m_weekdays[n], &dayw, &dayh);
 978             dc.DrawText(m_weekdays[n], x0 + (wd*m_widthCol) + ((m_widthCol- dayw) / 2), y); // center the day-name
 979         }
 980     }
 981
 982     // then the calendar itself
 983     dc.SetTextForeground(*wxBLACK);
 984     //dc.SetFont(*wxNORMAL_FONT);
 985
 986     y += m_heightRow;
 987     wxDateTime date = GetStartDate();
 988
 989 #if DEBUG_PAINT
 990     wxLogDebug("starting calendar from %s\n",
 991             date.Format("%a %d-%m-%Y %H:%M:%S").c_str());
 992 #endif
 993
 994     dc.SetBackgroundMode(wxSOLID);
 995     for ( size_t nWeek = 1; nWeek <= 6; nWeek++, y += m_heightRow )
 996     {
 997         // if the update region doesn't intersect this row, don't paint it
 998         if ( !IsExposed(0, y, 7*m_widthCol, m_heightRow - 1) )
 999         {
1000             date += wxDateSpan::Week();
1001
1002             continue;
1003         }
1004
1005 #if DEBUG_PAINT
1006         wxLogDebug("painting week %d at y = %d\n", nWeek, y);
1007 #endif
1008
1009         for ( size_t wd = 0; wd < 7; wd++ )
1010         {
1011             if ( IsDateShown(date) )
1012             {
1013                 // don't use wxDate::Format() which prepends 0s
1014                 unsigned int day = date.GetDay();
1015                 wxString dayStr = wxString::Format(_T("%u"), day);
1016                 wxCoord width;
1017                 dc.GetTextExtent(dayStr, &width, (wxCoord *)NULL);
1018
1019                 bool changedColours = false,
1020                      changedFont = false;
1021
1022                 bool isSel = false;
1023                 wxCalendarDateAttr *attr = NULL;
1024
1025                 if ( date.GetMonth() != m_date.GetMonth() || !IsDateInRange(date) )
1026                 {
1027                     // surrounding week or out-of-range
1028                     // draw "disabled"
1029                     dc.SetTextForeground(*wxLIGHT_GREY);
1030                     changedColours = true;
1031                 }
1032                 else
1033                 {
1034                     isSel = date.IsSameDate(m_date);
1035                     attr = m_attrs[day - 1];
1036
1037                     if ( isSel )
1038                     {
1039                         dc.SetTextForeground(m_colHighlightFg);
1040                         dc.SetTextBackground(m_colHighlightBg);
1041
1042                         changedColours = true;
1043                     }
1044                     else if ( attr )
1045                     {
1046                         wxColour colFg, colBg;
1047
1048                         if ( attr->IsHoliday() )
1049                         {
1050                             colFg = m_colHolidayFg;
1051                             colBg = m_colHolidayBg;
1052                         }
1053                         else
1054                         {
1055                             colFg = attr->GetTextColour();
1056                             colBg = attr->GetBackgroundColour();
1057                         }
1058
1059                         if ( colFg.Ok() )
1060                         {
1061                             dc.SetTextForeground(colFg);
1062                             changedColours = true;
1063                         }
1064
1065                         if ( colBg.Ok() )
1066                         {
1067                             dc.SetTextBackground(colBg);
1068                             changedColours = true;
1069                         }
1070
1071                         if ( attr->HasFont() )
1072                         {
1073                             dc.SetFont(attr->GetFont());
1074                             changedFont = true;
1075                         }
1076                     }
1077                 }
1078
1079                 wxCoord x = wd*m_widthCol + (m_widthCol - width) / 2 + x0;
1080                 dc.DrawText(dayStr, x, y + 1);
1081
1082                 if ( !isSel && attr && attr->HasBorder() )
1083                 {
1084                     wxColour colBorder;
1085                     if ( attr->HasBorderColour() )
1086                     {
1087                         colBorder = attr->GetBorderColour();
1088                     }
1089                     else
1090                     {
1091                         colBorder = GetForegroundColour();
1092                     }
1093
1094                     wxPen pen(colBorder, 1, wxSOLID);
1095                     dc.SetPen(pen);
1096                     dc.SetBrush(*wxTRANSPARENT_BRUSH);
1097
1098                     switch ( attr->GetBorder() )
1099                     {
1100                         case wxCAL_BORDER_SQUARE:
1101                             dc.DrawRectangle(x - 2, y,
1102                                              width + 4, m_heightRow);
1103                             break;
1104
1105                         case wxCAL_BORDER_ROUND:
1106                             dc.DrawEllipse(x - 2, y,
1107                                            width + 4, m_heightRow);
1108                             break;
1109
1110                         default:
1111                             wxFAIL_MSG(_T("unknown border type"));
1112                     }
1113                 }
1114
1115                 if ( changedColours )
1116                 {
1117                     dc.SetTextForeground(GetForegroundColour());
1118                     dc.SetTextBackground(GetBackgroundColour());
1119                 }
1120
1121                 if ( changedFont )
1122                 {
1123                     dc.SetFont(GetFont());
1124                 }
1125             }
1126             //else: just don't draw it
1127
1128             date += wxDateSpan::Day();
1129         }
1130     }
1131
1132     // Greying out out-of-range background
1133     bool showSurrounding = (GetWindowStyle() & wxCAL_SHOW_SURROUNDING_WEEKS) != 0;
1134
1135     date = ( showSurrounding ) ? GetStartDate() : wxDateTime(1, m_date.GetMonth(), m_date.GetYear());
1136     if ( !IsDateInRange(date) )
1137     {
1138         wxDateTime firstOOR = GetLowerDateLimit() - wxDateSpan::Day(); // first out-of-range
1139
1140         wxBrush oorbrush = *wxLIGHT_GREY_BRUSH;
1141         oorbrush.SetStyle(wxFDIAGONAL_HATCH);
1142
1143         HighlightRange(&dc, date, firstOOR, wxTRANSPARENT_PEN, &oorbrush);
1144     }
1145
1146     date = ( showSurrounding ) ? GetStartDate() + wxDateSpan::Weeks(6) - wxDateSpan::Day() : wxDateTime().SetToLastMonthDay(m_date.GetMonth(), m_date.GetYear());
1147     if ( !IsDateInRange(date) )
1148     {
1149         wxDateTime firstOOR = GetUpperDateLimit() + wxDateSpan::Day(); // first out-of-range
1150
1151         wxBrush oorbrush = *wxLIGHT_GREY_BRUSH;
1152         oorbrush.SetStyle(wxFDIAGONAL_HATCH);
1153
1154         HighlightRange(&dc, firstOOR, date, wxTRANSPARENT_PEN, &oorbrush);
1155     }
1156
1157 #if DEBUG_PAINT
1158     wxLogDebug("+++ finished painting");
1159 #endif
1160 }
1161
1162 void wxCalendarCtrl::RefreshDate(const wxDateTime& date)
1163 {
1164     RecalcGeometry();
1165
1166     wxRect rect;
1167
1168     // always refresh the whole row at once because our OnPaint() will draw
1169     // the whole row anyhow - and this allows the small optimisation in
1170     // OnClick() below to work
1171     rect.x = 0;
1172
1173     rect.y = (m_heightRow * GetWeek(date)) + m_rowOffset;
1174
1175     rect.width = 7*m_widthCol;
1176     rect.height = m_heightRow;
1177
1178 #ifdef __WXMSW__
1179     // VZ: for some reason, the selected date seems to occupy more space under
1180     //     MSW - this is probably some bug in the font size calculations, but I
1181     //     don't know where exactly. This fix is ugly and leads to more
1182     //     refreshes than really needed, but without it the selected days
1183     //     leaves even more ugly underscores on screen.
1184     rect.Inflate(0, 1);
1185 #endif // MSW
1186
1187 #if DEBUG_PAINT
1188     wxLogDebug("*** refreshing week %d at (%d, %d)-(%d, %d)\n",
1189            GetWeek(date),
1190            rect.x, rect.y,
1191            rect.x + rect.width, rect.y + rect.height);
1192 #endif
1193
1194     Refresh(true, &rect);
1195 }
1196
1197 void wxCalendarCtrl::HighlightRange(wxPaintDC* pDC, const wxDateTime& fromdate, const wxDateTime& todate, wxPen* pPen, wxBrush* pBrush)
1198 {
1199     // Highlights the given range using pen and brush
1200     // Does nothing if todate < fromdate
1201
1202
1203 #if DEBUG_PAINT
1204     wxLogDebug("+++ HighlightRange: (%s) - (%s) +++", fromdate.Format("%d %m %Y"), todate.Format("%d %m %Y"));
1205 #endif
1206
1207     if ( todate >= fromdate )
1208     {
1209         // do stuff
1210         // date-coordinates
1211         int fd, fw;
1212         int td, tw;
1213
1214         // implicit: both dates must be currently shown - checked by GetDateCoord
1215         if ( GetDateCoord(fromdate, &fd, &fw) && GetDateCoord(todate, &td, &tw) )
1216         {
1217 #if DEBUG_PAINT
1218             wxLogDebug("Highlight range: (%i, %i) - (%i, %i)", fd, fw, td, tw);
1219 #endif
1220             if ( ( (tw - fw) == 1 ) && ( td < fd ) )
1221             {
1222                 // special case: interval 7 days or less not in same week
1223                 // split in two seperate intervals
1224                 wxDateTime tfd = fromdate + wxDateSpan::Days(7-fd);
1225                 wxDateTime ftd = tfd + wxDateSpan::Day();
1226 #if DEBUG_PAINT
1227                 wxLogDebug("Highlight: Seperate segments");
1228 #endif
1229                 // draw seperately
1230                 HighlightRange(pDC, fromdate, tfd, pPen, pBrush);
1231                 HighlightRange(pDC, ftd, todate, pPen, pBrush);
1232             }
1233             else
1234             {
1235                 int numpoints;
1236                 wxPoint corners[8]; // potentially 8 corners in polygon
1237
1238                 if ( fw == tw )
1239                 {
1240                     // simple case: same week
1241                     numpoints = 4;
1242                     corners[0] = wxPoint((fd - 1) * m_widthCol, (fw * m_heightRow) + m_rowOffset);
1243                     corners[1] = wxPoint((fd - 1) * m_widthCol, ((fw + 1 ) * m_heightRow) + m_rowOffset);
1244                     corners[2] = wxPoint(td * m_widthCol, ((tw + 1) * m_heightRow) + m_rowOffset);
1245                     corners[3] = wxPoint(td * m_widthCol, (tw * m_heightRow) + m_rowOffset);
1246                 }
1247                 else
1248                 {
1249                     int cidx = 0;
1250                     // "complex" polygon
1251                     corners[cidx] = wxPoint((fd - 1) * m_widthCol, (fw * m_heightRow) + m_rowOffset); cidx++;
1252
1253                     if ( fd > 1 )
1254                     {
1255                         corners[cidx] = wxPoint((fd - 1) * m_widthCol, ((fw + 1) * m_heightRow) + m_rowOffset); cidx++;
1256                         corners[cidx] = wxPoint(0, ((fw + 1) * m_heightRow) + m_rowOffset); cidx++;
1257                     }
1258
1259                     corners[cidx] = wxPoint(0, ((tw + 1) * m_heightRow) + m_rowOffset); cidx++;
1260                     corners[cidx] = wxPoint(td * m_widthCol, ((tw + 1) * m_heightRow) + m_rowOffset); cidx++;
1261
1262                     if ( td < 7 )
1263                     {
1264                         corners[cidx] = wxPoint(td * m_widthCol, (tw * m_heightRow) + m_rowOffset); cidx++;
1265                         corners[cidx] = wxPoint(7 * m_widthCol, (tw * m_heightRow) + m_rowOffset); cidx++;
1266                     }
1267
1268                     corners[cidx] = wxPoint(7 * m_widthCol, (fw * m_heightRow) + m_rowOffset); cidx++;
1269
1270                     numpoints = cidx;
1271                 }
1272
1273                 // draw the polygon
1274                 pDC->SetBrush(*pBrush);
1275                 pDC->SetPen(*pPen);
1276                 pDC->DrawPolygon(numpoints, corners);
1277             }
1278         }
1279     }
1280     // else do nothing
1281 #if DEBUG_PAINT
1282     wxLogDebug("--- HighlightRange ---");
1283 #endif
1284 }
1285
1286 bool wxCalendarCtrl::GetDateCoord(const wxDateTime& date, int *day, int *week) const
1287 {
1288     bool retval = true;
1289
1290 #if DEBUG_PAINT
1291     wxLogDebug("+++ GetDateCoord: (%s) +++", date.Format("%d %m %Y"));
1292 #endif
1293
1294     if ( IsDateShown(date) )
1295     {
1296         bool startOnMonday = ( GetWindowStyle() & wxCAL_MONDAY_FIRST ) != 0;
1297
1298         // Find day
1299         *day = date.GetWeekDay();
1300
1301         if ( *day == 0 ) // sunday
1302         {
1303             *day = ( startOnMonday ) ? 7 : 1;
1304         }
1305         else
1306         {
1307             *day += ( startOnMonday ) ? 0 : 1;
1308         }
1309
1310         int targetmonth = date.GetMonth() + (12 * date.GetYear());
1311         int thismonth = m_date.GetMonth() + (12 * m_date.GetYear());
1312
1313         // Find week
1314         if ( targetmonth == thismonth )
1315         {
1316             *week = GetWeek(date);
1317         }
1318         else
1319         {
1320             if ( targetmonth < thismonth )
1321             {
1322                 *week = 1; // trivial
1323             }
1324             else // targetmonth > thismonth
1325             {
1326                 wxDateTime ldcm;
1327                 int lastweek;
1328                 int lastday;
1329
1330                 // get the datecoord of the last day in the month currently shown
1331 #if DEBUG_PAINT
1332                 wxLogDebug("     +++ LDOM +++");
1333 #endif
1334                 GetDateCoord(ldcm.SetToLastMonthDay(m_date.GetMonth(), m_date.GetYear()), &lastday, &lastweek);
1335 #if DEBUG_PAINT
1336                 wxLogDebug("     --- LDOM ---");
1337 #endif
1338
1339                 wxTimeSpan span = date - ldcm;
1340
1341                 int daysfromlast = span.GetDays();
1342 #if DEBUG_PAINT
1343                 wxLogDebug("daysfromlast: %i", daysfromlast);
1344 #endif
1345                 if ( daysfromlast + lastday > 7 ) // past week boundary
1346                 {
1347                     int wholeweeks = (daysfromlast / 7);
1348                     *week = wholeweeks + lastweek;
1349                     if ( (daysfromlast - (7 * wholeweeks) + lastday) > 7 )
1350                     {
1351                         *week += 1;
1352                     }
1353                 }
1354                 else
1355                 {
1356                     *week = lastweek;
1357                 }
1358             }
1359         }
1360     }
1361     else
1362     {
1363         *day = -1;
1364         *week = -1;
1365         retval = false;
1366     }
1367
1368 #if DEBUG_PAINT
1369     wxLogDebug("--- GetDateCoord: (%s) = (%i, %i) ---", date.Format("%d %m %Y"), *day, *week);
1370 #endif
1371
1372     return retval;
1373 }
1374
1375 // ----------------------------------------------------------------------------
1376 // mouse handling
1377 // ----------------------------------------------------------------------------
1378
1379 void wxCalendarCtrl::OnDClick(wxMouseEvent& event)
1380 {
1381     if ( HitTest(event.GetPosition()) != wxCAL_HITTEST_DAY )
1382     {
1383         event.Skip();
1384     }
1385     else
1386     {
1387         GenerateEvent(wxEVT_CALENDAR_DOUBLECLICKED);
1388     }
1389 }
1390
1391 void wxCalendarCtrl::OnClick(wxMouseEvent& event)
1392 {
1393     wxDateTime date;
1394     wxDateTime::WeekDay wday;
1395     switch ( HitTest(event.GetPosition(), &date, &wday) )
1396     {
1397         case wxCAL_HITTEST_DAY:
1398             if ( IsDateInRange(date) )
1399             {
1400                 ChangeDay(date);
1401
1402                 GenerateEvents(wxEVT_CALENDAR_DAY_CHANGED,
1403                                wxEVT_CALENDAR_SEL_CHANGED);
1404             }
1405             break;
1406
1407         case wxCAL_HITTEST_HEADER:
1408             {
1409                 wxCalendarEvent event(this, wxEVT_CALENDAR_WEEKDAY_CLICKED);
1410                 event.m_wday = wday;
1411                 (void)GetEventHandler()->ProcessEvent(event);
1412             }
1413             break;
1414
1415         case wxCAL_HITTEST_DECMONTH:
1416         case wxCAL_HITTEST_INCMONTH:
1417         case wxCAL_HITTEST_SURROUNDING_WEEK:
1418             SetDateAndNotify(date); // we probably only want to refresh the control. No notification.. (maybe as an option?)
1419             break;
1420
1421         default:
1422             wxFAIL_MSG(_T("unknown hittest code"));
1423             // fall through
1424
1425         case wxCAL_HITTEST_NOWHERE:
1426             event.Skip();
1427             break;
1428     }
1429 }
1430
1431 wxCalendarHitTestResult wxCalendarCtrl::HitTest(const wxPoint& pos,
1432                                                 wxDateTime *date,
1433                                                 wxDateTime::WeekDay *wd)
1434 {
1435     RecalcGeometry();
1436
1437     wxCoord y = pos.y;
1438
1439 ///////////////////////////////////////////////////////////////////////////////////////////////////////
1440     if ( (GetWindowStyle() & wxCAL_SEQUENTIAL_MONTH_SELECTION) )
1441     {
1442         // Header: month
1443
1444         // we need to find out if the hit is on left arrow, on month or on right arrow
1445         // left arrow?
1446         if ( wxRegion(m_leftArrowRect).Contains(pos) == wxInRegion )
1447         {
1448             if ( date )
1449             {
1450                 if ( IsDateInRange(m_date - wxDateSpan::Month()) )
1451                 {
1452                     *date = m_date - wxDateSpan::Month();
1453                 }
1454                 else
1455                 {
1456                     *date = GetLowerDateLimit();
1457                 }
1458             }
1459
1460             return wxCAL_HITTEST_DECMONTH;
1461         }
1462
1463         if ( wxRegion(m_rightArrowRect).Contains(pos) == wxInRegion )
1464         {
1465             if ( date )
1466             {
1467                 if ( IsDateInRange(m_date + wxDateSpan::Month()) )
1468                 {
1469                     *date = m_date + wxDateSpan::Month();
1470                 }
1471                 else
1472                 {
1473                     *date = GetUpperDateLimit();
1474                 }
1475             }
1476
1477             return wxCAL_HITTEST_INCMONTH;
1478         }
1479
1480     }
1481
1482 ///////////////////////////////////////////////////////////////////////////////////////////////////////
1483     // Header: Days
1484     int wday = pos.x / m_widthCol;
1485 //    if ( y < m_heightRow )
1486     if ( y < (m_heightRow + m_rowOffset) )
1487     {
1488         if ( y > m_rowOffset )
1489         {
1490             if ( wd )
1491             {
1492                 if ( GetWindowStyle() & wxCAL_MONDAY_FIRST )
1493                 {
1494                     wday = wday == 6 ? 0 : wday + 1;
1495                 }
1496
1497                 *wd = (wxDateTime::WeekDay)wday;
1498             }
1499
1500             return wxCAL_HITTEST_HEADER;
1501         }
1502         else
1503         {
1504             return wxCAL_HITTEST_NOWHERE;
1505         }
1506     }
1507
1508 //    int week = (y - m_heightRow) / m_heightRow;
1509     int week = (y - (m_heightRow + m_rowOffset)) / m_heightRow;
1510     if ( week >= 6 || wday >= 7 )
1511     {
1512         return wxCAL_HITTEST_NOWHERE;
1513     }
1514
1515     wxDateTime dt = GetStartDate() + wxDateSpan::Days(7*week + wday);
1516
1517     if ( IsDateShown(dt) )
1518     {
1519         if ( date )
1520             *date = dt;
1521
1522         if ( dt.GetMonth() == m_date.GetMonth() )
1523         {
1524
1525             return wxCAL_HITTEST_DAY;
1526         }
1527         else
1528         {
1529             return wxCAL_HITTEST_SURROUNDING_WEEK;
1530         }
1531     }
1532     else
1533     {
1534         return wxCAL_HITTEST_NOWHERE;
1535     }
1536 }
1537
1538 // ----------------------------------------------------------------------------
1539 // subcontrols events handling
1540 // ----------------------------------------------------------------------------
1541
1542 void wxCalendarCtrl::OnMonthChange(wxCommandEvent& event)
1543 {
1544     wxDateTime::Tm tm = m_date.GetTm();
1545
1546     wxDateTime::Month mon = (wxDateTime::Month)event.GetInt();
1547     if ( tm.mday > wxDateTime::GetNumberOfDays(mon, tm.year) )
1548     {
1549         tm.mday = wxDateTime::GetNumberOfDays(mon, tm.year);
1550     }
1551
1552     wxDateTime target = wxDateTime(tm.mday, mon, tm.year);
1553
1554     ChangeMonth(&target);
1555     SetDateAndNotify(target);
1556 }
1557
1558 void wxCalendarCtrl::OnYearChange(wxCommandEvent& event)
1559 {
1560     int year = (int)event.GetInt();
1561     if ( year == INT_MIN )
1562     {
1563         // invalid year in the spin control, ignore it
1564         return;
1565     }
1566
1567     wxDateTime::Tm tm = m_date.GetTm();
1568
1569     if ( tm.mday > wxDateTime::GetNumberOfDays(tm.mon, year) )
1570     {
1571         tm.mday = wxDateTime::GetNumberOfDays(tm.mon, year);
1572     }
1573
1574     wxDateTime target = wxDateTime(tm.mday, tm.mon, year);
1575
1576     if ( ChangeYear(&target) )
1577     {
1578         SetDateAndNotify(target);
1579     }
1580     else
1581     {
1582         // In this case we don't want to change the date. That would put us
1583         // inside the same year but a strange number of months forward/back..
1584         m_spinYear->SetValue(target.GetYear());
1585     }
1586 }
1587
1588 void wxCalendarCtrl::OnYearTextChange(wxCommandEvent& event)
1589 {
1590     SetUserChangedYear();
1591     OnYearChange(event);
1592 }
1593
1594 // ----------------------------------------------------------------------------
1595 // keyboard interface
1596 // ----------------------------------------------------------------------------
1597
1598 void wxCalendarCtrl::OnChar(wxKeyEvent& event)
1599 {
1600     wxDateTime target;
1601     switch ( event.GetKeyCode() )
1602     {
1603         case _T('+'):
1604         case WXK_ADD:
1605             target = m_date + wxDateSpan::Year();
1606             if ( ChangeYear(&target) )
1607             {
1608                 SetDateAndNotify(target);
1609             }
1610             break;
1611
1612         case _T('-'):
1613         case WXK_SUBTRACT:
1614             target = m_date - wxDateSpan::Year();
1615             if ( ChangeYear(&target) )
1616             {
1617                 SetDateAndNotify(target);
1618             }
1619             break;
1620
1621         case WXK_PRIOR:
1622             target = m_date - wxDateSpan::Month();
1623             ChangeMonth(&target);
1624             SetDateAndNotify(target); // always
1625             break;
1626
1627         case WXK_NEXT:
1628             target = m_date + wxDateSpan::Month();
1629             ChangeMonth(&target);
1630             SetDateAndNotify(target); // always
1631             break;
1632
1633         case WXK_RIGHT:
1634             if ( event.ControlDown() )
1635             {
1636                 target = wxDateTime(m_date).SetToNextWeekDay(
1637                                  GetWindowStyle() & wxCAL_MONDAY_FIRST
1638                                  ? wxDateTime::Sun : wxDateTime::Sat);
1639                 if ( !IsDateInRange(target) )
1640                 {
1641                     target = GetUpperDateLimit();
1642                 }
1643                 SetDateAndNotify(target);
1644             }
1645             else
1646                 SetDateAndNotify(m_date + wxDateSpan::Day());
1647             break;
1648
1649         case WXK_LEFT:
1650             if ( event.ControlDown() )
1651             {
1652                 target = wxDateTime(m_date).SetToPrevWeekDay(
1653                                  GetWindowStyle() & wxCAL_MONDAY_FIRST
1654                                  ? wxDateTime::Mon : wxDateTime::Sun);
1655                 if ( !IsDateInRange(target) )
1656                 {
1657                     target = GetLowerDateLimit();
1658                 }
1659                 SetDateAndNotify(target);
1660             }
1661             else
1662                 SetDateAndNotify(m_date - wxDateSpan::Day());
1663             break;
1664
1665         case WXK_UP:
1666             SetDateAndNotify(m_date - wxDateSpan::Week());
1667             break;
1668
1669         case WXK_DOWN:
1670             SetDateAndNotify(m_date + wxDateSpan::Week());
1671             break;
1672
1673         case WXK_HOME:
1674             if ( event.ControlDown() )
1675                 SetDateAndNotify(wxDateTime::Today());
1676             else
1677                 SetDateAndNotify(wxDateTime(1, m_date.GetMonth(), m_date.GetYear()));
1678             break;
1679
1680         case WXK_END:
1681             SetDateAndNotify(wxDateTime(m_date).SetToLastMonthDay());
1682             break;
1683
1684         case WXK_RETURN:
1685             GenerateEvent(wxEVT_CALENDAR_DOUBLECLICKED);
1686             break;
1687
1688         default:
1689             event.Skip();
1690     }
1691 }
1692
1693 // ----------------------------------------------------------------------------
1694 // holidays handling
1695 // ----------------------------------------------------------------------------
1696
1697 void wxCalendarCtrl::EnableHolidayDisplay(bool display)
1698 {
1699     long style = GetWindowStyle();
1700     if ( display )
1701         style |= wxCAL_SHOW_HOLIDAYS;
1702     else
1703         style &= ~wxCAL_SHOW_HOLIDAYS;
1704
1705     SetWindowStyle(style);
1706
1707     if ( display )
1708         SetHolidayAttrs();
1709     else
1710         ResetHolidayAttrs();
1711
1712     Refresh();
1713 }
1714
1715 void wxCalendarCtrl::SetHolidayAttrs()
1716 {
1717     if ( GetWindowStyle() & wxCAL_SHOW_HOLIDAYS )
1718     {
1719         ResetHolidayAttrs();
1720
1721         wxDateTime::Tm tm = m_date.GetTm();
1722         wxDateTime dtStart(1, tm.mon, tm.year),
1723                    dtEnd = dtStart.GetLastMonthDay();
1724
1725         wxDateTimeArray hol;
1726         wxDateTimeHolidayAuthority::GetHolidaysInRange(dtStart, dtEnd, hol);
1727
1728         size_t count = hol.GetCount();
1729         for ( size_t n = 0; n < count; n++ )
1730         {
1731             SetHoliday(hol[n].GetDay());
1732         }
1733     }
1734 }
1735
1736 void wxCalendarCtrl::SetHoliday(size_t day)
1737 {
1738     wxCHECK_RET( day > 0 && day < 32, _T("invalid day in SetHoliday") );
1739
1740     wxCalendarDateAttr *attr = GetAttr(day);
1741     if ( !attr )
1742     {
1743         attr = new wxCalendarDateAttr;
1744     }
1745
1746     attr->SetHoliday(true);
1747
1748     // can't use SetAttr() because it would delete this pointer
1749     m_attrs[day - 1] = attr;
1750 }
1751
1752 void wxCalendarCtrl::ResetHolidayAttrs()
1753 {
1754     for ( size_t day = 0; day < 31; day++ )
1755     {
1756         if ( m_attrs[day] )
1757         {
1758             m_attrs[day]->SetHoliday(false);
1759         }
1760     }
1761 }
1762
1763
1764 //static
1765 wxVisualAttributes
1766 wxCalendarCtrl::GetClassDefaultAttributes(wxWindowVariant variant)
1767 {
1768     // Use the same color scheme as wxListBox
1769     return wxListBox::GetClassDefaultAttributes(variant);
1770 }
1771
1772 #endif // wxUSE_CALENDARCTRL
1773