实验报告单
院（系）计算机学院专业计算机科学与技术班级12计科4
姓名郝耀峰学号1250312025同组人无
实验室S4305 组号日期 2015.3.5
课程数字图像处理指导老师鲁静成绩
实验项目编号 01 试验项目名称 BMP图像的显示
一、实验目的
1、函数OnDraw( )完成了BMP图像的显示，它调用了DIB函数库中的许多函数，如获取DIB高度的DIBHeight(lpDIB)函数、获取DIB 宽度的DIBWidth(lpDIB) 函数、输出DIB的PaintDIB()函数。
2、仔细读OnDraw( )函数并了解DIB函数库源文件DIBAPI.CPP中的函数功能。
二、试验环境（仪器设备、软件等）
Windows7 VC6.0
三、实验原理（或要求）
1、BMP(Bitmap-File)图形文件是Windows采用的图形文件格式，在Windows环境下运行的所有图象作都是以BMP为基础的。
2、由于数字图像可以表示为矩阵的形式，所以在计算机数字图像处理程序中，通常用二维数组来存放图像数据。
二维数组的行对应图像的高，二维数组的列对应图像的宽，二维数组的元素对应图像的像素，二维数组元素的值就是像素的灰度值。
四、实验步骤
void CCh1_1View::OnDraw(CDC* pDC)
{
// 显示等待光标
BeginWaitCursor();
// 获取文档
CCh1_1Doc* pDoc = GetDocument();
ASSERT_VALID(pDoc);
// 获取DIB
HDIB hDIB = pDoc->GetHDIB();
// 判断DIB是否为空
if (hDIB != NULL)
{
LPSTR lpDIB = (LPSTR) ::GlobalLock((HGLOBAL) hDIB);
// 获取DIB宽度
intcxDIB = (int) ::DIBWidth(lpDIB);
// 获取DIB高度
intcyDIB = (int) ::DIBHeight(lpDIB);
::GlobalUnlock((HGLOBAL) hDIB);
CRectrcDIB;
rcDIB.top = rcDIB.left = 0;
rcDIB.right = cxDIB;
rcDIB.bottom = cyDIB;
CRectrcDest;
// 判断是否是打印
if (pDC->IsPrinting())
{
// 是打印，计算输出图像的位置和大小，以便符合页面
// 获取打印页面的水平宽度(象素)
intcxPage = pDC->GetDeviceCaps(HORZRES);
// 获取打印页面的垂直高度(象素)
intcyPage = pDC->GetDeviceCaps(VERTRES);
// 获取打印机每英寸象素数
intcxInch = pDC->GetDeviceCaps(LOGPIXELSX);
intcyInch = pDC->GetDeviceCaps(LOGPIXELSY);
// 计算打印图像大小（缩放，根据页面宽度调整图像大小）
rcDest.top = rcDest.left = 0;
rcDest.bottom = (int)(((double)cyDIB * cxPage * cyInch)
/ ((double)cxDIB * cxInch));
rcDest.right = cxPage;
// 计算打印图像位置（垂直居中）
int temp = cyPage - (rcDest.bottom - rcDest.top);
rcDest.bottom += temp/2;
rcDest.top += temp/2;
}
else
// 非打印
{
// 不必缩放图像
rcDest = rcDIB;
}
// 输出DIB
::PaintDIB(pDC->m_hDC, &rcDest, pDoc->GetHDIB(),
&rcDIB, pDoc->GetDocPalette());
}
// 恢复正常光标
EndWaitCursor();
}
BOOL WINAPI PaintDIB(HDC hDC,
LPRECT lpDCRect,
HDIB hDIB,
LPRECT lpDIBRect,
CPalette* pPal)
{
LPSTR lpDIBHdr; // BITMAPINFOHEADER指针
LPSTR lpDIBBits; // DIB象素指针
BOOLbSuccess=FALSE; // 成功标志
HPALETTE hPal=NULL; // DIB调色板
HPALETTE hOldPal=NULL; // 以前的调色板
// 判断DIB对象是否为空
if (hDIB == NULL)
{
// 返回
return FALSE;
}
// 锁定DIB
lpDIBHdr = (LPSTR) ::GlobalLock((HGLOBAL) hDIB);
// 找到DIB图像象素起始位置
lpDIBBits = ::FindDIBBits(lpDIBHdr);
// 获取DIB调色板，并选中它
if (pPal != NULL)
{
hPal = (HPALETTE) pPal->m_hObject;
// 选中调色板
hOldPal = ::SelectPalette(hDC, hPal, TRUE);
}
// 设置显示模式
::SetStretchBltMode(hDC, COLORONCOLOR);
// 判断是调用StretchDIBits()还是SetDIBitsToDevice()来绘制DIB对象
if ((RECTWIDTH(lpDCRect) == RECTWIDTH(lpDIBRect)) &&
(RECTHEIGHT(lpDCRect) == RECTHEIGHT(lpDIBRect)))
{
// 原始大小，不用拉伸。
bSuccess = ::SetDIBitsToDevice(hDC, // hDC
lpDCRect->left, // DestX
lpDCRect->top, // DestY
RECTWIDTH(lpDCRect), // nDestWidth
RECTHEIGHT(lpDCRect), // nDestHeight
lpDIBRect->left, // SrcX
(int)DIBHeight(lpDIBHdr) -
lpDIBRect->top -
RECTHEIGHT(lpDIBRect), // SrcY
0, // nStartScan
(WORD)DIBHeight(lpDIBHdr), // nNumScans
lpDIBBits, // lpBits
(LPBITMAPINFO)lpDIBHdr, // lpBitsInfo
DIB_RGB_COLORS); // wUsage }
else
{
// 非原始大小，拉伸。
bSuccess = ::StretchDIBits(hDC, // hDC
lpDCRect->left, // DestX
lpDCRect->top, // DestY
RECTWIDTH(lpDCRect), // nDestWidth
RECTHEIGHT(lpDCRect), // nDestHeight
lpDIBRect->left, // SrcX
lpDIBRect->top, // SrcY
RECTWIDTH(lpDIBRect), // wSrcWidth
RECTHEIGHT(lpDIBRect), // wSrcHeight
lpDIBBits, // lpBits
(LPBITMAPINFO)lpDIBHdr, // lpBitsInfo
DIB_RGB_COLORS, // wUsage
SRCCOPY); // dwROP }
// 解除锁定
::GlobalUnlock((HGLOBAL) hDIB);
// 恢复以前的调色板
if (hOldPal != NULL)
{
::SelectPalette(hDC, hOldPal, TRUE);
}
// 返回
returnbSuccess;
}
五、记录与处理（实验数据、误差分析、结果分析）
左图为原图,右图为平移所得(水平平移量为90,垂直平移量为80得到).
六、思考题
七、实验小结
通过本次实验，我们初步了解了图像在计算机中的存储方式，以及对函数OnDraw有了一些认识。