ITabPageSettings.TitleRows

Синтаксис

TitleRows: ITabRange;

Описание

Свойство TitleRows определяет диапазон сквозных строк.

Комментарии

В качестве значения необходимо указать диапазон, состоящий из одной или нескольких строк, например: «0:0», «0:2». Также может быть указан составной диапазон, например: «0:0;51:51».

Сквозные строки выводятся при печати на каждой странице. Если указан составной диапазон, то область действия каждой части ограничена следующей частью диапазона. Также область действия сквозных строк может быть ограничена с помощью свойства ITabPageSettings.TitleRowsScope.

Пример Fore

Для выполнения примера предполагается наличие в репозитории регламентного отчета с идентификатором «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;
    //Установка сквозного диапазона
    Settings.TitleRows := Report.ParseRange("0:0;50:50").Range;
    //Ограничение сквозного диапазона
    Settings.TitleRowsScope := Report.ParseRange("49:49;99:99").Range;
    (Report As IMetabaseObject).Save;
End Sub UserProc;

При выполнении примера для активного листа в параметрах печати будет задан диапазон сквозных строк и диапазон их действия. Первая сквозная строка будет выводиться со всеми страницами, включающими данные до строки с индексом «49». Вторая сквозная строка будет выводиться со всеми страницами, включающими данные до строки с индексом «99». Страницы соответствующие всем остальным строкам будут выводиться без данных сквозных строк.

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.

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;
    //Установка сквозного диапазона
    Settings.TitleRows := Report.ParseRange("0:0;50:50").Range;
    //Ограничение сквозного диапазона
    Settings.TitleRowsScope := Report.ParseRange("49:49;99:99").Range;
    (Report As IMetabaseObject).Save();
End Sub;

См. также:

ITabPageSettings