Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2009.07.26;
Скачать: [xml.tar.bz2];

Вниз

"Подсветка даты" в 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 вся ветка

Форум: "Начинающим";
Текущий архив: 2009.07.26;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.006 c
15-1243406709
Кто б сомневался
2009-05-27 10:45
2009.07.26
Защита ПО на основе серийника железа, и другой комьпютер


15-1242673872
Andy BitOff
2009-05-18 23:11
2009.07.26
Заработал универсальный вычислитель ответов. Потестим?


2-1243489065
lewka
2009-05-28 09:37
2009.07.26
Работа с IP-адресом


6-1205446069
IFrau Randt
2008-03-14 01:07
2009.07.26
NMHTTP


11-1203566557
Jon
2008-02-21 07:02
2009.07.26
Error with CxKOLTiffJpg





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский