如何实现pe命令，连接多段线

李毛毛

如何实现cad自带的pe命令（连接多段线),字节写的代码如下
ids是小短线，可是老是连接不起来，是怎么回事？？
//link the little lines
        public DBObjectCollection polylink(DBObjectCollection ids)
        {
            DBObjectCollection polyIds = new DBObjectCollection();
            bool IsEmpty = false;
            while (!IsEmpty)
            {               
                if (ids.Count < 3)
                {
                    IsEmpty = true;                  
                }
                Polyline pl0 = ids[0] as Polyline;
                Polyline pl = new Polyline();
                Point2d plst = pl0.GetPoint2dAt(0);
                Point2d plet = pl0.GetPoint2dAt(1);
                pl.AddVertexAt(pl.NumberOfVertices, plst, 0, 0, 0);
                pl.AddVertexAt(pl.NumberOfVertices, plet, 0, 0, 0);
                ids.RemoveAt(0);
                foreach (DBObject polyid in ids)
                {
                    Polyline poly = polyid as Polyline;
                    if (poly.Length==0)
                    {
                        ids.Remove(polyid);
                    }
                    if (pl.EndPoint == poly.StartPoint)
                    {
                        pl.AddVertexAt(pl.NumberOfVertices, new Point2d(poly.EndPoint.X, poly.EndPoint.Y), 0, 0, 0);
                        ids.Remove(polyid);
                    }
                    else if (pl.EndPoint == poly.EndPoint)
                    {
                        pl.AddVertexAt(pl.NumberOfVertices, new Point2d(poly.StartPoint.X, poly.StartPoint.Y), 0, 0, 0);
                        ids.Remove(polyid);
                    }
                }
                if (pl.EndParam >= 2)
                {
                    pl.Closed = true;
                    polyIds.Add(pl);
                }
            }            
            return polyIds;
        }

pengfei2010

看了很多都是用command实现的，net高版本Curve对象提供了 JionLine
方法，低版本没有办法唉

sieben

    1,        foreach (DBObject polyid in ids)
                {
                    Polyline poly = polyid as Polyline;
                    if (poly.Length==0)
                    {
                        ids.Remove(polyid);
                    }

      这里 在 foreach (DBObject polyid in ids) 里面 ids.Remove(polyid); 这是大忌

sieben

2,    if (pl.EndPoint == poly.StartPoint)
                    {
这样的判断很不确定

teykmcqh

可惜是VB编的，谁有选择第一条线段而连接起多段线的lisp程序吗？

李毛毛

    public DBObjectCollection polylink(DBObjectCollection ids)
        {
            DBObjectCollection polyIds = new DBObjectCollection();
            bool IsEmpty = false;
            if (ids.Count < 1)
            {
                IsEmpty = true;
                return polyIds;
            }         
             while(!IsEmpty)   
             {
                Polyline pl0 = ids[0] as Polyline;
                Polyline pl = new Polyline();
                Point2d plst = pl0.GetPoint2dAt(0);
                Point2d plet = pl0.GetPoint2dAt(1);
                pl.AddVertexAt(pl.NumberOfVertices, plst, 0, 0, 0);
                pl.AddVertexAt(pl.NumberOfVertices, plet, 0, 0, 0);
                ids.RemoveAt(0);
                 bool close=false;
                while (!close)
                {
                    foreach (DBObject polyid in ids)
                    {
                        Polyline poly = polyid as Polyline;
                        if (poly.Length == 0)
                        {
                            ids.Remove(polyid);
                        }
                        if (pl.EndPoint == poly.StartPoint)
                        {
                            pl.AddVertexAt(pl.NumberOfVertices, new Point2d(poly.EndPoint.X, poly.EndPoint.Y), 0, 0, 0);
                            ids.Remove(polyid);
                        }
                        else if (pl.EndPoint == poly.EndPoint)
                        {
                            pl.AddVertexAt(pl.NumberOfVertices, new Point2d(poly.StartPoint.X, poly.StartPoint.Y), 0, 0, 0);
                            ids.Remove(polyid);
                        }
                        if (pl.EndPoint == pl.StartPoint)
                        {
                            close=true;
                            pl.Closed=true;
                        }
                        
                    }
                    if (ids.Count<1)
                    {
                        close = true;
                    }
                }
                if (pl.EndParam >= 2)
                {
                    pl.ColorIndex = 2;
                    polyIds.Add(pl);
                }
                 if (ids.Count<1)
                 {
                     IsEmpty = true;
                 }
            }
            
            return polyIds;
        }
  [CommandMethod("linkTst")]
        public void linkTst()
        {
            Database db = HostApplicationServices.WorkingDatabase;
            Editor ed = Application.DocumentManager.MdiActiveDocument.Editor;
            TypedValue[] fillist = new TypedValue[] { new TypedValue((int)DxfCode.Start, "Lwpolyline") };
            SelectionFilter filter = new SelectionFilter(fillist);
            PromptSelectionResult polyRes = ed.GetSelection(filter);
            using (Transaction trans = db.TransactionManager.StartTransaction())
            {
                if (polyRes.Status == PromptStatus.Cancel)
                {
                    return;
                }
                else if (polyRes.Status==PromptStatus.OK||polyRes.Status==PromptStatus.None)
                {
                    SelectionSet polyset = polyRes.Value;
                    DBObjectCollection ids = new DBObjectCollection();
                    for (int i = 0; i < polyset.Count;i++ )
                    {
                        Polyline pl = trans.GetObject(polyset[i].ObjectId, OpenMode.ForWrite) as Polyline;
                        ids.Add(pl);
                    }
                  DBObjectCollection polyids=  polylink(ids);
                  jinhe.ObjectARX.Tools.AddEntities(polyids);
                }
                trans.Commit();
            }
        }
这样测试就是正确滴喽，可能有错误没有测试出来吧！！！

李毛毛

回复 李毛毛 的帖子

为什么，我都是这么用滴？？？

李毛毛

回复 sieben 的帖子

因为我看到了，它们的起始点确实是一摸一样，所以没有用误差了。

李毛毛

回复 sieben 的帖子

呃，this is C#，not VB

sieben

这样测试就是正确滴喽
---------------------
是 测试结果正确 还是 测试方法正确?
呵呵,好吧! 你说正确就正确吧!

sieben

回复 teykmcqh 的帖子

高手!估计是你看穿了C#的外表!看到了VB的本质!