Bottom: Double;
The Bottom property determines value of the bottom margin.
Executing the example requires that the repository contains a regular report with the REPORT identifier.
Add references to the Drawing, Metabase, Report system assemblies.
Sub UserProc;
Var
MB: IMetabase;
Report: IPrxReport;
PageSet: IGxPageSettings;
Margins: IGxPageMargins;
Begin
MB := MetabaseClass.Active;
Report := MB.ItemById("REPORT").Edit As IPrxReport;
PageSet := Report.ActiveSheet.PageSettings;
// Page format
PageSet.PaperFormat := GxPaperFormat.A3;
// Page orientation
PageSet.PaperOrientation := GxPaperOrientation.Landscape;
// Page margins
Margins := PageSet.Margins;
Margins.Left := 20;
Margins.Right := 10;
Margins.Top := 10;
Margins.Bottom := 10;
// Save changes
(Report As IMetabaseObject).Save;
End Sub UserProc;
After executing the example format and margins are determined for pages of active sheet of regular report.
See also: