指定背景的淡入淡出

天云上人

创建步骤：
' S  |3 ]; o. X' Q1、如果系统支持调色板，创建动态调色板pAnimate与初始调色板pOriginal。
从位图中获取初始调色板，若为淡入将背景色赋予动态调色板。利用前面所
& p; y6 H) X) C  j. c8 b提到的公式，根据淡入淡出标志，在循环中更改动态调色板，用AnimatePalette
0 y) i+ H/ }9 d  w- w, X& [& T1 ~9 h函数设置调色板，改变显示结果。
2、如果系统不支持调色板，保存位图调色板到初始调色板，若为淡入将背景
色赋予位图调色板，利用前面所提到的公式，根据淡入淡出标志，在循环中更
改位图调色板，显示位图改变显示结果
返回：位图的淡入淡出
//参数说明：
5 a$ n# {# I& `9 s  u//hDIB -位图句柄
- ^* F* d' q, u7 t7 x8 G//color -指定背景色
  Y& o/ w% G- D7 W5 ~* e//xDest -显示位图的左上角x坐标
//yDest -显示位图的左上角y坐标
: R; d9 S$ b/ z/ H1 b3 P& @. ?//nLoops -循环次数
6 j3 O  t4 p. i5 _0 U# Y. [( v# Z: m//nDelay -每次循环中的延时
//nFlag -淡入淡出标志 1--淡入 其它--淡出
void FadeInORFadeOut( CDC *pDC, HANDLE hDIB, COLORREF color, int xDest, int yDest,
int nLoops, int nDelay ,int nFlag)
int i,j;
HPALETTE hPal;
) b% I$ d2 @/ H$ OPALETTEENTRY pAnimate[256];
PALETTEENTRY pOriginal[256];
: h0 _! B: h! ?CPalette pal;
// 创建236色调色板
　
& o; j6 ]* b( v& k7 zBITMAPINFO &bmInfo = *(LPBITMAPINFO)hDIB ;
4 g  X/ b& f7 K- T　
9 h& g( A% p; P! y0 n' O; Bint nColors = bmInfo.bmiHeader.biClrUsed ? bmInfo.bmiHeader.biClrUsed :
1 << bmInfo.bmiHeader.biBitCount;
int nWidth = bmInfo.bmiHeader.biWidth;
int nHeight = bmInfo.bmiHeader.biHeight;
LPVOID lpDIBBits = (LPVOID)(bmInfo.bmiColors + nColors);
int clrRValue = GetRValue(color);
! ?9 `0 B. @! p  ?! Zint clrGValue = GetGValue(color);
* p. t& W' y* \* }6 [9 }2 Rint clrBValue = GetBValue(color);
if( pDC->GetDeviceCaps(RASTERCAPS) & RC_PALETTE && nColors <= 256 )
' ^% ~  g9 c  i1 _, Lif (!(hPal = Create236Palette(hDIB)))
return;
pal.Attach( hPal );
// 得到调色板初始值
' D7 J, U1 k0 S1 ^5 [GetPaletteEntries(hPal, 0, nColors, (LPPALETTEENTRY)&pOriginal);
2 I7 K& X  v. {- Y) V// 设定动态调色板初始值为指定色
/ e  M% \) n# g$ Iif(nFlag==1)
for (j = 0; j < nColors; j++)
' B/ P/ U0 k' N7 w* T' l# npAnimate[j].peRed = clrRValue;
pAnimate[j].peGreen = clrGValue;
pAnimate[j].peBlue = clrBValue;
pAnimate[j].peFlags = PC_RESERVED;
else
GetPaletteEntries(hPal, 0, nColors, (LPPALETTEENTRY)&pAnimate);
CPalette *pOldPalette = pDC->SelectPalette(&pal, FALSE);
pDC->RealizePalette();
4 J! U5 T& J6 i" q8 ?+ ~5 Y- fCDC memDC;
6 l9 p6 z0 s) m! L; \memDC.CreateCompatibleDC( pDC );
CBitmap bmp;
7 {: j" x/ X0 ~9 ]bmp.CreateCompatibleBitmap( pDC, nWidth, nHeight );
CBitmap *pOldBitmap = memDC.SelectObject( &bmp );
CPalette *pOldMemPalette = memDC.SelectPalette(&pal, FALSE);
memDC.RealizePalette();
::SetDIBitsToDevice(memDC.m_hDC,0,0,nWidth,nHeight,0,0,0,nHeight,lpDIBBits,(LPBITMAPINFO)hDIB,DIB_RGB_COLORS);
3 v6 y) J0 m/ u& B$ S' ZAnimatePalette(hPal, 0, nColors, (LPPALETTEENTRY)&pAnimate);
pDC->BitBlt(xDest, yDest, nWidth, nHeight, &memDC,0,0,SRCCOPY );
. p0 K! Y! q& q+ v: Y- Q// 淡入淡出
0 }  ~" ]. ^: c! u9 ^$ M# ]for( i=1; i <= nLoops; i++ )
. e3 _# v4 ]! }5 Y- bfor (j = 0; j < nColors; j++)
if(nFlag==1)
& z# O' ]% S" kpAnimate[j].peRed = clrRValue - ((clrRValue-pOriginal[j].peRed)*i)/nLoops;
pAnimate[j].peGreen = clrGValue - ((clrGValue-pOriginal[j].peGreen)*i)/nLoops;
$ c$ t# E% C& J! LpAnimate[j].peBlue = clrBValue - ((clrBValue-pOriginal[j].peBlue)*i)/nLoops;
else
pAnimate[j].peRed = pOriginal[j].peRed - ((pOriginal[j].peRed - clrRValue)*i)/nLoops;
0 k2 W- h6 H! P2 Z2 O( XpAnimate[j].peGreen = pOriginal[j].peGreen - ((pOriginal[j].peGreen - clrGValue)*i)/nLoops;
! \% L$ n2 A5 {: z! J; B0 ppAnimate[j].peBlue = pOriginal[j].peBlue - ((pOriginal[j].peBlue - clrBValue)*i)/nLoops;
/ [' m% Q" M( a( o% w: k5 dpal.AnimatePalette(0, nColors, (LPPALETTEENTRY)&pAnimate);
// Delay...
7 m/ C2 C4 Z1 r' gSleep(nDelay);
+ y6 p" s% J$ R, _) fmemDC.SelectPalette(pOldMemPalette, FALSE);
memDC.SelectObject( pOldBitmap );
pDC->SelectPalette(pOldPalette, FALSE);
else if( (pDC->GetDeviceCaps(RASTERCAPS) & RC_PALETTE) == 0 && nColors <= 256 )
for( int i=0; i < nColors; i++)
pOriginal.peRed = bmInfo.bmiColors.rgbRed ;
4 D* F0 E  l7 ?. A: LpOriginal.peGreen = bmInfo.bmiColors.rgbGreen;
5 c* z& u; o- Q. u4 DpOriginal.peBlue = bmInfo.bmiColors.rgbBlue ;
if(nFlag==1)
" e- j8 \7 }5 y. A) {# fbmInfo.bmiColors.rgbRed = clrRValue;
bmInfo.bmiColors.rgbGreen = clrGValue;
bmInfo.bmiColors.rgbBlue = clrBValue;
::SetDIBitsToDevice(pDC->m_hDC,0,0,nWidth,nHeight,0,0,0,nHeight,lpDIBBits,(LPBITMAPINFO)hDIB,DIB_RGB_COLORS);
// 淡入淡出
( B; c1 }2 b: Kfor( i=1; i <= nLoops; i++ )
/ ~: v7 h2 m" Z& F8 V1 ?for (j = 0; j < nColors; j++)
' B' q$ A) B0 H8 }8 I5 R, Bif(nFlag==1)
bmInfo.bmiColors[j].rgbRed = clrRValue - ((clrRValue-pOriginal[j].peRed)*i)/nLoops;
bmInfo.bmiColors[j].rgbGreen = clrGValue - ((clrGValue-pOriginal[j].peGreen)*i)/nLoops;
, _: w3 x% `3 Z) b% _+ m% o  YbmInfo.bmiColors[j].rgbBlue = clrBValue - ((clrBValue-pOriginal[j].peBlue)*i)/nLoops;
else
bmInfo.bmiColors[j].rgbRed = pOriginal[j].peRed - ((pOriginal[j].peRed-clrRValue)*i)/nLoops;
bmInfo.bmiColors[j].rgbGreen = pOriginal[j].peGreen - ((pOriginal[j].peGreen-clrGValue)*i)/nLoops;
& g0 ]# D4 Z1 P( d% ibmInfo.bmiColors[j].rgbBlue = pOriginal[j].peBlue - ((pOriginal[j].peBlue-clrBValue)*i)/nLoops;
' D0 ?7 v) b. D1 B::SetDIBitsToDevice(pDC->m_hDC,0,0,nWidth,nHeight,0,0,0,nHeight,lpDIBBits,(LPBITMAPINFO)hDIB,DIB_RGB_COLORS);
// Delay...
Sleep(nDelay);