原贴：CAD.Net Bo边界算法 20200404更新

cad的低版本只能发送命令的方式获取边界信息,edata说这个bo是写在arx内的,不是接口,所以也不能反射用(没深究了)
到了2011,就可以通过以下语句获取:

  1. Editor ed = Acap.DocumentManager.MdiActiveDocument.Editor;
  2. ed.TraceBoundary(........);

通过命令发送bo的方法:点我

Running boundary command through command line using .NET

By Virupaksha Aithal
Below code shows the procedure to run the boundary command through command line. Note, code uses ActiveX API SendCommand to run the command. To avoid the different interop’s issue, code uses late binding technique. Command is run in session mode, so that issued boundary command is run synchronously.Also, refer blog on identifying the boundary using API here

  1. static ObjectIdCollection collection = new ObjectIdCollection();
  3. static string commandName = "";
  7. static bool IsCommandActive()
  9. {
  11.     String str = (String)Application.GetSystemVariable("CMDNAMES");
  13.     if (String.Compare(commandName, str, true) != 0)
  15.     {
  17.         return true;
  19.     }
  21.     return false;
  23. }
  25. [CommandMethod("BoundaryCommandLine", CommandFlags.Session)]
  27. static public void BoundaryCommandLine()
  29. {
  31.     Document doc = Application.DocumentManager.MdiActiveDocument;
  33.     Editor ed = doc.Editor;
  37.     PromptPointOptions options =
  39.                     new PromptPointOptions("Pick a point");
  41.     PromptPointResult result = ed.GetPoint(options);
  43.     if (result.Status != PromptStatus.OK)
  45.         return;
  49.     double x = result.Value.X;
  51.     double y = result.Value.Y;
  55.     string strPt = x.ToString() + "," + y.ToString();
  57.     //put the database
  59.     Database db = doc.Database;
  61.     collection.Clear();
  65.     commandName = (String)Application.GetSystemVariable("CMDNAMES");
  69.     db.ObjectAppended +=
  71.                     new ObjectEventHandler(Database_ObjectAppended);
  73.     //run the boundary command using ActiveX send command.
  75.     object[] dataArry = new object[1];
  77.     dataArry[0] = "-boundary " + strPt + "  ";
  79.     doc.AcadDocument.GetType().InvokeMember("SendCommand",
  81.                                         BindingFlags.InvokeMethod,
  83.                                    null, doc.AcadDocument, dataArry);
  85.     if (IsCommandActive() == true)
  87.     {
  89.         dataArry[0] = "Yes ";
  91.         doc.AcadDocument.GetType().InvokeMember(
  93.            "SendCommand",
  95.            BindingFlags.InvokeMethod,
  97.            null, doc.AcadDocument, dataArry
  99.          );
  101.     }
  103.     db.ObjectAppended -=
  105.                     new ObjectEventHandler(Database_ObjectAppended);
  111.     using (DocumentLock lock1 = doc.LockDocument())
  113.     {   
  115.         using (Transaction ta =
  117.                             db.TransactionManager.StartTransaction())
  119.         {
  121.             foreach (ObjectId id in collection)
  123.             {
  125.                 if (id.IsErased == true)
  127.                 {
  129.                     continue;
  131.                 }
  133.                 DBObject obj = ta.GetObject(id,
  135.                                                OpenMode.ForRead);
  137.                 if (obj is
  139.                       Autodesk.AutoCAD.DatabaseServices.Polyline)
  141.                 {
  143.                     //
  145.                     Autodesk.AutoCAD.DatabaseServices.Polyline pl
  147.                    = (Autodesk.AutoCAD.DatabaseServices.Polyline)obj;
  149.                     ed.WriteMessage("area is " +
  151.                                           pl.Area.ToString() + "\n");
  153.                 }
  155.                 else if (obj is
  157.                             Autodesk.AutoCAD.DatabaseServices.Region)
  159.                 {
  161.                     Autodesk.AutoCAD.DatabaseServices.Region rg =
  163.                        (Autodesk.AutoCAD.DatabaseServices.Region)obj;
  165.                     ed.WriteMessage("area is "
  167.                                     + rg.Area.ToString() + "\n");
  169.                 }
  171.             }
  173.             ta.Commit();
  175.         }
  177.     }
  179. }
  181. static void Database_ObjectAppended(object sender, ObjectEventArgs e)
  183. {
  185.     collection.Add(e.DBObject.ObjectId);
  187. }

要注意的是,如果空格再次执行上次命令,你会执行到bo,而不是你的当前命令..而正常的cad用户都是要执行当前的命令.
解决方法:要解开文档锁的情况下发送一次当前命令,而且在命令外做一个立即结束的标记,在最前面写:
CAD.Net Bo边界算法 20200404更新 - 图1

但是,要是自己能造一个边界算法,为什么要靠桌子的…..
打倒自动桌子!!!! 打倒Acad!!!
CAD.Net Bo边界算法 20200404更新 - 图2

于是乎…………..
我做了一张图(拖拉图片看大图)
CAD.Net Bo边界算法 20200404更新 - 图3





本来的初衷是觉得它的边界算法无法很好的将边界线给闭合,所以是想通过遍历数据库来实现对屏幕外的边界做补充,
但是了解了cad的bo算法之后,决定放弃……
因为桌子的是最佳实践来的..几乎没什么好改的….
桌子实现的方式是获取当前屏幕可视的图形,然后遍历它们的图元信息,而按照我的想法,将不可避免的很多次数据库….

下面是山人告诉我的bo算法思想… 它就是图上的拆解算法:
样图:
CAD.Net Bo边界算法 20200404更新 - 图4
全部交点打断,然后bo到的边界就是我标数字的线段组成的.(其实不是打断,是求交点,我是便于大家理解)


然后,步骤如下:

&1、射线求交点
CAD.Net Bo边界算法 20200404更新 - 图5
　　从A点做0°直线(射线),与所有的线只有4个交点,就是我画绿色圆的点;
　　选择一个离A点最近的点,并通过这个点得到1号直线:数学上来讲就是两个直线方程联立.

&2、获取下一段线段
CAD.Net Bo边界算法 20200404更新 - 图6
　　得到1号直线的两个端点,选择相对A-1线角度逆时针方向的点C,
　　由C点做选择集,得到2号和1号直线,排除1号直线:可能C点相交有多个图元,存在和&3一样的情况,可能存在没有相交的图元,需要细节处理.
　　然后用2号直线的另一个交点d做选择集:非选择集需要轮询(所有图元?2号线包围盒范围内的?)与2号线来求交,得出最近交点,
　　得到2号、3号，21、22号直线.(如果是不打断的话,则没有21、22,但是,万一情况是图元接上去呢,则需要以相同条件来进行)

&3、逆时针选择的作用
　　这个时候,你要选择3号直线才是对的,
　　算法应选择直线的角度更靠近逆时针的那个: 也就是说d为基点，22号 在最右，21在中间，3在最左，那就选择最左的那个3
　　这时候的你轮廓集合里已经有3条直线了，分别为1 、2 、 3

&4、循环以上操作
　　然后就是不断的重复,直到走到12号线,又一次选择到了1号线,循环结束;

分析:
　　经过&1和&2的步骤可知,每次都需要轮询一次所有的图元,那么这个轮询就是数量就是线性递减的,因为已经分析过的图元,除了第一个需要保留以判断闭环之外,其他都可以抛弃.
　　这个是最简单的,没有内部孤岛,没有曲线,的bo原理.