Вызов окна экспресс-моделирования для данных, содержащихся в экспресс-отчете.
Параметры команды передаются в свойстве Data. Для работы команды в данном свойстве необходимо указать следующее значение:
| Тип значения | Описание |
| IExpressModeller | Объект, содержащий настройки для экспресс-моделирования. |
Команда применяется только для объектов экспресс-моделирования.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1» и компонента UiErAnalyzer с наименованием «UiErAnalyzer1». К «UiErAnalyzer1» подключен какой-либо экспресс-отчет, свойству Active установлено значение True. Добавьте ссылки на системные сборки Modeller, Ui.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
ExpModel: IExpressModeller;
Target: IUiCommandTarget;
Context: IUiCommandExecutionContext;
Begin
ExpModel := UiErAnalyzer1.ErAnalyzer.CreateModeller;
Target := WinApplication.Instance.GetPluginTarget("Modeller");
Context := Target.CreateExecutionContext;
Context.Data := ExpModel;
Target.Execute("ShowModeller", Context);
End Sub Button1OnClick;
При нажатии на кнопку будет открыто окно экспресс-моделирования для данных экспресс-отчета, подключенного к «UiErAnalyzer1».
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore. Вместо компонентов Fore используйте их Fore.NET аналоги.
Imports Prognoz.Platform.Interop.Modeller;
Imports Prognoz.Platform.Interop.Ui;
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
WinApp: WinApplication = New WinApplicationClass_2();
ExpModel: IExpressModeller;
Target: IUiCommandTarget;
Context: IUiCommandExecutionContext;
Begin
ExpModel := UiErAnalyzerNet1.ErAnalyzer.ErAnalyzer.CreateModeller();
Target := WinApp.GetPluginTarget("Modeller");
Context := Target.CreateExecutionContext();
Context.Data := ExpModel;
Target.Execute("ShowModeller", Context, Null);
End Sub;
См. также: