ControlPanelPosition: PrxControlPanelPosition;
ControlPanelPosition: Prognoz.Platform.Interop.Report.PrxControlPanelPosition;
The ControlPanelPosition property determines the position of control panel.
To determine visibility of the control panel use the IPrxReportOptions.ControlPanelVisible property.
Executing the example requires a regular report with the REPORT identifier.
Add a link to the Metabase and Report system assemblies.
Sub UserProc;
Var
MB: IMetabase;
MOBj: IMetabaseObject;
Report: IPrxReport;
Options: IPrxReportOptions;
Begin
MB := MetabaseClass.Active;
MOBj := MB.ItemById("REPORT").Edit;
Report := MOBj As IPrxReport;
Options := Report.Options;
Options.ControlPanelVisible := True;
Options.ControlPanelPosition := PrxControlPanelPosition.Left;
MOBj.Save;
End Sub UserProc;
After executing the example the Controls panel will be aligned vertically left to the report.
The requirements and result of the Fore.NET example execution match with those in the Fore example.
Imports Prognoz.Platform.Interop.Report;
…
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
MOBj: IMetabaseObject;
Report: IPrxReport;
Options: IPrxReportOptions;
Begin
MB := Params.Metabase;
MOBj := MB.ItemById["REPORT"].Edit();
Report := MOBj As IPrxReport;
Options := Report.Options;
Options.ControlPanelVisible := True;
Options.ControlPanelPosition := PrxControlPanelPosition.pcppLeft;
MOBj.Save();
End Sub;
See also: