TlsBasal（基础类库，开源部分代码）

雪山飞狐_lzh

（2012/12/22）
]（2012/12/12）
2010/12/12
增强DBTransaction类
添加TlsBasal.Xml程序注释文件
2010/10/29
少许更新，加强扩展函数调用
2010/4/24
VS2008/AutoCAD2008以上
加入扩展方法支持
集成ResultList/ResultTree集合类
集成可序列化集合类SerialList
2009/6/20
修正曲线转换类

2.         [CommandMethod("Tls:BAC")]
   
3.         public static void BreakAllCurve()
   
4.         {
   
5.             using (DBTransaction t = new DBTransaction())
   
6.             {
   
7.                 PromptSelectionResult res = Helper.Editor.GetSelection(
   
8.                     new PromptSelectionOptions(),
   
9.                     new SelectionFilter(
   
10.                         new TypedValue[] {
    
11.                             new TypedValue(0, "*Line,Arc,Circle,Ellipse") }));
    
12.                 List<ObjectId> ids = new List<ObjectId>(res.Value.GetObjectIds());
    
13.                 List<Entity> objs = BreakCurve(ref ids);
    
14.                 t.OpenCurrentSpace();
    
15.                 t.AddEntity(objs);
    
16.                 t.Remove(ids);
    
17.             }
    
18.         }
    
19. 
    
20.         public static List<Entity> BreakCurve(ref List<ObjectId> ids)
    
21.         {
    
22.             List<Curve> dbCurves = new List<Curve>();
    
23.             List<CompositeCurve3d> geCurves = new List<CompositeCurve3d>();
    
24.             List<List<double>> paramss = new List<List<double>>();
    
25.             for (int i = 0; i < ids.Count; i++)
    
26.             {
    
27.                 dbCurves.Add((Curve)ids[i].GetObject(OpenMode.ForRead));
    
28.                 geCurves.Add(ConvertCurve.ToCompositeCurve3d(dbCurves[i]));
    
29.                 paramss.Add(new List<double>());
    
30.             }
    
31. 
    
32.             List<ObjectId> oldids = new List<ObjectId>();
    
33.             List<Entity> objs = new List<Entity>();
    
34.             CurveCurveIntersector3d cci3d = new CurveCurveIntersector3d();
    
35.             for (int i = 0; i < ids.Count; i++)
    
36.             {
    
37.                 CompositeCurve3d gc1 = geCurves[i];
    
38.                 List<double> pars1 = paramss[i];
    
39.                 for (int j = i; j < ids.Count; j++)
    
40.                 {
    
41.                     CompositeCurve3d gc2 = geCurves[j];
    
42.                     List<double> pars2 = paramss[j];
    
43.                     cci3d.Set(gc1, gc2, Vector3d.ZAxis);
    
44.                     for (int k = 0; k < cci3d.NumberOfIntersectionPoints; k++)
    
45.                     {
    
46.                         double[] pars = cci3d.GetIntersectionParameters(k);
    
47.                         pars1.Add(pars[0]);
    
48.                         pars2.Add(pars[1]);
    
49.                     }
    
50.                 }
    
51.                 if (pars1.Count > 0)
    
52.                 {
    
53.                     List<CompositeCurve3d> c3ds = GeUtility.GetSplitCurves(gc1, pars1);
    
54.                     if (c3ds.Count > 1)
    
55.                     {
    
56.                         foreach (CompositeCurve3d c3d in c3ds)
    
57.                         {
    
58.                             Curve c = ConvertCurve.ToCurve(c3d);
    
59.                             c.SetPropertiesFrom(dbCurves[i]);
    
60.                             objs.Add(c);
    
61.                         }
    
62.                         oldids.Add(ids[i]);
    
63.                     }
    
64.                 }
    
65.             }
    
66.             ids = oldids;
    
67.             return objs;
    
68.         }

        [CommandMethod("Tls:BAC")]<br />         public static void BreakAllCurve()<br />         {<br />             using (DBTransaction t = new DBTransaction())<br />             {<br />                 PromptSelectionResult res = Helper.Editor.GetSelection(<br />                     new PromptSelectionOptions(),<br />                     new SelectionFilter(<br />                         new TypedValue[] { <br />                             new TypedValue(0, "*Line,Arc,Circle,Ellipse") }));<br />                 List<ObjectId> ids = new List<ObjectId>(res.Value.GetObjectIds());<br />                 List<Entity> objs = BreakCurve(ref ids);<br />                 t.OpenCurrentSpace();<br />                 t.AddEntity(objs);<br />                 t.Remove(ids);<br />             }<br />         }<br /> <br />         public static List<Entity> BreakCurve(ref List<ObjectId> ids)<br />         {<br />             List<Curve> dbCurves = new List<Curve>();<br />             List<CompositeCurve3d> geCurves = new List<CompositeCurve3d>();<br />             List<List<double>> paramss = new List<List<double>>();<br />             for (int i = 0; i < ids.Count; i++)<br />             {<br />                 dbCurves.Add((Curve)ids[i].GetObject(OpenMode.ForRead));<br />                 geCurves.Add(ConvertCurve.ToCompositeCurve3d(dbCurves[i]));<br />                 paramss.Add(new List<double>());<br />             }<br /> <br />             List<ObjectId> oldids = new List<ObjectId>();<br />             List<Entity> objs = new List<Entity>();<br />             CurveCurveIntersector3d cci3d = new CurveCurveIntersector3d();<br />             for (int i = 0; i < ids.Count; i++)<br />             {<br />                 CompositeCurve3d gc1 = geCurves[i];<br />                 List<double> pars1 = paramss[i];<br />                 for (int j = i; j < ids.Count; j++)<br />                 {<br />                     CompositeCurve3d gc2 = geCurves[j];<br />                     List<double> pars2 = paramss[j];<br />                     cci3d.Set(gc1, gc2, Vector3d.ZAxis);<br />                     for (int k = 0; k < cci3d.NumberOfIntersectionPoints; k++)<br />                     {<br />                         double[] pars = cci3d.GetIntersectionParameters(k);<br />                         pars1.Add(pars[0]);<br />                         pars2.Add(pars[1]);<br />                     }<br />                 }<br />                 if (pars1.Count > 0)<br />                 {<br />                     List<CompositeCurve3d> c3ds = GeUtility.GetSplitCurves(gc1, pars1);<br />                     if (c3ds.Count > 1)<br />                     {<br />                         foreach (CompositeCurve3d c3d in c3ds)<br />                         {<br />                             Curve c = ConvertCurve.ToCurve(c3d);<br />                             c.SetPropertiesFrom(dbCurves[i]);<br />                             objs.Add(c);<br />                         }<br />                         oldids.Add(ids[i]);<br />                     }<br />                 }<br />             }<br />             ids = oldids;<br />             return objs;<br />         }

2009/6/18
更新版本
增加ConvertCurve类
支持DbCurve 与 GeCurve 互转
但二维样条化多段线的转换不太成功
支持AutoCad2008版本以上，低版本未测试
1、DBTransaction类
简化AutoCad托管程序写法的自定义类，封装了一些常用的函数，完善中
2009/5/27完善Ucs下属性块插入

用法的示例

2.         [CommandMethod("BAC")]
   
3.         public static void BreakAllCurve()
   
4.         {
   
5.             PromptSelectionResult res =
   
6.                 CadHelper.Editor.GetSelection(
   
7.                 new PromptSelectionOptions(),
   
8.                 new SelectionFilter(new TypedValue[] {
   
9.                     new TypedValue(0, "*Line,Arc,Circle,Ellipse") }));
   
10.             ObjectId[] ids = res.Value.GetObjectIds();
    
11.             ObjectIdCollection oldids = new ObjectIdCollection();
    
12.             using (DBTransaction t = new DBTransaction())
    
13.             {
    
14.                 t.OpenCurrentSpace();
    
15.                 foreach (ObjectId i in ids)
    
16.                 {
    
17.                     List<double> pars = new List<double>();
    
18.                     Curve iCurve = (Curve)t.GetObject(i, OpenMode.ForRead);
    
19.                     foreach (ObjectId j in ids)
    
20.                     {
    
21.                         if (i != j)
    
22.                         {
    
23.                             Curve jCurve = (Curve)t.GetObject(j, OpenMode.ForRead);
    
24.                             Point3dCollection iwpnts = new Point3dCollection();
    
25.                             iCurve.IntersectWith(jCurve, Intersect.OnBothOperands, iwpnts, 0, 0);
    
26.                             foreach (Point3d p in iwpnts)
    
27.                             {
    
28.                                 pars.Add(iCurve.GetParameterAtPoint(p));
    
29.                             }
    
30.                         }
    
31.                     }
    
32.                     if (pars.Count > 0)
    
33.                     {
    
34.                         pars.Sort();
    
35.                         try
    
36.                         {
    
37.                             t.AddEntity(iCurve.GetSplitCurves(new DoubleCollection(pars.ToArray())));
    
38.                             oldids.Add(i);
    
39.                         }
    
40.                         catch
    
41.                         { }
    
42.                     }
    
43.                 }
    
44.                 t.Remove(oldids);
    
45.             }
    
46.         }
    

        [CommandMethod("BAC")]<br />         public static void BreakAllCurve()<br />         {<br />             PromptSelectionResult res = <br />                 CadHelper.Editor.GetSelection(<br />                 new PromptSelectionOptions(), <br />                 new SelectionFilter(new TypedValue[] { <br />                     new TypedValue(0, "*Line,Arc,Circle,Ellipse") }));<br />             ObjectId[] ids = res.Value.GetObjectIds();<br />             ObjectIdCollection oldids = new ObjectIdCollection();<br />             using (DBTransaction t = new DBTransaction())<br />             {<br />                 t.OpenCurrentSpace();<br />                 foreach (ObjectId i in ids)<br />                 {<br />                     List<double> pars = new List<double>();<br />                     Curve iCurve = (Curve)t.GetObject(i, OpenMode.ForRead);<br />                     foreach (ObjectId j in ids)<br />                     {<br />                         if (i != j)<br />                         {<br />                             Curve jCurve = (Curve)t.GetObject(j, OpenMode.ForRead);<br />                             Point3dCollection iwpnts = new Point3dCollection();<br />                             iCurve.IntersectWith(jCurve, Intersect.OnBothOperands, iwpnts, 0, 0);<br />                             foreach (Point3d p in iwpnts)<br />                             {<br />                                 pars.Add(iCurve.GetParameterAtPoint(p));<br />                             }<br />                         }<br />                     }<br />                     if (pars.Count > 0)<br />                     {<br />                         pars.Sort();<br />                         try<br />                         {<br />                             t.AddEntity(iCurve.GetSplitCurves(new DoubleCollection(pars.ToArray())));<br />                             oldids.Add(i);<br />                         }<br />                         catch<br />                         { }<br />                     }<br />                 }<br />                 t.Remove(oldids);<br />             }<br />         }<br />

2、BlockPreview类
预览图像（块定义/图元集合）

将下面的文件Copy到d盘根目录下

3、TlsCad.Preferences名称空间
提供反射获取Cad环境变量的一些静态类，
当然你也可以使用Com引用获取Cad环境变量
调用方式

1. //获取autocad支持目录
   
2. string s = TlsCad.Preferences.Files.SupportPath;
   
3. //设置autocad支持目录
   
4. TlsCad.Preferences.Files.SupportPath = s + ";c:\";
   
5. //or
   
6. TlsCad.Preferences.Files.SupportPath += ";d:\";

复制代码

4、TlsCad.Utils名称空间
提供一些常用函数调用

hxs1111

这个功能有点用，可以借用一下

xiongdi6k

学习了  码上

雪山飞狐_lzh

0.2测试版
2009/5/27
更正ucs下属性块的插入
下面是一段简单的测试代码

2.         [CommandMethod("tt2")]
3.         public static void Test10()
4.         {
5.             using (DBTransaction tr = new DBTransaction())
6.             {
7.                 ObjectId blkdefid = tr.AddBlock("*T");
8.                 tr.OpenBlockTableRecord(blkdefid);
9.                 tr.AddEntity(new Line(Point3d.Origin, new Point3d(10, 0, 0)));
10.                 tr.OpenTextStyleTable();
11.                 AttributeDefinition attdef =
12.                     new AttributeDefinition(
13.                         Point3d.Origin,
14.                         "Test",
15.                         "A1",
16.                         "Input A1",
17.                         tr.TextStyleTable["Standard"]);
18.                 attdef.Height = 5;
19.                 tr.AddEntity(attdef);
20.                 tr.OpenCurrentSpace();
21.                 if (blkdefid != ObjectId.Null)
22.                 {
23.                     List<string> atts = new List<string>();
24.                     atts.Add("This is a Test");
25.                     tr.InsertBlock(blkdefid, atts);
26.                 }
27.             }
28.         }

        [CommandMethod("tt2")]         public static void Test10()         {             using (DBTransaction tr = new DBTransaction())             {                 ObjectId blkdefid = tr.AddBlock("*T");                 tr.OpenBlockTableRecord(blkdefid);                 tr.AddEntity(new Line(Point3d.Origin, new Point3d(10, 0, 0)));                 tr.OpenTextStyleTable();                 AttributeDefinition attdef =                     new AttributeDefinition(                         Point3d.Origin,                         "Test",                         "A1",                         "Input A1",                         tr.TextStyleTable["Standard"]);                 attdef.Height = 5;                 tr.AddEntity(attdef);                 tr.OpenCurrentSpace();                 if (blkdefid != ObjectId.Null)                 {                     List<string> atts = new List<string>();                     atts.Add("This is a Test");                     tr.InsertBlock(blkdefid, atts);                 }             }         }

雪山飞狐_lzh

TlsCad开源部分的代码：
曲线转换类
http://bbs.mjtd.com/forum.php?mod=viewthread&tid=77565
DBTransaction类
http://bbs.mjtd.com/forum.php?mod=viewthread&tid=76123
曲线专贴
http://bbs.mjtd.com/forum.php?mod=viewthread&tid=75636
2009/5/30
增强动画录制功能，可以将动作保存为动态Gif文件或多帧Tiff
点击 开始 录制
点击 停止 将在C盘下保存两个文件

将BlockView的窗体代码改下：）

2. using System;
3. using System.Collections.Generic;
4. using System.ComponentModel;
5. using System.Drawing;
6. using System.Windows.Forms;
7. using System.Drawing.Imaging;
8. using Autodesk.AutoCAD.DatabaseServices;
9. using Autodesk.AutoCAD.Geometry;
10. using Autodesk.AutoCAD.GraphicsInterface;
11. using Autodesk.AutoCAD.Runtime;
12. using Autodesk.AutoCAD.ApplicationServices;
13. using AcadApp = Autodesk.AutoCAD.ApplicationServices.Application;
14. using TlsCad.Image;
15. [assembly: CommandClass(typeof(TlsCad.frmBlockPreview))]
16. namespace TlsCad
17. {
18.     public partial class frmBlockPreview : Form
19.     {
20.         BlockPreviewCollection m_BlockPreviews;
21.         private ImageCreator m_Gif;
22.         private ImageCreator m_Tiff;
23.         public frmBlockPreview()
24.         {
25.             InitializeComponent();
26.             m_BlockPreviews =
27.                 new BlockPreviewCollection(
28.                     "D:\\TlsCad.dwg",
29.                     Autodesk.AutoCAD.GraphicsSystem.RenderMode.GouraudShaded,
30.                     VisualStyleType.Gouraud);
31.             m_BlockPreviews.BackColor = Color.White;
32.             List<Entity> ents = new List<Entity>();
33.             Line line = new Line(Point3d.Origin, new Point3d(0, 10.5, 0));
34.             line.SetDatabaseDefaults();
35.             ents.Add(line);
36.             Circle cir = new Circle(Point3d.Origin, Vector3d.ZAxis, 14);
37.             cir.SetDatabaseDefaults();
38.             ents.Add(cir);
39.             Line line1 = new Line(new Point3d(11, 0, 0), new Point3d(14, 0, 0));
40.             Line line2 = new Line(new Point3d(13, 0, 0), new Point3d(14, 0, 0));
41.             line1.SetDatabaseDefaults();
42.             line2.SetDatabaseDefaults();
43.             double angle = Math.PI / 30;
44.             for (int i = 0; i < 60; i++)
45.             {
46.                 Line l;
47.                 if (i % 5 == 0)
48.                     l = (Line)line1.Clone();
49.                 else
50.                     l = (Line)line2.Clone();
51.                 l.TransformBy(Matrix3d.Rotation(angle * i, Vector3d.ZAxis, Point3d.Origin));
52.                 ents.Add(l);
53.             }
54.             m_BlockPreviews.Add(
55.                 this.panel1,
56.                 ents,
57.                 new Extents3d(
58.                     new Point3d(-20, -20, 0),
59.                     new Point3d(20, 20, 0)));
60.             BlockPreview bpv = m_BlockPreviews.Add(panel2, "PressureVessel");
61.         }
62.         private void frmBlockPreview_FormClosed(object sender, FormClosedEventArgs e)
63.         {
64.             m_BlockPreviews.Dispose();
65.         }
66.         private void button1_Click(object sender, EventArgs e)
67.         {
68.             button1.Text = (timer1.Enabled = !timer1.Enabled) ? "停止" : "继续";
69.             if (timer1.Enabled)
70.             {
71.                 BlockPreview bpv = m_BlockPreviews[0];
72.                 m_Gif = new GifCreator("c:\\1.gif", 100, 0);
73.                 m_Tiff = new TiffCreator("c:\\1.tiff");
74.                 Bitmap bp = m_BlockPreviews[0].GetImage();
75.                 m_Gif.AddFrame(bp, FrameStatus.First);
76.                 m_Tiff.AddFrame(bp, FrameStatus.First);
77.             }
78.             else
79.             {
80.                 Bitmap bp = m_BlockPreviews[0].GetImage();
81.                 m_Gif.AddFrame(bp, FrameStatus.End);
82.                 m_Tiff.AddFrame(bp, FrameStatus.End);
83.             }
84.         }
85.         private void button2_Click(object sender, EventArgs e)
86.         {
87.             this.Close();
88.         }
89.         private void button3_Click(object sender, EventArgs e)
90.         {
91.             m_BlockPreviews[0].Save("c://1.jpg", ImageFormat.Jpeg);
92.             m_BlockPreviews[1].Save("c://2.png", ImageFormat.Png);
93.             MessageBox.Show("文件已保存!");
94.         }  
95.         
96.         private void timer1_Tick(object sender, EventArgs e)
97.         {
98.             BlockPreview bpv = m_BlockPreviews[0];
99.             Entity ent = bpv[0];
100.             ent.TransformBy(Matrix3d.Rotation(-Math.PI / 300, Vector3d.ZAxis, Point3d.Origin));
101.             bpv.Update(0);
102.             bpv.Refresh();
103.             Bitmap bp = m_BlockPreviews[0].GetImage();
104.             m_Gif.AddFrame(bp, FrameStatus.Other);
105.             m_Tiff.AddFrame(bp, FrameStatus.Other);
106.         }
107.         [CommandMethod("bview")]
108.         static public void bview()
109.         {
110.             using (frmBlockPreview dlg = new frmBlockPreview())
111.             {
112.                 AcadApp.ShowModalDialog(dlg);
113.             }
114.         }
115.     }
116. }

using System; using System.Collections.Generic; using System.ComponentModel; using System.Drawing; using System.Windows.Forms; using System.Drawing.Imaging; using Autodesk.AutoCAD.DatabaseServices; using Autodesk.AutoCAD.Geometry; using Autodesk.AutoCAD.GraphicsInterface; using Autodesk.AutoCAD.Runtime; using Autodesk.AutoCAD.ApplicationServices; using AcadApp = Autodesk.AutoCAD.ApplicationServices.Application; using TlsCad.Image; [assembly: CommandClass(typeof(TlsCad.frmBlockPreview))] namespace TlsCad {     public partial class frmBlockPreview : Form     {         BlockPreviewCollection m_BlockPreviews;         private ImageCreator m_Gif;         private ImageCreator m_Tiff;         public frmBlockPreview()         {             InitializeComponent();             m_BlockPreviews =                 new BlockPreviewCollection(                     "D:\\TlsCad.dwg",                     Autodesk.AutoCAD.GraphicsSystem.RenderMode.GouraudShaded,                     VisualStyleType.Gouraud);             m_BlockPreviews.BackColor = Color.White;             List<Entity> ents = new List<Entity>();             Line line = new Line(Point3d.Origin, new Point3d(0, 10.5, 0));             line.SetDatabaseDefaults();             ents.Add(line);             Circle cir = new Circle(Point3d.Origin, Vector3d.ZAxis, 14);             cir.SetDatabaseDefaults();             ents.Add(cir);             Line line1 = new Line(new Point3d(11, 0, 0), new Point3d(14, 0, 0));             Line line2 = new Line(new Point3d(13, 0, 0), new Point3d(14, 0, 0));             line1.SetDatabaseDefaults();             line2.SetDatabaseDefaults();             double angle = Math.PI / 30;             for (int i = 0; i < 60; i++)             {                 Line l;                 if (i % 5 == 0)                     l = (Line)line1.Clone();                 else                     l = (Line)line2.Clone();                 l.TransformBy(Matrix3d.Rotation(angle * i, Vector3d.ZAxis, Point3d.Origin));                 ents.Add(l);             }             m_BlockPreviews.Add(                 this.panel1,                 ents,                 new Extents3d(                     new Point3d(-20, -20, 0),                     new Point3d(20, 20, 0)));             BlockPreview bpv = m_BlockPreviews.Add(panel2, "PressureVessel");         }         private void frmBlockPreview_FormClosed(object sender, FormClosedEventArgs e)         {             m_BlockPreviews.Dispose();         }         private void button1_Click(object sender, EventArgs e)         {             button1.Text = (timer1.Enabled = !timer1.Enabled) ? "停止" : "继续";             if (timer1.Enabled)             {                 BlockPreview bpv = m_BlockPreviews[0];                 m_Gif = new GifCreator("c:\\1.gif", 100, 0);                 m_Tiff = new TiffCreator("c:\\1.tiff");                 Bitmap bp = m_BlockPreviews[0].GetImage();                 m_Gif.AddFrame(bp, FrameStatus.First);                 m_Tiff.AddFrame(bp, FrameStatus.First);             }             else             {                 Bitmap bp = m_BlockPreviews[0].GetImage();                 m_Gif.AddFrame(bp, FrameStatus.End);                 m_Tiff.AddFrame(bp, FrameStatus.End);             }         }         private void button2_Click(object sender, EventArgs e)         {             this.Close();         }         private void button3_Click(object sender, EventArgs e)         {             m_BlockPreviews[0].Save("c://1.jpg", ImageFormat.Jpeg);             m_BlockPreviews[1].Save("c://2.png", ImageFormat.Png);             MessageBox.Show("文件已保存!");         }                    private void timer1_Tick(object sender, EventArgs e)         {             BlockPreview bpv = m_BlockPreviews[0];             Entity ent = bpv[0];             ent.TransformBy(Matrix3d.Rotation(-Math.PI / 300, Vector3d.ZAxis, Point3d.Origin));             bpv.Update(0);             bpv.Refresh();             Bitmap bp = m_BlockPreviews[0].GetImage();             m_Gif.AddFrame(bp, FrameStatus.Other);             m_Tiff.AddFrame(bp, FrameStatus.Other);         }         [CommandMethod("bview")]         static public void bview()         {             using (frmBlockPreview dlg = new frmBlockPreview())             {                 AcadApp.ShowModalDialog(dlg);             }         }     } }

BlockView挺有意思的：），简单的做了个方块测试下

把测试代码还是放上吧，同时Debug目录下有TlsBasal.dll的新版本
这让我想起了自己编的第一个程序就是方块，哈哈
方块测试结束

雪山飞狐_lzh

BlockView挺有意思的：），简单的做了个方块测试下

把测试代码还是放上吧，同时Debug目录下有TlsBasal.dll的新版本

这让我想起了自己编的第一个程序就是方块，哈哈

方块测试结束

雪山飞狐_lzh

测试过程发现的一个问题

无标题栏的窗体调整位置真麻烦，干脆用代码把它固定住

            Window w = ACadApp.DocumentManager.MdiActiveDocument.Window;
            Point pnt = w.Location;
            Size size = w.Size;
            pnt.X += (size.Width - 505);
            pnt.Y += (size.Height - 622);
            string bounds = pnt.X + "," + pnt.Y + ",502,602";
            UserConfigurationManager ucm = ACadApp.UserConfigurationManager;
            IConfigurationSection ds = ucm.OpenDialogSection(this);
            ds.WriteProperty("Bounds", bounds);

不知道有没有更好的办法？

雪山飞狐_lzh

2009/6/18

更新版本

游天居士

太有才了.

游天居士

老大.你文件没有发完啊.我搞二十分钟.都不知怎么开始.是不是自己再组合代码?

雪山飞狐_lzh

二楼的代码是可以直接用的

一楼是新一点的版本，有一些改动

游天居士

还是没有整成功