SeriePoint(Index: Integer): IChartSeriePoint;
Index. Индекс точки ряда данных.
Свойство SeriePoint определяет настройки точки ряда данных по заданному индексу.
Для выполнения примера добавьте ссылки на системные сборки «Metabase», «Report», «Chart», «Tab» и «Drawing». Предполагается наличие в репозитории регламентного отчета с идентификатором «OBJ_1», диаграммы с идентификатором «PrxChart1» на активном листе.
Sub UserProc;
Var
mb: IMetabase;
rep: IPrxReport;
chart: IChart;
SeriePoint: IChartSeriePoint;
Begin
mb := MetabaseClass.Active;
rep := mb.ItemById("OBJ_1").Edit As IPrxReport;
chart := (rep.ActiveSheet As IprxTable).TabSheet.Objects.Object("PrxChart1").Extension As IChart;
SeriePoint := chart.Series.Item(0).SeriePoint(0);
SeriePoint.Selected := True;
SeriePoint.Background.Type := ChartBackgroundType.Color;
SeriePoint.Background.Color := GxColor.CreateARGB(255, 245, 120, 255);
SeriePoint.Label.Visible := True;
SeriePoint.Label.Type := ChartLabelType.Noteline;
(rep As IMetabaseObject).Save;
End Sub UserProc;
После выполнения примера точка с номером «0» ряда данных с номером «0» будет сиреневого цвета.
См. также: