[baksconstructor]

Так как автокад не дает через свойства изменить длину существующего отрезка - прошу подсказать, возможно есть лисп или макрос на кнопку :
Щелкнули на линию - появилось сообщение о длине отрезка, и появился запрос ввода длины.
Вводим новую длину (которая нужна).
Отрезок изменяет свою длину с новым значением.
Искал не нашел (общая длине не нужна, отрезок один)

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

_.lengthen

[Bull]

щелкнул и появилась длина. Ишь чего...
А если серьезно, зачем, когда есть и растягивание, и продление отрезка (на величину ли, или до каких-то других линий)? Тем более что при изменении длины возможны разные хотелки - справа, слева, в обе стороны симметрично, в обе стороны несимметрично. Лиспик будет нехилый. Наверное (не спец сильно в этом деле)

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

Bull, я ж показал команду... Чего еще надобно?

[Gmk17]

Ну или при включенном динамическом вводе (F12), выделить отрезок, подвести курсор к конечной ручке отрезка, появится меню (Растянуть/Увеличить), выбрать Увеличить и TAB'ом поперебирать варианты изменения длины. Там будет общая длина отрезка.

[baksconstructor]

Сообщение от Кулик Алексей aka kpblc _.lengthen

Это известно, но нужно щелкать ещё несколько раз, некоторые сотрудники не сразу поймут что именно нужно выбрать в ком строке.

Сообщение от Bull щелкнул и появилась длина. Ишь чего... А если серьезно, зачем, когда есть и растягивание, и продление отрезка (на величину ли, или до каких-то других линий)?

Нет, не то.
Растягивание не нужно.

Пример:
Есть отрезок 12.5763
Нужно сделать его длину = 10

Вот я и хочу - щелкнул по нему, увидел длину 12.5763, вписал 10 и отрезок стал =10. (без выбора в ком строке кучи параметров)

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

Отлично. Какую вершину переносить? Или обе? А что делать, если "это" выглядит как отрезок, но является на самом деле 3D-полилиней или сплайном?

[baksconstructor]

Сообщение от Кулик Алексей aka kpblc Какую вершину переносить?

В свойствах есть Начало, есть Конец, логично былобы конец изменить.

Сообщение от Кулик Алексей aka kpblc А что делать, если "это" выглядит как отрезок, но является на самом деле 3D-полилиней или сплайном?

А это уже на совести пользователя.

[Gmk17]

Сообщение от baksconstructor Вот я и хочу - щелкнул по нему, увидел длину 12.5763, вписал 10 и отрезок стал =10. (без выбора в ком строке кучи параметров)

Чем не подходит мой вариант? Именно это я и описал в #5

[Jonas]

Сообщение от baksconstructor Это известно, но нужно щелкать ещё несколько раз, некоторые сотрудники не сразу поймут что именно нужно выбрать в ком строке.

Щелкать несколоко раз не нужно. Давайте посчитаем, щелчек команда (если по иконке) - щелчек по отрезку - правая кнопка с задержкой, выпадает меню - щелчек "всего" - вводим длину - щелчек по той стороне отрезка которую нужно увеличить/удлинить.
Если хочется макрос то
_lengthen;в;/;
Щелкаем иконку - вводим конечную длину отрезка - показываем сторону отрезка.

[baksconstructor]

Сообщение от Jonas Если хочется макрос то _lengthen;в;/;

Практически то что надо, спасибо. Осталось придумать чтобы он вначале показал существующую длину.

[Gmk17]

Сообщение от baksconstructor В свойствах есть Начало, есть Конец, логично было бы конец изменить.

А если он начерчен "задом-наперёд"? Как это на глаз определить?
Хромает логика...

[Gmk17]

Сообщение от baksconstructor Осталось придумать чтобы он вначале показал существующую длину.

А это что?
И никаких кнопок, командных строк и макросов с лиспами. Только базовый функционал.

[Jonas]

Сообщение от baksconstructor Так как автокад не дает через свойства изменить длину существующего отрезка - прошу подсказать, возможно есть лисп или макрос на кнопку

Какой вопрос такой и ответ.

[baksconstructor]

Собственно собрал монстра:

Код:

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

 (defun C:NewДлина (/ obj ent x)
(setq obj (entsel "\Укажите линию: "))
(setq ent (entget (car obj)))
(setq x (distance (cdr (assoc 10 ent))(cdr (assoc 11 ent))))
(alert (strcat "Длина = " (rtos x)))
(command "_LENGTHEN" "_T" "\\" obj "" "\\")
)

Может и криво, но пойдёт. (надо найти как инпутбокс сделать, чтобы вводить новое значение сразу в окошке).

[Gmk17]

Сообщение от baksconstructor Собственно собрал монстра:

Offtop: меняй ник на baksFrankenstein

[Krieger]

Вообще то, команда "_lengthen" выводит длину существующего отрезка, если по нему щелкнуть до указания опции "_Total". Поэтому достаточно вот такого макроса:

Код:

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

^C^C_lengthen;\_t;\@;;

Сначала тыкаем по отрезку, видим его длину и указываем новую длину.

Сообщение от лог комстороки _lengthen Select an object or [DElta/Percent/Total/DYnamic]: Current length: 131.5232 Select an object or [DElta/Percent/Total/DYnamic]: _t Specify total length or [Angle] <150.0000)>: 130 Select an object to change or [Undo]: @ Select an object to change or [Undo]:

[Jonas]

Сообщение от Krieger ^C^C_lengthen;\_t;\@;; Сначала тыкаем по отрезку, видим его длину и указываем новую длину.

А если ^C^C_lengthen;\_t;\\;; то можно указывать сторону изменения.

[мозголом из Самары]

Господа, может кто нибудь знает как сделать такое - укоротить группу отрезков с двух сторон на определенную величину, но центр отрезка должен остаться на месте.
Пример: есть расчетная модель мк здания, перекинул балочную клетку в dwg а далее необходимо отодвинуть все второстепенные балки от главных на 100-150, как можно сделать разом ? а не каждую балку в отдельности менять?

[Bull]

мозголом из Самары, _lengthen с опцией delta и вводом значения в минус. Правда, "разом" не работает. Вам тогда надо в "программирование" тему создать