Возвращает коллекцию Elements, содержащую объекты Element, находящиеся в топологической связи с объектом с задаваемым ключом.

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

Layer

Синтаксис:

Visual Basic:

Function GetIncidentElements(Key As Long, Relationship As eIncidentRelationship) As Elements

Key - ключ объекта слоя, для которого ищутся инцидентные объекты.

Relationship - критерий связи имеет смысл только для узла и принимает значение из набора  eIncidentRelationship. 

Описание:

Элементы возвращаемой коллекции имеют доступ по порядковому номеру, то есть значение Elements.Count больше или равно нулю.

В случае неудачи возникает исключение с одним из следующих кодов:

Код	Описание
513	Слой не открыт. Операция проводится со слоем, который либо не загружен в карту, либо не открыт с помощью метода Open.

Пример:

Dim layer1 As Layer
Dim elems  As Elements

' Создаем объект Layer    
Set layer1= New Layer 

'Открываем слой с заданным именем
layer1.Open( 'e:\zulumaps\piter\metro_s.b00' )
'Получаем все инцидентные элементы для объекта слоя с ключом 1
Set elems = layer1.GetIncidentElements( 1, eIncidentAll)

'Если такие элементы есть, вывести имя типа первого элемента
If elems.Count > 0 Then MsgBox elems.Item(1).Type.Name