【正文】 / 計算圖像每行的字節(jié)數(shù)lLineBytes = WIDTHBYTES(lWidth * 8)。 i lHeight。 j lWidth。 + lLineBytes * (lHeight 1 i) + j。}}}/************************************************************************** 函數(shù)名稱：Gray24Bits(LPSTR lpDIB)* 函數(shù)類型：HGLOBAL * 參數(shù)： // 指向BITMAPINFOHEADER的指針lpDIBHdr = (LPBITMAPINFOHEADER)lpDIB。// 計算位圖圖的信息頭、調(diào)色板和圖形數(shù)據(jù)的大小, 并給灰度圖分配內(nèi)存int dwInfo = lpDIBHdrbiSize。int dwGrayData = dwData/3。 int sizeTotal=dwInfo+dwGrayPal+dwData。if (hGray==0){return false。// 創(chuàng)建灰度圖的顏色表 計算每個像素點的灰度值,即求平均即可RGBQUAD* lpGrayRgbQuag=(RGBQUAD*)(lpGray+lpDIBHdrbiSize)。int rowLenSr=WIDTHBYTES(24*lpDIBHdrbiWidth)。BYTE * lpGrayBits = (BYTE*)(lpGrayRgbQuag)+dwGrayPal。int i,j,k。i256。 lpGrayRgbQuagrgbBlue=i。 lpGrayRgbQuagrgbGreen=i。 lpGrayRgbQuagrgbRed=i。 lpGrayRgbQuagrgbReserved=0。 } for (i=0。i++){ jlpDIBHdrbiWidth。/* lpGrayBits[i*rowLenDes+j]=(BYTE)(*lpBits[k] +*lpBits[k+2] + )。 + 601* lpBits[k+1] //修改后的優(yōu)化算法 } //修正需要補零的像素行jrowLenDes。 lpGrayBits[i*rowLenDes+j]=0。memcpy(lpGrayHdr, lpDIBHdr, dwInfo)。lpGrayHdrbiBitCount=8。 lpGrayHdrbiClrUsed=256。 ::GlobalUnlock( hGray )。 return (HGLOBAL) hGray。ChangedBmp:=。 原圖 灰度化后圖灰度圖像是指只含亮度信息，不含色彩信息的圖像。彩色圖像中的每個像素的顏色有R、G、B三個分量決定，而每個分量有255種值可取，這樣一個像素點可以有1600多萬的顏色的變化范圍?；叶葓D像的描述與彩色圖像一樣仍然反映了整幅圖像的整體和局部的色度和亮度等級的分布和特征。圖像的二值化處理就是將圖像上的點的灰度置為0或255，也就是使整個圖像呈現(xiàn)出明顯的黑白效果。在數(shù)字圖像處理中，二值圖像占有非常重要的地位，特別是在實用的圖像處理中，以二值圖像處理實現(xiàn)而構(gòu)成的系統(tǒng)是很多的，要進行二值圖像的處理與分析，首先要把灰度圖像二值化，得到二值化圖像，這樣子有利于再對圖像做進一步處理時，圖像的集合性質(zhì)只與像素的值為0或255的點的位置有關(guān)，不再涉及像素的多級值，使處理變得簡單，而且數(shù)據(jù)的處理和壓縮量小。更重要的是，在二值圖像的基礎(chǔ)上，還可以進一步對圖像處理，獲得該圖像的一些幾何特征或者其他更多特征。var p:PByteArray。 //TByteArray = array[0..32767] of Byte。 gray,x,y:integer。 // 處理過程中位圖begin TestBMP:=。 ()。 for x:=0 to do begin //首先將圖像灰度化 gray:=round(p[x*3+2]*+p[x*3+1]*+p[x*3]*)。 p[x*3+1]:=255。 end else begin p[x*3]:=0。p[x*3+2]:=0。 end。 (TestBMP)。 (0,0,ChangedBmp)。void rectcoding(HDIB hDIB,int wRect,int hRect){ // 指向源圖像象素的指針 unsigned char * lpSrc。 // 指向DIB象素指針 LPSTR lpDIBBits。 // 判斷是否是8bpp位圖（這里為了方便，只處理8bpp位圖的模糊操作，其它的可以類推） if (::DIBNumColors(lpDIB) != 256) { // 提示用戶 ::AfxMessageBox (目前只支持256色位圖的運算！)。 } // 找到DIB圖像象素起始位置 lpDIBBits = ::FindDIBBits(lpDIB)。 LONG lHeight=::DIBHeight ((char*)lpDIB)。 if(lWidth!=lHeight) { // 提示用戶 ::AfxMessageBox(只能對寬度和高度相等的圖像進行方塊編碼！)。 } //編碼過程 //循環(huán)變量 LONG i,j,k。 double* Xt=new double [lWidth*lHeight/(hRect*wRect)]。 int* a0=new int [lWidth*lHeight/(hRect*wRect)]。 int* N0=new int [lWidth*lHeight/(hRect*wRect)]。 //計算閾值 k=0。 i lHeight。 j lWidth。 //計算Xt for(ii=0。ii++) for(jj=0。jj++) { // 指向圖像指針 lpSrc = (unsigned char *)lpDIBBits + lLineBytes * (i+ii) + (j+jj)。 Xt[k]+=Xi。 k++。 for (i = 0。 i =i+hRect) { for (j = 0。 j =j+wRect) { N0[k]=0。 //計算N0、N1 for(ii=0。ii++) for(jj=0。jj++) { // 指向圖像指針 lpSrc = (unsigned char *)lpDIBBits + lLineBytes * (i+ii) + (j+jj)。 if(XiXt[k]) N0[k]++。 } k++。 for (i = 0。 i =i+hRect) { for (j = 0。 j =j+wRect) { a0[k]=0。 //計算N0、N1 for(ii=0。ii++) for(jj=0。jj++) { // 指向圖像指針 lpSrc = (unsigned char *)lpDIBBits + lLineBytes * (i+ii) + (j+jj)。 if(XiXt[k]) a0[k]+=Xi。 } if(N0[k]!=0amp。N1[k]!=0)