怎样在选择直线时，确定选择的点？

Hunix · 发表于 2005-4-22 13:05:00

我想编一个表面粗糙度标注程序

但我选择直线时，不能确定插入点。选择点时，右不能确定直线的斜率，请问该怎么解决啊？

还有一个问题，怎么确定过一点的圆的切线啊？

yulijin608 · 发表于 2005-4-22 13:10:00

1.不明白你在说什么

2.圆有Center,连接圆心与点做垂线不就是切线了么.

Hunix · 发表于 2005-4-22 15:22:00

用GetENTIY选择时，怎样确定在屏幕上单击的点的坐标。

yj821005 · 发表于 2005-4-22 15:31:00

Dim pickedobjs As AcadEntity
Dim mchoosePt As Variant
ThisDrawing.Activate
ThisDrawing.Utility.GetEntity pickedobjs, mchoosePt, "XXXXXXXX" 这里面的mchoosePt就是你选择直线的时候鼠标所点的点啊

Hunix · 发表于 2005-4-25 19:28:00

我用了一下。但问题又来了。

选择的点并不在直线或圆上（虽然很靠近），有什么别的方法既可以选择直线或圆，又能确定在直线或圆上的选择点吗？

雪山飞狐_lzh · 发表于 2005-4-25 21:46:00

接下来求该点到实体的最近点

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