nyistjz 发表于 2023-3-24 22:35:05

多段线绘制同时取得坐标点


(setq pt1 (getpoint "\n指定起点:"))
(command "_.pline" pt1)
(while (setq pt2 (getpoint pt1))
        (command pt2)
        (princ (distance pt1 pt2))
        (setq pt1 pt2)
)
(command)

sandyvs 发表于 2023-3-25 10:03:39

请教下,按esc不会马上退出,需要按两次,怎么解决?

500w008 发表于 2023-3-29 06:54:25

500w008 发表于 2023-3-29 06:55:35

页: [1]
查看完整版本: 多段线绘制同时取得坐标点