IPrxScene3DNamedPointSerie.Name

Синтаксис

Name: String;

Описание

Свойство Name определяет наименование ряда. Для определения имени ряда именованных сфер достаточно указать одну ячейку.

Пример Fore

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

Sub GetName;
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.Add(Scene3DSerieType.NamedPoints) As IPrxScene3DNamedPointSerie;
    ser.Name := "A1";
    ser.X := "B1:E1";
    ser.Y := "B2:E2";
    ser.Z := "B3:E3";
    ser.Points := "B0:E0";
End Sub GetName;

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

Пример Fore.NET

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

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

Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    Report: IPrxReport;
    s: IPrxScene3D;
    Tab: ITabSheet;
    ser: IPrxScene3DNamedPointSerie;
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.Add(Scene3DSerieType.sNamedPoints) As IPrxScene3DNamedPointSerie;
    ser.Name := "A1";
    ser.X := "B1:E1";
    ser.Y := "B2:E2";
    ser.Z := "B3:E3";
    ser.Points := "B0:E0";
    (Report As IMetabaseObject).Save();
End Sub;

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

См. также:

IPrxScene3DNamedPointSerie