bmp 2 dwg

lucas3

2. 
   
3. [CommandMethod("bmptocad")]
   
4.     public void test()
   
5.     {
   
6.       Bitmap bitmap = new Bitmap("C:\\hal9000.bmp");
   
7.       Database db = AcAp.Application.DocumentManager.MdiActiveDocument.Database;
   
8.       using (Transaction tr = db.TransactionManager.StartTransaction())
   
9.       {
   
10.         AcDb.BlockTableRecord currentSpace = tr.GetObject
    
11.                         (db.CurrentSpaceId, OpenMode.ForWrite) as AcDb.BlockTableRecord;
    
12.         for (int i = 0; i < bitmap.Width; i++)
    
13.         {
    
14.           for (int j = 0; j < bitmap.Height; j++)
    
15.           {
    
16.             DBPoint point = new DBPoint(new Point3d(i,j,0));
    
17.             point.Color = Autodesk.AutoCAD.Colors.Color.FromColor( bitmap.GetPixel(i,j));
    
18.             currentSpace.AppendEntity(point);
    
19.             tr.AddNewlyCreatedDBObject(point, true);
    
20.           }
    
21.         }
    
22.         tr.Commit();
    
23.       }
    
24.     }
    

<br /> [CommandMethod("bmptocad")]<br />     public void test()<br />     {<br />       Bitmap bitmap = new Bitmap("C:\\hal9000.bmp");<br />       Database db = AcAp.Application.DocumentManager.MdiActiveDocument.Database;<br />       using (Transaction tr = db.TransactionManager.StartTransaction())<br />       {<br />         AcDb.BlockTableRecord currentSpace = tr.GetObject<br />                         (db.CurrentSpaceId, OpenMode.ForWrite) as AcDb.BlockTableRecord;<br />         for (int i = 0; i < bitmap.Width; i++)<br />         {<br />           for (int j = 0; j < bitmap.Height; j++)<br />           {<br />             DBPoint point = new DBPoint(new Point3d(i,j,0));<br />             point.Color = Autodesk.AutoCAD.Colors.Color.FromColor( bitmap.GetPixel(i,j));<br />             currentSpace.AppendEntity(point);<br />             tr.AddNewlyCreatedDBObject(point, true);<br />           }<br />         }<br />         tr.Commit();<br />       }<br />     }<br />

有谁帮忙编译一下啊， CAD2007 至2012适用 ，谢谢！

csharp

注意图片名和路径是固定的

雪山飞狐(lzh)

bmp转点集。。。这样文件变大还是小呢

lucas3

谢谢c#(csharp) 晓东近期很不稳定，想回复都回复不了，刷新了半天都没反应

lucas3

csharp 发表于 2015-4-27 16:56
注意图片名和路径是固定的

终于能进来回复了，谢谢老大，效果不错，速度也很快，就是转换后的图像是颠倒的

雪山飞狐(lzh)

有时间我写个lisp编译c#的函数

lucas3

雪山飞狐(lzh) 发表于 2015-4-27 23:09
有时间我写个lisp编译c#的函数

飞狐老大，你意思是用lisp可将C#源码编译成dll ？如果真是那样，就太好了

iLisp

雪山飞狐(lzh) 发表于 2015-4-27 23:09
有时间我写个lisp编译c#的函数

其实C#的门槛不算高，假如桌子能把那些lisper给普及了C#基础，把C#弄到和alisp一样（C#不止在Acad一个平台)，戏就大了{:soso_e100:}

雪山飞狐(lzh)

只要你的机器安装了.net 就可以不借助vs来编译  方法可以看看这里http://blog.csdn.net/lybwwp/article/details/7285969

雪山飞狐(lzh)

很早以前这么玩过 呵呵 但问题是参数设置很麻烦 第二个办法是利用.net的动态程序集来编译 这个便于控制 我刚发的netloadx就是利用这个实现的

bingzhenxk

第15行可以改为，然后图片就不颠倒了。
                      DBPoint point = new DBPoint(new Point3d(i,bitmap.Height- j, 0));