Font: IGxFont;
The Font property determines font of the title or header and footer.
Executing the example requires that the repository contains a regular report with the REPORT identifier.
Add links to the Drawing, Metabase, Report system assemblies.
Sub UserProc;
Var
MB: IMetabase;
Report: IPrxReport;
Sheet: IPrxSheet;
Headers: IPrxSheetHeaders;
Param: IPrxSheetHeader;
HeaderPart: IPrxSheetHeaderPart;
Begin
MB := MetabaseClass.Active;
// Get regular report
Report := MB.ItemById("REPORT").Edit As IPrxReport;
// Get the first sheet
Sheet := Report.Sheets.Item(0);
// Get headers and footers
Headers := Sheet.HeadersFooters;
// Set up headers and footers for the first sheet
Param := Headers.FirstPageHeader;
HeaderPart := Param.Center;
HeaderPart.Text := "&[Page] of &[Pages]";
HeaderPart.Color := New GxColor.CreateRGB(0,70,255);
HeaderPart.Font := New GxFont.Create("Tahoma", 9);
End Sub UserProc;
After executing the example, headers and footers are set up for the first sheet of the regular report.
See also: