Возвращает True, если текущий объект входит в группу слоя.
Visual Basic:
Function IsSelected() As Boolean
Группа слоя — это набор выделенных объектов. Чтобы не проверять каждый объект, а сразу обходить только выделенные, служит метод SetSelectedOnly.
Visual Basic:
Sub IZEnumElements_IsSelected 'Итератор по объектам активного слоя карты Set L = Zulu.ActiveMapDoc.Layers.Active Set En = L.EnumElements En.MoveFirst 'Сколько объектов слоя входит в группу n = 0 Do While Not En.IsEOF If En.IsSelected Then n = n + 1 En.MoveNext Loop MsgBox "Выделенных объектов: " & n End SubPython:
import zulu def Macro_IZEnumElements_IsSelected(): # Итератор по объектам активного слоя карты L = zulu.App.ActiveMapDoc.Layers.Active En = L.EnumElements() En.MoveFirst() # Сколько объектов слоя входит в группу n = 0 while not En.IsEOF(): if En.IsSelected(): n += 1 En.MoveNext() print("Выделенных объектов:", n)