API应用AcGe系列(1)--AcGeCurve3d/2d类函数

st788796

AcGeCurve3d类

所有3D曲线的抽象基类。从这个类派生出的任何类都表示一条3D曲线
ARX AcGeCurve3d                                 

Net AcGeCurve3d
  

ARX                                              Net

     

AcDbCurve 类函数见下贴
http://bbs.xdcad.net/thread-676936-1-1.html

st788796

ARX                                                        Net

Arx AcGeCurve2d Class                                      Net Curve2d Class

st788796

AcGe 线性代数和几何学对象的应用类。AutoCAD中用点描述的对象都可以找到其对应类，打开 CAD 的 DWG 屏幕上呈现的属于 AcDb 类，在 Lisp 中应用最多的就是  entsel 、ssget 、ssname、entget、entmod 等等操作的对象（除去非图形对象），一些对象去掉某些属性（比如图层、线形、颜色、厚度等）用数学方法描述就是 AcGe 类。

AcGe类中 Curve3d Curve2d 是很重要的类，AutoCAD 是以二维为主，点、线、面是必须要熟悉的概念，Curve 类就包括了所有 线 几何模型，Ge库中，在同一平面内的曲线使用Curve2d 或 Curve3d 是没有区别的，但 Curve2d 会更方便，而且 2d 库有些方法是 3d 库不具备的，如果是空间线运算那只能选择 Curve3d。

本帖介绍以 Curve2d 为主，对 Curve3d 中不同方法最后再介绍。

在 Alisp 中使用 AcGe 库，得知道这些 AcGe 对象怎么制造，以前AcGe都是专业ARX程序独享工具，感谢 XD 把这个库带入 Autolisp 天地，Lisper 有了一个更加强大工具。看看 XdGe 几何库提供的函数

另外也要知道 XdGe 目前支持 的 Ge 类型

st788796

AcGeCurve2d 由 AcGeEntity2d 派生，该类共有的Method包括

先随便构造两个 Ge 实体用于测试
(setq ge (xdge::constructor "kLineSeg2d" '(1.0 2.0) '(100.0 100.0)))
(setq ge1 (xdge::constructor "kLineSeg2d" '(105.0 0.0)  '(180.0 180.0)))

注意： 使用 Ge 构造时，实数 小数点 不要省略！

1 boundBlock 包围盒

方法1：
参   数: GeCurve2d
返回值: kBoundBlock2d 对象
(setq box (xdrx::getpropertyvalue geobj "boundBlock"))

_$ (xdge::getpropertyvalue ge "boundBlock")
<图元名: 9736f68>
_$ (xdge::type (xdge::getpropertyvalue ge "boundBlock"))
"kBoundBlock2d"
_$

方法2：
参   数 ：AcGeInterval 对象
返回值：kBoundBlock2d 对象
(xdge::getpropertyvalue geobj "boundBlock" interval)

_$ (setq in (xdge::constructor "AcGeInterval" 0.0 0.5))
<图元名: 9736fa8>
_$ (xdge::getpropertyvalue ge "boundBlock" in)
<图元名: 9736fc8>

2 closestPointTo 两曲线间最近点或指定点与曲线间最近点

方法1：
两曲线间最近点
参   数：AcGeCurve2d
返回值:  点表（曲线1上点  曲线2上点)
(xdge::getpropertyvalue ge1 "closestPointTo" ge2)

_$ (xdge::getpropertyvalue ge "closestPointTo" ge1)
((100.0 100.0) (139.763 83.432))
_$

方法2：
指定点到曲线上最近点
参   数：点(2D or 3D)
返回值:  点（2D）
(xdge::getpropertyvalue ge "closestPointTo" pnt)

_$ (xdge::getpropertyvalue ge "closestPointTo" '(-10.0 -10.0))
(1.0 2.0)
_$

st788796

3 distanceTo 获取两曲线最近点间距离或指定点到曲线的最近距离

方法1：
两曲线间最近点间距离
参   数:  AcGeCurve2d
返回值:  距离(实数)
(setq dist (xdge::getpropertyvalue ge1 "distanceTo" ge2))

_$ (xdge::getpropertyvalue ge "distanceTo" ge1)
43.0769
_$

方法2：
指定点到该曲线的最佳距离
参   数: 点
返回值: 距离(实数)
(xdge::getpropertyvalue ge "distanceTo" pnt)

_$ (xdge::getpropertyvalue ge "distanceTo" '(-10. -10.0))
16.2788
_$

st788796

4 evalPoint   返回曲线指定参数处点或指定参数处点及该点处导数

方法1：
获取指定参数处点及该点处导数
参数1 ： 数(double)
参数2 ： 整数（0  仅返回点 1 -  一阶导数，2 -一阶及二阶导数）
返回值:  点表（点 (<一阶导数> <二阶导数>)) ， 参数2 为 1 时，如果二阶导数存在则返回，否则仅返回一阶导数

(xdge::getpropertyvalue ge "evalPoint" pam 0);_同方法2

(xdge::getpropertyvalue ge "evalPoint" pam 1);_(点 (一阶导数))

(xdge::getpropertyvalue ge "evalPoint" pam 2);_(点 (一阶导数 二阶导数))

_$ (xdge::getpropertyvalue ge "evalPoint" 0.0 0)
(1.0 2.0)
_$ (xdge::getpropertyvalue ge "evalPoint" 0.0 1)
((1.0 2.0) ((99.0 98.0)))
_$ (xdge::getpropertyvalue ge "evalPoint" 0.0 2)
((1.0 2.0) ((99.0 98.0) (0.0 0.0)))
_$

方法2：
返回指定参数处点
参数： 数 (double)
返回值: 点

(xdge::getpropertyvalue ge "evalPoint" pam)

_$ (xdge::getpropertyvalue ge "evalPoint" 0.5)
(50.5 51.0)
_$

st788796

5 getClosestPointTo 功能同 closestPointTo ,只是这个函数返回值为 kPointOnCurve2d（即构造了新的 AcGe Object）

方法1：
两曲线间最近点，返回值为 (kPointOnCurve2d kPointOnCurve2d)
(xdge::getpropertyvalue ge1 "getClosestPointTo" ge2)

_$ (xdge::getpropertyvalue ge "getClosestPointTo" ge1)
(<图元名: 9736fe8> <图元名: 9737018>)
_$

方法2：
指定点到曲线上最近点，返回值为 kPointOnCurve2d
(xdge::getpropertyvalue ge "getClosestPointTo" pnt)


_$ (xdge::getpropertyvalue ge "getClosestPointTo" '(-10.0 -10.0))
<图元名: 9737068>
_$

st788796

6 getInterval 获取曲线区间及起点、终点

参    数: Curve2d
返回值: 表 (AcGeInterval (起点 终点)
(xdge::getpropertyvalue geobj "getInterval")

_$ (xdge::getpropertyvalue ge "getInterval")
(<图元名: 9737098> (1.0 2.0) (100.0 100.0))
_$

st788796

7 getLocalClosestPoints 获取两曲线指定区间内最近点或指定点在曲线指定区间内最近点

AutoCAD 中的 AcDbCurve 和 AcGeCurve 除 Ray (0.0 -> +∞) Xline (-∞ -> +∞),其它都是“有界”曲线，AcDb 描述这个界就是起点（或参数）、终点（或参数），在 AcGe 中增加了一个区间(Interval) 描述，前面的 closestPointtTo 是全线搜索最近点，getLocalClosestPointTo 是在曲线的一定范围为搜索最近点

方法1：
void getLocalClosestPoints(
    const AcGeCurve2d& otherCurve,
     AcGePointOnCurve2d& approxPntOnThisCrv,
     AcGePointOnCurve2d& approxPntOnOtherCrv,
    const AcGeInterval* nbhd1 = 0,
     const AcGeInterval* nbhd2 = 0,
     const AcGeTol& tol = AcGeContext::gTol
) const;

(xdge::getpropertyvalue ge "getLocalClosestPointTo" ge1 in1 in2)

in1 --  AcGeInterval，指定 ge 的搜索区间
in2 --  AcGeInterval，指定 ge1 的搜索区间

方法2:
void getLocalClosestPoints(
    const AcGePoint2d& point,
     AcGePointOnCurve2d& approxPnt,
     const AcGeInterval* nbhd = 0,
     const AcGeTol& = AcGeContext::gTol
) const;

(xdge::getpropertyvalue ge "getLocalClosestPointTo" pnt in)

pnt  --- 指定点(2d)
in   --- ge 曲线上的区间，AcGeInterval

st788796

8 getSamplePoints 获取曲线等分点或指定参数间直道弓高内的模拟点

方法1：
获取曲线等分点
参   数: 整数
返回值: 点表
(xdge::getpropertyvalue geobj "getSamplePoints" int)

_$ (xdge::getpropertyvalue ge "getSamplePoints" 10)
((1.0 2.0) (12.0 12.8889) (23.0 23.7778) (34.0 34.6667) (45.0 45.5556) (56.0 56.4444) (67.0 67.3333) (78.0 78.2222) (89.0 89.1111) (100.0 100.0))
_$

在 GeCurve 中就是一个函数，Db 中就需要自己根据长度作等分，可以参考 xd::geom:numdiv 、xdrx_getsamplept ，都是自己写算法

方法2:
按给定参数区间和给定的最大弓高获取曲线模拟点
void getSamplePoints(
    double fromParam,
     double toParam,
     double approxEps,
     AcGePoint2dArray& pointArray,
    AcGeDoubleArray& paramArray
) const;

(xdge::getpropertyvalue geobj "getSamplePoints" spam epam fuzz)

参   数：spam --- 开始参数，0.0 从起点开始
            epam --- 结束参数，endParam 为曲线终点
            fuzz   --- 最大弓高
返回值 :  点表

这个方法对 Circle Arc Ellipse Spline 才有意义，fuzz 确定了采样点密度，值越小点越密，同样越接近原曲线，自己写需要用递归方法，可以参考 G版 用 Lisp 写的一个 getsamplepoints ，如果转换为 GeCurve 只要使用这个函数就 ok

st788796

9 area 获取曲线指定参数区间部分面积

能够围合为区域的曲线使用才有意义，如 AcGeCircArc AcGeNurbCurve AcGeEllipArc AcGePolyline AcGeCompositeCrv ，对 AcGeLineSeg AcGeLine AcGeRay 没有意义

(xdge::getpropertyvalue ge "area" spam epam)

参数： spam -- 开始参数
          epam  -- 结束参数
返回值: 实数

10 getSplitCurves 在给定的参数处断开曲线

(xdge::getpropertyvalue ge "getSplitCurves" pam)

pam ---  参数
返回断开后曲线列表

st788796

11 hasStartPoint 如果曲线有起点则返回起点，否则返回nil，xline 没有起点

(xdge::getpropertyvalue geobj "hasStartPoint")

12 hasEndPoint 如果曲线有终点则返回终点，否则返回nil ， ray xline 没有终点

(xdge::getpropertyvalue geobj "hasEndPoint")

13 isDegenerate 判断曲线是否退化，退化返回退化后实体，否则返回nil。例如 kCircArc2d 在 setRadius 为 0.0 时退化为 kPoint2d，isDegenerate 将返回 kPoint2d entity，kEllipArc2d 在 minor radius 为 0 且 major radius 为 1 时， isDegenerate 将返回 kLineSeg2d entity

(xdge::getpropertyvalue geobj "isDegenerate")