[Alex_Shaton]

Я часто пользуюсь Lisp от Lee Mac - AutoBlockBreakV1-8.lsp отсюда - http://www.lee-mac.com/autoblockbreak.html. В полилинию вставляется блок, под блоком часть полилинии удаляется. Часто встречается и обратная задача - удалить указанный блок, соединить 2 конца полилинии. Поиск по форуму результатов не дал. Вариант решения нашел здесь -https://autocadtips1.com/2014/11/12/autolisp-updated-heal-linepolyline/. Сохранил в блокноте как Lisp, проверил на AutoCAD 2007 и AutoCAD2015_64, представленный там код не срабатывает (хотя описано, что код рабочий). Уважаемые гуру! Подскажите - это ошибка в коде или я что-то делаю не так. Или может есть другие варианты решения этой задачи?

[Кулик Алексей aka kpblc]

Сообщение от Alex_Shaton Поиск по форуму результатов не дал.

Поиск по словам "Хитрый блок" многое покажет )

[Andrey_nadym]

Пробовать надо. Читайте похожие темы

http://forum.dwg.ru/showthread.php?t=8284
https://dwg.ru/dnl/607

https://forum.dwg.ru/showthread.php?t=95515
https://forum.dwg.ru/showthread.php?t=33696
https://forum.dwg.ru/showthread.php?t=143411

https://www.google.ru/search?q=%D1%8...w=1920&bih=974

[koMon]

Сообщение от Alex_Shaton В полилинию вставляется блок, под блоком часть полилинии удаляется.

А нарисовать в блоке Wipeout по графике блока не проще будет?

[zenon]

Сообщение от koMon А нарисовать в блоке Wipeout по графике блока не проще будет?

Сие не всегда оправдано, ибо wipeout это по сути рисунок, и отсюда бывает появляются проблемы, особенно если не подгружены соответствующие библиотеки.

[koMon]

Сообщение от zenon и отсюда бывает появляются проблемы,

при всём уважении, из встроенного мануала:
"Because a wipeout object is similar to a raster image, it has the same requirements for plotting. You need a raster-capable plotter with either an ADI 4.3 raster-capable driver or the system printer driver."
"Поскольку объект Wipeout идентичен растровой картинке, для его печати требуются те же требования. Вам необходим плоттер, способный печатать растровую графику с ADI 4.3 драйвером или драйвер для принтера из набора операционной системы."
Но, имхо, внести необратимые изменения в графические примитивы, порезкой например полилинии - совсем не комильфо(

[Сергей812]

Сообщение от koMon Но, имхо, внести необратимые изменения в графические примитивы, порезкой например полилинии - совсем не комильфо(

ну поскольку это программная ветка, но не совсем необратимо) Просто как-то должны запоминаться (например, в расширенных данных) - что данные отдельные примитивы когда то являлись частью целого и каким объектом была "разбита" полилиния. А потом в событии/реакторе удаления данного объекта "склеивать" полилинии и модифицировать их расширенные данные.

[zenon]

koMon, ну как пример:
https://forum.dwg.ru/showthread.php?t=130510
https://forum.dwg.ru/showthread.php?t=6571
https://forum.dwg.ru/showthread.php?t=20031

как сказал, может вызвать проблемы.
Причем тут печать не понял.

[Alex_Shaton]

Большое спасибо всем за ответы, буду копать дальше

[baksconstructor]

Наверно надо приложить пример, и заодно написать в поиск исполнителей.

[koMon]

Сообщение от zenon Причем тут печать не понял.

ну я так теоретичеки полагаю, что это единственная возможная проблема могущая возникнуть например. написал, но ссылки не посмотрел.. исправлюсь) ссылки посмотрел.

----- добавлено через ~8 мин. -----

Сообщение от Сергей812 ну поскольку это программная ветка, но не совсем необратимо) Просто как-то должны запоминаться (например, в расширенных данных) - что данные отдельные примитивы когда то являлись частью целого и каким объектом была "разбита" полилиния. А потом в событии/реакторе удаления данного объекта "склеивать" полилинии и модифицировать их расширенные данные.

это очень идеальный и очень сложный вариант решения. но к примеру можно найти крайние точки касания контура блока остатков того, что было под блоком и соединить их сравняв их координаты. вот только если этих остатков будет не от одного примитива?

[Сергей812]

Сообщение от koMon это очень идеальный и очень сложный вариант решения. но к примеру можно найти крайние точки касания контура блока остатков того, что было под блоком и соединить их сравняв их координаты. вот только если этих остатков будет не от одного примитива?

Этот вопрос надо решать в момент "разбивки" блоком полилинии - когда создает две полилинии вместо одной, то в расширенные данные эти полилиний прописывается какой то общий идентификатор и ссылка на хэндл блока. Когда блок удаляется - по его хендлу ищется совокупность групп разбитых им полилиний, а затем уже анализ их геометрии для поиска ближайших друг к другу конечных узлов полилинии с последующим соединением. Ничего тут идеального нет, просто несколько связанных подзадач.

[koMon]

Сообщение от Сергей812 Ничего тут идеального нет

я имел в виду буквально следующее: идеальный ≡ совершенный

[Сергей812]

ну скорее не совершенный, а реализуемый с предсказуемой логикой работы)

[zenon]

koMon, кстати, а стандартную команду СОЕДИНИТЬ (_join) почему не попробовать?

[koMon]

zenon, я думаю можно и join, но это командный метод...

[Сергей812]

Эту команду тоже надо откуда то "дергать", не руками же вызывать каждый раз. И насколько помню - в событиях/реакторах очень не рекомендуется использовать командные методы.

[Boxa]

Что то вы переусложнили... ИМХО, достаточно поверх существующего примитива овердравит нужное отображение. Да, работать будет только при загруженной библиотеке, но имхо это меньшее из зол.

[Сергей812]

Сообщение от Boxa достаточно поверх существующего примитива овердравит нужное отображение. Да, работать будет только при загруженной библиотеке, но имхо это меньшее из зол.

Сообщение от Alex_Shaton Часто встречается и обратная задача - удалить указанный блок, соединить 2 конца полилинии.

две разные задачи всетаки, имхо.

[Boxa]

Приведу Вашу же цитату:

Сообщение от Сергей812 ну поскольку это программная ветка, но не совсем необратимо) Просто как-то должны запоминаться (например, в расширенных данных) - что данные отдельные примитивы когда то являлись частью целого и каким объектом была "разбита" полилиния. А потом в событии/реакторе удаления данного объекта "склеивать" полилинии и модифицировать их расширенные данные.

Проще не разбивать и реакторы ставить, а просто перерисовывать отображение. Добавили блок, нарисовали разрыв, убрали блок - убрали и разрыв.
Если же исполнителю досталось разгребать последствия чей то работы... тут можно только посочувствовать.

[Сергей812]

Сообщение от Boxa Проще не разбивать и реакторы ставить, а просто перерисовывать отображение. Добавили блок, нарисовали разрыв, убрали блок - убрали и разрыв.

потом кто-то в той же фирме открывает в том же бесплатном просмоторщике TrueView чертеж и что он там увидит?

[Boxa]

Может увидеть как линию поперек блока, так и нормальную картинку, что линия прерывается.
Зависит от реализации и потребностей.

[Сергей812]

а еще от того:
- нужна ли общая длина полилинии (типичная задача для той же электрики/слаботочки - устройства "гирляндой" на кабеле/шлейфе);
- требуется ли работа с этими частями полилинии как с единым целым.

Сообщение от Boxa Может увидеть как линию поперек блока, так и нормальную картинку, что линия прерывается.

а почему он не может увидеть просто два отдельных примитива или одну целую полилинию?) Лишь бы приложение-просмоторщик понимало формат dwg.

[Boxa]

Сергей812, и? Да все это может потребоваться и да, все это можно реализовать.
Я хотел донести простую мысль, что работать и оперировать одним элементом намного проще, чем осколками.
А как это реализовать, дело десятое и зависит от потребностей: от овердравинга полилиии/мультилинии до собственного объекта или псевдо объекта на основе анонимного блока.

ЗЫ.
Кстати, вот к мульмилинии я присмотрелся бы повнимательнее, т.к. она штатно может содержать разрывы в отображении при этом оставаясь единым объектом...

[Сергей812]

Сообщение от Boxa А как это реализовать, дело десятое и зависит от потребностей: от овердравинга полилиии/мультилинии до собственного объекта или псевдо объекта на основе анонимного блока.

Конечный результат (чертеж) не должен зависеть от каких либо надстроек) Если человеку нужны полилинии, соединяющие объекты и механизм для оперативного/полуавтоматического/автоматического их разрыва и склеивания - зачем ему предлагать механизмы перерисовки или имитацию полилинии в виде других объектов?

[Boxa]

Сергей812, Вы меня как будто не слышите... если результат не должен зависеть от надстроек, значит надо реализовать так, что бы не зависел.
В любом случае, теперь у автора есть больше информации к размышлению и автор сам определиться как ему делать.

[Andrey_nadym]

Вот это попробуйте

http://cadsupport.ru/2014/11/lisp-me...e-under-block/

[Setvar]

Сообщение от Сергей812 Конечный результат (чертеж) не должен зависеть от каких либо надстроек)

Правильно. Конечный результат (чертеж) вообще не должен зависеть ни от чего, в том числе ни от инструментов, ни от исполнителей.

[Alex_Shaton]

Andrey_nadym, как раз вот по этой ссылке не работает, к тому же это только для линий, а не полилиний.

[koMon]

Сообщение от Alex_Shaton а не полилиний.

вот мне интересно, в ваших посечённых полилиниях есть дуговые сегменты?

[Alex_Shaton]

Сегменты полилиний, как правило, прямые. Дуговые встречаются, но очень редко

[Do$]

Сообщение от Alex_Shaton Вариант решения нашел здесь -https://autocadtips1.com/2014/11/12/autolisp-updated-heal-linepolyline/. Сохранил в блокноте как Lisp, проверил на AutoCAD 2007 и AutoCAD2015_64, представленный там код не срабатывает (хотя описано, что код рабочий). Уважаемые гуру! Подскажите - это ошибка в коде или я что-то делаю не так.

Код рабочий, но только в английской версии. В русской надо добавить подчёркивание перед "C" вот тут:

Код:

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

 (setq objs (ssget "_C"

После этого работает.

[Alex_Shaton]

Do$, большое спасибо! Проверил - работает!