GetIndex(Value: IMapArrow): Integer;
Value - стрелка коллекции стрелок.
Метод GetIndex возвращает индекс стрелки в коллекции. Свойство принимает значение «-1», если индекс не найден.
Sub main;
Var
Metabase : IMetabase;
MetabaseObject: IMetabaseObject;
Report: IPrxReport;
Map : IMap;
Arrows : IMapLayerArrows;
Index : Integer;
Begin
Metabase := MetabaseClass.Active;
MetabaseObject := Metabase.ItemById("Report").Edit;
Report := MetabaseObject As IPrxReport;
Map := Report.ActiveSheet.Table.Objects.Item(0).Extension As IMap;
Arrows := Map.Layers.FindByName("Regions").Arrows;
Index := Arrows.GetIndex(Arrows.FindByIDs(98,46));
Debug.WriteLine(Index);
Report.MetabaseObject.Save;
End Sub main;
После выполнения примера в окно консоли будет выведен индекс стрелки. В данном примере Report - это идентификатор регламентного отчета, на листе которого расположена карта.
См. также: