Title: How to make some Days bold in the TMonthCalendar
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;