基于VB6.0的数字图像编程实例(转)

前言
　　随着编程技术的发展，如何在程序中处理图像已经是所有编程爱好者不得不面对的一个重要问题，笔者在天极网上曾发表了多篇关于数字图像处理的文章，但都是基于visual c++开发平台的，对于习惯于使用visual basic的读者朋友来说，不能不算是一个遗憾。网上有很多朋友关心如何在viusal basic环境下进行一些基本的图像处理，如位图文件数据的读取、显示、实现特效等，为了满足上述这些朋友们的需求，笔者通过这篇文章介绍一下如何在visual basic环境下实现图像文件的一些基本操作，希望可以对广大喜爱visual basic编程的朋友起到入门的作用。
　　一、bmp位图的dib的结构
　　在 windows 3.0 以前，windows系统用的是ddb（设备有关位图），ddb没有调色板，显示的颜色依赖硬件，处理色彩很不方便。所以微软从windows 3.0以后重新定义了bmp文件格式，使其支持设备无关位图--也就是dib，其结构主要由以下几个部分构成：1）bitmapfileheader：bmp文件头；2）dib bitmapinfoheader：bmp位图文件信息头；3）rgbquad[]：bmp位图的调色板；4）位图数据块。bmp文件的结构示意图如图一所示：

图一、位图文件的结构示意图
　　（1）bmp位图文件头bitmapfileheader的vb声明如下：
type bitmapfileheader
　bftype(0 to 1) as byte
　bfsize as long
　bfreserved1 as integer
　bfreserved2 as integer
　bfoffbits as long
end type
　　上述结构中，参数bftype 指示文件的类型，对于位图文件来说，它必须是bm；参数bfsize指示位图文件的大小，它包括bitmapfileheader的长度；参数bfreserved1、bfreserved2目前保留，必须等于0；参数bfoffbits表示位图数据距离文件头的偏移字节数。
　　（2）文件信息头bitmapinfoheader结构在vb中声明如下：
type bitmapinfoheader
　bisize as long
　biwidth as long
　biheight as long
　biplanes as integer
　bibitcount as integer
　bicompression as long
　bisizeimage as long
　bixpelspermeter as long
　biypelspermeter as long
　biclrused as long
　biclrimportant as long
end type
　　上述结构中，参数bisize表示bitmapinfoheader结构的大小；参数biwidth表示位图的高度，单位是像素；参数biheight 位图的宽度，单位是像素；参数biplanes 设备的位平面数，现在都是1；参数bibitcount 图像的颜色位数，1表示单色位图、4表示16色位图、8表示256色位图、24表示真彩色位图、32表示32位位图，默认情况下windows不会处理最高8位，可以将它作为自己的alpha通道；参数bicompression表示图像的压缩方式，bi_rgb表示无压缩、bi_rle8表示行程编码压缩；参数bisizeimage表示实际的位图数据所占字节；参数bixpelspermeter表示目标设备的水平分辨率，单位是每米的像素个数；参数biypelspermeter表示目标设备的垂直分辨率，单位是每米的像素个数；参数biclrused表示使用的颜色数（当bibitcount等于1、4、8时才有效），如果该项为0，表示颜色数为2^bibitcount；参数biclrimportant# 重要的颜色数，如果该项为0，表示所有颜色都是重要的。
　　（3）位图调色板
　　调色板实际上是一个数组，它的元素的个数由bibitcount和biclrused决定，对于位图文件来说，只有bibitcount等于1、4、8时才有调色板，它们对应的调色板的元素个数分别是2、16、256。调色板结构在vb中的声明如下：
private type rgbquad
　rgbblue as byte
　rgbgreen as byte
　rgbred as byte
　rgbreserved as byte
end type
　　上述结构中，参数rgbblue表示蓝色分量，参数rgbgreen 绿色分量；参数rgbred表示红色分量；参数rgbreserved为保留位，设置为0既可。对于各个颜色的分量来说，它们分布在0-255之间，数值越大，亮度越大，反之则亮度越小。
　　需要说明的是，bitmapinfoheader结构和调色板数据合在一起就构成了bitmapinfo结构，这个结构在显示位图文件时能够用到。该结构在vb中声明如下：
private type bitmapinfo
　bmiheader as bitmapinfoheader
　bmicolors(0 to 255) as rgbquad
end type
　　（4）位图数据
　　对于位图文件来说，一行的图像数据叫做一个扫描行，一个扫描行的长度必须是4的倍数（字节），如果不是，则需要补齐。计算公式：linebytes=((biwidth*bibitcount+31)and &hffffffe0)\8，通常情况下dib的扫描行是逆序存储的（相对于屏幕坐标系而言），即屏幕上的第一行是dib位图数据的最后一行。对于256色位图来说，它用8bit表示一个像素的颜色索引，也就是说，位图显示时，根据当前索引值来到位图的调色板中确定该像素的颜色；对于真彩色图象来说，位图文件中没有调色板信息，它直接用24个bit位表示一个像素的颜色，每个字节表示一种基色，也就是r、g、b分量中的一个值，需要注意的是，真彩色位图文件中三个字节的排列顺序是bgr，而不是传统的rgb。

　　二、位图文件的显示
　　对位图文件的结构了解以后，我们就能顺利读取位图文件中的各种信息，然后结合特定的显示函数就可以将位图文件显示出来，本文中这个特定的显示函数是stretchdibits（），它在vb中的声明如下：
declare function stretchdibits lib gdi32 (byval hdc as long, byval xdest as long, byval ydest as long, byval ndestwidth as long, byval ndestheight as long, byval xsrc as long, byval ysrc as long, byval nsrcwidth as long, byval nsrcheight as long, lpbits as any, lpbitsinfo as any, byval wusage as long, byval dwrop as long) as long
　　该函数执行成功返回位图句柄，零表示失败。其中参数hdc 一个设备场景的句柄，该设备场景定义了要创建的与设备有关位图的配置信息；参数xdest为指定绘制区域的左上角x坐标；参数ydest为指定绘制区域的左上角y坐标；参数ndestwidth为指定绘制区域的高度；参数ndestheight为指定绘制区域的宽度；参数xsrc为矩形在dib中的起点x坐标；参数ysrc 为矩形在dib中的起点y坐标；参数nsrcwidth指定原位图绘制区域的左上角x坐标；参数nsrcheight指定原位图绘制区域的左上角y坐标；参数lpbits 指向一个缓冲区的指针，这个缓冲区包含了以dib格式描述的位图数据；lpbitsinfo 指向bitmapinfo结构，参数iusage一般情况下等于dib_rgb_colors，表示包含了rgb颜色；参数dwrop表示欲进行的光栅运算，具体内容可以参见msdn。
当然，显示位图文件的函数不只这一个，还有其他的一些函数，具体内容读者朋友可以参考相关资料。
　　三、实现位图的淡入淡出的实例
　　为了演示如何在visual basic中实现数字图像的基本操作，本文的例子实现了一幅256色彩色位图淡入淡出的显示效果，用户可以通过设定时间的长短控制图像淡入淡出的速度。例子程序中，有两个模块，其中mymemory模块是用来申请特定的内存空间，为后续读取位图文件作准备，另一模块bitmap是用来实现位图文件数据的读写、准备淡入淡出操作时的调色板等。对于例子中的256色彩色位图来说，实现淡入淡出显示主要是通过操作图像的调色板来实现的。具体思路是设置一个数组来存放若干个调色板，其中一个调色板保存位图文件中的原始调色板数据，另外的调色板中的数据按照比例等间隔的缩小，直至调色板中的r、g、b分量全部为零为止。有了这些预设的调色板，就可以在定时显示的过程中实现图像的淡入淡出的效果了
----------------------------------------------
此篇文章从博客转发
原文地址： Http://blog.gkong.com/more.asp?id=94307&Name=jczwfy