IChartLabel.Rectangle

Синтаксис Fore

Rectangle: IGxRectF;

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

Rectangle: Prognoz.Platform.Interop.Drawing.GxRectF;

Описание

Свойство Rectangle возвращает координаты и размер подписи данных диаграммы.

Пример Fore

Для выполнения примера предполагается наличие регламентного отчёта с идентификатором «Rep_1», на листе которого расположена диаграмма. В инспекторе сборок модуля должны быть указаны ссылки на системные сборки Chart, Report, Tab, Drawing, Metabase.

Sub macro;
Var
    mb:Imetabase;
    report:IPrxReport;
    chart: IChart;
    series: IChartSeries;
    label: IChartLabel;
    Rect: IGxRectF;
Begin
    mb:= MetabaseClass.Active;
    report:= mb.ItemById("Rep_1").Open(Null) As IPrxReport;
    chart := (report.ActiveSheet As IPrxTable).TabSheet.Objects.Item(0).Extension As IChart;
    series := Chart.Series;
    label := series.Item(0).Label(0);
    Rect := label.Rectangle;
    Debug.WriteLine("Высота:" + Rect.Height.ToString);
    Debug.WriteLine("Ширина:" + Rect.Width.ToString);
    Debug.WriteLine("Левая граница:" + Rect.Left.ToString);
    Debug.WriteLine("Верхняя граница:" + Rect.Top.ToString);
End Sub macro;

После выполнения примера в консоль будут выведены координаты и размер для первой подписи данных первого ряда:

Высота:4.3054685592651367
Ширина:7.0443191528320313
Левая граница:21.17462158203125
Верхняя граница:28.872674942016602

Пример Fore.NET

Для выполнения примера предполагается наличие регламентного отчёта с идентификатором «Rep_1», на листе которого расположена диаграмма. В инспекторе сборок модуля должны быть указаны ссылки на системные сборки Chart, Report, Tab, Drawing.

Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Drawing;
Imports Prognoz.Platform.Interop.Chart;
Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.Tab;

...

Public Shared Sub Macro(Params: StartParams);
Var
    mb:IMetabase;
    chart: IChart;
    series: IChartSeries;
    label: IChartLabel;
    Rect: IGxRectF;
    report:IPrxReport;
Begin
    mb:= Params.Metabase;
    report:= mb.ItemById["Rep_1"].Open(Null) As IPrxReport;
    chart := (report.ActiveSheet As IPrxTable).TabSheet.Objects.Item[0].Extension As IChart;
    series := Chart.Series;
    label := series.Item[0].Label[0];
    Rect := label.Rectangle;
    System.Diagnostics.Debug.WriteLine("Высота:" + Rect.Height.ToString());
    System.Diagnostics.Debug.WriteLine("Ширина:" + Rect.Width.ToString());
    System.Diagnostics.Debug.WriteLine("Левая граница:" + Rect.Left.ToString());
    System.Diagnostics.Debug.WriteLine("Верхняя граница:" + Rect.Top.ToString());
End Sub;

После выполнения примера в консоль будут выведены координаты и размер для первой подписи данных первого ряда:

Высота:4.3054685592651367
Ширина:7.0443191528320313
Левая граница:21.17462158203125
Верхняя граница:28.872674942016602

См. также:

IChartLabel