fSrcY1 = (float) (  (lHeight - 1) / 2);	fSrcX2 = (float) (  (lWidth  - 1) / 2);	fSrcY2 = (float) (  (lHeight - 1) / 2);	fSrcX3 = (float) (- (lWidth  - 1) / 2);	fSrcY3 = (float) (- (lHeight - 1) / 2);	fSrcX4 = (float) (  (lWidth  - 1) / 2);	fSrcY4 = (float) (- (lHeight - 1) / 2);		// 計算新圖四個角的坐標（以圖像中心為坐標系原點）	fDstX1 =  fCosa * fSrcX1 + fSina * fSrcY1;	fDstY1 = -fSina * fSrcX1 + fCosa * fSrcY1;	fDstX2 =  fCosa * fSrcX2 + fSina * fSrcY2;	fDstY2 = -fSina * fSrcX2 + fCosa * fSrcY2;	fDstX3 =  fCosa * fSrcX3 + fSina * fSrcY3;	fDstY3 = -fSina * fSrcX3 + fCosa * fSrcY3;	fDstX4 =  fCosa * fSrcX4 + fSina * fSrcY4;	fDstY4 = -fSina * fSrcX4 + fCosa * fSrcY4;		// 計算旋轉后的圖像實際寬度	lNewWidth  = (LONG) ( max( fabs(fDstX4 - fDstX1), fabs(fDstX3 - fDstX2) ) + 0.5);		// 計算新圖像每行的字節數	lNewLineBytes = WIDTHBYTES(lNewWidth * 8);		// 計算旋轉后的圖像高度	lNewHeight = (LONG) ( max( fabs(fDstY4 - fDstY1), fabs(fDstY3 - fDstY2) )  + 0.5);		// 兩個常數，這樣不用以后每次都計算了	f1 = (float) (-0.5 * (lNewWidth - 1) * fCosa - 0.5 * (lNewHeight - 1) * fSina		+ 0.5 * (lWidth  - 1));	f2 = (float) ( 0.5 * (lNewWidth - 1) * fSina - 0.5 * (lNewHeight - 1) * fCosa		+ 0.5 * (lHeight - 1));		// 分配內存，以保存新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) (-((float) j) * fSina + ((float) i) * fCosa + f2 + 0.5);			j0 = (LONG) ( ((float) j) * fCosa + ((float) i) * fSina + f1 + 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;}/************************************************************************* * * 函數名稱： *   RotateDIB2() * * 參數: *   LPSTR lpDIB		- 指向源DIB的指針 *   int iRotateAngle	- 旋轉的角度（0-360度） * * 返回值: *   HGLOBAL            - 旋轉成功返回新DIB句柄，否則返回NULL。 * * 說明: *   該函數用來以圖像中心為中心旋轉DIB圖像，返回新生成DIB的句柄。 * 調用該函數會自動擴大圖像以顯示所有的象素。函數中采用雙線性插 * 值算法進行插值。 * ************************************************************************/HGLOBAL WINAPI RotateDIB2(LPSTR lpDIB, int iRotateAngle){		// 源圖像的寬度和高度	LONG	lWidth;	LONG	lHeight;		// 旋轉后圖像的寬度和高度	LONG	lNewWidth;	LONG	lNewHeight;		// 旋轉后圖像的寬度（lNewWidth'，必須是4的倍數）	LONG	lNewLineBytes;		// 指向源圖像的指針	LPSTR	lpDIBBits;		// 旋轉后新DIB句柄	HDIB	hDIB;		// 指向旋轉圖像對應象素的指針	LPSTR	lpDst;		// 指向旋轉圖像的指針	LPSTR	lpNewDIB;	LPSTR	lpNewDIBBits;		// 指向BITMAPINFO結構的指針（Win3.0）	LPBITMAPINFOHEADER lpbmi;		// 指向BITMAPCOREINFO結構的指針	LPBITMAPCOREHEADER lpbmc;		// 循環變量（象素在新DIB中的坐標）	LONG	i;	LONG	j;		// 象素在源DIB中的坐標	FLOAT	i0;	FLOAT	j0;		// 旋轉角度（弧度）	float	fRotateAngle;		// 旋轉角度的正弦和余弦	float	fSina, fCosa;		// 源圖四個角的坐標（以圖像中心為坐標系原點）	float	fSrcX1,fSrcY1,fSrcX2,fSrcY2,fSrcX3,fSrcY3,fSrcX4,fSrcY4;		// 旋轉后四個角的坐標（以圖像中心為坐標系原點）	float	fDstX1,fDstY1,fDstX2,fDstY2,fDstX3,fDstY3,fDstX4,fDstY4;		// 兩個中間常量	float	f1,f2;		// 找到源DIB圖像象素起始位置	lpDIBBits = ::FindDIBBits(lpDIB);		// 獲取圖像的寬度	lWidth = ::DIBWidth(lpDIB);		// 獲取圖像的高度	lHeight = ::DIBHeight(lpDIB);		// 將旋轉角度從度轉換到弧度	fRotateAngle = (float) RADIAN(iRotateAngle);		// 計算旋轉角度的正弦	fSina = (float) sin((double)fRotateAngle);		// 計算旋轉角度的余弦	fCosa = (float) cos((double)fRotateAngle);		// 計算原圖的四個角的坐標（以圖像中心為坐標系原點）	fSrcX1 = (float) (- (lWidth  - 1) / 2);	fSrcY1 = (float) (  (lHeight - 1) / 2);	fSrcX2 = (float) (  (lWidth  - 1) / 2);	fSrcY2 = (float) (  (lHeight - 1) / 2);	fSrcX3 = (float) (- (lWidth  - 1) / 2);	fSrcY3 = (float) (- (lHeight - 1) / 2);	fSrcX4 = (float) (  (lWidth  - 1) / 2);	fSrcY4 = (float) (- (lHeight - 1) / 2);		// 計算新圖四個角的坐標（以圖像中心為坐標系原點）	fDstX1 =  fCosa * fSrcX1 + fSina * fSrcY1;	fDstY1 = -fSina * fSrcX1 + fCosa * fSrcY1;	fDstX2 =  fCosa * fSrcX2 + fSina * fSrcY2;	fDstY2 = -fSina * fSrcX2 + fCosa * fSrcY2;	fDstX3 =  fCosa * fSrcX3 + fSina * fSrcY3;	fDstY3 = -fSina * fSrcX3 + fCosa * fSrcY3;	fDstX4 =  fCosa * fSrcX4 + fSina * fSrcY4;	fDstY4 = -fSina * fSrcX4 + fCosa * fSrcY4;		// 計算旋轉后的圖像實際寬度	lNewWidth  = (LONG) ( max( fabs(fDstX4 - fDstX1), fabs(fDstX3 - fDstX2) ) + 0.5);	lNewLineBytes = WIDTHBYTES(lNewWidth * 8);		// 計算旋轉后的圖像高度	lNewHeight = (LONG) ( max( fabs(fDstY4 - fDstY1), fabs(fDstY3 - fDstY2) )  + 0.5);		// 兩個常數，這樣不用以后每次都計算了	f1 = (float) (-0.5 * (lNewWidth - 1) * fCosa - 0.5 * (lNewHeight - 1) * fSina		+ 0.5 * (lWidth  - 1));	f2 = (float) ( 0.5 * (lNewWidth - 1) * fSina - 0.5 * (lNewHeight - 1) * fCosa		+ 0.5 * (lHeight - 1));		// 分配內存，以保存新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 = -((float) j) * fSina + ((float) i) * fCosa + f2;			j0 =  ((float) j) * fCosa + ((float) i) * fSina + f1;						// 利用雙線性插值算法來估算象素值			*lpDst = Interpolation (lpDIBBits, lWidth, lHeight, j0, i0);					}			}		// 返回	return hDIB;}/************************************************************************* * * 函數名稱： *   Interpolation() * * 參數: *   LPSTR lpDIBBits    - 指向源DIB圖像指針 *   LONG  lWidth       - 源圖像寬度（象素數） *   LONG  lHeight      - 源圖像高度（象素數） *   FLOAT x			- 插值元素的x坐標 *   FLOAT y		    - 插值元素的y坐標 * * 返回值: *   unsigned char      - 返回插值計算結果。 * * 說明: *   該函數利用雙線性插值算法來估算象素值。對于超出圖像范圍的象素， * 直接返回255。 * ************************************************************************/unsigned char WINAPI Interpolation (LPSTR lpDIBBits, LONG lWidth, LONG lHeight, FLOAT x, FLOAT y){		// 四個最臨近象素的坐標(i1, j1), (i2, j1), (i1, j2), (i2, j2)	LONG	i1, i2;	LONG	j1, j2;		// 四個最臨近象素值	unsigned char	f1, f2, f3, f4;		// 二個插值中間值	unsigned char	f12, f34;		// 定義一個值，當象素坐標相差小于改值時認為坐標相同	FLOAT			EXP;		// 圖像每行的字節數	LONG lLineBytes;		// 計算圖像每行的字節數	lLineBytes = WIDTHBYTES(lWidth * 8);		// 賦值	EXP = (FLOAT) 0.0001;		// 計算四個最臨近象素的坐標	i1 = (LONG) x;	i2 = i1 + 1;	j1 = (LONG) y;	j2 = j1 + 1;		// 根據不同情況分別處理	if( (x < 0) || (x > lWidth - 1) || (y < 0) || (y > lHeight - 1))	{		// 要計算的點不在源圖范圍內，直接返回255。		return 255;	}	else	{		if (fabs(x - lWidth + 1) <= EXP)		{			// 要計算的點在圖像右邊緣上			if (fabs(y - lHeight + 1) <= EXP)			{				// 要計算的點正好是圖像最右下角那一個象素，直接返回該點象素值				f1 = *((unsigned char *)lpDIBBits + lLineBytes * (lHeight - 1 - j1) + i1);				return f1;			}			else			{				// 在圖像右邊緣上且不是最后一點，直接一次插值即可				f1 = *((unsigned char *)lpDIBBits + lLineBytes * (lHeight - 1 - j1) + i1);				f3 = *((unsigned char *)lpDIBBits + lLineBytes * (lHeight - 1 - j1) + i2);								// 返回插值結果				return ((unsigned char) (f1 + (y -j1) * (f3 - f1)));			}		}		else if (fabs(y - lHeight + 1) <= EXP)		{			// 要計算的點在圖像下邊緣上且不是最后一點，直接一次插值即可			f1 = *((unsigned char *)lpDIBBits + lLineBytes * (lHeight - 1 - j1) + i1);			f2 = *((unsigned char *)lpDIBBits + lLineBytes * (lHeight - 1 - j2) + i1);						// 返回插值結果			return ((unsigned char) (f1 + (x -i1) * (f2 - f1)));		}		else		{			// 計算四個最臨近象素值			f1 = *((unsigned char *)lpDIBBits + lLineBytes * (lHeight - 1 - j1) + i1);			f2 = *((unsigned char *)lpDIBBits + lLineBytes * (lHeight - 1 - j2) + i1);			f3 = *((unsigned char *)lpDIBBits + lLineBytes * (lHeight - 1 - j1) + i2);			f4 = *((unsigned char *)lpDIBBits + lLineBytes * (lHeight - 1 - j2) + i2);						// 插值1			f12 = (unsigned char) (f1 + (x - i1) * (f2 - f1));						// 插值2			f34 = (unsigned char) (f3 + (x - i1) * (f4 - f3));						// 插值3			return ((unsigned char) (f12 + (y -j1) * (f34 - f12)));		}	}}