几何类中点运算的基本测试

河伯

用lisp和VBA的时候，没有几何类，点、向量、矩阵都用表和数组来定义。AutoCAD.NET的Geometry命名空间里有许多几何类，其中最基础的有五个，点（Point3d）、向量（Vector3d）、矩阵（Matrix3d）、平面（Plane）和坐标系（CoordinateSystem3d），这些类具有的丰富成员使得编程更加方便。下面是点对象加减乘除方法的测试。注意第四种乘法运算，说明TransformBy是用左乘矩阵实现的。

2. 指定任意点:
   
3. 新建点：New Point3d = (0,0,0)
   
4. 共享属性：Point3d.Origin = (0,0,0)
   
5. ----------------------------------
   
6. 输入点：ptUcs = (200,100,0)
   
7. 加法运算一：ptUcs.Add(New Vector3d(10, 20, 0)) = (210,120,0)(返回Point3d)
   
8. 加法运算二：ptUcs + New Vector3d(10, 20, 0) = (210,120,0)(返回Point3d)
   
9. 减法运算一：ptUcs.Subtract(New Vector3d(10, 20, 0)) = (190,80,0)(返回Point3d)
   
10. 减法运算二：ptUcs - New Vector3d(10, 20, 0) = (190,80,0)(返回Point3d)
    
11. 减法运算三：ptUcs - New Point3d(10, 20, 0) = (190,80,0)(返回Vector3d)
    
12. 乘法运算一：ptUcs.MultiplyBy(2) = (400,200,0)(返回Point3d)
    
13. 乘法运算二：ptUcs * 2 = (400,200,0)(返回Point3d)
    
14. 乘法运算三：2 * ptUcs = (400,200,0)(返回Point3d)
    
15. 乘法运算四：UcsMatrix * ptUcs = (100,200,0)(返回Point3d)
    
16. 除法运算一：ptUcs.DivideBy(2) = (100,50,0)(返回Point3d)
    
17. 除法运算二：ptUcs / 2 = (100,50,0)(返回Point3d)

指定任意点:<br /> 新建点：New Point3d = (0,0,0)<br /> 共享属性：Point3d.Origin = (0,0,0)<br /> ----------------------------------<br /> 输入点：ptUcs = (200,100,0)<br /> 加法运算一：ptUcs.Add(New Vector3d(10, 20, 0)) = (210,120,0)(返回Point3d)<br /> 加法运算二：ptUcs + New Vector3d(10, 20, 0) = (210,120,0)(返回Point3d)<br /> 减法运算一：ptUcs.Subtract(New Vector3d(10, 20, 0)) = (190,80,0)(返回Point3d)<br /> 减法运算二：ptUcs - New Vector3d(10, 20, 0) = (190,80,0)(返回Point3d)<br /> 减法运算三：ptUcs - New Point3d(10, 20, 0) = (190,80,0)(返回Vector3d)<br /> 乘法运算一：ptUcs.MultiplyBy(2) = (400,200,0)(返回Point3d)<br /> 乘法运算二：ptUcs * 2 = (400,200,0)(返回Point3d)<br /> 乘法运算三：2 * ptUcs = (400,200,0)(返回Point3d)<br /> 乘法运算四：UcsMatrix * ptUcs = (100,200,0)(返回Point3d)<br /> 除法运算一：ptUcs.DivideBy(2) = (100,50,0)(返回Point3d)<br /> 除法运算二：ptUcs / 2 = (100,50,0)(返回Point3d)

雪山飞狐_lzh

几何类的使用可以很大程度的简化代码，期待河伯老兄的后续测试，呵呵
补充一点关于TransformBy的

1.             var pt = new Point3d(10, 10, 0);
   
2.             ed.WriteMessage("\nPoint:{0}", pt);
   
3.             var mat = Matrix3d.Displacement(new Vector3d(10, 0, 0));
   
4.             pt = mat * pt;
   
5.             ed.WriteMessage("\nPoint:{0}", pt);
   
6.             pt = pt.TransformBy(mat);
   
7.             ed.WriteMessage("\nPoint:{0}", pt);

复制代码

结果
Point:(10,10,0)
Point:(20,10,0)
Point:(30,10,0)

sieben

Point3d.Origin 似乎应该叫做静态公用属性
关键的是理解图形学上的含义（不过楼主这样做对初学者应该很有帮助）
自己去看类的定义，更能知道一个类有些什么，能做些什么。

chpmould

期待后续的测试例子...

河伯

补充一点关于TransformBy的

吓我一跳，呵呵!

2.         Dim pt1 As New Point3d(10, 10, 0)
   
3.         ed.WriteMessage(vbLf & "Point1:{0}", pt1)
   
4.         Dim mat As Matrix3d = Matrix3d.Displacement(New Vector3d(10, 0, 0))
   
5.         Dim pt2 = Matrix3d.Displacement(New Vector3d(10, 0, 0)) * pt1
   
6.         ed.WriteMessage(vbLf & "Point2:{0}", pt2)
   
7.         Dim pt3 As Point3d = pt1.TransformBy(mat)
   
8.         ed.WriteMessage(vbLf & "Point3:{0}", pt3)
   

        Dim pt1 As New Point3d(10, 10, 0)<br />         ed.WriteMessage(vbLf & "Point1:{0}", pt1)<br />         Dim mat As Matrix3d = Matrix3d.Displacement(New Vector3d(10, 0, 0))<br />         Dim pt2 = Matrix3d.Displacement(New Vector3d(10, 0, 0)) * pt1<br />         ed.WriteMessage(vbLf & "Point2:{0}", pt2)<br />         Dim pt3 As Point3d = pt1.TransformBy(mat)<br />         ed.WriteMessage(vbLf & "Point3:{0}", pt3)<br />

Point1:(10,10,0)
Point2:(20,10,0)
Point3:(20,10,0)

河伯

Point3d.Origin 似乎应该叫做静态公用属性

VB.NET里，微软就是这么叫的。看过一篇文章解释了为什么C#和VB的叫法不同，似乎编译后确实有差异。

cdinten

请问坐标变换之后Point3d.Origin会改变还是一直是(0,0,0)?

雪山飞狐_lzh

Point3d是只读的，不可改变的
和string有点类似

sieben

河伯 发表于 2010-12-12 11:59
VB.NET里，微软就是这么叫的。看过一篇文章解释了为什么C#和VB的叫法不同，似乎编译后确实有差异。

VB和VB.Net是有区别的
基于.Net框架的语言（含C#，VB.Net)，里面的任何东西都是和类相关的，任何类型的常量变量也都是存在于类（需要说是某个类的变量或常量）。和以前的模块式公共变量和私有变量是有区别（它们可以单独存在）（当然，公用静态变量和楼主所说的共享属性功能应该是一样的）

sieben

lzh741206 发表于 2010-12-12 16:26
Point3d是只读的，不可改变的
和string有点类似

斑竹我要较真了，应该说Point3d.Origin是只读的。