Страница 58 из 59 Компонент TCalendar TObject^TPersistent^TComponent-”TControl->TWinControl—> —>TCustomControl—”TCustomGr id—”ТСа lends r Модуль CALENDAR Страница Палитры компонентов Samples Компонент представляет собой календарь. Текущие год, месяц и день в календаре соответственно задаются свойствами: J property Year: Integer; property Month: Integer; property Day: Integer; Внешний вид его определяется свойствами: (Pb) property GridLineWidth; — толщина разграничивающих линий; (Pa property Color; — цвет панели компонента. День, с которого начинается отображение недели, определяется свойством: (Pb) property StartOfWeek: TDayOfWeek; TDayOfWeek = 0..6 ; О определяет неделю, принятую в англоязычных странах (первый день недели — воскресенье), 1 задает более привычный порядок — с понедельника. Следующие значения последовательно смещают начало недели дальше. Свойство (pVl property UseCurrentDate: Boolean; возвращает True в случае совпадения текущих дат компонента и системных часов компьютера. Свойство property CalendarDate: TDateTime; содержит текущую дату в формате TDataTime. Все даты текущего месяца размещаются в векторном свойстве: (Ro) property CellText[ACol, ARow: Integer]: string; Методы procedure NextMonth; procedure NextYear; procedure PrevMonth; procedure PrevYear; соответственно увеличивают или уменьшают на единицу значение текущего месяца или года. Метод procedure UpdateCalendar; обновляет текущую дату календаря. |