Метод возвращает объект CRS, описывающий систему координат в которой хранятся данные слоя.
Visual Basic:
Function GetCRS() As CRS
Каждый вызов возвращает отдельный объект — копию системы координат слоя. Изменения этого объекта на слой не влияют; задать слою систему координат можно методом SetCRS.
У слоя в локальной системе координат (план-схема) свойство ProjectionType возвращённого объекта равно 0, а метод GetWkt возвращает пустую строку. Такую же систему координат получает новый слой.
Visual Basic:
Sub Layer_GetCRS 'Берем активный слой карты Set L = Zulu.ActiveMapDoc.Layers.Active 'Система координат, в которой хранятся данные слоя Set C = L.GetCRS If C.ProjectionType = 0 Then MsgBox "Слой в локальной системе координат (план-схема)" Else MsgBox "Тип проекции: " & C.ProjectionType & vbCrLf & C.GetWkt End If End SubPython:
import zulu def Macro_Layer_GetCRS(): # Берем активный слой карты L = zulu.App.ActiveMapDoc.Layers.Active # Система координат, в которой хранятся данные слоя C = L.GetCRS() if C.ProjectionType == 0: print("Слой в локальной системе координат (план-схема)") else: print("Тип проекции:", C.ProjectionType) print(C.GetWkt())