ReplaceItem Method (FillStyles)

Заменяет стиль заливки с заданным ID из коллекции стилей заливки слоя на новый.

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

FillStyles

Синтаксис:

Visual Basic:

Function ReplaceItem(StyleID As Long, Style As FillStyleDef) As Boolean

StyleID - ID удаляемого стиля.

Style - объект с новым стилем.

Описание:

В случае успеха метод возвращает True. В противном случае метод вернет False.

Пример:

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

If Fsd.Id  <> -1 Then
'Переименовываем стиль
Fsd.Name = Fsd.Name + "_new"

'Обновляем стиль слоя
MapCtrl1.Map.Layers.Active.FillStyles.ReplaceItem 1, Fsd

End If