练习 Lisp定义GetStretchPoint

csharp

1.         [LispFunction("GetStretchPoint")] //定义一个函数名称，Lispfuction
   
2.         public static ResultBuffer getStretchPoint(ResultBuffer rb) //要用返回值模式 ResultBuffer
   
3.         {
   
4.             ResultBuffer resultBuffer = new ResultBuffer(); //初始化返回值链表
   
5.             Document document = Application.DocumentManager.MdiActiveDocument; //当前文档
   
6.             Transaction trtTransaction = document.TransactionManager.StartTransaction(); //事务处理
   
7.             using (trtTransaction)
   
8.             {
   
9.                 try
   
10.                 {
    
11.                     //参数不能为 nil
    
12.                     if (rb != null)
    
13.                     {
    
14.                         TypedValue[] rbArr = rb.AsArray(); //Convoert to Array
    
15.                         TypedValue entId = rbArr[0]; //取出第一个参数
    
16.                         //并且是 Entity 并且只有一个参数
    
17.                         if (entId.TypeCode == (int) LispDataType.ObjectId && rbArr.Length == 1)
    
18.                         {
    
19.                             ObjectId objId = (ObjectId) entId.Value; //将第一个参数转换为Object
    
20.                             Entity entity = (Entity) trtTransaction.GetObject(objId, OpenMode.ForRead, false);
    
21.                                 //转换为Entity
    
22.                             Point3dCollection pnts = new Point3dCollection(); //初始化一个保存StretchPoints 的集合
    
23.                             entity.GetStretchPoints(pnts); //获取Entity的StretchPoints赋给 pnts
    
24.                             //将 获取的 Pnts 中的值加入到返回值
    
25.                             foreach (Point3d pnt in pnts)
    
26.                             {
    
27.                                 resultBuffer.Add(new TypedValue((int) LispDataType.Point3d, pnt));
    
28.                             }
    
29.                             ;
    
30.                         }
    
31.                     }
    
32.                     trtTransaction.Commit(); //提交事务处理
    
33.                     return resultBuffer; //返回值
    
34.                 }
    
35.                     //错误处理暂时还没有学到
    
36.                 catch (Exception)
    
37.                 {
    
38.                     throw;
    
39.                 }
    
40.             }
    
41.         }

        [LispFunction("GetStretchPoint")] //定义一个函数名称，Lispfuction<br />         public static ResultBuffer getStretchPoint(ResultBuffer rb) //要用返回值模式 ResultBuffer<br />         {<br />             ResultBuffer resultBuffer = new ResultBuffer(); //初始化返回值链表<br />             Document document = Application.DocumentManager.MdiActiveDocument; //当前文档<br />             Transaction trtTransaction = document.TransactionManager.StartTransaction(); //事务处理<br />             using (trtTransaction)<br />             {<br />                 try<br />                 {<br />                     //参数不能为 nil <br />                     if (rb != null)<br />                     {<br />                         TypedValue[] rbArr = rb.AsArray(); //Convoert to Array<br />                         TypedValue entId = rbArr[0]; //取出第一个参数<br />                         //并且是 Entity 并且只有一个参数<br />                         if (entId.TypeCode == (int) LispDataType.ObjectId && rbArr.Length == 1)<br />                         {<br />                             ObjectId objId = (ObjectId) entId.Value; //将第一个参数转换为Object<br />                             Entity entity = (Entity) trtTransaction.GetObject(objId, OpenMode.ForRead, false);<br />                                 //转换为Entity<br />                             Point3dCollection pnts = new Point3dCollection(); //初始化一个保存StretchPoints 的集合<br />                             entity.GetStretchPoints(pnts); //获取Entity的StretchPoints赋给 pnts<br />                             //将 获取的 Pnts 中的值加入到返回值<br />                             foreach (Point3d pnt in pnts)<br />                             {<br />                                 resultBuffer.Add(new TypedValue((int) LispDataType.Point3d, pnt));<br />                             }<br />                             ;<br />                         }<br />                     }<br />                     trtTransaction.Commit(); //提交事务处理<br />                     return resultBuffer; //返回值<br />                 }<br />                     //错误处理暂时还没有学到<br />                 catch (Exception)<br />                 {<br />                     throw;<br />                 }<br />             }<br />         }

(getstretchpoint (car (Entsel)))

satan421

学习了 谢谢楼主

brainstorm

请教一个问题，得到点是顺时针还是随机的，想用vlacoffset 得到偏移一定距离点集
来自: 微社区