哪位仁兄有图象缩放浏览的源代码?求!!!

Question

就像ACDSEE那样的有缩小浏览方式和界面的那种,谢谢
[email protected]

Answer 1

if(m_pDibData == NULL) return FALSE;
LONG      x, y, cx, cy;
cx = m_pDibData->lWidth;
cy = m_pDibData->lHeight;
LONG    i0,j0;
LONG lNewWidth = (LONG) (m_pDibData->lWidth * fXZoomRatio + 0.5);
LONG lNewHeight = (LONG) (m_pDibData->lHeight * fYZoomRatio + 0.5);

if(!DibDst.CreateFromDib(*this, lNewWidth, lNewHeight))
{
DibDst.Delete();
return FALSE;
} for(y=0;y<lNewHeight;y++)
{
for(x=0;x<lNewWidth;x++)
{
i0 = (LONG) (x/ fXZoomRatio + 0.5);
j0 = (LONG) (y / fYZoomRatio + 0.5);

// 判断是否在源图范围内
if( (j0 >= 0) && (j0 < cy) && (i0 >= 0) && (i0 < cx))
{
DibDst.SetPixel(x, y,  GetPixel(i0, j0));
}
else
{
DibDst.SetPixel(x, y,  0xffffffff);
}
}
}
return TRUE;

Answer 2

/*************************************************************************
 *
 * 函数名称：
 *   ZoomDIB()
 *
 * 参数:
 *   LPSTR lpDIB - 指向源DIB的指针
 *   float fXZoomRatio - X轴方向缩放比率
 *   float fYZoomRatio - Y轴方向缩放比率
 *
 * 返回值:
 *   HGLOBAL            - 缩放成功返回新DIB句柄，否则返回NULL。
 *
 * 说明:
 *   该函数用来缩放DIB图像，返回新生成DIB的句柄。
 *
 ************************************************************************/HGLOBAL WINAPI ZoomDIB(LPSTR lpDIB, float fXZoomRatio, float fYZoomRatio)
{

// 源图像的宽度和高度
LONG lWidth;
LONG lHeight;

// 缩放后图像的宽度和高度
LONG lNewWidth;
LONG lNewHeight;

// 缩放后图像的宽度（lNewWidth'，必须是4的倍数）
LONG lNewLineBytes;

// 指向源图像的指针
LPSTR lpDIBBits;

// 指向源象素的指针
LPSTR lpSrc;

// 缩放后新DIB句柄
HDIB hDIB;

// 指向缩放图像对应象素的指针
LPSTR lpDst;

// 指向缩放图像的指针
LPSTR lpNewDIB;
LPSTR lpNewDIBBits;

// 指向BITMAPINFO结构的指针（Win3.0）
LPBITMAPINFOHEADER lpbmi;

// 指向BITMAPCOREINFO结构的指针
LPBITMAPCOREHEADER lpbmc;

// 循环变量（象素在新DIB中的坐标）
LONG i;
LONG j;

// 象素在源DIB中的坐标
LONG i0;
LONG j0;

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

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

// 获取图像的宽度
lWidth = ::DIBWidth(lpDIB);

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

// 获取图像的高度
lHeight = ::DIBHeight(lpDIB);

// 计算缩放后的图像实际宽度
// 此处直接加0.5是由于强制类型转换时不四舍五入，而是直接截去小数部分
lNewWidth = (LONG) (::DIBWidth(lpDIB) * fXZoomRatio + 0.5);

// 计算新图像每行的字节数
lNewLineBytes = WIDTHBYTES(lNewWidth * 8);

// 计算缩放后的图像高度
lNewHeight = (LONG) (lHeight * fYZoomRatio + 0.5);

// 分配内存，以保存新DIB
hDIB = (HDIB) ::GlobalAlloc(GHND, lNewLineBytes * lNewHeight + *(LPDWORD)lpDIB + ::PaletteSize(lpDIB));

// 判断是否内存分配失败
if (hDIB == NULL)
{
// 分配内存失败
return NULL;
}

// 锁定内存
lpNewDIB =  (char * )::GlobalLock((HGLOBAL) hDIB);

// 复制DIB信息头和调色板
memcpy(lpNewDIB, lpDIB, *(LPDWORD)lpDIB + ::PaletteSize(lpDIB));

// 找到新DIB象素起始位置
lpNewDIBBits = ::FindDIBBits(lpNewDIB);

// 获取指针
lpbmi = (LPBITMAPINFOHEADER)lpNewDIB;
lpbmc = (LPBITMAPCOREHEADER)lpNewDIB;

// 更新DIB中图像的高度和宽度
if (IS_WIN30_DIB(lpNewDIB))
{
// 对于Windows 3.0 DIB
lpbmi->biWidth = lNewWidth;
lpbmi->biHeight = lNewHeight;
}
else
{
// 对于其它格式的DIB
lpbmc->bcWidth = (unsigned short) lNewWidth;
lpbmc->bcHeight = (unsigned short) lNewHeight;
}

// 针对图像每行进行操作
for(i = 0; i < lNewHeight; i++)
{
// 针对图像每列进行操作
for(j = 0; j < lNewWidth; j++)
{

// 指向新DIB第i行，第j个象素的指针
// 注意此处宽度和高度是新DIB的宽度和高度
lpDst = (char *)lpNewDIBBits + lNewLineBytes * (lNewHeight - 1 - i) + j;

// 计算该象素在源DIB中的坐标
i0 = (LONG) (i / fYZoomRatio + 0.5);
j0 = (LONG) (j / fXZoomRatio + 0.5);

// 判断是否在源图范围内
if( (j0 >= 0) && (j0 < lWidth) && (i0 >= 0) && (i0 < lHeight))
{

// 指向源DIB第i0行，第j0个象素的指针
lpSrc = (char *)lpDIBBits + lLineBytes * (lHeight - 1 - i0) + j0;

// 复制象素
*lpDst = *lpSrc;
}
else
{
// 对于源图中没有的象素，直接赋值为255
* ((unsigned char*)lpDst) = 255;
}

}

}

// 返回
return hDIB;
}

Answer 3

http://www.vckbase.com/sourcecode/algorithms/