求修改指定任意长度的线段？

zilong136

工常中经常要修改线段的长度，不想通过编辑(偏移、拉伸)命令来实现，就想输入长度来实现。

• ;12.6【e6】线段定长
• (defun c:e6 ()
•   (command "LENGTHEN" "T" (getreal "\n 指定总长: ") )
•   (prompt "\n e6:线段定长")
•   (princ)
• )
• ;12.7【e7】线段增量
• (defun c:e7 ()
•   (command "lengthen" "de" (getreal "\n 指定增量: ") )
•   (princ "\n e7:线段增量")
•   (princ)
• )
  

sammy

不要在无关板块发帖，这种问题请发在求助板块。
这个CAD的内置命令就可以实现，学会使用autocad帮助。

zilong136

sammy 发表于 2024-4-3 11:39
不要在无关板块发帖，这种问题请发在求助板块。
这个CAD的内置命令就可以实现，学会使用autocad帮助。

正好可以教教我

fangmin723

LENGTHEN命令了下

zilong136

fangmin723 发表于 2024-4-3 15:39
LENGTHEN命令了下

谢谢，一直习惯是增量，还没注意有直接定长的功能

hnlylsb

len t
如果一开始就需要制定长度的的话L  @长度值 ，角度

zilong136

hnlylsb 发表于 2024-4-4 10:43
len t
如果一开始就需要制定长度的的话L  @长度值 ，角度

谢谢，可以实现。

XPG

感谢分享。