Возвращает объект IProjection из коллекции по типу проекции из набора eProjectionType.
Visual Basic:
Property ItemByType(Type As eProjectionType) As IProjection
read-only
Type - код проекции.
Если проекции с указанным кодом в коллекции нет, метод не вызывает ошибку, а возвращает Nothing.
В отличие от Item, этот способ дает доступ ко всем проекциям коллекции, включая проекцию с кодом 0 — по индексу она недоступна.
Код проекции возвращает свойство ProjType самого объекта и свойство ProjectionType объекта CRS.
Visual Basic:
Sub IProjections_ItemByType 'Коллекция проекций, поддерживаемых системой Set prjs = Zulu.ActiveMapDoc.Projections 'Проекция Меркатора имеет код 3 Set prj = prjs.ItemByType(3) 'Проекция с кодом 0 доступна только этим способом Set plan = prjs.ItemByType(0) MsgBox "Код 3: " & prj.Name & vbCrLf & _ "Код 0: " & plan.Name End SubPython:
import zulu def Macro_IProjections_ItemByType(): # Коллекция проекций, поддерживаемых системой prjs = zulu.App.ActiveMapDoc.Projections # Проекция Меркатора имеет код 3 prj = prjs.ItemByType(3) # Проекция с кодом 0 доступна только этим способом plan = prjs.ItemByType(0) print("Код 3:", prj.Name) print("Код 0:", plan.Name)