[Евгенич]

Задача следующая: извлечь атрибуты блоков чертежа в Wolfram Mathematica.
Вот, что я делаю:

Код:

[Выделить все]

Needs["NETLink`"];
InstallNET[];
acadapp = CreateCOMObject["AutoCAD.Application.17.2"];
acaddoc = acadapp@Documents@Item[0];
mspace = acaddoc@ModelSpace

До этого момента трудностей никаких нет.
Пусть вхождение блока в пространстве модели идёт под номером 1380. Проверим имя:

Код:

[Выделить все]

In[1]:= mspace@Item[1380]@EntityName
Out[1]= AcDbBlockReference

Теперь проверим тип объекта 1380:

Код:

[Выделить все]

NETTypeInfo[mspace@Item[1380]]

Результат: class "Autodesk.AutoCAD.Interop.Common.AcadEntityClass", а не AcadBlockReference

Как получить доступ к атрибутам блока?

[Дима_]

Штрудируйте мануалы по ООП - в блоке ModelSpace могут находиться примитивы любого типа, в том числе и AcadBlockReference - естественно Item возращает общий класс - для получения "не общих" свойств - после проверки имени преобразовывайте в соответствии с иерархией (либо, если вызов динамический, просто не обращайте внимания, но имя все равно проверьте - а то выскочит еррор).

[Евгенич]

Дима_, спасибо за ЦУ! Проштудировал мануал Mathematica и нашёл решение своей задачи через CastNETObject[obj,"type"].