IMap3DVisual.Height

Синтаксис Fore

Height: IMapVisualNumericProperty;

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

Height: Prognoz.Platform.Interop.Map.IMapVisualNumericProperty;

Описание

Свойство Height определяет параметры высоты элементов 3D-карты.

Комментарии

Значение свойства Height учитывается, если свойство IMap3DVisual.AutoHeight принимает значение False.

Пример Fore

Для выполнения примера в репозитории предполагается наличие регламентного отчёта с идентификатором «Report_1». На активном листе отчёта создана карта, в которой настроен слой «Regions».

Добавьте ссылки на системные сборки: Map, Metabase, Report, Tab.

Sub UserProc;
Var
    MB: IMetabase;
    Report: IPrxReport;
    Sheet: IPrxSheet;
    Map: IMap;
    Map3D: IMap3DVisual;
Begin
    MB := MetabaseClass.Active;
    Report := MB.ItemById("Report_1").Edit As IPrxReport;
    Sheet := Report.ActiveSheet;
    Map := (Sheet As IPrxTable).TabSheet.Objects.Item(0).Extension As IMap; // карта на листе отчета
    Map3D := Map.Layers.FindByName("Regions").Visuals.Item(0) As IMap3DVisual; // показатель в 3D
    Map3D.AutoHeight := False;
    Map3D.Height.Value := 12;
    Map3D.Height.Dependent := True;
    (Report As IMetabaseObject).Save;
End Sub UserProc;

В результате выполнения примера будут изменены параметры высоты элементов 3D-карты.

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.

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

Public Sub  Main(Params: StartParams);
Var
    MB: IMetabase;
    Report: IPrxReport;
    Sheet: IPrxSheet;
    Map: IMap;
    Map3D: IMap3DVisual;
Begin
    MB := Params.Metabase;
    Report := MB.ItemById["Report_1"].Edit() As  IPrxReport;
    Sheet := Report.ActiveSheet;
    Map := (Sheet As  IPrxTable).TabSheet.Objects.Item[0].Extension As  IMap;  // карта на листе отчета
    Map3D := Map.Layers.FindByName["Regions"].Visuals.Item[0] As  IMap3DVisual;  // показатель в 3D
    Map3D.AutoHeight := False;
    Map3D.Height.Value := 12;
    Map3D.Height.Dependent := True;
    (Report As  IMetabaseObject).Save();
End Sub;

См. также:

IMap3DVisual