Возвращает стиль заливки в виде объекта FillStyleDef по ID стиля в коллекции.

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

FillStyles

Синтаксис:

Visual Basic:

Property ItemById(StyleID As Long) As FillStyleDef

read-only

StyleID - ID стиля.

Пример:

Dim Fsd As FillStyleDef

'Получаем стиль заливки активного слоя карты c ID = 1
Set Fsd = MapCtrl1.Map.Layers.Active.FillStyles.ItemById(1)

'Проверяем результат
If  Fsd.Id  = -1 Then
   MsgBox "Стиль не найден" 
End If