marcar fechas en tmonthcalendar

[aitken]

Buenas,

Necesito marcar diferentes fechas en un tmonthcalendar, y he intentado hacerlo con bolddays, pero no encuentro la manera, si alguién sabe alguna manera de hacerlo??

Se agradece vuestra ayuda!!

SAluDoS!!!

[marcoszorrilla]

Mira este ejemplo:

MC es el MonthCalendar.
Tienes que utilizar el evento GetMonthInfo, que se dispara cada vez que se activa un mes.

procedure TForm1.mcGetMonthInfo(Sender: TObject; Month: Cardinal;
var MonthBoldInfo: Cardinal);
begin
mc.BoldDays([1,8,15,22],MonthBoldInfo);
end;


Un Saludo.