IChartLabel.BorderPen

Синтаксис Fore

BorderPen: IGxPen;

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

BorderPen : Prognoz.Platform.Interop.Drawing.IGxPen;

Описание

Свойство BorderPen определяет параметры границы подписи данных.

Пример Fore

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

  Sub UserProc;
 Var
   Chart: IChart;
   BPen: IGxPen;
 Begin
    Chart := (PrxReport.ActiveReport.ActiveSheet As IPrxTable).TabSheet.Objects.Item(0).Extension As IChart;
    Chart.Series.DisplayLabels := True;
    BPen := New GxPen.CreateSolid(New GxColor.CreateARGB(150,0,0,150),1.01);
    Chart.Series.DefaultLabel.BorderPen := Bpen;
 End Sub UserProc;

После выполнения примера у подписей данных появится граница синего цвета.

Пример Fore.NET

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

  Public Override Sub OnBeforeOpenReport(Report:IPrxReport; Var Cancel:Boolean);
  Var
    Chart: IChart;
    Bpen: GxPenClass=New GxPenClass();
    ColorCl: GxColorClass_2 = New GxColorClass_2();
  Begin
    Chart := (Report.ActiveSheet As IPrxTable).TabSheet.Objects.Item[0].Extension As IChart;
    Chart.Series.DisplayLabels := True;
    ColorCl.CreateARGB(255, 0, 0, 255);
    Bpen.CreateSolid(ColorCl,1);
    Chart.Series.DefaultLabel.BorderPen := Bpen;
  End Sub OnBeforeOpenReport;

После открытия отчёта у подписей данных появится граница синего цвета.

См. также:

IChartLabel