Команда NamedRangesSetup

Назначение

Вызов диалога настройки именованных диапазонов.

Параметры использования

Параметры команды передаются в свойстве Data. Для работы команды в данном свойстве необходимо указать одно из следующих значений:

Тип значения Описание
ITabSheet Страница, на которой расположен диапазон ячеек.
Array Массив типа Variant, содержащий следующие элементы:
Элемент 1: ITabSheet. Страница, на которой расположен диапазон ячеек;
Элемент 2: ITabRange. Диапазон ячеек, для которого будет вызван диалог настройки именованных диапазонов.

Особенности применения

Команда может применяться только для регламентных отчетов.

Пример Fore

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента ReportBox и компонента UiReport с наименованием «UiReport1», являющегося источником данных для ReportBox.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    Report: IPrxReport;
    Target: IUiCommandTarget;
    Context: IUiCommandExecutionContext;
Begin
    Report := UiReport1.Instance As IPrxReport;
    Target := WinApplication.Instance.GetPluginTarget("Report");
    Context := Target.CreateExecutionContext;
    Context.Data := (Report.ActiveSheet As IPrxTable).TabSheet;
    Target.Execute("NamedRangesSetup", Context);
End Sub Button1OnClick;

При нажатии на кнопку будет вызван диалог настройки именованных диапазонов.

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore. Вместо компонентов Fore используйте их Fore.NET аналоги.

Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.Ui;

Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    Report: IPrxReport;
    WinApp: WinApplication = New WinApplicationClass_2();
    Target: IUiCommandTarget;
    Context: IUiCommandExecutionContext;
Begin
    Report := UiReportNet1.ReportUi.Report;
    Target := WinApp.GetPluginTarget("Report");
    Context := Target.CreateExecutionContext();
    Context.Data := (Report.ActiveSheet As IPrxTable).TabSheet;
    Target.Execute("NamedRangesSetup", Context, Null);
End Sub;

См. также:

IUiCommandTarget.Execute