GridBackground: IBubbleChartBackgroundInfo;
GridBackground: Prognoz.Platform.Interop.Chart.IBubbleChartBackgroundInfo;
Свойство GridBackground возвращает настройки фона области анимации.
Для определения величины внешних отступов от границы области анимации до других элементов матрицы используйте свойство IBubbleChartGraphArea.Margin.
Для выполнения примера предполагается наличие экспресс-отчета с идентификатором «Express_Font». В экспресс-отчете произведена настройка таким образом, чтобы отображалась и работала матрица.
Добавьте ссылки на системные сборки «Metabase», «Chart», «Express», «Drawing».
Sub UserProc;
Var
MB: IMetabase;
Eax: IEaxAnalyzer;
Bubble: IBubbleChart;
GraphArea: IBubbleChartGraphArea;
Begin
MB := MetabaseClass.Active;
Eax := MB.ItemById("Express_Font").Edit As IEaxAnalyzer;
Bubble := Eax.BubbleChart.Chart;
//Цветовая шкала матрицы
GraphArea := Bubble.GraphArea;
GraphArea.BorderColor := GxColor.FromName("Red");
GraphArea.BorderRadius := 50;
GraphArea.BorderThickness := 5;
// Фон области анимации
GraphArea.GridBackground.Type := BubbleChartBackgroundType.Color;
GraphArea.GridBackground.Color := GxColor.FromName("Blue");
(Eax As IMetabaseObject).Save;
End Sub UserProc;
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.
Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.Chart;
Imports Prognoz.Platform.Interop.Drawing;
…
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
Eax: IEaxAnalyzer;
Bubble: IBubbleChart;
GraphArea: IBubbleChartGraphArea;
GxColorCls: GxColorClass = New GxColorClassClass();
Begin
MB := Params.Metabase;
Eax := MB.ItemById["Express_Font"].Edit() As IEaxAnalyzer;
Bubble := Eax.BubbleChart.Chart;
//Цветовая шкала матрицы
GraphArea := Bubble.GraphArea;
GraphArea.BorderColor := GxColorCls.FromName("Red");
GraphArea.BorderRadius := 50;
GraphArea.BorderThickness := 5;
// Фон области анимации
GraphArea.GridBackground.Type := BubbleChartBackgroundType.bcbtColor;
GraphArea.GridBackground.Color := GxColorCls.FromName("Blue");
(Eax As IMetabaseObject).Save();
End Sub;
См. также: