[dextron3]

Как в автокаде можно соеденить два премитива Line в один и цельный тоже Line,

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

[Profan]

Команда "_PEDIT" ("ПОЛРЕД") поможет с последующим расчленением.

[dextron3]

как это? принцип действия ??

[Fellini]

_join ?

[dextron3]

Fellini, точно! !спасибо

[BM60]

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

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

[Profan]

Это муторный процесс. Выбираем несколько отрезков, По запросу преобразуем их в полилинии, объединяем в 1 полилинию, удаляем вершину, расчленяем, получаем 1 отрезок.
А команды "_JOIN" ("СОЕДИНИТЬ") разве у тебя нет?

[Хмурый]

если линии лежат на одной прямой- то _overkill из Express Tools

[dextron3]

Хмурый, они касаются только водной тчке

[Хмурый]

dextron3, ну, так проверни overkill и посмотри результат

[Profan]

А ты посмотри опции команды OVERKILL.

[Рyslan]

из крайних точек проведи два отрезка под углом к твоим отрезкам, свои два отрезка удали, соедини две вершины новым отрезком, удали вспомогательные отрезки- готово!

[Nike]

dextron3, поставь себе Новые команды для работы с полилинией
Последовательность команд
PL-JOIN -Объединение полилиний чохом
PL-VxRdc -Удаление вершин полилиний, которые лежат на одной прямой
_explode (если надо)

[dextron3]

Nike, я с поллилиниями и м-текстом не работаю уже как 5 лет, не мой профиль

[Profan]

Offtop:

dextron3, поставь себе dextron3

Да чего там 3 - ставь сразу 333.

[Vova]

Если старый автокад и нет Join
*^C^CCOPY;END;\;@;@;E;P;;'CAL;P1=@;SELECT;SINGLE;END;\LEN;DY;@;!P1;;-OVERKILL;L;P;L;;F;0;;

Позволяет соединять не соприкасающиеся отрезки, лежащие на одной прямой

[Ingpro]

Команда _JOIN (СОЕДИНИТЬ)
Необходимо соединить несколько отрезков или полилиний, парами лежащих на одной прямой.
Команда JOIN соединяет только 1 пару отрезков, возможно ли это сделать в цикле, т.е. выбрать одну пару, ПКМ, линии соединились, затем вторую пару, ПКМ и т.д.

(vl-cmdf "_.JOIN")

[tankist]

Сообщение от Ingpro Необходимо соединить несколько отрезков или полилиний, парами лежащих на одной прямой.

Команда "фаска" крайних отрезков. Ненужные удалить.

[Ingpro]

Сообщение от tankist Команда "фаска" крайних отрезков. Ненужные удалить.

"Выберите второй отрезок или нажмите клавишу Shift при выборе, чтобы создать угол, или [Расстояние/Угол/Метод]:
"фаску" — недопустимое свойство для коллинеарных отрезков."
Мне не нужно сопряжение в углах...

[Хмурый]

а если *^C^C_join

[Сергей812]

и в чем проблема - в цикле выбираете два отрезка, создаете отрезок по двум максимальным удаленным друг от друга вершинам отрезков и далее по кругу.. без всякой команды join

[Ingpro]

Сообщение от Хмурый а если *^C^C_join

Не-а, выбираю несколько пар отрезков, но соединяется только первая пара...

[Хмурый]

не "нет", а "да"

[Ingpro]

Сообщение от Хмурый не "нет", а "да"

Я запускаю с инструм. палитры, выбирает много раз - "да", соединяет только первую пару

[Хмурый]

следует переопределить команду в _cui
*^C^C_join
команда зациклится. выбираем два примитива и нажимаем ввод, затем ещё два и ввод и т.д... для выхода- esc

[Ingpro]

Сообщение от Хмурый следует переопределить команду в _cui

Да это не нужно, можно просто _join - выбрать пару - пкм - пробел (повтор команды) и т.д.
Думаю без лисп не обойтись, хочется выбрать все пары и чтобы они соединились попарно...

[Хмурый]

на одно нажатие ввода меньше.
нет- так нет. как скажешь.

просто _join - выбрать пару - пкм, выбрал пару - пкм, выбрал пару - пкм ...

[Ingpro]

Сообщение от Ingpro Думаю без лисп не обойтись

Код рабочий. Выбираешь попарно линии и они соединяются...

Код:

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

 (defun c:JoinPairs ( / ent1 ent2 )
  (princ "\nВыберите первую линию или нажмите Enter/ESC для завершения.")
  (while (setq ent1 (car (entsel "\nПервая линия для JOIN: ")))
    (setq ent2 (car (entsel "\nВторая линия для JOIN: ")))
    (if ent2
      (command "_.JOIN" ent1 ent2 "")
      (progn
        (prompt "\nНе выбрана вторая линия. Выход.")
        (exit)
      )
    )
  )
  (princ "\nКоманда JoinPairs завершена.")
  (princ)
)

[Linkshunter]

Сообщение от Ingpro возможно ли это сделать в цикле, т.е. выбрать одну пару, ПКМ, линии соединились, затем вторую пару, ПКМ и т.д.

использую _PEDIT

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

Сообщение от Ingpro Выбираешь попарно линии

это долго, рамкой обе(или все) быстрее

[Ingpro]

Сообщение от Linkshunter использую _PEDIT

_PEDIT соединяет линии, которые касаются, а моя задача соединить линии, которые лежат на одной прямой, но не касаются друг друга...

Сообщение от Linkshunter это долго, рамкой обе(или все) быстрее

да, всё рамкой - конечно быстрее...

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

Сообщение от Ingpro _PEDIT соединяет линии, которые касаются, а моя задача соединить линии, которые лежат на одной прямой, но не касаются друг друга..

А если внимательно посмотреть в ком.строку, можно увидеть, что для объединения можно и точность совпадения установить.

[Ingpro]

Сообщение от Кулик Алексей aka kpblc А если внимательно посмотреть в ком.строку, можно увидеть, что для объединения можно и точность совпадения установить

Не хочется с этим возиться...

[Linkshunter]

Сообщение от Ingpro Не хочется с этим возиться...

это посмотрите
https://www.cadtutor.net/forum/topic...ear-polylines/
и это
https://lee-mac.com/polylineprograms.html