Пожалуйста, помогите, нужен lisp для выбора объектов

macros55 · 03.04.2013, 23:00

в чертежа есть многих точки, многих линии и многих других объектов. Нарисуйте многоугольник линию края, выберите линию и автоматические выбрать все точки, многих линии и многих других объектов. Есть ли у вас такое Lisp? Пожалуйста, помогите

macros55 · 11.01.2016, 07:45

письма ошибки ; error: AutoCAD.Application: Not applicable

VVA · 11.01.2016, 08:16

macros55, Выложи файл с примером

macros55 · 11.01.2016, 08:47

Никаких проблем по установке, но LISP принадлежит ей ошибка

Command: NS
; error: AutoCAD.Application: Not applicable
Command:

VVA · 11.01.2016, 08:56

macros55, Мне нужен dwg файл, в котором возникает данная ошибка. У меня все работает. Сообщи так же версию и разрядность Автокада
I need a dwg file in which the error occurs. Please attach it.

macros55 · 11.01.2016, 09:21

Это мой проект http://forum.dwg.ru/attachment.php?a...1&d=1452493226

VVA · 11.01.2016, 10:37

Update #20 Try again

macros55 · 11.01.2016, 14:29

VVA большой спасибо lisp super...ещё маленький проблем

Что происходит?

VVA ещё второй маленький проблем

VVA · 11.01.2016, 17:57

macros55, Потому что метод IntersectWith для блока ищет пересечение не с примитивами, входящими в блок, а с его ограничивающим прямоугольником (bounding box)

Код:

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

(defun C:TEST ()
  ;;;Command Test draw block's bounding box
  (vl-load-com)
(and
  (setq tmp_blk (car(entsel "\nselect Block : ")))
  (or (vla-GetBoundingBox (vlax-ename->vla-object tmp_blk) 'MinPt 'MaxPt) t) ;_Границы блока
  (setq	MinPt (vlax-safearray->list MinPt)
       MaxPt (vlax-safearray->list MaxPt)
	)
  (vl-cmdf "_Rectang" "_none" (list(car MinPt)(cadr MinPt)) "_none" (list(car MaxPt)(cadr MaxPt)))
  )
  )

macros55 · 11.01.2016, 18:24

VVA (bounding box) ладно большой спасибо..но почему выбрали OFF LAYER (второй картинке)

VVA · 11.01.2016, 21:15

Цитата:

Сообщение от macros55

но почему выбрали OFF LAYER (второй картинке)

Потому что не было сказано, что этого делать не следует

Завтра посмотрю, что можно сделать

----- добавлено через ~13 ч. -----
Обновил #20
Update #20 Try again

macros55 · 12.01.2016, 11:20

VVA большой спасибо..lisp

----- добавлено через ~1 ч. -----
VVA можно следующий вопрос?

macros55 · 12.01.2016, 12:26

new lisp

macros55 · 12.01.2016, 12:48

извини первая картинке (0.50) это неправильно как, удалить ее ...правильно второй картинке (0.05)

macros55 · 15.01.2016, 14:38

VVA ?

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Помогите студенту )! Нужен интересный, креативный план дома для Дипломной работы.	dengrits1	Поиск литературы, чертежей, моделей и прочих материалов	4	07.02.2012 14:04
Помогите пожалуйста рассчитать стальную петлю на изгиб	borisovev11	Конструкции зданий и сооружений	55	29.11.2011 16:19
Помогите пожалуйста с отоплением	Mishan13	Отопление	3	27.10.2011 12:29
Помогите пожалуйста советом по гидроизоляции.	SanjkaK	Конструкции зданий и сооружений	10	09.08.2011 17:35
Помогите пожалуйста найти поперечник вагона с углём	МишаИнженер	Поиск литературы, чертежей, моделей и прочих материалов	16	05.08.2011 18:54

03.04.2013, 23:00
Пожалуйста, помогите, нужен lisp для выбора объектов macros55 Регистрация: 02.04.2013 Сообщений: 24 в чертежа есть многих точки, многих линии и многих других объектов. Нарисуйте многоугольник линию края, выберите линию и автоматические выбрать все точки, многих линии и многих других объектов. Есть ли у вас такое Lisp? Пожалуйста, помогите
Просмотров: 7570

	Реклама i