Убирает из группы объект с указанным ключом.

Применяется к:

Selection

Синтаксис:

Visual Basic:

Sub RemoveElem(ElemID As Long)

ElemID - ключ объекта слоя (Element.Key).

Описание:

Ключ убирается из группы; сам объект слоя не меняется. Если ключа в группе нет, группа не меняется и ошибки не возникает. Так же убирается и ключ, которого в слое нет, но который был добавлен в группу (см. AddElem). Очистить группу целиком позволяет метод Clear.

Пример:

Пример добавляет в группу активного слоя два объекта и убирает первый.

Visual Basic:

Sub Selection_RemoveElem
'Берем активный слой карты и его группу
Set L = Zulu.ActiveMapDoc.Layers.Active
Set S = L.Selection
Set K = L.ElementKeys
S.Clear
S.AddElem K.Item(1)
S.AddElem K.Item(2)
S.RemoveElem K.Item(1)
MsgBox "Объектов в группе: " & S.ElementKeys.Count & ", ключ " & S.ElementKeys.Item(1)
S.Clear
End Sub

Python:

import zulu

def Macro_Selection_RemoveElem():
    # Берем активный слой карты и его группу
    L = zulu.App.ActiveMapDoc.Layers.Active
    S = L.Selection
    K = L.ElementKeys
    S.Clear()
    S.AddElem(K.Item(1))
    S.AddElem(K.Item(2))
    S.RemoveElem(K.Item(1))
    print("Объектов в группе:", S.ElementKeys.Count, ", ключ", S.ElementKeys.Item(1))
    S.Clear()