Устанавливает/возвращает общий стиль отображения для всех простых (не типовых) объектов.
Стиль применяется к простым площадным объектам, если значение свойства CommonFillStyleEnabled равно True и к простым линейным объектам, если значение свойства CommonLineStyleEnabled равно True.
Visual Basic:
Property CommonStyle As ElemStyle
Свойство возвращает копию общего стиля: изменения, внесённые в возвращённый объект, на слой не действуют. Чтобы изменить общий стиль, объект стиля записывают обратно в свойство.
Visual Basic:
Sub Layer_CommonStyle 'Берем активный слой карты Set L = Zulu.ActiveMapDoc.Layers.Active 'Берем копию общего стиля, меняем и записываем обратно Set St = L.CommonStyle St.LineColor = RGB(0, 0, 255) St.LineWidth = 3 L.CommonStyle = St 'Включаем общий стиль для простых линий L.CommonLineStyleEnabled = True MsgBox "Цвет линий общего стиля: " & L.CommonStyle.LineColor & ", толщина " & L.CommonStyle.LineWidth End SubPython:
import zulu def Macro_Layer_CommonStyle(): # Берем активный слой карты L = zulu.App.ActiveMapDoc.Layers.Active # Берем копию общего стиля, меняем и записываем обратно St = L.CommonStyle St.LineColor = 16711680 St.LineWidth = 3 L.CommonStyle = St # Включаем общий стиль для простых линий L.CommonLineStyleEnabled = True print("Цвет линий общего стиля:", L.CommonStyle.LineColor, ", толщина", L.CommonStyle.LineWidth)