介之推 发表于 2011-7-31 20:05:18

如何通过一个Polyline的ObjectId反过来获得这个Polyline的顶点？

大叫好，我绘制了一个Polyline后，将这个Polyline的ObjectId加到我定义的一个ObjectIdCollection中，现在我想反过来通过这个Polyline的Objectid来获得这个Polyline的第二个和第六个顶点。该如何做呢？请哪位同仁帮帮指点指点。先谢谢了啊。哈哈。

single-yu 发表于 2011-7-31 22:50:49

本帖最后由 single-yu 于 2011-7-31 22:54 编辑

          Dim db As Database = HostApplicationServices.WorkingDatabase
                Using trans As Transaction = db.TransactionManager.StartTransaction
                  Dim ent As Entity = trans.GetObject(ObjectId, OpenMode.ForWrite)
                  If TypeOf (ent) Is Polyline Then
                        Dim pl As Polyline = CType(ent, Polyline)
                        Dim pt as point3d= pl.GetPoint3dAt(1)
                  end If
                End Using

cdinten 发表于 2011-8-1 09:22:40

楼上的写的不错~~楼主你也太不爱思考了，换颜色这个就更简单了

介之推 发表于 2011-8-1 12:08:22

本帖最后由 介之推 于 2011-8-1 12:10 编辑

回复 cdinten 的帖子

哎，不怕你笑话啊。确实水平很有限啊。我还不知道什么叫database，什么叫Editor，什么叫transcation等等，就会依葫芦画瓢啊。哈哈。
页: [1]
查看完整版本: 如何通过一个Polyline的ObjectId反过来获得这个Polyline的顶点？