TitleRows: ITabRange;
The TitleRows property determines the range of title rows.
As a value, specify the range consisting of one of several rows, for example: 0:0, 0:2. The composite range can also be specified, for example: 0:0;51:51.
Title rows are printed on each page. If a composite range is specified, action area of each part is limited with the next range part. Title row action area can also be limited by means of the ITabPageSettings.TitleRowsScope property.
Executing this example assumes that the repository contains a regular report with the identifier Report.
Sub UserProc;
Var
MB: IMetabase;
Report: IPrxReport;
Settings: IPrxPageSettings;
Begin
MB := MetabaseClass.Active;
Report := MB.ItemById("Report").Edit As IPrxReport;
Settings := Report.ActiveSheet.PageSettings;
//Set up title column range
Settings.TitleRows := Report.ParseRange("0:0;50:50").Range;
//Limit title column range
Settings.TitleRowsScope := Report.ParseRange("49:49;99:99").Range;
(Report As IMetabaseObject).Save;
End Sub UserProc;
After executing the example a title row range and their action range are set in print parameters for active sheet. The first title row is printed on all pages including data before the row with the 49 index. The second title row is printed on all pages including data before the row with the 99 index. The pages corresponding to all the other rows are printed without title row data.
The requirements and result of the Fore.NET Example execution match with those in the Fore Example.
Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.Tab;
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
Report: IPrxReport;
Settings: IPrxPageSettings;
Begin
MB := Params.Metabase;
Report := MB.ItemById["Report"].Edit() As IPrxReport;
Settings := Report.ActiveSheet.PageSettings;
//Set up title column range
Settings.TitleRows := Report.ParseRange("0:0;50:50").Range;
//Limit title column range
Settings.TitleRowsScope := Report.ParseRange("49:49;99:99").Range;
(Report As IMetabaseObject).Save();
End Sub;
See also: