wzh 发表于 2005-1-14 19:40:00

grread的用法

使用GETPOINT指定第二点时可以使用


(setq P2 (getpoint P1))


来拉出一条橡皮线,而使用grread获取第二点时如何做到也有一条橡皮线?

meflying 发表于 2005-1-14 20:24:00

(defun c:test(/ pt1 pt ptold)<BR>       (setq pt1 (getpoint "Enter the first point:"))<BR>       (while (= (car (setq pt (grread 2 4))) 5)<BR>                       (setq pt (cadr pt))<BR>                       (if ptold<BR>                                       (grdraw pt1 ptold 0)<BR>                       )<BR>                                       (grdraw pt1 pt 1)<BR>                       (setq ptold pt)<BR>       )<BR>)

wzh 发表于 2005-1-15 15:05:00

不错,如果能实现正交功能就更好了.

meflying 发表于 2005-1-16 12:56:00

如果就要这个功能,用getpoint不是很好吗

wzh 发表于 2005-1-16 15:05:00

主要是想按一定比例实时显示第二点距起点的距离(带文字说明),根据距离来确定第二点的位置,

sccat 发表于 2005-1-17 14:44:00

grdraw 能画弧吗?

xazhji 发表于 2005-1-17 20:51:00

可用短线近似代替

llsheng_73 发表于 2013-10-24 17:45:28

wzh 发表于 2005-1-16 15:05 static/image/common/back.gif
主要是想按一定比例实时显示第二点距起点的距离(带文字说明),根据距离来确定第二点的位置,

如果只是想要知道(getpoint p1)时当前位置相对于P1的距离和方位角,可以把左下角的坐标显示区域点击几下切换过去就行了
页: [1]
查看完整版本: grread的用法