怎么找到两条不相交直线的交点

倔强的蚂蚁

有两条不平行直线，不相交，现在想找这两条直线的交点，怎么实现啊？

gdslqs

inters                                          

倔强的蚂蚁

gdslqs 发表于 2013-11-18 12:35
inters

谢谢！要找的就是这个命令

倔强的蚂蚁

gdslqs 发表于 2013-11-18 12:35
inters

如果是两条曲线呢？不相交，但是如果延伸后，会相交，怎么找这个交点？

kwok

求两条直线的交点

(inters pt1 pt2 pt3 pt4 [onseg])
所有的点都以当前 UCS 表示，如果提供的四个点都是三维点，inters 函数检查三维交点。只要所提供的点中有一个是二维点，inters 函数就将这两条线投影到当前构造平面上，仅检查二维交点。

参数

pt1

第一条直线的端点。

pt2

第一条直线的另一端点。

pt3

第二条直线的端点。

pt4

第二条直线的另一端点。

onseg

如果指定为 nil，则由四个 pt 参数定义的两条线被认为是无限长的。如果省略 onseg 参数或其值不为 nil，则交点必须同时位于两条线上，否则 inters 返回 nil。
返回值

如果 onseg 参数存在且为 nil，则 inters 返回交点坐标，即使这个交点不在其中的一条线（或者两条线）的端点范围之内。如果忽略 onseg 参数或其值不为 nil，则交点必须同时位于两条线上，否则 inters 返回 nil。如果两条直线不相交，inters 函数返回 nil。

Gu_xl

倔强的蚂蚁 发表于 2013-11-18 12:39
如果是两条曲线呢？不相交，但是如果延伸后，会相交，怎么找这个交点？

(IntersectWith obj1 obj2 ExtendOption)

ExtendOption:
AcExtendOption enum; input-only
This option specifies if none, one or both, of the objects are to be extended in order to attempt an intersection.

acExtendNone
Does not extend either object.

acExtendThisEntity
Extends the base object.

acExtendOtherEntity
Extends the object passed as an argument.

acExtendBoth
Extends both objects.

倔强的蚂蚁

kwok 发表于 2013-11-18 13:10
求两条直线的交点

(inters pt1 pt2 pt3 pt4 [onseg])

这个貌似是明经版帮助里的内容，不过还是要说声，谢谢！

倔强的蚂蚁

Gu_xl 发表于 2013-11-18 13:51
(IntersectWith obj1 obj2 ExtendOption)

ExtendOption:

no function definition
intersectwith

倔强的蚂蚁

Gu_xl 发表于 2013-11-18 13:51
(IntersectWith obj1 obj2 ExtendOption)

ExtendOption:

(defun c:sss()
(setq obj1 (car (entsel "select the first curve:")))
(setq obj2 (car (entsel "select the second curve:")))
(intersectwith obj1 obj2 acextendboth)
)

我是这么写的，提示，没定义函数

倔强的蚂蚁

Gu_xl 发表于 2013-11-18 13:51
(IntersectWith obj1 obj2 ExtendOption)

ExtendOption:

(defun c:sss()
(vl-load-com)
(setq obj1 (car (entsel "select the first curve:")))
(setq obj2 (car (entsel "select the second curve:")))
(setq obj1 (vlax-ename->vla-object obj1))
(setq obj2 (vlax-ename->vla-object obj2))
(setq jiaodian (vla-intersectwith obj1 obj2 acextendboth))
)

返回这个 #<variant 8197 ...>
不知道是怎么回事