IPrxDataIslandNumbering.IsOn

Синтаксис

IsOn: Boolean;

Описание

Свойство IsOn определяет, включена ли автоматическая нумерация строк/столбцов.

Комментарии

В настройках нумерации невозможно задать формат числа и начальное значение, по умолчанию нумерация начинается с единицы.

Пример Fore

Для выполнения примера предполагается наличие регламентного отчета с идентификатором «REGULAR_REPORT», на листе которого расположена область данных. В модуле подключите системные сборки: Metabase, Report, Drawing.

Sub UserProc;
Var
    Mb: IMetabase;
    Numb: IPrxDataIslandNumbering;
    DataIsl: IPrxDataIsland;
    Rep: IPrxReport;
    Header: IPrxDataIslandHeader;
    Name: IPrxDataIslandNaming;
Begin
    Mb := MetabaseClass.Active;
    // Получим регламентный отчет и обратимся к области данных
    Rep := Mb.ItemById("REGULAR_REPORT").Edit As IPrxReport;
    DataIsl := Rep.DataIslands.Item(0).Edit;
    // Определим параметры заголовков строк
    Header := DataIsl.Properties.LeftHeader;
    // Зададим настройки нумерации
    Numb := Header.Numbering;
    Numb.IsOn := True;
    Numb.IsCrossDimension := True;
    Name := Numb.Naming;
    Name.Style.BackgroundColor := GxColor.FromName("Yellow");
    // Сохраним изменения, внесенные в область данных, и вычислим отчет
    DataIsl.Save;
    Rep.Recalc;
    // Сохраним изменения в структуре объекта
    (Rep As IMetabaseObject).Save;
End Sub UserProc;

В регламентном отчете появится нумерация заголовков строк, и фон ячеек с нумерацией будет желтого цвета. В общих настройках включится объединение нумерации всех измерений.  

Пример Fore.NET

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

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

Public Shared Sub Main(Params: StartParams);
Var
    Mb: IMetabase;
    Numb: IPrxDataIslandNumbering;
    DataIsl: IPrxDataIsland;
    Rep: IPrxReport;
    Header: IPrxDataIslandHeader;
    Name: IPrxDataIslandNaming;
    GxColorCls: GxColorClass = New GxColorClassClass();
Begin
    Mb := Params.Metabase;
    // Получим регламентный отчет и обратимся к области данных
    Rep := Mb.ItemById["REGULAR_REPORT"].Edit() As IPrxReport;
    DataIsl := Rep.DataIslands.Item[0].Edit();
    // Определим параметры заголовков строк
    Header := DataIsl.Properties.LeftHeader;
    // Зададим настройки нумерации
    Numb := Header.Numbering;
    Numb.IsOn := True;
    Numb.IsCrossDimension := True;
    Name := Numb.Naming;
    Name.Style.BackgroundColor := GxColorCls.FromName("Yellow");
    // Сохраним изменения, внесенные в область данных, и вычислим отчет
    DataIsl.Save();
    Rep.Recalc();
    // Сохраним изменения в структуре объекта
    (Rep As IMetabaseObject).Save();
End Sub;

См. также:

Интерфейсы сборки Report