IChartSerieBase.ResetInheritance

Синтаксис

ResetInheritance(Value: ChartSeriePropertyInheritance);

ResetInheritance(Value: Prognoz.Platform.Interop.Chart.ChartSeriePropertyInheritance);

Параметры

Value. Настройка, которую необходимо сбросить в соответствии с настройкой, заданной для ряда по умолчанию.

Описание

Метод ResetInheritance сбрасывает настройку ряда и устанавливает для неё значение, определённое для ряда по умолчанию.

Комментарии

Настройки ряда по умолчанию можно определить в свойстве IChartSeries.DefaultSerie.

Пример

Для выполнения примера предполагается наличие в репозитории регламентного отчёта с идентификатором «REPORT». В отчёте на активном листе создана диаграмма. Диаграмма отображает минимум пять рядов данных.

Добавьте ссылки на системные сборки: Chart, Metabase, Report, Tab.

Sub UserProc;
Var
    Mb: IMetabase;
    Rep: IPrxReport;
    Tab: ITabSheet;
    Chart: IChart;
    Series: IChartSeries;
    i: Integer;
Begin
    Mb := MetabaseClass.Active;
    Rep := Mb.ItemById(
"REPORT").Edit As IPrxReport;
    Tab := (Rep.ActiveSheet 
As IPrxTable).TabSheet;
    Chart := Tab.Objects.Item(
0As IChart;
    Series := Chart.Series;
    Tab.BeginUpdate;
    
//Сброс настроек рядов
    For i := 0 To 4 Do
        Series.Item(i).ResetInheritance(ChartSeriePropertyInheritance.All);
    
End For;
    Tab.EndUpdate;
    
//Сохранение отчёта
    (Rep As IMetabaseObject).Save;
End Sub UserProc;

Imports Prognoz.Platform.Interop.Chart;
Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.Tab;

Public Shared Sub Main(Params: StartParams);
Var
    Mb: IMetabase;
    Rep: IPrxReport;
    Tab: ITabSheet;
    Chart: IChart;
    Series: IChartSeries;
    i: Integer;
Begin
    Mb := Params.Metabase;
    Rep := Mb.ItemById[
"REPORT"].Edit() As IPrxReport;
    Tab := (Rep.ActiveSheet 
As IPrxTable).TabSheet;
    Chart := Tab.Objects.Item[
0As IChart;
    Series := Chart.Series;
    Tab.BeginUpdate();
    
//Сброс настроек рядов
    For i := 0 To 4 Do
        Series.Item[i].ResetInheritance(ChartSeriePropertyInheritance.cspiAll);
    
End For;
    Tab.EndUpdate();
    
//Сохранение отчёта
    (Rep As IMetabaseObject).Save();
End Sub;

При выполнении примера для первых пяти рядов данных будут сброшены настройки оформления.

См. также:

IChartSerieBase