Добавляет в описатель стиля заливки новый элемент узора.

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

FillStyleDef

Синтаксис:

Visual Basic:

Sub AddElement(IElement As FillStyleElement)

IElement - объект, описывающий элемент узора заливки.

Описание:

FillStyles — это библиотека стилей заливок слоя, новые стили добавляются в нее методом AddItem. Сам стиль собирается методом AddElement, который добавляет в объект FillStyleDef описатель элемента узора FillStyleElement. Элементов может быть несколько, их набор доступен через StyleElements.

Пример:

Visual Basic:

Sub FillStyleDef_AddElement
'Берем активный слой карты
Set L = Zulu.ActiveMapDoc.Layers.Active
'Создаем описатель стиля заливки и элемент его узора
Set fsd = CreateObject("ZuluLib.FillStyleDef")
Set fse = CreateObject("ZuluLib.FillStyleElement")
'Узор рисуется линией стиля 1
fse.SetLine 1
'Шаг узора по горизонтали и вертикали
fse.SetStepHor 10.0
fse.SetStepVer 10.0
'Масштаб элемента
fse.SetScale 1.0
'Добавляем элемент в описатель стиля
fsd.AddElement fse
'Добавляем готовый стиль в библиотеку стилей слоя, Id назначается автоматически
MsgBox "Новый стиль заливки получил Id " & L.FillStyles.AddItem(fsd, -1)
End Sub

Python:

import zulu

def Macro_FillStyleDef_AddElement():
    # Берем активный слой карты
    L = zulu.App.ActiveMapDoc.Layers.Active
    # Создаем описатель стиля заливки и элемент его узора
    fsd = zulu.FillStyleDef()
    fse = zulu.FillStyleElement()
    # Узор рисуется линией стиля 1
    fse.SetLine(1)
    # Шаг узора по горизонтали и вертикали
    fse.SetStepHor(10.0)
    fse.SetStepVer(10.0)
    # Масштаб элемента
    fse.SetScale(1.0)
    # Добавляем элемент в описатель стиля
    fsd.AddElement(fse)
    # Добавляем готовый стиль в библиотеку стилей слоя, Id назначается автоматически
    print("Новый стиль заливки получил Id", L.FillStyles.AddItem(fsd, -1))