Полосы понижения и повышения отображают сравнительную характери-
стику двух (и более) рядов данных диаграммы в точках построения. Для на-
стройки этих элементов предназначены объекты UpBars и DownBars, при-
надлежащие элементу коллекции ChartGroups, а отображение этих элемен-
тов обеспечивается записью значения True в свойство HasUpDownBars
объекта ChartGroup.
Следующая процедура позволяет отобразить полосы понижения и повыше-
ния на диаграмме в виде графиков, а также настроить цвет их линий гра-
ницы.
Отображение полос понижения и повышения и настройка цвета
procedure TOKBottomDlg11.HasUpDownBarsClick(Sender: TObject),
var ChartGroup:variant;
begin
Chart.ChartType:=xlLine;
ChartGroup:=Chart.ChartGroups.Item(1);
ChartGroup.HasUpDownBars:=HasUpDownBars.Checked;
if HasUpDownBars.Checked then begin
ChartGroup.UpBars.Border.ColorIndex:-1;
ChartGroup.DownBars.Border.Colorlndex: =12;
end;
end;
Результат представлен на рис. 14.25.
Рис. 14.25. Полосы повышения и понижения |