TMonthCalendar nur bestimmte Daten erlauben

[Klaus01]

Hallo Fabian,

Delphi-Quellcode:

procedure TForm1.MonthCalendar1Click(Sender: TObject);
begin
  if (sender as TMonthcalendar).Date  <> StrToDate('25.08.2010')then
    begin
      (sender as TMonthCalendar).date := date;
      (sender as TMonthCalendar).Invalidate;
    end;
end;

eventuell kannst Du dir ja auch noch die betreffenden Tage
mit TMonthCalendar.boldDays markieren.

Grüße
Klaus