请帮忙看一下下面这个程序,运行时如图片所示,为什么我画完线要修剪的时候会有一个捕捉点出现.当把程序中的 (command "undo" "group")(command "undo" "end")删掉后,就不会有了,怎样才能不删掉"undo",同时运行起来不出那个捕捉点呢?为什么会这样呀?
(defun c:df () (command "undo" "group") (setq pt1 (getpoint "\n第一点:")) (setq pt2 (getpoint pt1 "\n第二点:")) (command "line" pt1 pt2 "") (command "trim" (entlast) "") (command "undo" "end") (princ) )
|