转发 完美解决VB.NET窗体中预览DWG图形（附完整代码）

tcsl9621

转发，试过了效果一级棒。大家快下下去研究研究。

终于解决了一个困扰许久的关于DWG文件的难题，还没完善，欢迎批评，高分相送
为了找一个合适的预览DWG文件的控件，不知道搜索了多少次，都没有满意的结果，R2002自带的控件无法预览R2004格式的文件，最近花了几天时间，终于解决了这个困扰好久了难题，直接从DWG文件中提取位图放在PictureBox中预览。唯一留下的遗憾是当文件被其它进程打开时，会导致程序返回速度太慢，不知道各位是否有好的方法解决这一问题（或是有什么办法可以强行打开正被其它进程打开的文件）。现将代码及注释贴出来，要知道我是刚学VB.Net的，而且纯属业余爱好。

    Private Structure BITMAPFILEHEADER
        Dim bfType As Short
        Dim bfSize As Integer
        Dim bfReserved1 As Short
        Dim bfReserved2 As Short
        Dim bfOffBits As Integer
    End Structure

Public Function GetDwgImage(ByVal FileName As String) As Image
        If Not File.Exists(FileName) Then Exit Function
        Dim DwgF As FileStream    '文件流
        Dim PosSentinel As Integer  '文件描述块的位置
        Dim br As BinaryReader  '读取二进制文件
        Dim TypePreview As Integer '缩略图格式
        Dim PosBMP As Integer '缩略图位置
        Dim LenBMP As Integer '缩略图大小
        Dim biBitCount As Short '缩略图比特深度
        Dim biH As BITMAPFILEHEADER 'BMP文件头，DWG文件中不包含位图文件头，要自行加上去
        Dim BMPInfo() As Byte  '包含在DWG文件中的BMP文件体
        Dim BMPF As New MemoryStream  '保存位图的内存文件流
        Dim bmpr As New BinaryWriter(BMPF) '写二进制文件类
        Dim myImg As Image
        Try
            DwgF = New FileStream(FileName, FileMode.Open, FileAccess.Read)    '文件流
            br = New BinaryReader(DwgF)
            DwgF.Seek(13, SeekOrigin.Begin) '从第十三字节开始读取
            PosSentinel = br.ReadInt32 '第13到17字节指示缩略图描述块的位置
            DwgF.Seek(PosSentinel + 30, SeekOrigin.Begin) '将指针移到缩略图描述块的第31字节

            TypePreview = br.ReadByte '第31字节为缩略图格式信息，2 为BMP格式，3为WMF格式
            Select Case TypePreview
                Case 1

                Case 2, 3
                    PosBMP = br.ReadInt32 'DWG文件保存的位图所在位置
                    LenBMP = br.ReadInt32 '位图的大小
                    DwgF.Seek(PosBMP + 14, SeekOrigin.Begin) '移动指针到位图块
                    biBitCount = br.ReadInt16 '读取比特深度
                    DwgF.Seek(PosBMP, SeekOrigin.Begin) '从位图块开始处读取全部位图内容备用
                    BMPInfo = br.ReadBytes(LenBMP)  '不包含文件头的位图信息
                    br.Close()
                    DwgF.Close()
                    With biH  '建立位图文件头
                        .bfType = &H4D42
                        If biBitCount < 9 Then .bfSize = 54 + 4 * (2 ^ biBitCount) + LenBMP Else .bfSize = 54 + LenBMP
                        .bfReserved1 = 0 '保留字节
                        .bfReserved2 = 0 '保留字节
                        .bfOffBits = 14 + &H28 + 1024 '图像数据偏移
                    End With
                    '以下开始写入位图文件头
                    bmpr.Write(biH.bfType) '文件类型
                    bmpr.Write(biH.bfSize) '文件大小
                    bmpr.Write(biH.bfReserved1) '0
                    bmpr.Write(biH.bfReserved2) '0
                    bmpr.Write(biH.bfOffBits) '图像数据偏移
                    bmpr.Write(BMPInfo) '写入位图

                    BMPF.Seek(0, SeekOrigin.Begin) '指针移到文件开始处

                    myImg = Image.FromStream(BMPF) '创建位图文件对象
                    Return myImg
                    bmpr.Close()
                    BMPF.Close()
            End Select
        Catch ex As Exception
            Return Nothing
        End Try

      
    End Function

这个程序涉及到了DWG文件的内部格式。编出来的人很了不起。

tcsl9621

自已再顶一下，此帖完美解决了在窗体中预览DWG文件有方案。不仅适用于VB也适用于别的`编程语言。从网上淘下这个帖子后我如获至宝。以最快的速度拿出不与大家共享。也幸亏这样。淘下来的第二天我的电脑硬盘坏了。只有网上保存了这一份。原来在网上的贴子我再也找不出不了。呵。。。。。

好人有好报！

Leo1980

谢谢楼主的资源，翻译成C#的：

1. using System;
   
2. using System.Collections.Generic;
   
3. using System.Linq;
   
4. using System.Text;
   
5. using System.IO;
   
6. using System.Drawing;
   
7. 
   
8. namespace Changfeng.AcadNetLib
   
9. {
   
10.     public class AcadUtility
    
11.     {
    
12.         public struct BITMAPFILEHEADER
    
13.         {
    
14.             public short bfType;
    
15.             public int bfSize;
    
16.             public short bfReserved1;
    
17.             public short bfReserved2;
    
18.             public int bfOffBits;
    
19.         }
    
20. 
    
21.         public static Image GetDwgImage(string FileName)
    
22.         {
    
23.             if (!File.Exists(FileName)) return default(Image);
    
24. 
    
25.             FileStream DwgF =null;
    
26.             BinaryReader br =null;
    
27. 
    
28.             //文件描述块的位置
    
29.             int PosSentinel = 0;
    
30. 
    
31.             //缩略图格式
    
32.             int TypePreview = 0;
    
33. 
    
34.             //缩略图位置
    
35.             int PosBMP = 0;
    
36. 
    
37.             //缩略图大小
    
38.             int LenBMP = 0;
    
39. 
    
40.             //缩略图比特深度
    
41.             short biBitCount = 0;
    
42. 
    
43.             //BMP文件头，DWG文件中不包含位图文件头，要自行加上去
    
44.             BITMAPFILEHEADER biH = new BITMAPFILEHEADER();
    
45.             byte[] BMPInfo = null; //包含在DWG文件中的BMP文件体
    
46.             MemoryStream BMPF = new MemoryStream(); //保存位图的内存文件流
    
47.             BinaryWriter bmpr = new BinaryWriter(BMPF); //写二进制文件类
    
48.             Image myImg = default(Image);
    
49.             try
    
50.             {
    
51.                 DwgF = new FileStream(FileName, FileMode.Open, FileAccess.Read); //文件流
    
52.                 br = new BinaryReader(DwgF);
    
53.                 DwgF.Seek(13, SeekOrigin.Begin); //从第十三字节开始读取
    
54. 
    
55.                 PosSentinel = br.ReadInt32(); //第13到17字节指示缩略图描述块的位置
    
56. 
    
57.                 DwgF.Seek(PosSentinel + 30, SeekOrigin.Begin); //将指针移到缩略图描述块的第31字节
    
58. 
    
59.                 TypePreview = br.ReadByte(); //第31字节为缩略图格式信息，2 为BMP格式，3为WMF格式
    
60.                 switch (TypePreview)
    
61.                 {
    
62.                     case 1:
    
63.                         break;
    
64. 
    
65.                     case 2:
    
66.                     case 3:
    
67.                         PosBMP = br.ReadInt32(); //DWG文件保存的位图所在位置
    
68.                         LenBMP = br.ReadInt32(); //位图的大小
    
69.                         DwgF.Seek(PosBMP + 14, SeekOrigin.Begin); //移动指针到位图块
    
70.                         biBitCount = br.ReadInt16(); //读取比特深度
    
71.                         DwgF.Seek(PosBMP, SeekOrigin.Begin); //从位图块开始处读取全部位图内容备用
    
72.                         BMPInfo = br.ReadBytes(LenBMP); //不包含文件头的位图信息
    
73.                         br.Close();
    
74.                         DwgF.Close();
    
75.                         biH.bfType = (short)(0x4D42);
    
76.                         if (biBitCount < 9)
    
77.                         {
    
78.                             biH.bfSize = System.Convert.ToInt32(54 + 4 * (Math.Pow(2, biBitCount)) + LenBMP);
    
79.                         }
    
80.                         else
    
81.                         {
    
82.                             biH.bfSize = 54 + LenBMP;
    
83.                         }
    
84.                         biH.bfReserved1 = (short)0; //保留字节
    
85.                         biH.bfReserved2 = (short)0; //保留字节
    
86.                         biH.bfOffBits = 14 + 0x28 + 1024; //图像数据偏移
    
87.                         //以下开始写入位图文件头
    
88.                         bmpr.Write(biH.bfType); //文件类型
    
89.                         bmpr.Write(biH.bfSize); //文件大小
    
90.                         bmpr.Write(biH.bfReserved1); //0
    
91.                         bmpr.Write(biH.bfReserved2); //0
    
92.                         bmpr.Write(biH.bfOffBits); //图像数据偏移
    
93.                         bmpr.Write(BMPInfo); //写入位图
    
94. 
    
95. 
    
96.                         BMPF.Seek(0, SeekOrigin.Begin); //指针移到文件开始处
    
97. 
    
98.                         myImg = (Image)(Image.FromStream(BMPF)); //创建位图文件对象
    
99.                         return myImg;
    
100.                     //        bmpr.Close();
     
101.                     //        BMPF.Close();
     
102. 
     
103.                     default:
     
104.                         break;
     
105.                 }
     
106.             }
     
107.             catch (Exception)
     
108.             {
     
109.                 return null;
     
110.             }
     
111. 
     
112. 
     
113.             return null;
     
114. 
     
115.         }
     
116. 
     
117. 
     
118. 
     
119.     }
     
120. }
     

using System;<br /> using System.Collections.Generic;<br /> using System.Linq;<br /> using System.Text;<br /> using System.IO;<br /> using System.Drawing;<br /> <br /> namespace Changfeng.AcadNetLib<br /> {<br />     public class AcadUtility<br />     {<br />         public struct BITMAPFILEHEADER<br />         {<br />             public short bfType;<br />             public int bfSize;<br />             public short bfReserved1;<br />             public short bfReserved2;<br />             public int bfOffBits;<br />         }<br /> <br />         public static Image GetDwgImage(string FileName)<br />         {<br />             if (!File.Exists(FileName)) return default(Image);<br /> <br />             FileStream DwgF =null;<br />             BinaryReader br =null;<br /> <br />             //文件描述块的位置<br />             int PosSentinel = 0;<br /> <br />             //缩略图格式<br />             int TypePreview = 0;<br /> <br />             //缩略图位置<br />             int PosBMP = 0;<br /> <br />             //缩略图大小<br />             int LenBMP = 0;<br /> <br />             //缩略图比特深度<br />             short biBitCount = 0;<br /> <br />             //BMP文件头，DWG文件中不包含位图文件头，要自行加上去<br />             BITMAPFILEHEADER biH = new BITMAPFILEHEADER(); <br />             byte[] BMPInfo = null; //包含在DWG文件中的BMP文件体<br />             MemoryStream BMPF = new MemoryStream(); //保存位图的内存文件流<br />             BinaryWriter bmpr = new BinaryWriter(BMPF); //写二进制文件类<br />             Image myImg = default(Image);<br />             try<br />             {<br />                 DwgF = new FileStream(FileName, FileMode.Open, FileAccess.Read); //文件流<br />                 br = new BinaryReader(DwgF);<br />                 DwgF.Seek(13, SeekOrigin.Begin); //从第十三字节开始读取<br /> <br />                 PosSentinel = br.ReadInt32(); //第13到17字节指示缩略图描述块的位置<br /> <br />                 DwgF.Seek(PosSentinel + 30, SeekOrigin.Begin); //将指针移到缩略图描述块的第31字节<br /> <br />                 TypePreview = br.ReadByte(); //第31字节为缩略图格式信息，2 为BMP格式，3为WMF格式<br />                 switch (TypePreview)<br />                 {<br />                     case 1:<br />                         break;<br /> <br />                     case 2:<br />                     case 3:<br />                         PosBMP = br.ReadInt32(); //DWG文件保存的位图所在位置<br />                         LenBMP = br.ReadInt32(); //位图的大小<br />                         DwgF.Seek(PosBMP + 14, SeekOrigin.Begin); //移动指针到位图块<br />                         biBitCount = br.ReadInt16(); //读取比特深度<br />                         DwgF.Seek(PosBMP, SeekOrigin.Begin); //从位图块开始处读取全部位图内容备用<br />                         BMPInfo = br.ReadBytes(LenBMP); //不包含文件头的位图信息<br />                         br.Close();<br />                         DwgF.Close();<br />                         biH.bfType = (short)(0x4D42);<br />                         if (biBitCount < 9)<br />                         {<br />                             biH.bfSize = System.Convert.ToInt32(54 + 4 * (Math.Pow(2, biBitCount)) + LenBMP);<br />                         }<br />                         else<br />                         {<br />                             biH.bfSize = 54 + LenBMP;<br />                         }<br />                         biH.bfReserved1 = (short)0; //保留字节<br />                         biH.bfReserved2 = (short)0; //保留字节<br />                         biH.bfOffBits = 14 + 0x28 + 1024; //图像数据偏移<br />                         //以下开始写入位图文件头<br />                         bmpr.Write(biH.bfType); //文件类型<br />                         bmpr.Write(biH.bfSize); //文件大小<br />                         bmpr.Write(biH.bfReserved1); //0<br />                         bmpr.Write(biH.bfReserved2); //0<br />                         bmpr.Write(biH.bfOffBits); //图像数据偏移<br />                         bmpr.Write(BMPInfo); //写入位图<br /> <br /> <br />                         BMPF.Seek(0, SeekOrigin.Begin); //指针移到文件开始处<br /> <br />                         myImg = (Image)(Image.FromStream(BMPF)); //创建位图文件对象<br />                         return myImg;<br />                     //        bmpr.Close();<br />                     //        BMPF.Close();<br /> <br />                     default:<br />                         break;<br />                 }<br />             }<br />             catch (Exception)<br />             {<br />                 return null;<br />             }<br /> <br /> <br />             return null;<br /> <br />         }<br /> <br /> <br /> <br />     }<br /> }<br />

cwgchen

Leo1980 发表于 2019-9-5 11:17
谢谢楼主的资源，翻译成C#的：

好东西  研究研究

lgf727

楼主真牛，这么难的问题也能搞定。

tcsl9621

我上机试用了，的确好用。这为我们编制VB。NET程序扫清了一大障碍。大家可以试试。

ganok

楼主能找到这篇文章，也了不起，能拿出来分享，更了不起。

顺便问是在哪个网站有这种宝贝文章的？

tcsl9621

我也想再去一下那个网站，可惜再也找不到了。我用GOOGLE搜的。

xyy_82216

我找这样的文章找了好久了，首先谢谢楼主的与大家分享~~可是上面的代码怎么用呢？我是新手，请大家帮忙~

elway

谢谢楼主啊！

 

whales

谢谢推荐！

tcsl9621

再来跟一个。好帖不能沉下去。