Data: IPrxCellStyle;
Свойство Data определяет оформление ячеек области данных.
В рассматриваемом примере предполагается существование объекта Report типа IPrxReport.
Sub UserProc;
Var
Report: IPrxReport;
DIs: IPrxDataIslands;
DI: IPrxDataIsland;
DimModel: IDimensionModel;
Prop: IPrxDataIslandProperties;
PropDim: IPrxDataIslandDimension;
Level: IPrxDataIslandLevel;
Style: IPrxDataElementStyle;
Begin
DIs := Report.DataIslands;
DI := DIs.Item(0).Edit;
DimModel := DI.Slice.TopHeader.Item(0).Dimension.Dimension;
Prop := DI.Properties;
PropDim := Prop.Dimension(DimModel);
Level := PropDim.Level(DimModel.Levels.Item(0));
Style := Level.Style;
Style.Data.Font.Name := "Times New Roman";
DI.Save;
End Sub UserProc;
После выполнения примера для первого уровня заданного измерения, расположенного по столбцам, будет изменен шрифт отображения области данных на «Times New Roman».
См. также: