ITabPageContinuousRanges.Add

Синтаксис Fore

Add(Position: Integer; Lenght: Integer): Boolean;

Синтаксис Fore.NET

Add(Position: integer; Lenght: integer): boolean;

Параметры

Position. Номер стартовой ячейки для неразрывного диапазона.

Lenght. Количество ячеек в неразрывном диапазоне.

Описание

Метод Add создаёт в таблице новый неразрывный диапазон.

В зависимости от того, с какой коллекцией неразрывных диапазонов ведётся работа (диапазонов по столбцам или диапазонов по строкам), в параметре Position указывается индекс столбца или строки.

Пример Fore

Для выполнения примера понадобится регламентный отчёт с идентификатором «Report». На границе листов отчёта присутствуют какие-либо данные.

Sub UserProc;
Var
    MB: IMetaBase;
    Report: IPrxReport;
    Tab: ITabSheet;
    TabPS: ITabPageSettings;
Begin
    MB := MetaBaseClass.Active;
    Report := MB.ItemById("Report").Edit As IPrxReport;
    Tab := (Report.Sheets.Item(0) As IPrxTable).TabSheet;
    TabPS := Tab.PageSettings;
    TabPS.ContinuousColumns.Add(50, 3);
    TabPS.ContinuousRows.Add(50, 3);
    (Report As IMetabaseObject).Save;
End Sub UserProc;

После выполнения примера при экспорте или печати регламентного отчёта данные, ограниченные этим диапазоном, будут размещены на одной странице.

Пример Fore.NET

Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.Tab;

Public Sub UserProc(Params: StartParams);
Var
    MB: IMetaBase;
    Report: IPrxReport;
    Tab: ITabSheet;
    TabPS: ITabPageSettings;
Begin
    MB := Params.Metabase;
    Report := MB.ItemById["Report"].Edit() As IPrxReport;
    Tab := (Report.Sheets.Item[0] As IPrxTable).TabSheet;
    TabPS := Tab.PageSettings;
    TabPS.ContinuousColumns.Add(50, 3);
    TabPS.ContinuousRows.Add(50, 3);
    (Report As IMetabaseObject).Save();
End Sub;

После выполнения примера при экспорте или печати регламентного отчёта данные, ограниченные этим диапазоном, будут размещены на одной странице

См. также:

ITabPageContinuousRanges