?? geotrans.cpp
字號:
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)));
}
}
}?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -