Willst du nur wissen wann der Monat gewechselt wird
oder willst du es verhindern?
Wissen:
> aktuell eingerstellten Monat merken
> im OnChange vergleichen und neuen Monat merken
Verhindern:
> .MinDate und .MaxDate setzen
Delphi-Quellcode:
// z.B. für diesen Monat
MonthCalendar1.MinDate := EncodeDate(2010, 05, 01);
MonthCalendar1.MaxDate := EncodeDate(2010, 05, 30);
// aktueller Monat
var Y, M, D: Word;
DecodeDate(Now, Y, M, D);
MonthCalendar1.MinDate := Now - D + 1;
MonthCalendar1.MaxDate := Now - D + MonthDays[IsLeapYear(Y), M];