Задает угол поворота символа в элементе узора заливки.
Visual Basic:
Sub SetSymbolAngle(degAngle As Double)
degAngle - угол поворота в градусах.
Угол отсчитывается против часовой стрелки. Применяется к элементу, для которого задан символ методом SetSymbol.
Visual Basic:
Sub FillStyleElement_SetSymbolAngle 'Берем активный слой карты Set L = Zulu.ActiveMapDoc.Layers.Active 'Собираем стиль заливки из одного элемента Set fsd = CreateObject("ZuluLib.FillStyleDef") Set fse = CreateObject("ZuluLib.FillStyleElement") 'Символ и его угол поворота fse.SetSymbol L.Symbols.Item(0) fse.SetSymbolAngle 45.0 fsd.AddElement fse 'Добавляем стиль в библиотеку стилей слоя MsgBox "Новый стиль заливки получил Id " & L.FillStyles.AddItem(fsd, -1) End SubPython:
import zulu def Macro_FillStyleElement_SetSymbolAngle(): # Берем активный слой карты L = zulu.App.ActiveMapDoc.Layers.Active # Собираем стиль заливки из одного элемента fsd = zulu.FillStyleDef() fse = zulu.FillStyleElement() # Символ и его угол поворота fse.SetSymbol(L.Symbols.Item(0)) fse.SetSymbolAngle(45.0) fsd.AddElement(fse) # Добавляем стиль в библиотеку стилей слоя print("Новый стиль заливки получил Id", L.FillStyles.AddItem(fsd, -1))