指定背景的淡入淡出

天云上人

创建步骤：
: g5 v4 U( Z$ z/ d! h9 P6 }4 Q- g1、如果系统支持调色板，创建动态调色板pAnimate与初始调色板pOriginal。
( j/ ?8 M: w+ B) N% Z1 m从位图中获取初始调色板，若为淡入将背景色赋予动态调色板。利用前面所
提到的公式，根据淡入淡出标志，在循环中更改动态调色板，用AnimatePalette
! i. `+ ?- G$ H9 K! N/ U函数设置调色板，改变显示结果。
% ]) A3 y& g) q7 w: z2、如果系统不支持调色板，保存位图调色板到初始调色板，若为淡入将背景
色赋予位图调色板，利用前面所提到的公式，根据淡入淡出标志，在循环中更
改位图调色板，显示位图改变显示结果
返回：位图的淡入淡出
//参数说明：
$ C  m* y9 D1 Z! |$ |# v//hDIB -位图句柄
3 W$ R5 Z+ ~4 o2 g7 O$ q4 g* D7 F& \0 n//color -指定背景色
//xDest -显示位图的左上角x坐标
//yDest -显示位图的左上角y坐标
8 T$ I0 u+ y* }+ F6 ~5 F//nLoops -循环次数
" }5 w- o/ C. x4 v//nDelay -每次循环中的延时
//nFlag -淡入淡出标志 1--淡入 其它--淡出
1 i% @# l& ~5 l# u  hvoid FadeInORFadeOut( CDC *pDC, HANDLE hDIB, COLORREF color, int xDest, int yDest,
int nLoops, int nDelay ,int nFlag)
int i,j;
HPALETTE hPal;
# w2 Q7 A) l$ a4 D* X# x/ pPALETTEENTRY pAnimate[256];
PALETTEENTRY pOriginal[256];
: z0 g' ~5 ]8 ?: |' k: b+ Z6 ]8 RCPalette pal;
5 |, z# C' ^- ?3 B/ I0 P7 a$ v/ q+ h0 r// 创建236色调色板
　
- A9 ?6 _2 ~1 e. Y9 P8 \BITMAPINFO &bmInfo = *(LPBITMAPINFO)hDIB ;
　
int nColors = bmInfo.bmiHeader.biClrUsed ? bmInfo.bmiHeader.biClrUsed :
1 << bmInfo.bmiHeader.biBitCount;
int nWidth = bmInfo.bmiHeader.biWidth;
/ D) {7 r9 n3 ]& u+ |int nHeight = bmInfo.bmiHeader.biHeight;
! }1 V. R* w$ d" KLPVOID lpDIBBits = (LPVOID)(bmInfo.bmiColors + nColors);
* ]. {$ r' A: S: T' w! uint clrRValue = GetRValue(color);
) ~; a: K) i7 ?3 kint clrGValue = GetGValue(color);
int clrBValue = GetBValue(color);
if( pDC->GetDeviceCaps(RASTERCAPS) & RC_PALETTE && nColors <= 256 )
7 c/ u* r5 [5 qif (!(hPal = Create236Palette(hDIB)))
7 I- y0 [8 L8 Z) n# lreturn;
pal.Attach( hPal );
// 得到调色板初始值
GetPaletteEntries(hPal, 0, nColors, (LPPALETTEENTRY)&pOriginal);
// 设定动态调色板初始值为指定色
if(nFlag==1)
for (j = 0; j < nColors; j++)
/ g1 M* X* P; L4 A  v& m+ L3 H. hpAnimate[j].peRed = clrRValue;
* E6 @. f% c" S6 P7 {' opAnimate[j].peGreen = clrGValue;
, ^- a/ }/ D- b' zpAnimate[j].peBlue = clrBValue;
5 s; \/ q! P$ u$ @. r& X5 y8 _. `* VpAnimate[j].peFlags = PC_RESERVED;
else
9 b1 B/ {5 }3 I0 u* ]1 v* j4 r3 TGetPaletteEntries(hPal, 0, nColors, (LPPALETTEENTRY)&pAnimate);
  v% J( Q( V: D; Y  f; W$ ZCPalette *pOldPalette = pDC->SelectPalette(&pal, FALSE);
pDC->RealizePalette();
CDC memDC;
memDC.CreateCompatibleDC( pDC );
9 B) t( F0 _  O( [CBitmap bmp;
0 a, z( T) E! _0 l2 x0 }( Cbmp.CreateCompatibleBitmap( pDC, nWidth, nHeight );
4 {% `/ W# K. d1 I4 N" XCBitmap *pOldBitmap = memDC.SelectObject( &bmp );
& }( O5 J* |. y4 h1 iCPalette *pOldMemPalette = memDC.SelectPalette(&pal, FALSE);
4 J" v( S) }) U3 j8 f* A2 ?- d* o* h" fmemDC.RealizePalette();
- }& q9 S, \8 P::SetDIBitsToDevice(memDC.m_hDC,0,0,nWidth,nHeight,0,0,0,nHeight,lpDIBBits,(LPBITMAPINFO)hDIB,DIB_RGB_COLORS);
+ O; j' W8 U8 _1 P+ _$ eAnimatePalette(hPal, 0, nColors, (LPPALETTEENTRY)&pAnimate);
6 U( m* S7 O1 i9 kpDC->BitBlt(xDest, yDest, nWidth, nHeight, &memDC,0,0,SRCCOPY );
6 j2 `) b2 u0 H// 淡入淡出
9 b- a9 l( d. [+ Ufor( i=1; i <= nLoops; i++ )
for (j = 0; j < nColors; j++)
9 |& @* k2 t0 Q9 aif(nFlag==1)
$ c7 ~( r: h; A' t8 G4 N) z) cpAnimate[j].peRed = clrRValue - ((clrRValue-pOriginal[j].peRed)*i)/nLoops;
# u- Y: {& A! y/ j9 b, ?, ZpAnimate[j].peGreen = clrGValue - ((clrGValue-pOriginal[j].peGreen)*i)/nLoops;
: i* F" u# a6 r# ]pAnimate[j].peBlue = clrBValue - ((clrBValue-pOriginal[j].peBlue)*i)/nLoops;
4 l, C( _) E' j4 i& Velse
pAnimate[j].peRed = pOriginal[j].peRed - ((pOriginal[j].peRed - clrRValue)*i)/nLoops;
pAnimate[j].peGreen = pOriginal[j].peGreen - ((pOriginal[j].peGreen - clrGValue)*i)/nLoops;
. V% J  z0 R% j; u4 x2 r; e4 {$ EpAnimate[j].peBlue = pOriginal[j].peBlue - ((pOriginal[j].peBlue - clrBValue)*i)/nLoops;
pal.AnimatePalette(0, nColors, (LPPALETTEENTRY)&pAnimate);
// Delay...
/ p0 V* t. o1 ]% DSleep(nDelay);
memDC.SelectPalette(pOldMemPalette, FALSE);
3 W( {: d4 X% \% `memDC.SelectObject( pOldBitmap );
3 z6 C$ B1 A* |* npDC->SelectPalette(pOldPalette, FALSE);
8 L; m& B  x/ O. Celse if( (pDC->GetDeviceCaps(RASTERCAPS) & RC_PALETTE) == 0 && nColors <= 256 )
for( int i=0; i < nColors; i++)
pOriginal.peRed = bmInfo.bmiColors.rgbRed ;
, o0 _7 C' w2 ~" tpOriginal.peGreen = bmInfo.bmiColors.rgbGreen;
pOriginal.peBlue = bmInfo.bmiColors.rgbBlue ;
if(nFlag==1)
bmInfo.bmiColors.rgbRed = clrRValue;
bmInfo.bmiColors.rgbGreen = clrGValue;
$ T: n. x+ L. S3 a9 y& ^, obmInfo.bmiColors.rgbBlue = clrBValue;
::SetDIBitsToDevice(pDC->m_hDC,0,0,nWidth,nHeight,0,0,0,nHeight,lpDIBBits,(LPBITMAPINFO)hDIB,DIB_RGB_COLORS);
// 淡入淡出
# l+ p2 t* F' @5 ~: i( r! W8 F+ [: Mfor( i=1; i <= nLoops; i++ )
for (j = 0; j < nColors; j++)
1 `3 V% T( K' u0 b) @& D. Z: o2 rif(nFlag==1)
: N' v2 U9 P2 obmInfo.bmiColors[j].rgbRed = clrRValue - ((clrRValue-pOriginal[j].peRed)*i)/nLoops;
bmInfo.bmiColors[j].rgbGreen = clrGValue - ((clrGValue-pOriginal[j].peGreen)*i)/nLoops;
bmInfo.bmiColors[j].rgbBlue = clrBValue - ((clrBValue-pOriginal[j].peBlue)*i)/nLoops;
6 S7 G, A9 p+ Z# x8 V! M  Lelse
bmInfo.bmiColors[j].rgbRed = pOriginal[j].peRed - ((pOriginal[j].peRed-clrRValue)*i)/nLoops;
7 \1 d3 S' |" H( jbmInfo.bmiColors[j].rgbGreen = pOriginal[j].peGreen - ((pOriginal[j].peGreen-clrGValue)*i)/nLoops;
0 i$ m( |# p$ {, R% ?3 H+ [, s1 f4 mbmInfo.bmiColors[j].rgbBlue = pOriginal[j].peBlue - ((pOriginal[j].peBlue-clrBValue)*i)/nLoops;
::SetDIBitsToDevice(pDC->m_hDC,0,0,nWidth,nHeight,0,0,0,nHeight,lpDIBBits,(LPBITMAPINFO)hDIB,DIB_RGB_COLORS);
// Delay...
Sleep(nDelay);