Добавляет в слой заданный элемент.

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

Layer

Синтаксис:

Visual Basic:

Function AddElement(Elem As Element) As Long

Elem - добавляемый элемент.

Описание:

Если добавление элемента выполнено успешно, метод возвращает ID добавленного элемента. В противном случае метод возвращает -1.

Элемент берётся у того же или у другого слоя — например, из коллекции Elements. Копия получает новый ID; геометрия, стиль, тип и режим сохраняются.

В отличие от метода AddSymbol, символ добавляется и в точку, где уже стоит другой символ.

Пример:

Visual Basic:

Sub Layer_AddElement
'Берем активный слой карты
Set L = Zulu.ActiveMapDoc.Layers.Active
'Находим первую линию слоя
Set En = L.EnumElements
En.MoveFirst
Do While Not En.IsEOF
  If En.GraphType = 0 Then Exit Do
  En.MoveNext
Loop
'Копируем ее в тот же слой
Set El = L.Elements.Item(En.ElemID)
MsgBox "Копия линии " & En.ElemID & " получила ID " & L.AddElement(El)
End Sub

Python:

import zulu

def Macro_Layer_AddElement():
    # Берем активный слой карты
    L = zulu.App.ActiveMapDoc.Layers.Active
    # Находим первую линию слоя
    En = L.EnumElements()
    En.MoveFirst()
    while not En.IsEOF() and En.GraphType != 0:
        En.MoveNext()
    # Копируем ее в тот же слой
    El = L.Elements.Item(En.ElemID)
    print("Копия линии", En.ElemID, "получила ID", L.AddElement(El))