- Код: Выделить всё
Dim refAPO2 As Reference
Set refAPO2 = product1.CreateReferenceFromName("ТРД_302/Weld-7199/!ТРД_302/Weld-7199/")
Set Meas = SPA.GetMeasurable(refAPO2): MsgBox Meas.Area
На этом референсе Fix констрейн создается нормально - ошибок нет, но вот измерения возвращают нули ((.....видел способ на Distances, но хотелось бы SPA, есть еще вариант пройти все body/сеты...(мне так то не площадь нужна а минимальное расстояние между элементом одной детали и другой деталью(всей) в сборке)