Extents3d.AddExtents的疑惑
本帖最后由 hnzgs 于 2011-2-23 14:55 编辑'测试函数
Public Shared Sub cs()
Dim a As New Extents3d(New Point3d(0, 0, 0), New Point3d(100, 100, 0))
Dim b As New Extents3d(New Point3d(100, 100, 0), New Point3d(200, 200, 0))
a.AddExtents(b)
' 获取当前活动文档的Editor对象,也就是命令行
Dim ed As Editor = Application.DocumentManager.MdiActiveDocument.Editor
' 调用Editor对象的WriteMessage方法在命令行上显示文本
ed.WriteMessage(a.ToString)
End Sub
AutoCAD2006下,运行结果为什么会是:((0,0,0),(0,0,0))
2006的bug很多的,其他的版本没有发现这样的问题
如果一定要用2006的话,建议自己重写 回复 雪山飞狐_lzh 的帖子
多谢飞狐版主,CAD2006莫名的BUG的确让人头大,已更换为CAD2010
运行结果为:((0,0,0),(200,200,0)) 以前遇见过,最后先写2010的程序,再改写为2006的 回复 20033535 的帖子
目前碰到的除了这个,还有选集过滤器的BUG,都是需要用到的东东,机器跑2010已经到极限,实属无奈之选
页:
[1]