Линии выноски для подписей данных являются элементом ряда данных
диаграммы, поэтому их отображение определяется значением свойства
HasLeaderLines объекта Series, являющегося элементом коллекции SeriesCollection.
Если значение этого свойство равно True, то линии выноски подпи-
сей будут отображены, но только в случае, если будет выбран и соответст-
вующий тип диаграммы, поскольку эти элементы можно отобразить не для
всех типов диаграмм. Например, для круговой объемной диаграммы линии
выноски подписей могут быть отображены и доступны.
Доступ к свойствам самих линий осуществляется посредством объекта
LeaderLines, свойства и методы которого позволяют выделить эти элементы
(Select), удалить их (Delete) или настроить свойства линии (тип, толщину и
цвет), которые идентичны свойствам обычных линий и определяются объ-
ектом Border.
Следующий пример позволяет изменить тип диаграммы, отобразить линии
выноски для подписей данных и настроить их свойства.
Задание линий выноски подписей данных диаграммы
Const xl3DPieExploded=70;
procedure TOKBottomDlgll.HasLeaderLinesClick(Sender: TObject);
var Series:variant;
begin
Chart.ChartType:=xl3DPieExploded;
Series:=Chart.SeriesCollection(1);
Series.HasDataLabels:=HasLeaderLines.Checked;
if HasLeaderLines.Checked then begin
Series.Points(1).DataLabel.Left:=SeriesPoints(1).DataLabel.Left+20;
Series.HasLeaderLines:=HasLeaderLines.Checked;
Series.LeaderLines.Border.ColorIndex:=5;
end;
end;
Рис. 14.26. Линии выноски для подписей данных на круговой объемной диаграмме
На рис. 14.26 отображен результат выполнения представленной процеду-
ры — круговая объемная диаграмма, подписи данных которой соединены
линиями выноски с графическими элементами самой диаграммы. |
Главная
Каталог файлов
