nalsur8 发表于 2022-7-6 09:43:52

如何显示极轴追踪

(setq pt1(getpoint"\nInsert Point:"))
(setq pt2(getpoint pt1"\nLength :"))用户移动光标，而不是极固缝显示
每次移动增加+5
 
Tq公司

BIGAL 发表于 2022-7-6 10:06:34

使用“grid”命令怎么样

Tharwat 发表于 2022-7-6 10:22:30

试试这个。。。。
 

(if (setq pt1 (getpoint "\n Insert Point:"))
(progn
   (if (not Len )(setq Len 5.))
    (setq pt2 (cond ((getdist (strcat "\n Length < "(rtos Len 2 2) "> :")))(T Len)))
   (setq Len pt2)
   )
(princ)
)

 
塔瓦特

nalsur8 发表于 2022-7-6 10:38:41

 
我的意思是，当用户在拾取第一个点后移动光标时实时
比极轴追踪显示每个动作增加+5

Tharwat 发表于 2022-7-6 10:48:11

 
因此，打开间距为5x5的网格模式
页: [1]
查看完整版本: 如何显示极轴追踪