IMapArrow.Text

Синтаксис

Text: String;

Описание

Свойство Text определяет текст подписи стрелки.

Пример

Данный модуль подключается к регламентному отчету, на листе которого расположена карта.

Sub Arrow;

Var

Map: IMap;

Layer: IMapLayer;

Arrows: IMapLayerArrows;

Arrow: IMapArrow;

Begin

Map := PrxReport.ActiveReport.ActiveSheet.Table.Objects.Item(0).Extension As IMap;

Layer := Map.Layers.FindByName("Regions");

Arrows := Layer.Arrows;

Arrows.CreateByIDs(98, 46);

Arrow := Arrows.Item(0);

Arrow.Text := "Поток";

Arrow.Font := New GxFont.Create("Arial Black", 16, 1 As GxFontStyle, 3 As GxUnit);

Map.Refresh;

End Sub Arrow;

После выполнения примера будет создана стрелка и задан текст подписи к ней с соответствующими параметрами шрифта:

См. также:

IMapArrow