Возвращает ключ объекта слоя, к которому относится область.

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

BoundingBox

Синтаксис:

Visual Basic:

Property ElemID As Long

read-only

Пример:

Visual Basic:

Sub BoundingBox_ElemID
'Берем активный слой карты
Set L = Zulu.ActiveMapDoc.Layers.Active
If L.LabelLayers.Count = 0 Then
  MsgBox "У активного слоя нет подписей"
  Exit Sub
End If
'Первый подключенный к слою файл надписей (нумерация с нуля)
Set LL = L.LabelLayers.Item(0)
'Габариты бирок. Параметр flags зарезервирован и должен быть нулем
Set Boxes = LL.Labels.GetBoundingBoxes(0)
'ElemID связывает область с объектом слоя
s = ""
For i = 0 To Boxes.Count - 1
  s = s & Boxes.Item(i).ElemID & vbCrLf
Next
MsgBox "Ключи объектов: " & vbCrLf & s
End Sub

Python:

import zulu

def Macro_BoundingBox_ElemID():
    # Берем активный слой карты
    L = zulu.App.ActiveMapDoc.Layers.Active
    if L.LabelLayers.Count == 0:
        print("У активного слоя нет подписей")
        return
    # Первый подключенный к слою файл надписей (нумерация с нуля)
    LL = L.LabelLayers.Item(0)
    # Габариты бирок. Параметр flags зарезервирован и должен быть нулем
    Boxes = LL.Labels.GetBoundingBoxes(0)
    # ElemID связывает область с объектом слоя
    for i in range(Boxes.Count):
        print("ключ объекта:", Boxes.Item(i).ElemID)