# -*- coding: utf-8 -*-
#|44

import pythoncom
from win32com.client import Dispatch, gencache


#  Подключим константы API Компас
const = gencache.EnsureModule("{75C9F5D0-B5B8-4526-8681-9903C567D2ED}", 0, 1, 0).constants
const_3d = gencache.EnsureModule("{2CAF168C-7961-4B90-9DA2-701419BEEFE3}", 0, 1, 0).constants

#  Подключим описание интерфейсов API5
KAPI = gencache.EnsureModule("{0422828C-F174-495E-AC5D-D31014DBBE87}", 0, 1, 0)
iKompasObject = KAPI.KompasObject(Dispatch("Kompas.Application.5")._oleobj_.QueryInterface(KAPI.KompasObject.CLSID, pythoncom.IID_IDispatch))

#  Подключим описание интерфейсов API7
KAPI7 = gencache.EnsureModule("{69AC2981-37C0-4379-84FD-5DD2F3C0A520}", 0, 1, 0)
iApplication = KAPI7.IApplication(Dispatch("Kompas.Application.7")._oleobj_.QueryInterface(KAPI7.IApplication.CLSID, pythoncom.IID_IDispatch))

#  Получим активный документ
iKompasDocument = iApplication.ActiveDocument
iKompasDocument3D = KAPI7.IKompasDocument3D(iKompasDocument)
iDocument3D = iKompasObject.ActiveDocument3D()

area = 0
#пройдёмся по всем граням детали
iPart7 = iKompasDocument3D.TopPart
iModelContainer = KAPI7.IModelContainer(iPart7)
iObjects = iModelContainer.Objects(const_3d.o3d_face)
for i in range(len(iObjects)):
    iModelObject = iObjects[i]
    #преобразуем интерфейс грани из API7 в API5
    iFace = iKompasObject.TransferInterface(iModelObject,1,0)
    #если грань плоская, то
    if iFace.IsPlanar() == 1:
        area = area + iFace.GetArea(0x1)     
print(area)