liuxinkai 发表于 2024-12-14 11:39:02

多段线橡皮线问题

想用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 发表于 2024-12-14 13:28:39

本帖最后由 llsheng_73 于 2024-12-14 13:29 编辑

"把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 发表于 2024-12-14 14:46:20

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))
感谢
页: [1]
查看完整版本: 多段线橡皮线问题