AddItem Method (FillStyles)

Добавляет стиль заливки в коллекцию стилей заливки слоя.

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

FillStyles

Синтаксис:

Visual Basic:

Function AddItem(Style As FillStyleDef, Id As Long) As Long

Style - объект с добавляемым стилем заливки.

Id - ID добавляемого стиля.

Описание:

Если значение ID = -1, то метод присвоит добавляемому стилю ID автоматически.

Если в коллекции уже присутствует стиль с заданным ID, то стиль добавлен не будет. Для замены стиля по существующему ID следует вызывать метод ReplaceItim.

В случае успеха метод возвращает ID добавленного стиля. В противном случае метод вернет -1.

Пример:

Dim FsdAs FillStyleDef

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

'Добавляем полученный стиль в коллекцию второго слоя карты
MapCtrl1.Map.Layers.Item(2).FillStyles.AddItem Fsd, -1