图片的黑白处理(二值化)

《图片的黑白处理(二值化)》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、图片的黑白处理（二值化）原始圖片黑白處理后圖片原始圖片：黑白處理后圖片：部分处理代码：VB.NETcode……  Dimts2AsIThresholder=NewGlobalMeanThreshold(inbmp)        DimtsBMPAsNewBitmap(PictureBox1.Width,PictureBox1.Height)        ts2.RenderToBitmap(tsBMP)        PictureBox6.Image=tsBMP        PictureBox6.Height=PictureBox1.He

2、ight        PictureBox6.Width=PictureBox1.Width        PictureBox6.Left=0        PictureBox6.Top=0……理论知识：灰度图像的二值化处理就是讲图像上的点的灰度置为0或255，也就是讲整个图像呈现出明显的黑白效果。即将256个亮度等级的灰度图像通过适当的阀值选取而获得仍然可以反映图像整体和局部特征的二值化图像。在数字图像处理中，二值图像占有非常重要的地位，特别是在实用的图像处理中，以二值图像处理实现而构成的系统是很多的，要进行二值图像的处理与分析，首先要把灰

3、度图像二值化，得到二值化图像，这样子有利于再对图像做进一步处理时，图像的集合性质只与像素值为0或255的点的位置有关，不再涉及像素的多级值，使处理变得简单，而且数据的处理和压缩量小。为了得到理想的二值图像，一般采用封闭、连通的边界定义不交叠的区域。所有灰度大于或等于阀值的像素被判定为属于特定物体，其灰度值为255表示，否则这些像素点被排除在物体区域以外，灰度值为0，表示背景或者例外的物体区域。如果某特定物体在内部有均匀一致的灰度值，并且其处在一个具有其他等级灰度值的均匀背景下，使用阀值法就可以得到比较的分割效果。如果物体同背景的差别表现不在灰度值上

4、（比如纹理不同），可以将这个差别特征转换为灰度的差别，然后利用阀值选取技术来分割该图像。动态调节阀值实现图像的二值化可动态观察其分割图像的具体结果。灰度图像的二值化没有固定的算法,根据图像区域中目标物体的不同而有不同的二值化算法.目前最主要的方法有：最大值法，平均值法，加权平均值法如下边代码：PrivateFunctionSetBitMapToBlackAndWhite(bmpAsBitmap)AsBitmap   Try        DimheightAsInteger=bmp.Height        DimWidthAsInteger=b

5、mp.Width        DimnewBitMapAsNewBitmap(Width,height)        DimpixelAsColor        ForxAsInteger=0ToWidth-1            ForyAsInteger=0Toheight-1               pixel=bmp.GetPixel(x,y)               DimrAsInteger               DimgAsInteger               DimbAsInteger          

6、     DimResultAsInteger               Result=0               r=pixel.R               g=pixel.G               b=pixel.B               DimiTypeAsInteger=2               SelectCaseiType                    Case0                        '平均值法                        Result=(r+g+b)/3 

7、                       ExitSelect                    Case1                        '最大值法                        If(r>g)Then                           Result=r                        Else                           Result=g                        EndIf                            

8、                    If(Result>b)Then