Обьеденение полилиний.
| Правила | Регистрация | Пользователи | Сообщения за день |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Обьеденение полилиний.

Обьеденение полилиний.

Ответ
Поиск в этой теме
Непрочитано 22.12.2011, 17:47 #1
Обьеденение полилиний.
JCSN
 
Регистрация: 22.12.2011
Сообщений: 4

Здравствуйте. Нужно написать функцию, чтобы она обьединяла все полилинии на экране в одну полилинию, без диалогового окна и максимально упростив программу.
Просмотров: 3756
 
Непрочитано 22.12.2011, 18:02
#2
Profan


 
Регистрация: 25.12.2005
Москва
Сообщений: 13,627


Так вот без всяких условий - и в одну полилинию? А если некоторые полилинии пересекаются? Находятся на разных слоях? Имеют разную ширину?
Profan вне форума  
 
Непрочитано 22.12.2011, 18:14
#3
Nike

Шаражпроектхалтурмонтаж
 
Регистрация: 29.10.2004
Талды-Париж
Сообщений: 6,010


все:
(command "_.pedit" "_m" (ssget "_x" '((0 . "*line"))) "" "_j" "0.0001" "")

только выбранные:
(command "_.pedit" "_m" (ssget '((0 . "*line"))) "" "_j" "0.0001" "")
Nike вне форума  
 
Автор темы   Непрочитано 22.12.2011, 18:14
#4
JCSN


 
Регистрация: 22.12.2011
Сообщений: 4


Нет. Самый простой частный случай. Например есть одна полилиния и вторая, то просто конец первой присоединить к началу второй полилинии. Главное чтобы без выбора вручную. Команда _pedit исп-ся должна вроде бы.
JCSN вне форума  
 
Непрочитано 22.12.2011, 18:17
#5
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,996


см #3
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Автор темы   Непрочитано 22.12.2011, 18:22
#6
JCSN


 
Регистрация: 22.12.2011
Сообщений: 4


Nike, спасибо четко. Вот только не работает если эти полилинии нах-ся на расстоянии друг от друга. Работает если конец первой совпадает с началом второй.
JCSN вне форума  
 
Непрочитано 22.12.2011, 18:41
#7
Nike

Шаражпроектхалтурмонтаж
 
Регистрация: 29.10.2004
Талды-Париж
Сообщений: 6,010


Цитата:
Сообщение от JCSN Посмотреть сообщение
Вот только не работает если эти полилинии нах-ся на расстоянии друг от друга.
"0.0001" - вот это число определяет предел расстояния между концами склячиваемых линий. Увеличь до необходимого тебе значения.
Nike вне форума  
 
Автор темы   Непрочитано 22.12.2011, 19:45
#8
JCSN


 
Регистрация: 22.12.2011
Сообщений: 4


Тогда плиния продливается до соединения, а не перемещается.) Но все равно большое спасибо.И если можешь напиши, что за атрибут "_m".

Последний раз редактировалось JCSN, 22.12.2011 в 19:52.
JCSN вне форума  
 
Непрочитано 22.12.2011, 22:24
#9
Nike

Шаражпроектхалтурмонтаж
 
Регистрация: 29.10.2004
Талды-Париж
Сообщений: 6,010


Команда: _PEDIT Выберите полилинию или [Несколько]: н
она же
Command: _PEDIT Select polyline or [Multiple]: m
она же
(command "_.pedit" "_m" )
она же
^C^C_pedit;_m

Последний раз редактировалось Nike, 22.12.2011 в 22:33.
Nike вне форума  
 
Непрочитано 22.12.2011, 22:55
#10
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 40,411


Кое-что забыли. Если в набор попадет хотя бы один отрезок или дуга, код работать не будет.
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Непрочитано 22.12.2011, 23:34
#11
Nike

Шаражпроектхалтурмонтаж
 
Регистрация: 29.10.2004
Талды-Париж
Сообщений: 6,010


да, (setvar "PEDITACCEPT" 1)
Nike вне форума  
 
Непрочитано 23.12.2011, 05:44
#12
Profan


 
Регистрация: 25.12.2005
Москва
Сообщений: 13,627


Цитата:
Сообщение от JCSN Посмотреть сообщение
Нет. Самый простой частный случай. Например есть одна полилиния и вторая, то просто конец первой присоединить к началу второй полилинии. Главное чтобы без выбора вручную. Команда _pedit исп-ся должна вроде бы.
А не надо было тогда бездумно писать:

Цитата:
чтобы она обьединяла все полилинии на экране в одну полилинию
Profan вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Обьеденение полилиний.



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Развертка на плоскость полилиний shumaka AutoCAD 11 12.12.2010 12:23
LISP. Программа сопряжения отдельных сегментов полилиний или отрезков без объединения Profan Готовые программы 20 30.03.2010 18:23
Проблема с привязками и отображением полилиний в AutoCAD 2009 Padlo Escobar AutoCAD 5 28.01.2010 22:37
Как посчитать площадь из полилиний разом ? wehrwolf AutoCAD 3 19.09.2008 12:59
Изменение геометрии полилиний hydrograph Программирование 3 05.12.2007 09:44