FillColor property (ZLabel)

Возвращает/устанавливает цвет заливки рамки для вывода бирки.

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

ZLabel

Синтаксис:

Visual Basic:

Property FillCoolor As Long

Описание:

Цвет заливки используется только в тех бирках, у стиль которых подразумевает наличие рамки (см. LabelLayer.FrameStyle).

Пример:

Sub SetLabelColor
  
    Set Doc = Zulu.ActiveMapDoc 
  
    'Получили бирку текущего слоя для варианта надписей ID = 1 для текущего объекта

    Set Label = Doc.Layers.Active.LabelLayers.ItemById(1).Labels.Item(Doc.Layers.Active.CurrentID) 

    'Если объект получен
    If TypeName(Label) = "IZLabel" Then 

        'Задаем цвет рамки
        Label.FillColor = RGB(0,255,0) 

        'Обновляем бирку в слое
        Doc.Layers.Active.LabelLayers.ItemById(1).Labels.SetItem Label 

    End If

End Sub