Включает в группу все объекты слоя.
Visual Basic:
Sub SelectAll()
Группа заменяется всеми объектами слоя; ключи, которых в слое нет (см. AddElem), из нее при этом убираются. Отобрать только объекты нужного типа и режима позволяет метод ModifyByType.
Пример выделяет все объекты активного слоя и сравнивает их число с числом объектов слоя.
Visual Basic:
Sub Selection_SelectAll 'Берем активный слой карты и его группу Set L = Zulu.ActiveMapDoc.Layers.Active Set S = L.Selection S.SelectAll MsgBox "Объектов в слое: " & L.ElementKeys.Count & vbCrLf & "в группе: " & S.ElementKeys.Count S.Clear End SubPython:
import zulu def Macro_Selection_SelectAll(): # Берем активный слой карты и его группу L = zulu.App.ActiveMapDoc.Layers.Active S = L.Selection S.SelectAll() print("Объектов в слое:", L.ElementKeys.Count, ", в группе:", S.ElementKeys.Count) S.Clear()