多段线橡皮线问题

liuxinkai

想用command命令调用多段线命令，点选点的时候要求画多段线的时候能有橡皮线的功能，并且得到最终的多段线存储到变量中。学艺不精，尝试了几种方法都不理想，如何解决。
几种方法如下：
1、 (setq pt (getpoint))    (command pt "w"  起点宽 终点宽)  (while (setq pt (getpoint))     (command pt )   )   (command "")  (setq ent(entlast))，这样选多段线第二个点的时候实际用的是getpoint命令，没有橡皮线，用起来很别扭。
2、AI让把getpoint改为getcorner【   (setq pt (getpoint))   改为 (setq pt (getcorner pt))】，就是用画矩形的效果代替选点的效果，感觉好多了，还不满意。
3、尝试用grread得到鼠标坐标+grdraw画多段线的上一点到鼠标坐标虚线，鼠标移动得到的是一片线，不能及时的消除。后来grdraw完后加上redraw，也没成功。
4、甚至想到用distance距离命令的橡皮线，也没成功。
请前辈们指点一二，感谢。

llsheng_73

"把getpoint改为getcorner【   (setq pt (getpoint))   改为 (setq pt (getcorner pt))】，就是用画矩形的效果代替选点的效果，感觉好多了，还不满意。"
1、 (setq p (getpoint))    (command p"w"  起点宽 终点宽)  (while (setq pt (getpoint p))     (command pt )   )   (command "")  (setq ent(entlast))

liuxinkai

llsheng_73 发表于 2024-12-14 13:28
"把getpoint改为getcorner【   (setq pt (getpoint))   改为 (setq pt (getcorner pt))】，就是用画矩形的 ...

(setq pt (getpoint))    (command pt "w"  起点宽 终点宽)  (while (setq pt (getpoint pt))     (command pt )   )   (command "")  (setq ent(entlast))
感谢