社区 › VBA/VB/ActiveX/API 编程技术 › 如何实现自定义样式多段线的绘制

shuizhizhiyin 发表于 2014-3-10 15:38:31

如何实现自定义样式多段线的绘制

请问各位朋友，我想实现自定义样式的多段线的绘制，和autocad一样 ，让用户拾取起点和下一点的绘制过程。如何实现？
我原来想直接发送pline命令，然后指定样式，但是不知道如何获取新创建多段线的objectid？还请高手帮忙解决一下。。感激

wxd20130610 发表于 2014-3-10 17:16:26

可以获取绘制的多段线id
Dim Ent As AcadEntity
Dim Pl As AcadLWPolyline
Dim ObjID As Long

Set Ent = ThisDrawing.ModelSpace(ThisDrawing.ModelSpace.Count - 1)
If TypeOf Ent Is AcadLWPolyline Then
    Set Pl = Ent
    ObjID = Pl.ObjectID
End If

shuizhizhiyin 发表于 2014-3-10 20:28:57

wxd20130610 发表于 2014-3-10 17:16 static/image/common/back.gif
可以获取绘制的多段线id
Dim Ent As AcadEntity
Dim Pl As AcadLWPolyline


非常感谢你提供的思路，我现在用的是C#，应该怎样获得count，blcoktable中无法获取。。。还请帮忙解决一下

wxd20130610 发表于 2014-3-10 20:36:20

C#不太熟悉。

shuizhizhiyin 发表于 2014-3-10 21:02:39

wxd20130610 发表于 2014-3-10 20:36 static/image/common/back.gif
C#不太熟悉。

谢谢，如果现在我想要实现连续拾取点绘制直线，直到按下enter键结束拾取点，不知你是否有办法实现。后面的将绘制的直线合并成多段线已经有办法了.我想或许可以这样实现

查看完整版本: 如何实现自定义样式多段线的绘制