Свойства выбранного примитива

Свойства выбранного примитива · 02.07.2010, 17:07

Как получить начальную и конечную точку линии?
Если я ее только что ввел все просто
(setq lob (ssget "l"))
(SETQ lob1 (ENTGET (entlast))) ну и потом забираем координаты из списка

А если я ее ввел давно и хочу выбрать сейчас таким образом
(setq lob (ssget))
как быть дальше?

KSI · 02.07.2010, 18:00

(setq list_prim (entget (car (entsel)))) - выбор примитива и получение списка.
(setq 10 (cdr (assoc 10 list_prim))) - координаты начала линии
(setq 11 (cdr (assoc 11 list_prim))) - координаты конца линии

Zaghim · 05.07.2010, 10:22

Спасибо огромное!!!!

(SETQ lob (entget (car (entsel))))
(SETQ fp_lob (CDR (ASSOC 10 lob)))
(SETQ ep_lob (CDR (ASSOC 11 lob)))

02.07.2010, 17:07		#1
Свойства выбранного примитива Zaghim Регистрация: 01.07.2010 Сообщений: 521 Как получить начальную и конечную точку линии? Если я ее только что ввел все просто (setq lob (ssget "l")) (SETQ lob1 (ENTGET (entlast))) ну и потом забираем координаты из списка А если я ее ввел давно и хочу выбрать сейчас таким образом (setq lob (ssget)) как быть дальше?
Просмотров: 2414

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
LISP. Вставка в таблицу поля, соотвествующего площади примитива	Profan	Готовые программы	272	06.06.2021 23:12
ZwCAD - экспорт меню в AutoCAD	superkot007	Другие CAD системы	4	23.05.2010 03:32
описывать свойства элементов по слою (bylayer) или прямо	АлексЮстасу	AutoCAD	110	13.03.2010 03:51
Как сохранить выделенность выбранного примитива или тела при переходе на другой изовид	BM60	AutoCAD	11	20.10.2008 16:53
как получить из примитива его свойства	paradoxvaha	Программирование	5	24.07.2007 22:24