It opens a standard dialog box that is used to set up dependencies.
Command parameters are passed in the Data property. Executing the command requires to determine an array of the Variant type in this property, the elements of this array contain the following values:
Value type | Description |
Element 1: MainMessage | Main message string. |
Element 2: DetailedMessage | Detailed message string. |
The command is used only for regular reports.
Executing the example requires a form containing the Button component with the Button1 identifier. The example is a handler of the OnClick event for the Button1 component.
Add links to the Metabase, Report and Ui system assemblies.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
mb: IMetabase;
Report: IPrxReport;
Target: IUiCommandTarget;
Context: IUiCommandExecutionContext;
Data: Array;
Begin
mb := MetabaseClass.Active;
Report := mb.ItemById("REGL_REPORT").Open(Null) As IPrxReport;
Target := WinApplication.Instance.GetPluginTarget("Report");
Context := Target.CreateExecutionContext;
Data := New Variant[2];
Data[0] := "This file is now in use.";
Data[1] := "Specify another file name.";
Context.Data := Data;
Target.Execute("ShowDependenciesDialog", Context);
End Sub Button1OnClick;
After executing the example the dialog box that is used to set up dependencies opens.
Executing the example requires a form containing the Button component with the button1 identifier. The example is a handler of the Click event for the button1 component.
Add links to the Report, Ui system assemblies.
Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.Ui;
…
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
mb: IMetabase;
Report: IPrxReport;
Target: IUiCommandTarget;
Context: IUiCommandExecutionContext;
Data: Array;
WinApp: WinApplication = New WinApplicationClass_2();
Begin
mb := Self.Metabase;
Report := mb.ItemById["REGL_REPORT"].Open(Null) As IPrxReport;
Target := WinApp.GetPluginTarget("Report");
Context := Target.CreateExecutionContext();
Data := New object[2];
Data[0] := "This file is now in use.";
Data[1] := "Specify another file name.";
Context.Data := Data;
Target.Execute("ShowDependenciesDialog", Context, Null);
End Sub;
After executing the example the dialog box that is used to set up dependencies opens.
See also: