Primitives: IMapTopobasePrimitives;
Свойство Primitives определяет коллекцию примитивов, из которых состоит область.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента MapBox и UiMap с загруженной картой.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
M: IMap;
Layer: IMapLayer;
Shape: IMapTopobaseShape;
Primitiv: IMapTopobasePrimitives;
s: Integer;
Begin
M := UiMap1.Map;
Layer := M.Layers.FindByName("Regions");
Shape := Layer.Shapes.Item(0);
Primitiv := Shape.Primitives;
s := Primitiv.Count;
End Sub Button1OnClick;
После выполнения примера, при нажатии на кнопку, в переменной s будет сохранено количество примитивов, из которых состоит первая область.
См. также: