Элемент узора стиля заливки: растровое изображение, векторный символ или штриховка. Входит в набор FillStyleElements, который возвращает свойство StyleElements объекта FillStyleDef.
Входит в состав ZuluGIS 2021 Library.
PROGID:
ZuluLib.FillStyleElement
CLSID:
{1250749C-11DD-4DDC-AFDA-3007DB025F4D}
Тип элемента определяется тем, какой из методов вызван: SetBitmap задает растровое изображение, SetSymbol — векторный символ, SetLine — штриховку. Остальные методы задают геометрию повторения: масштаб, шаг и сдвиг.
Готовый элемент добавляется в стиль методом AddElement. Элементов в стиле может быть несколько, при отображении они накладываются друг на друга.
Visual Basic:
Sub FillStyleElement_cls 'Берем активный слой карты Set L = Zulu.ActiveMapDoc.Layers.Active 'Элемент узора: штриховка линией стиля 1 с шагом 10 Set fse = CreateObject("ZuluLib.FillStyleElement") fse.SetLine 1 fse.SetStepHor 10.0 fse.SetStepVer 10.0 'Собираем из него стиль заливки и добавляем в библиотеку стилей слоя Set fsd = CreateObject("ZuluLib.FillStyleDef") fsd.AddElement fse MsgBox "Новый стиль заливки получил Id " & L.FillStyles.AddItem(fsd, -1) End SubPython:
import zulu def Macro_FillStyleElement_cls(): # Берем активный слой карты L = zulu.App.ActiveMapDoc.Layers.Active # Элемент узора: штриховка линией стиля 1 с шагом 10 fse = zulu.FillStyleElement() fse.SetLine(1) fse.SetStepHor(10.0) fse.SetStepVer(10.0) # Собираем из него стиль заливки и добавляем в библиотеку стилей слоя fsd = zulu.FillStyleDef() fsd.AddElement(fse) print("Новый стиль заливки получил Id", L.FillStyles.AddItem(fsd, -1))