Скачать: CL | DM;

"Подсветка даты" в TMonthCalendar А здесь смотрели?   Найти похожие ветки 

← →
Black   (2009-06-01 18:15) [0]

Подскажите пожалуйста как подсветить определенные даты, различные в каждом месяце, я знаю что есть свойство bolddays и кажется им можно подсвечивать только строго определенные заранее даты, мне нужно подсвечивать даты определяемые динамически во время выполнения программы. Заранее благодарю.

---

← →
И. Павел   (2009-06-03 09:52) [1]

Нужно написать такой обработчик события OnGetMonthInfo:

procedure TForm1.MCGetMonthInfo(Sender: TObject; Month:
Cardinal;
 var MonthBoldInfo: Cardinal);
begin
 MC.BoldDays([1,2,3,4,5], MonthBoldInfo);
end;

---

← →
И. Павел   (2009-06-03 09:54) [2]

В программе заведите массив
Days: array of Cardinal
меняйте его, когда нужно, и передавайте его в BoldDays:
MC.BoldDays(Days, MonthBoldInfo);

---

← →
И. Павел   (2009-06-03 10:03) [3]

А чтобы MCGetMonthInfo вызывался, после изменения массива Days можно, например, написать:
MC.Date:=MC.Date+40;
MC.Date:=MC.Date-40;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c