IChartLabel.Font

Синтаксис Fore

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

Font: Prognoz.Platform.Interop.Drawing.GxFont;

Описание

Свойство Font определяет параметры шрифта текста подписи данных .

Пример Fore

Для выполнения примера предполагается наличие регламентного отчёта, на листе которого расположена диаграмма. К отчету добавлен модуль, из которого с помощью гиперссылки вызывается процедура UserProc. В инспекторе сборок модуля должны быть указаны ссылки на системные сборки Chart, Report, Tab, Drawing.

Sub UserProc;
Var
    Chart: IChart;
    FontLabel: IGxFont;
    FCLabel: IGxColor;
Begin
    Chart := (PrxReport.ActiveReport.ActiveSheet As IPrxTable).TabSheet.Objects.Item(0).Extension As IChart;
    Chart.Series.DisplayLabels := True;
    FontLabel := New GxFont.Create("Arial Black", 15, 3 As GxFontStyle, 3 As GxUnit);
    FCLabel := New GxColor.CreateARGB(255,0,126,255);
    Chart.Series.DefaultLabel.Font := FontLabel;
    Chart.Series.DefaultLabel.FontColor := FCLabel;
End Sub UserProc;

После выполнения примера к тексту подписей данных будет применен шрифт «Arial Black», указанного стиля и размера.

Пример Fore.NET

Для выполнения примера предполагается наличие регламентного отчета, на листе которого расположена диаграмма и внешняя легенда. К отчету добавлена .NET сборка для обработки событий отчёта. В модуле указанной сборки в классе EventsClass описано событие OnBeforeOpenReport. В инспекторе сборок модуля должны быть указаны ссылки на системные сборки Chart, Report, Tab, Drawing.

  Public Override Sub OnBeforeOpenReport(Report:IPrxReport; Var Cancel:Boolean);
  Var
    Chart: IChart;
    ColorCl: GxColorClass_2=New GxColorClass_2();
    FontLabel: GxFontClass=New GxFontClass();
  Begin
    Chart := (Report.ActiveSheet As IPrxTable).TabSheet.Objects.Item[0].Extension As IChart;
    Chart.Series.DisplayLabels := True;
    ColorCl.CreateARGB(255, 0, 255,0);
    FontLabel.Create("Arial Black", 20, 3 As GxFontStyle, 3 As GxUnit);
    Chart.Series.DefaultLabel.Font := FontLabel;
    Chart.Series.DefaultLabel.FontColor := ColorCl;
  End Sub OnBeforeOpenReport;

После открытия отчёта к тексту подписей данных будет применен шрифт «Arial Black», указанного стиля и размера.

См. также:

IChartLabel