[slogos]

Возникла проблема с функцией vlax-ename->vla-object. передаю в DEFUN имя примитива (3dface), где собираюсь через ActiveX взять координаты. Получаю ошибку, LISP не видит примитива, а значит vla-об-ект = nil.
Примитв есть, его имя есть, а vlax-ename->vla-object дает nil.
Проверяю
(if (and imya (= (type imya) 'ENAME))
(princ "\n переменная imya верна")
(princ "\n переменная imya ошибочно")
) ;_ end of if
и все нормально! Более того все это делается в цикле и до определенного момента работает. И впечатление такое, что попадает какая то "кривая" 3Dface. Но какая бы она не была кривая Entyti-name то есть. Почему же vlax-ename->vla-object его не берет? Кто подскажет что нибудь.

[VVA]

То, что возвращает (and imya (= (type imya) 'ENAME)) не гарантирует, что примитив существует. Что возвращает этот код

Код:

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

(if (and imya (= (type imya) 'ENAME)(entget imya))
(princ "\n переменная imya верна")
(princ "\n переменная imya ошибочно")
) ;_ end of if

[slogos]

При попытке взять список dxf тоже получаю nil. Почему же примитва нет, а его имя есть, я ведь вообще не удаляю примитивы? Где зарыта собака?

[TararykovDG]

slogos, как вариант виной сему может быть функция (entdel).

[slogos]

И все таки, чудес не бывает, конечно же удаляется 3Dface в некотрых критических ситуациях. Ошибка найдена, могу выложить приложение для построения рельефа местности, реализованное 2-мя алгоритмами. Кому интересна тема пишите.

[Лиспер]

А при чем тут vlax-ename->vla-object? Проблема-то не в нем...

[Disney]

Сообщение от slogos могу выложить приложение для построения рельефа местности, реализованное 2-мя алгоритмами. Кому интересна тема пишите.

Пишу. Интересно. Выкладывай.

[slogos]

Лисперу. А кто говорит, что в нем? Конечно проблема в программисте! Вечером выложу, сейчас должен убежать.
Выложил. В архиве VLX и примерчик. 1) удалить все 3Dface 2)загрузить VLX 3 )команда - BUILD_DELONE далее диалог. Указать примитив (любой) которым представлены пикеты (point, insert), программа по образцу выбирет их все.