IChart.MakeBlackAndWhite

Синтаксис Fore

MakeBlackAndWhite;

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

MakeBlackAndWhite();

Описание

Метод MakeBlackAndWhite позволяет отображать диаграмму в черно-белом формате.

Пример Fore

Для выполнения примера необходимо добавить ссылки на системные сборки «Chart», «Report» и «Tab». Данный модуль подключается к регламентному отчету, на листе которого расположена только диаграмма. Процедура ChangeBlackAndWhite назначается обработчиком щелчка по гиперссылке в ячейке отчета.

Sub ChangeBlackAndWhite;
Var
    Rep: IPrxReport;
    TabS: ITabSheet;
    pChart: IPrxChart;
    Chart: IChart;
Begin
    Rep := PrxReport.ActiveReport;
    TabS := (Rep.ActiveSheet As IPrxTable).TabSheet;
    pChart := TabS.Objects.Item(0).Extension As IPrxChart;
    Chart := pChart As IChart;
    Chart.MakeBlackAndWhite;
    TabS.Recalc;
End Sub ChangeBlackAndWhite;

После щелчка по гиперссылке, выполняющей процедуру ChangeBlackAndWhite, диаграмма будет отображена в черно-белом формате.

Пример Fore.NET

В рассматриваемом примере предполагается, что существует объект Chart типа IChart. Диаграмма должна быть кругового типа со вторичными круговой диаграммой или гистограммой. В случае необходимости диаграмма может быть преобразована к нужному типу посредством выполнения команды: «Chart.Type := 10 As ChartType;».

Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Chart;

Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    Chart : IChart;
Begin
    Chart := UiChartNet1.ChartUi.Chart;
    Chart.CircleInfoEx.ShowMode:= ChartSecondaryShowMode.cssmOnlySecondary;
    Chart.MakeBlackAndWhite();
End Sub;

При нажатии кнопки будет отображаться только вторичная диаграмма в черно-белом формате.

См. также:

IChart