
Delphi календарь!
Подскажите пожалуйста, как сделать так чтобы в календаре первое число каждого месяца было выделено цветом???? Заранее спасибо!!!! 

- Naeel Maqsudov
- Сообщения: 2570
- Зарегистрирован: 20 фев 2004, 19:17
- Откуда: Moscow, Russia
- Контактная информация:
Что за календарь? Имеется ли в виду визуальных компонент Календарь? Если да, то какой именно?
Вот такое задание.Создайте приложение, при выполнении которого на экране появляется окно формы с двенадцатью компонентами Calendar, отображающими месячные календари на текущий год с первым днем недели – понедельником и с выделенным днем: для текущего месяца – текущим днем, для остальных месяцев – первым днем месяца-вот это не знаю! Пожалуйста подскажите!!!!
Стандартный компонент не может данных вещей, он работает лишь с текущей датой. Если надо не закрасить а просто каким-то образом пометить, то могу предложить выделить первое число каждого месяца жирным шрифтом(вешать на ongetmonthinfo):
[syntax='Delphi']
procedure TForm1.MonthCalendar1GetMonthInfo(Sender: TObject; Month: Cardinal;
var MonthBoldInfo: Cardinal);
begin
MonthCalendar1.BoldDays([1],MonthBoldInfo);
end;
[/syntax]
Если же надо именно закрасить любым цветом, то опять-же у вас в задании не уточняется какой компонент использовать, то можно вывести календарь в виде отчета раскрасив нужные числа (по вашему заданию). Используйте тот-же report.
Во всех остальных случаях, либо писать функции самому к стандартному компоненту, либо использовать сторонний компонент, что опять-же маловероятно т.к. проект в другом месте уже не запустится.
[syntax='Delphi']
procedure TForm1.MonthCalendar1GetMonthInfo(Sender: TObject; Month: Cardinal;
var MonthBoldInfo: Cardinal);
begin
MonthCalendar1.BoldDays([1],MonthBoldInfo);
end;
[/syntax]
Если же надо именно закрасить любым цветом, то опять-же у вас в задании не уточняется какой компонент использовать, то можно вывести календарь в виде отчета раскрасив нужные числа (по вашему заданию). Используйте тот-же report.
Во всех остальных случаях, либо писать функции самому к стандартному компоненту, либо использовать сторонний компонент, что опять-же маловероятно т.к. проект в другом месте уже не запустится.
< L3X. (ICQ: 8721378, Mail - l3x@list.ru)
- Naeel Maqsudov
- Сообщения: 2570
- Зарегистрирован: 20 фев 2004, 19:17
- Откуда: Moscow, Russia
- Контактная информация:
Может, может." писал(а):Стандартный компонент не может данных вещей
Используйте свойства MinDate и MaxDate. Присвойте обоим первое число соответствующего месяца. Все дни в указанном интервале выделяются точно также как и текущий день.