Добавляет в объект описатель стиля линии новый символ.

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

LineStyleDef

Синтаксис:

Visual Basic:

Sub AddSymbolElement(iElement As ILineStyleElement)

iElement - объект, описывающий стиль одиночной линии.

Описание:

LineStyles - является коллекцией стилей линий слоя. Через метод AddItem этой коллекции можно добавлять новые стили линий в слой. Для создания самого стиля линии, требуется использовать метод AddLineElement и/или AddSymbolElement, который в объект LineStyleDef добавляет описатель одиночной линии/символа LineStyleElement. В объект LineStyleDef можно добавлять множество одиночных линий и символов.

Пример:

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

Sub AddSymbolElement
Set L = Zulu.ActiveMapDoc.Layers.Active
'создаем объект LineStyleDef
Set lsd = CreateObject ("ZuluLib.LineStyleDef")	
'создаем объект LineStyleElement
Set lse = CreateObject ("ZuluLib.LineStyleElement")
'задаем символ с ID 2
lse.SetSymbol L.Symbols.ItemById(2)	
'задаем  угол символу
lse.SetSymbolAngle 90.0
'задаем масштаб элемента
lse.SetSymbolScale 1
'задаем горизонтальный сдвиг
lse.SetSymbolShiftHor 10
'задаем вертикальный сдвиг
lse.SetSymbolShiftVer 20
'задаем линейные размеры
lse.SetSymbolSizeType 0
'задаем шаг между элементами
lse.SetSymbolStep 25
'задаем тип толщины
lse.SetSymbolWidthType 0		
'добавляем lse в объект lsd
lsd.AddSymbolElement	 lse	
L.LineStyles.AddItem lsd, -1	
End Sub