（cad2020）选取线段，提取长度，但是lengthen命令还会继续执行，如何提取完后使之结束并继续后面的操作。请求指点，谢谢。

• (command "lengthen" ent1 "")
• (setq l1 (getvar "perimeter"))
  

网友答:


网友答: 谢谢您的回复，问题还是没有解决，cad依然继续执行lengthen命令，要求输入数值（或选择）。
(defun c:tt1(/ ent1 l1 pp pt1)
(while (= nil ent1) (setq ent1 (ssget ":e:s" '((0 . "*line,circle,ellipse,arc")))))
(command "lengthen" ent1 "")
(setq l1 (getvar "perimeter"))
(setq pp (rtos l1 2 0))

(setq pt1 (getpoint "point"))
(command "text" "tl" pt1 l1 0 pp)
(princ)
)

网友答: 另外，cad2014版本试用就没有问题。为什么cad2020有问题呢？

网友答: 我用的是2014，你说的2020没有安装。

网友答: (command "lengthen" ent1 "" "" "" )
加2个空格

网友答:
谢谢大神，加2个空格果然就可以了。应该是不同版本的cad之间lengthen命令的使用有区别