Title: make some Days bold in the TMonthCalendar?
{
Use BoldDays to encode the days of the current month
that should appear in bold.
}
{
Mit BoldDays werden die Tage im aktuellen Monat codiert,
die fett angezeigt werden sollen.
}
procedure TForm1.MonthCalendar1GetMonthInfo(Sender: TObject;
Month: Cardinal; var MonthBoldInfo: Cardinal);
begin
if Month = 4 then { April}
MonthCalendar1.BoldDays([3,21,28],MonthBoldInfo); { Day 3, 21, 28 }
end;