Заменяет стиль заливки с заданным ID из коллекции стилей заливки слоя на новый.
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