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

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

LineStyles

Синтаксис:

Visual Basic:

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

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

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

Описание:

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

Пример:

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

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

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

End If