Устанавливает/отменяет общий стиль отображения для всех простых (не типовых) площадных объектов слоя. Общий стиль изображения задается свойством CommonStyle.
Visual Basic:
Property CommonFillStyleEnabled As Boolean
По умолчанию свойство равно False: каждый простой площадной объект отображается своим стилем. При True все простые площадные объекты слоя рисуются общим стилем CommonStyle — и заливка, и граница, а при возврате в False — снова своими стилями.
Свойство не зависит от CommonLineStyleEnabled — общий стиль можно включить для площадных объектов и линий вместе или по отдельности.
Visual Basic:
Sub Layer_CommonFillStyleEnabled 'Берем активный слой карты Set L = Zulu.ActiveMapDoc.Layers.Active 'Общий стиль: зеленая заливка стилем 2 из библиотеки слоя Set St = L.CommonStyle St.FillStyle = 2 St.PatColor = RGB(0, 255, 0) L.CommonStyle = St 'Включаем его для простых площадных объектов L.CommonFillStyleEnabled = True MsgBox "Общий стиль заливки включен: " & L.CommonFillStyleEnabled End SubPython:
import zulu def Macro_Layer_CommonFillStyleEnabled(): # Берем активный слой карты L = zulu.App.ActiveMapDoc.Layers.Active # Общий стиль: зеленая заливка стилем 2 из библиотеки слоя St = L.CommonStyle St.FillStyle = 2 St.PatColor = 65280 L.CommonStyle = St # Включаем его для простых площадных объектов L.CommonFillStyleEnabled = True print("Общий стиль заливки включен:", L.CommonFillStyleEnabled)