Компонент 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;

обновляет текущую дату календаря.

Компонент tColorGrld

TObject->TPersistent->TComponent->TControl->TWinControl->

-”TCustomControl->TColorGrid

Модуль COLORGRD

Страница Палитры компонентов Samples

Компонент предназначен для выбора основного (передний план) и фонового цветов из шестнадцатицветной палитры. Текущее значение основного цвета отмечается на палитре символами FG (foreground), фонового цвета — симво­лами BG (background). Если они совпадают, показываются символы FB. Выбор основного цвета при работе компонента осуществляется нажатием левой кнопки мыши, фонового — правой. Видимость символов fg и bg задается свойствами:

(pb) property PoregroundEnabled: Boolean;

(РЬ) property BackgroundEnabled: Boolean;

Но даже если свойства ForegroundEnabled и BackgroundEnabled выключены, свойство:

(Pb) property ClickEnablesColor: Boolean;

в значении True устанавливает режим обязательного показа символов FG и FB при выборе нового цвета.

При смене цвета вызывается событие OnChange. Текущие номера цветов в таблице устанавливаются свойствами:

property Foregroundlndex: Integer;

(Pb) property Backgroundlndex: Integer;

Их значения при выполнении приложения можно получить из свойств:

^Ro) property ForegroundColor: TColor;

(Ro) property BackgroundColor: TColor;

Порядок расположения ячеек цветовой таблицы в компоненте задается свой­ством:

(Pb) property GiidOrdering: TGridOrdering;

TGridOrderinci = ,gol6xl, go8x2, go4x4, go2x8, golxl6);

Использование интерфейса ole

Значение, которое придается сегодня внедрению интерфейса OLE, трудно пере­оценить. Фирма Microsoft извещает о том, что на получение логотипа "Windows 95 Compatible" будут сертифицированы только те приложения, ко­торые имеют средства работы с OLE.

Разъяснять суть механизмов OLE с точки зрения пользователя здесь не имеет смысла; кратко опишем их с точки зрения программиста.

В создаваемый вами документ могут быть добавлены данные, созданные другим приложением: формулы, таблицы, графические файлы и т. п. Такие данные, рассматриваемые вместе с приложением, которое умеет их обрабаты­вать, будем называть объектом OLE, а такое приложение — сервером OLE. Дословный перевод аббревиатуры OLE означает "внедренные и связанные объекты". Разница между внедрением и связыванием состоит в том, где и как размещаются данные, представляющие объект. Внедренный объект хранится в самом документе и является его составной частью. Для связанного объекта хранится только ссылка на данные, которые могут находиться в другом до­кументе или в другой части этого документа. Каждый из способов имеет свои достоинства и недостатки. Наличие внедрен­ных объектов увеличивает размер документа, зато он обладает переносимостью, и несколько пользователей могут работать с ним одновременно. Когда объект связан, то он занимает гораздо меньше места, но такой документ нужно переносить вместе с данными, на которые он ссылается. Каждое изменение данных влечет за собой изменение во всех объектах, которые ссылаются на эти данные.

Возможности реализации OLE в рассматриваемой версии Delphi ограничены только поддержкой приема объектов. Тем, кто хочет создавать серверы OLE, придется подождать выпуска 32-разрядной версии Delphi, где возможности этого программного интерфейса будут реализованы в большей мере. В VCL имеется специальный компонент-контейнер, в который можно помещать данные OLE. Вставлять объекты в контейнер можно как на стадии разработки приложения, так и на стадии его выполнения. Здесь будет рассмотрен только последний вариант.