SeriePoint(Index: Integer): IChartSeriePoint;
Index. Индекс точки ряда данных.
Свойство SeriePoint определяет настройки точки ряда данных по заданному индексу.
Для выполнения примера предполагается наличие в репозитории регламентного отчёта с идентификатором REGULAR_REPORT. На активном листе отчёта должна содержаться диаграмма с идентификатором «PrxChart1».
Добавьте ссылки на системные сборки: Metabase, Report, Chart, Tab, Drawing.
Sub UserProc;
Var
mb: IMetabase;
rep: IPrxReport;
chart: IChart;
SeriePoint: IChartSeriePoint;
Begin
mb := MetabaseClass.Active;
rep := mb.ItemById("REGULAR_REPORT").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 := New GxColor.CreateARGB(255, 245, 120, 255);
SeriePoint.Label.Visible := True;
SeriePoint.Label.Type := ChartLabelType.Noteline;
(rep As IMetabaseObject).Save;
End Sub UserProc;
После выполнения примера точка с номером «0» ряда данных с номером «0» будет сиреневого цвета.
См. также: