[Neznayka]

как сделать так , чтоб щёлкнуть по объекту, а его длина отобразилась в ячейке
в ручную долго, есть ли здесь пути для автоматизации?

[Александр Ривилис]

Сообщение от Neznayka Это превзошло все мои ожидания! Вы, вы гений.

Да ладно! Вы преувеличиваете...

Сообщение от Neznayka Пробовал приспособить под подсчёт площади заменой: "%<\\AcObjProp Object(%<\\_ObjId " (vl-princ-to-string (vla-get-objectid (vlax-ename->vla-object en))) ">%).Length>%" На: "%<\\AcObjProp Object(%<\\_ObjId " (vl-princ-to-string (vla-get-objectid (vlax-ename->vla-object en))) ">%).Area>%" Только решетки. Не получилось.

У отрезков нет свойства Area. Поэтому и решетки.

Сообщение от Neznayka ... этот лисп может получить более широкое распространение, т.е нужным не только для меня, если Вы предусмотрите возможность заточки этого Лиспа под другие поля. Ведь вероятно кому-то еще понадобится вставлять в ячейки тип линии, имя, имя слоя, уровень и т.д . А кому-то еще атрибут захочется втиснуть или блок вписать в ячейку, или просто текст.

Универсально "заточить" его не получится. Считайте, что это простенький образец для создания собственных команд по работе с полями и ячейками таблицы. А делать "монстра", который будет делать все, но для этой цели понадобится отвечать на десяток вопросов, я не вижу смысла.

P.S.: Рад, что мой труд не пропал даром.

[Neznayka]

У отрезков нет свойства Area. Поэтому и решетки.

Я что-то не понимаю, а причём тут отрезки. Я полилинией чертил квадрат. Ведь у pl есть площадь, даже у незамкнутой.

Зачем десяток вопросов. Как я это вижу со своей ламерской колокольни:
Первым делом спрашивается:
- введите код поля.
И вводим, то, что нам надо, например:
%<\AcObjProp Object(%<\_ObjId 0000000000>%).TextString>%

(или другое, например %<\AcVar CreateDate \f "d-MMM-yy">%)

Далее все как у ВАС:
Выберите таблицу;
Выберите объект;
Выберите ячейку.

В следующем цикле пропускаем первый пункт, достаточно нажать пробел.
Или первый пункт появляются лишь при первом запуске Лиспа. Хочешь новое поле – запускай еще раз лисп.
Да можно и второй пункт пропустить. Достаточно единожды выбрать таблицу.

А ежели что-то некорректное выбрано, типа как площадь у текста. То решетки.
Зы Я не слишком назойлив