Puedes usar el evento OnGetMonthInfo para poner algunas fechas en negrita:
Código Delphi
[-]
procedure TForm1.MonthCalendar1GetMonthInfo(Sender: TObject;
Month: Cardinal; var MonthBoldInfo: Cardinal);
begin
if Month = 3 then MonthCalendar1.BoldDays([7, 21, 25], MonthBoldInfo); end;