Возвращает/устанавливает тип данного элемента.
Visual Basic:
Property Type As ObjectType
Присвоение типа допустимо только для типового объекта слоя.
При присвоении объекту нового режима внутри того же типа достаточно приравнять этому свойству либо ID типа, либо пользовательское название типа, либо сам объект ObjectType.
В случае неудачи возникает исключение с одним из следующих кодов:
Код
Описание
517 Неправильный тип слоя.
521 Присваиваемый тип объекта не найден в структуре слоя. 522 Графический тип объекта не соответствует графическому типу присваиваемого типа.
Dim El As Element 'Получили текущий элемент активного слоя Set El = MapCtrl1.Map.Layers.Active.Elements(MapCtrl1.CurrentID) 'Если объект - типовой If El.TypeId > 0 Then 'Присваеваем элементу тип c ID=3 El.Type = 3 'Присваеваем элементу режим с именем "Источник" El.Type = "Источник" End If