Перейдем к анализу графического оформления ячейки. Ячейка представляет
собой прямоугольную область. Эта область, кроме отображаемого в ней
значения, имеет такие свойства, как заливка и граница. Как заливка ячей-
ки, так и граница имеют соответствующие свойства (цвет, толщину, тип,
узор, цвет узора). Рассмотрим эти свойства подробней. Граница ячейки
представляет собой линии, ограничивающие ее с четырех сторон. Линии
объединены в коллекцию Borders, доступ к любой из них осуществляется
через элементы этой коллекции. Каждый элемент коллекции предоставляет
доступ к отрезку прямой, прилегающему к той или другой стороне ячейки.
Диагонали ячейки тоже являются элементами этой коллекции. Каждый
элемент коллекции Borders является объектом и имеет свои индивидуальные
свойства, что позволяет задать тип линии и цвет отдельно для каждой ли-
нии границы ячейки. Рассмотрим процедуры, позволяющие обеспечить дос-
туп к любой линии границы (или ко всей границе сразу) выбранной ячей-
ки, установить ее толщину, тип линии и цвет.
Задаем свойства линии границы ячейки
procedure ToKBottomDlg6.BordersChange(Sender: TObject);
begin
// Получаем доступ к выбранной линии границы или ко всей границе ячейки
if CheckBox1.Checked then Border:=Range.Borders.item[Borders.ItemIndex+5]
else Border:=Range.Borders;
end;
procedure TOKBottomDlg6.WeightChange(Sender: TObject);
begin
// Устанавливаем толщину линии границы ячейки
Border.Weight:=Weight.Itemlndex;
end;
procedure TOKBottomDlg6.LineStyleChange(Sender: TObject);
begin
// Устанавливаем тип линии границы ячейки
Border.LineStyle:=xlDouble;
end;
// Устанавливаем цвет линии границы ячейки
procedure ToKBottomDlg6.ButtonlClick(Sender: TObject);
begin
if not ColorDialogl.Execute then exit;
Border. Color: =ColorDialogl.Color;
end;
Результат настройки линий границ ячеек с использованием приведенных
процедур представлен на рис. 12.26. Полный текст этих процедур имеется
на сопроводительном компакт-диске книги. |
Главная
Каталог файлов
