如何使生成的文字在多边形的外面！

single-yu

如何使生成的文字在多边形的外面！发个图看看：

894560869

如果我是ssget一框选已打散的(list '(0 . "LWPOLYLINE")）线怎么分别四条线相对于其中心的方位？

雪山飞狐_lzh

1.     public enum PointOnRegionType
   
2.     {
   
3.         Inside,
   
4.         On,
   
5.         Outside,
   
6.         Error
   
7.     }
   
8. 
   
9.         public static PointOnRegionType PointOnRegion(this IEnumerable<Point2d> pts, Point2d pt)
   
10.         {
    
11. 
    
12.             //遍历点集并生成首尾连接的多边形
    
13.             LoopList<Point2d> ptlst = new LoopList<Point2d>(pts);
    
14.             if(ptlst.Count < 3)
    
15.                 return PointOnRegionType.Error;
    
16. 
    
17.             var ls2ds = new List<LineSegment2d>();
    
18.             foreach (var node in ptlst.GetNodes())
    
19.             {
    
20.                 ls2ds.Add(new LineSegment2d(node.Value, node.Next.Value));
    
21.             }
    
22.             var cc2d = new CompositeCurve2d(ls2ds.ToArray());
    
23. 
    
24.             //在多边形上?
    
25.             if (cc2d.IsOn(pt, new Tolerance(1e-4, 1e-4)))
    
26.                 return PointOnRegionType.On;
    
27. 
    
28.             //在最小包围矩形外?
    
29.             var bb2d = cc2d.BoundBlock;
    
30.             if (!bb2d.Contains(pt))
    
31.                 return PointOnRegionType.Outside;
    
32. 
    
33.             //
    
34.             bool flag = false;
    
35.             foreach (var node in ptlst.GetNodes())
    
36.             {
    
37.                 var pt1 = node.Value;
    
38.                 var pt2 = node.Next.Value;
    
39.                 if (pt.Y < pt1.Y && pt.Y < pt2.Y)
    
40.                     continue;
    
41.                 if (pt1.X < pt.X && pt2.X < pt.X)
    
42.                     continue;
    
43.                 Vector2d vec = pt2 - pt1;
    
44.                 double t = (pt.X - pt1.X) / vec.X;
    
45.                 double y = t * vec.Y + pt1.Y;
    
46.                 if (y < pt.Y && t >= 0 && t <= 1)
    
47.                     flag = !flag;
    
48.             }
    
49. 
    
50.             return flag ? PointOnRegionType.Inside : PointOnRegionType.Outside;
    
51. 
    
52.         }

复制代码

LoopList类在这里找http://bbs.mjtd.com/thread-82110-1-1.html
测试代码：

2.         [CommandMethod("t4")]
   
3.         public static void Test4()
   
4.         {
   
5.             Document doc = Application.DocumentManager.MdiActiveDocument;
   
6.             Editor ed = doc.Editor;
   
7.             
   
8.             PromptEntityOptions optsEnt = new PromptEntityOptions("\nSelect a LWPolyLine:");
   
9.             optsEnt.SetRejectMessage("\nNot a LWPolyLine!");
   
10.             optsEnt.AddAllowedClass(typeof(LWPolyline), false);
    
11.             PromptEntityResult resEnt = ed.GetEntity(optsEnt);
    
12. 
    
13. 
    
14.             if (resEnt.Status == PromptStatus.OK)
    
15.             {
    
16.                 Database db = doc.Database;
    
17.                 using (Transaction tr = db.TransactionManager.StartTransaction())
    
18.                 {
    
19. 
    
20.                     LWPolyline pl = tr.GetObject(resEnt.ObjectId, OpenMode.ForRead) as LWPolyline;
    
21.                     var ptlst =
    
22.                         Enumerable
    
23.                         .Range(0, pl.NumberOfVertices)
    
24.                         .Select(i => pl.GetPoint2dAt(i));
    
25. 
    
26.                     PromptPointOptions optPnt = new PromptPointOptions("\nInput a Point:");
    
27.                     optPnt.AllowNone = true;
    
28.                     PromptPointResult resPnt = ed.GetPoint(optPnt);
    
29.                     while (resPnt.Status == PromptStatus.OK)
    
30.                     {
    
31.                         var res = ptlst.PointOnRegion(resPnt.Value.Convert2d(new Plane()));
    
32.                         ed.WriteMessage("\nPoint:{0},Result:{1}" ,resPnt.Value, res);
    
33.                         resPnt = ed.GetPoint(optPnt);
    
34.                     }
    
35. 
    
36.                 }
    
37.             }
    
38.         }

        [CommandMethod("t4")]<br />         public static void Test4()<br />         {<br />             Document doc = Application.DocumentManager.MdiActiveDocument;<br />             Editor ed = doc.Editor;<br />             <br />             PromptEntityOptions optsEnt = new PromptEntityOptions("\nSelect a LWPolyLine:");<br />             optsEnt.SetRejectMessage("\nNot a LWPolyLine!");<br />             optsEnt.AddAllowedClass(typeof(LWPolyline), false);<br />             PromptEntityResult resEnt = ed.GetEntity(optsEnt);<br /> <br /> <br />             if (resEnt.Status == PromptStatus.OK)<br />             {<br />                 Database db = doc.Database;<br />                 using (Transaction tr = db.TransactionManager.StartTransaction())<br />                 {<br /> <br />                     LWPolyline pl = tr.GetObject(resEnt.ObjectId, OpenMode.ForRead) as LWPolyline;<br />                     var ptlst =<br />                         Enumerable<br />                         .Range(0, pl.NumberOfVertices)<br />                         .Select(i => pl.GetPoint2dAt(i));<br /> <br />                     PromptPointOptions optPnt = new PromptPointOptions("\nInput a Point:");<br />                     optPnt.AllowNone = true;<br />                     PromptPointResult resPnt = ed.GetPoint(optPnt);<br />                     while (resPnt.Status == PromptStatus.OK)<br />                     {<br />                         var res = ptlst.PointOnRegion(resPnt.Value.Convert2d(new Plane()));<br />                         ed.WriteMessage("\nPoint:{0},Result:{1}" ,resPnt.Value, res);<br />                         resPnt = ed.GetPoint(optPnt);<br />                     }<br /> <br />                 }<br />             }<br />         }

河伯

支持版主的解决方案，学习一下。
VB.NET 2010不能在调试期间编辑lambda表达式代码，必须停止调试退出AutoCAD，C#是这样吗？
如果这个问题不能解决，势必限制了Linq的应用，反复启动AutoCAD实在太麻烦。

aceowen

高难，还不懂，学习一下。

zz0147

太厉害了。
学习中

雪山飞狐_lzh

很少在调试阶段编辑代码，一般只有在Cad爆掉才，呵呵
现在总是不断地开Cad的，哎
习惯了，汗

hmxmylove

我经常在调试阶段编辑代码，如果编辑的代码不是当前运行的那行，一般调试是不会中断的，可以实时的看到效果，这样就不用重复启动CAD了。

雪山飞狐_lzh

lambda在C#里也无法调试。呵呵

河伯

lzh741206 发表于 2010-12-19 23:49
lambda在C#里也无法调试。呵呵

又多了一个调试阶段不能编辑的因素。
AutoCAD .NET其它方面都还不错，就是这个调试，比起lisp和VBA的方便程度差太多。
最要命的是调试时不能修改窗体，难以想象大量的对话框迁移起来该多麻烦。

yanglin112

学习一下！