图像预处理第5步：倾斜度调整

//图像预处理第5步：倾斜度调整
void CChildView::OnImgprcAdjustSlope()
{
SlopeAdjust(m_hDIB);
//在屏幕上显示位图
CDC* pDC=GetDC();
DisplayDIB(pDC,m_hDIB);
}

/*********************************************************

* 函数名称：
*         SlopeAdjust()
*
* 参数：
*     HDIB   hDIB       －原图像的句柄
*
* 返回值：
*         无
*
* 功能：
*     通过对图像左右半边平均高度的统计来进行倾斜的调整
*
* 说明：
*      只能对2值图像进行处理
*
****************************************************************/
void SlopeAdjust(HDIB hDIB)
{
// 指向DIB的指针
LPSTR lpDIB=(LPSTR) ::GlobalLock((HGLOBAL)hDIB);

// 指向DIB象素指针
LPSTR    lpDIBBits;

// 找到DIB图像象素起始位置
lpDIBBits = ::FindDIBBits(lpDIB);

// 指向源图像的指针
unsigned char*    lpSrc;

// 循环变量
LONG    i;
LONG    j;

// 图像每行的字节数
LONG    lLineBytes;

//图像的长度
LONG    lWidth;

//图像的宽度
LONG    lHeight;

//获取图像的长度
lWidth=::DIBWidth ((char*)lpDIB);

//获取图像的宽度
lHeight=::DIBHeight ((char*)lpDIB);

// 计算图像每行的字节数
lLineBytes = WIDTHBYTES(lWidth * 8);

//图像左半边的平均高度
double leftaver=0.0;

//图像右半边的平均高度
double rightaver=0.0;

//图像的倾斜度
double slope;

//统计循环变量
LONG counts=0;

//扫描左半边的图像，求黑色象素的平均高度

//行
for (i=0;i<lHeight;i++)
{

//列
for (j=0;j<lWidth/2;j++)
{

//指向第i行第j个象素的指针
lpSrc=(unsigned char*)lpDIBBits + lLineBytes *  i + j;

//如果为黑点
if (*lpSrc == 0)
{

//对其高度进行统计叠加
counts +=lWidth/2 -j;
leftaver += i*(lWidth/2 -j);

}

}
}

//计算平均高度
leftaver /= counts;

//将统计循环变量重新赋值
counts =0;

//扫描右半边的图像，求黑色象素的平均高度

//行
for (i =0;i<lHeight;i++)
{

//列
for (j=lWidth/2;j<lWidth;j++)
{
//指向第i行第j个象素的指针
lpSrc=(unsigned char*)lpDIBBits + lLineBytes *  i + j;

//如果为黑点
if (*lpSrc == 0)
{

//进行统计叠加
counts +=lWidth -j;
rightaver += i*(lWidth -j);
}
}
}

//计算右半边的平均高度
rightaver /= counts;

//计算斜率
slope = (leftaver - rightaver) / (lWidth/2);

//指向新的图像象素起始位置的指针
LPSTR lpNewDIBBits;

//指向新图像的指针
LPSTR lpDst;

//新图像的句柄
HLOCAL nNewDIBBits=LocalAlloc(LHND,lLineBytes*lHeight);

//锁定内存
lpNewDIBBits=(char*)LocalLock(nNewDIBBits);

//指向新图像象素的指针
lpDst=(char*)lpNewDIBBits;

//为新图像赋初始值
memset(lpDst,(BYTE)255,lLineBytes*lHeight);

//象素点的灰度值
int gray;

//位置映射值
int i_src;

//根据斜率，把当前新图像的点映射到源图像的点

//行
for (i=0;i<lHeight;i++)
{
//列
for (j=0;j<lWidth;j++)
{
//计算映射位置
i_src=int(i - (j-lWidth/2)*slope);

//如果点在图像外，象素置白色
if (i_src <0 || i_src >=lHeight )
gray = 255;

else
{
//否则到源图像中找点，取得象素值

//指向第i_src行第j个象素的指针
lpSrc=(unsigned char *)lpDIBBits + lLineBytes *  i_src + j;
gray = *lpSrc;
}

//把新图像的点用得到的象素值填充
//指向第i行第j个象素的指针
lpDst = (char *)lpNewDIBBits + lLineBytes * i + j;
*lpDst=gray;
}
}

// 将新的图像的内容拷贝到旧的图像中
memcpy(lpDIBBits,lpNewDIBBits,lLineBytes*lHeight);

// 解除锁定
::GlobalUnlock ((HGLOBAL)hDIB);
}