[求助]判断点是否在直线上

luyu9635 · 发表于 2009-9-16 23:56:00

直线的两个端点为p1和p2 ,pt为直线上一点,如果(setq pt(getpoint)),这样(equal (+ (distance pt p1) (distance pt p2))(distance p1 p2))返回为t,但是(setq pt(cadr(entsel))),就返回为空,加入精度(equal (+ (distance pt p1) (distance pt p2))(distance p1 p2) 1e-3),有时返回t,有时返回为nil,用角度判断也是这样，要怎么样才能总是返回t呢，大家有没有好的办法呀；

caoyin · 发表于 2009-9-17 01:34:00

(entsel)返回的点是跟 pickbox 的中心点，所以返回nil是正常的

(apply 'vlax-curve-getClosestPointTo (entsel))返回的才是直线上的点

明经网友 *发表于 2009-9-17 22:22:00* · 发表于 2009-9-17 22:22:00

caoyin发表于2009-9-17 1:34:00(entsel)返回的点是跟 pickbox 的中心点，所以返回nil是正常的(apply 'vlax-curve-getClosestPointTo (entsel))返回的才是直线上的点

谢谢caoyin,既然返回的pickbox的中心点,但是为什么用(ssget(cadr(entsel)))可以选到对象呢

明经网友 *发表于 2009-9-17 22:37:00* · 发表于 2009-9-17 22:37:00

谢谢caoyin，但是既然返回的是pickbox的中心点，为什么(ssget(cadr(entsel)))可以选到对象呢

明经网友 *发表于 2009-9-17 23:48:00* · 发表于 2009-9-17 23:48:00

caoyin发表于2009-9-17 1:34:00(entsel)返回的点是跟 pickbox 的中心点，所以返回nil是正常的(apply 'vlax-curve-getClosestPointTo (entsel))返回的才是直线上的点

但是为什么用(ssget(cadr(entsel)))可以选到对象呢

luyu9635 · 发表于 2009-9-18 23:43:00

caoyin发表于2009-9-17 1:34:00(entsel)返回的点是跟 pickbox 的中心点，所以返回nil是正常的(apply 'vlax-curve-getClosestPointTo (entsel))返回的才是直线上的点

谢谢caoyin,但我不明白的是既然返回的是pickbox的中心点，为什么用(ssget (cadr(entsel))可以选到对象呢

caoyin · 发表于 2009-9-20 11:24:00

ssget和entsel的选择与系统变量pickbox的影响，在pickbox所设置的像素高度中都可以选中

luyu9635 · 发表于 2009-9-20 12:02:00

谢谢了

账号		自动登录	找回密码
密码			注册