Text: String;
The Text property determines arrow label text.
The module is connected to the regular report, which sheet contains the map.
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 := "Flow";
Arrow.Font := New GxFont.Create("Arial Black", 16, 1 As GxFontStyle, 3 As GxUnit);
Map.Refresh;
End Sub Arrow;
After executing the example an arrow is created and its label text with the corresponding font parameters is determined:
See also: