|
||
| Правила | Регистрация | Пользователи | Сообщения за день | | Поиск | | Справка по форуму | Файлообменник | |
|
![]() |
Поиск в этой теме |
![]() |
#1 | |
Команда: _pedit
Регистрация: 07.06.2005
Сообщений: 290
|
||
Просмотров: 4184
|
|
||||
Инженер дорожник Регистрация: 22.10.2007
Израиль
Сообщений: 1,859
|
Можно ещё и такой макрос на кнопку. Объединяет и те линии концы которых не совпадают.
^C^C(defun c:mypljoin( / selset _pedit) (if (setq selset (ssget "_:L" '((0^M;. "ARC,*LINE")))) (progn (setq _pedit (getvar "PEDITACCEPT")) (setvar^M;"PEDITACCEPT" 1) (command "_.pedit" "_m" selset "" "_j" 1.0 "") (setvar^M;"PEDITACCEPT" _pedit))));mypljoin; |
|||
![]() |
![]() |
|
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
LISP. Вставка в таблицу поля, соотвествующего площади примитива | Profan | Готовые программы | 272 | 06.06.2021 23:12 |
DwgRuLispLib: Команда. Загрузка lisp файлов из указанной папки | VVA | Библиотека функций | 7 | 15.02.2018 10:10 |
Преобразование полей в текст | YuraVel | AutoCAD | 17 | 14.04.2015 14:30 |
команда properties | Marishka | AutoCAD | 6 | 21.01.2008 13:56 |
ACAD-2002. Глюк начальной загрузки ЛИСП? | ===AAA=== | LISP | 27 | 31.08.2005 07:58 |