IPrxScene3DNamedPointSerie.NameRange

Синтаксис

NameRange: ITabRange;

Описание

Свойство NameRange определяет параметры ячейки (диапазона ячеек), содержащей наименование ряда.

Пример Fore

Для выполнения примера предполагается наличие регламентного отчёта с идентификатором «REGULAR_REPORT», на листе которого расположена трёхмерная сцена с определенными исходными данными и данные в диапазоне «B1:E3». К отчету добавлен модуль, с помощью которого по гиперссылке вызывается процедура GetNameRange. Подключите системные сборки: Report, Tab, Metabase, Drawing.

Sub GetNameRange;
Var
    Report: IPrxReport;
    Tab: ITabSheet;
    s: IPrxScene3D;
    ser: IPrxScene3DNamedPointSerie;
Begin
    Report := PrxReport.ActiveReport;
    Tab := (Report.ActiveSheet As IPrxTable).TabSheet;
    s := Tab.Objects.Item(0).Extension As IPrxScene3D;
    ser := s.Series.Item(s.Series.Count - 1) As IPrxScene3DNamedPointSerie;
    ser.NameRange.Style.BackgroundColor := New GxColor.CreateRGB(0, 255, 0);
    ser.PointsRange.Style.BackgroundColor := New GxColor.CreateRGB(0, 0, 255);
End Sub GetNameRange;

После выполнения примера при нажатии на гиперссылку для ячеек, содержащих наименование ряда и точек, будут использованы заданные заливки.

Пример Fore.NET

Для выполнения примера предполагается наличие регламентного отчёта с идентификатором «REGULAR_REPORT», на листе которого расположена трёхмерная сцена с определенными исходными данными и данные в диапазоне «B1:E3». Подключите системные сборки: Report, Tab, Metabase, Drawing.

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

Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    Report: IPrxReport;
    s: IPrxScene3D;
    Tab: ITabSheet;
    ser: IPrxScene3DNamedPointSerie;
    Color: GxColorClass = New GxColorClassClass();
Begin
    MB := Params.Metabase;
    Report := MB.ItemById["REGULAR_REPORT"].Edit() As IPrxReport;
    Tab := (Report.Sheets.Item[0] As IPRxTable).TabSheet;
    s := Tab.Objects.Item[0].Extension As IPrxScene3D;
    ser := s.Series.Item[s.Series.Count - 1] As IPrxScene3DNamedPointSerie;
    ser.NameRange.Style.BackgroundColor := Color.FromKnownColor(GxKnownColor.clLightGreen);
    ser.PointsRange.Style.BackgroundColor := Color.FromKnownColor(GxKnownColor.clBlue);
    (Report As IMetabaseObject).Save();
End Sub;

После выполнения примера в регламентном отчёте для ячеек, содержащих наименование ряда и точек, будут использованы заданные заливки.

См. также:

IPrxScene3DNamedPointSerie