IChartExternLegendItems.Unify

Синтаксис Fore

Unify(Indexes: Array);

Синтаксис Fore.NET

Unify(System.Array);

Параметры

Indexes. Массив индексов элементов внешней легенды.

Описание

Метод Unify позволяет объединить элементы внешней легенды, индексы которых передаются в качестве входного параметра Indexes.

Пример Fore

Для выполнения примера предполагается наличие регламентного отчета с идентификатором «Report». В отчете присутствуют объекты:  диаграмма и внешняя легенда.

Sub Main;
    Var
        mb: IMetabase;
        rep: IPrxReport;
        legend: IPrxChartLegend;
        chartlegend: IChartExternLegend;
        items: IChartExternLegendItems;
        a: array Of integer;
    Begin
        a := New integer[4];
        a[0] := 0;
        a[1] := 1;
        a[2] := 2;
        a[3] := 6;
        mb := MetabaseClass.Active;
        rep := mb.ItemById("OBJ12399").Open(Null) As IPrxReport;
        legend := (rep.ActiveSheet As IprxTable).TabSheet.Objects.Item(2).Extension As IPrxChartLegend;
        chartlegend := legend As IChartExternLegend;
        items := chartlegend.InternalItems;
        items.Unify(a);
End Sub Main;

После выполнения примера первый, второй, третий и седьмой элементы будут объединены.

Пример Fore.NET

Для выполнения примера предполагается наличие регламентного отчета с идентификатором «Report». В отчете присутствуют объекты:  диаграмма и внешняя легенда.

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

...

Public Shared Sub Main(Params: StartParams);
Var
    mb: IMetabase;
    rep: IPrxReport;
    legend: IPrxChartLegend;
    chartlegend: IChartExternLegend;
    items: IChartExternLegendItems;
    a: array Of integer;
Begin
    a := New integer[4];
    a[0] := 0;
    a[1] := 1;
    a[2] := 2;
    a[3] := 6;
    mb := Params.Metabase;
    rep := mb.ItemById["OBJ42859"].Edit() As IPrxReport;
    legend := (rep.ActiveSheet As IprxTable).TabSheet.Objects.Item[1].Extension As IPrxChartLegend;
    chartlegend := legend As IChartExternLegend;
    chartlegend.AxisIcon := ChartLegendAxisIcon.claiAxis;
    items := chartlegend.InternalItems;
    items.Unify(a);
    (rep As IMetabaseObject).Save();
End Sub;

После выполнения примера первый, второй, третий и седьмой элементы будут объединены.

См. также:

IChartExternLegendItems