Наклон и поворот

Размещение диаграммы

Тип диаграммы

Лекция №6 Программирование диаграмм в Excel

Продолжим программирование диаграмм в Excel. В прошлый раз мы рассмотрели создание, настройку внешнего вида областей, области построения, заголовка и формирование области данных диаграммы. Важными свойствами диаграммы являются ее тип, размещение, параметры легенды и параметры той части, которая несет информационную составляющую. Программирование всего этого и рассмотрим в данной части статьи.

Тип диаграммы определяет, каким образом отображается информация: в виде плоских или объемных фигур или графиков, а также сам вид этих фигур. Существует около 70 типов диаграмм, и чтобы выбрать один из них, используется метод ApplyCustomType. В качестве аргумента этого метода используется константа из списка (см. приложение stлекция6). В Delphi выбор типа диаграммы можно реализовать, используя функцию SetChartType.

Function SetChartType (Name:variant;ChartType:integer):boolean;begin SetChartType:=true; try E.Charts.Item[name].ApplyCustomType(ChartType:=ChartType); except SetChartType:=false; end;End;

Диаграмма может размещаться совместно с данными или на отдельном листе. Размещение диаграммы лучше совмещать с процессом ее создания, но можно выполнить эту процедуру и самостоятельно. При этом необходимо учитывать, что при изменении размещения меняется и имя диаграммы (не путать с названием). Для размещения диаграммы используйте функцию SetChartLocation, аргумент xlLocation которой может иметь одно из двух значений (xlLocationAsNewSheet или xlLocationAsObject).

Function SetChartLocation (var name:variant;sheet:variant; xlLocation:integer):boolean;begin SetChartLocation:=true; try name:=E.Charts.Item[name].Location(Where:= xlLocationAsObject,Name:=sheet).name; except SetChartLocation:=false; end;End;

Наклон диаграммы можно выполнить на угол от -90° до +90°. Значения, выходящие за эти пределы, вызывают ошибку. Выбор угла поворота осуществляется записью значения угла в свойство Elevation объекта Chart. Поворот диаграммы осуществляется записью в поле Rotation объекта Chart значения угла поворота. Этот угол может иметь значения от 0° до 360°. Для задания углов наклона и поворота в приложениях на Delphi можно использовать функции ElevationChart и RotationChart.

Function ElevationChart (Name:variant;Elevation:real):boolean;begin ElevationChart:=true; try E.Charts.Item[name].Elevation:=Elevation; except ElevationChart:=false; end;End;Function RotationChart(Name:variant;Rotation:real):boolean;begin RotationChart:=true; try E.Charts.Item[name].Rotation:=Rotation; except RotationChart:=false; end;End;

Дата добавления: 2014-01-05