IsOn: Boolean;
The IsOn property determines whether numbering is enabled for rows and columns.
Numbering settings can be used to set number format and initial value; numbering starts with one by default.
Executing the example requires a regular report with the REGULAR_REPORT identifier, the report sheet contains a data area. Add links to the Metabase, Report, Drawing system assemblies.
Sub UserProc;
Var
Mb: IMetabase;
Numb: IPrxDataIslandNumbering;
DataIsl: IPrxDataIsland;
Rep: IPrxReport;
Header: IPrxDataIslandHeader;
Name: IPrxDataIslandNaming;
Begin
Mb := MetabaseClass.Active;
// Get regular report and address data area
Rep := Mb.ItemById("REGULAR_REPORT").Edit As IPrxReport;
DataIsl := Rep.DataIslands.Item(0).Edit;
// Determine row heading parameters
Header := DataIsl.Properties.LeftHeader;
// Determine numbering settings
Numb := Header.Numbering;
Numb.IsOn := True;
Numb.IsCrossDimension := True;
Name := Numb.Naming;
Name.Style.BackgroundColor := GxColor.FromName("Yellow");
// Save changes made in data area and calculate report
DataIsl.Save;
Rep.Recalc;
// Save changes in object structure
(Rep As IMetabaseObject).Save;
End Sub UserProc;
Row heading numbering appears and cells with numbering are filled with yellow color in the regular report. In general settings general numbering for all dimensions is enabled.
See also: