Возвращает объект IZEnumElements, являющийся итератором, предоставляющим последовательный доступ к ряду свойств объектов слоя.

Синтаксис:

Visual Basic:

Function EnumElements() As IZEnumElements

Описание:

Возвращаемый объект предоставляет буферизованный доступ к свойствам элементов слоя. Его удобно использовать, когда в цикле нужно перебрать много объектов. В этом случае доступ гораздо быстрее чем при использовании Layer.Elements.Item(ElemID).

Пример:

'Выписываем в список List1 ID элементов активного слоя карты, 
'у которых ID типа равно 6 и номер режима равен 2
Private Sub Command2_Click()
           
    Dim En As IZEnumElements
    List1.Clear
 
   'Получаем итератор для активного слоя
    Set En = MapCtrl1.Map.Layers.Active.EnumElements
           
    En.MoveFirst 'Встали на первый элемент

    Do
    If En.IsEOF Then Exit Do 'Если элементы кончились, выходим 
   
        If En.TypeID = 6 And En.ModeId = 2 Then      
            List1.AddItem En.ElemID
        End If

        En.MoveNext 'Встаем на следующий элемент
Loop

End Sub