Dimension: (Dimension: IPrxDataIslandDimension):IPrxDataIslandNumberingLevel;
IPrxDataIslandDimension. Измерение среза данных, на котором построена область данных.
Свойство Dimension возвращает настройки нумерации для измерения.
В настройках нумерации невозможно задать формат числа и начальное значение, по умолчанию нумерация начинается с единицы.
Для выполнения примера предполагается наличие регламентного отчета с идентификатором «REGULAR_REPORT», на листе которого расположена область данных. Включите нумерацию для столбцов в свойствах области данных на вкладке «Размещение > Столбцы > Нумерация». В модуле подключите системные сборки: Metabase, Report, Drawing, Dimensions.
Sub UserProc;
Var
Mb: IMetabase;
Numb: IPrxDataIslandNumberingLevel;
DataIsl: IPrxDataIsland;
Rep: IPrxReport;
Header: IPrxDataIslandHeader;
DimModel: IDimensionModel;
Prop: IPrxDataIslandProperties;
PropDim: IPrxDataIslandDimension;
Begin
Mb := MetabaseClass.Active;
// Получим регламентный отчет и обратимся к области данных
Rep := Mb.ItemById("REGULAR_REPORT").Edit As IPrxReport;
DataIsl := Rep.DataIslands.Item(0).Edit;
// Определим параметры заголовков столбцов
Header := DataIsl.Properties.TopHeader;
// Обратимся к объекту, который содержит измерение среза, расположенного по столбцам
DimModel := DataIsl.Slice.TopHeader.Item(0).Dimension.Dimension;
// Определим параметры измерения среза, на котором построена область данных
Prop := DataIsl.Properties;
PropDim := Prop.Dimension(DimModel);
// Зададим цвет фона ячейки в настройках нумерации для измерения
Numb := Header.Numbering.Dimension(PropDim);
Numb.Style.BackgroundColor := GxColor.FromName("Red");
// Сохраним изменения, внесенные в область данных, и вычислим отчет
DataIsl.Save;
Rep.Recalc;
// Сохраним изменения в структуре объекта
(Rep As IMetabaseObject).Save;
End Sub UserProc;
В регламентном отчете фон ячеек с нумерацией заголовков столбцов будет красного цвета.
См. также: