Возвращает площадь текущего объекта в квадратных метрах. У линейных, символьных и текстовых объектов площадь равна 0.

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

IZEnumElements

Синтаксис:

Visual Basic:

Property Area As Double

read-only

Описание:

Единицы не зависят от системы координат слоя: площадь считается в квадратных метрах и тогда, когда координаты объектов заданы в градусах.

Периметр того же объекта возвращает Perimeter.

Пример:

Visual Basic:

Sub IZEnumElements_Area
'Итератор по объектам активного слоя карты
Set L = Zulu.ActiveMapDoc.Layers.Active
Set En = L.EnumElements
En.MoveFirst
'Суммируем площадь всех объектов слоя
s = 0
Do While Not En.IsEOF
  s = s + En.Area
  En.MoveNext
Loop
MsgBox "Суммарная площадь: " & s & " кв.м"
End Sub

Python:

import zulu

def Macro_IZEnumElements_Area():
    # Итератор по объектам активного слоя карты
    L = zulu.App.ActiveMapDoc.Layers.Active
    En = L.EnumElements()
    En.MoveFirst()
    # Суммируем площадь всех объектов слоя
    s = 0.0
    while not En.IsEOF():
        s += En.Area
        En.MoveNext()
    print("Суммарная площадь:", s, "кв.м")