AddLineElement method (LineStyleDef)

Добавляет в объект описатель стиля линии новую линии.

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

LineStyleDef

Синтаксис:

Visual Basic:

Sub AddLineElement(iElement As ILineStyleElement)

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

Описание:

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

Пример:

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

sub LineStyleDef_AddLineElement
Set L = Zulu.ActiveMapDoc.Layers.Active
'создаем объект LineStyleDef
Set lsd = CreateObject ("ZuluLib.LineStyleDef")
'создаем объект LineStyleElement	
Set lse = CreateObject ("ZuluLib.LineStyleElement")
'присваеваем lse описания стиля одиночной линии	
lse.SetLineColor 255
lse.SetLineType 0
'добавляем в lsd описатель первой  одиночной линии lse
lsd.AddLineElement lse	
Set lse = CreateObject ("ZuluLib.LineStyleElement")	
lse.SetLineColor 255
lse.SetLineType 0	
lse.SetLineShiftVer 5
'добавляем в lsd описатель второй  одиночной линии lse
lsd.AddLineElement lse	
'добавляем в коллекцию слоя новый стиль линии
L.LineStyles.AddItem lsd, -1		
end sub