指定背景的淡入淡出

天云上人

创建步骤：
1、如果系统支持调色板，创建动态调色板pAnimate与初始调色板pOriginal。
从位图中获取初始调色板，若为淡入将背景色赋予动态调色板。利用前面所
提到的公式，根据淡入淡出标志，在循环中更改动态调色板，用AnimatePalette
函数设置调色板，改变显示结果。
2、如果系统不支持调色板，保存位图调色板到初始调色板，若为淡入将背景
色赋予位图调色板，利用前面所提到的公式，根据淡入淡出标志，在循环中更
改位图调色板，显示位图改变显示结果
返回：位图的淡入淡出
) w) M4 y) ~- T$ c//参数说明：
//hDIB -位图句柄
//color -指定背景色
//xDest -显示位图的左上角x坐标
5 `  W5 P! p6 e8 d//yDest -显示位图的左上角y坐标
/ E' L: X8 D1 d" F( L+ u' v. A, S% i% C//nLoops -循环次数
% Z0 d. _' g! ~' K7 I//nDelay -每次循环中的延时
# f5 m4 V' W% \$ _1 S9 l' f( ?- N9 f5 B//nFlag -淡入淡出标志 1--淡入 其它--淡出
2 P# y1 f* [1 M  p6 R, _' l" v* ^void FadeInORFadeOut( CDC *pDC, HANDLE hDIB, COLORREF color, int xDest, int yDest,
; \+ u: x7 H9 p/ E, mint nLoops, int nDelay ,int nFlag)
int i,j;
2 C& I& m1 m; XHPALETTE hPal;
PALETTEENTRY pAnimate[256];
, `# s( x/ w4 W" f4 f$ t9 B+ XPALETTEENTRY pOriginal[256];
! W6 u* i5 U5 gCPalette pal;
// 创建236色调色板
" P9 t6 F, }% ^$ P5 i* I. F2 f　
BITMAPINFO &bmInfo = *(LPBITMAPINFO)hDIB ;
　
int nColors = bmInfo.bmiHeader.biClrUsed ? bmInfo.bmiHeader.biClrUsed :
7 P; n0 C8 w  o5 L- y1 << bmInfo.bmiHeader.biBitCount;
int nWidth = bmInfo.bmiHeader.biWidth;
+ s& J. Q6 c" t# Iint nHeight = bmInfo.bmiHeader.biHeight;
& [4 t  U/ D2 H  r9 \2 tLPVOID lpDIBBits = (LPVOID)(bmInfo.bmiColors + nColors);
) Q" O0 z" c- Y7 T& ^; Sint clrRValue = GetRValue(color);
) ~- O# r6 o$ M" Uint clrGValue = GetGValue(color);
int clrBValue = GetBValue(color);
if( pDC->GetDeviceCaps(RASTERCAPS) & RC_PALETTE && nColors <= 256 )
if (!(hPal = Create236Palette(hDIB)))
/ u' D  f! B$ _3 G7 I2 ^) nreturn;
pal.Attach( hPal );
// 得到调色板初始值
) J% J7 ~5 J( j7 C9 J6 IGetPaletteEntries(hPal, 0, nColors, (LPPALETTEENTRY)&pOriginal);
// 设定动态调色板初始值为指定色
if(nFlag==1)
" X4 J1 C; E0 afor (j = 0; j < nColors; j++)
" c- w  `8 V( M9 g8 i$ I/ UpAnimate[j].peRed = clrRValue;
pAnimate[j].peGreen = clrGValue;
2 G$ x% J8 q" A( U/ Q* _pAnimate[j].peBlue = clrBValue;
* u) P, R* m: ~; {. opAnimate[j].peFlags = PC_RESERVED;
: v( m# x& C6 j: e* T1 w  selse
: i' W7 F, i# xGetPaletteEntries(hPal, 0, nColors, (LPPALETTEENTRY)&pAnimate);
CPalette *pOldPalette = pDC->SelectPalette(&pal, FALSE);
pDC->RealizePalette();
CDC memDC;
: f( E& b! a/ @memDC.CreateCompatibleDC( pDC );
CBitmap bmp;
bmp.CreateCompatibleBitmap( pDC, nWidth, nHeight );
4 W- A, D# |8 H9 M3 p' K+ CCBitmap *pOldBitmap = memDC.SelectObject( &bmp );
; Q9 D2 @  Q" M/ Z8 P1 e1 k# ZCPalette *pOldMemPalette = memDC.SelectPalette(&pal, FALSE);
memDC.RealizePalette();
5 V% v: |5 z4 D1 _8 Q& b::SetDIBitsToDevice(memDC.m_hDC,0,0,nWidth,nHeight,0,0,0,nHeight,lpDIBBits,(LPBITMAPINFO)hDIB,DIB_RGB_COLORS);
AnimatePalette(hPal, 0, nColors, (LPPALETTEENTRY)&pAnimate);
4 V# n3 i5 P  B6 dpDC->BitBlt(xDest, yDest, nWidth, nHeight, &memDC,0,0,SRCCOPY );
4 _! P. o! T$ b6 `// 淡入淡出
for( i=1; i <= nLoops; i++ )
for (j = 0; j < nColors; j++)
1 Z# G# v4 I* q/ ]: a- Sif(nFlag==1)
2 K/ h* x" y! ^& E- @pAnimate[j].peRed = clrRValue - ((clrRValue-pOriginal[j].peRed)*i)/nLoops;
5 B4 r4 w! s+ ypAnimate[j].peGreen = clrGValue - ((clrGValue-pOriginal[j].peGreen)*i)/nLoops;
# X4 D" Y, d1 T1 j8 |pAnimate[j].peBlue = clrBValue - ((clrBValue-pOriginal[j].peBlue)*i)/nLoops;
else
pAnimate[j].peRed = pOriginal[j].peRed - ((pOriginal[j].peRed - clrRValue)*i)/nLoops;
pAnimate[j].peGreen = pOriginal[j].peGreen - ((pOriginal[j].peGreen - clrGValue)*i)/nLoops;
4 L" r7 A$ G+ X5 Y9 s0 l7 H: mpAnimate[j].peBlue = pOriginal[j].peBlue - ((pOriginal[j].peBlue - clrBValue)*i)/nLoops;
pal.AnimatePalette(0, nColors, (LPPALETTEENTRY)&pAnimate);
// Delay...
Sleep(nDelay);
memDC.SelectPalette(pOldMemPalette, FALSE);
memDC.SelectObject( pOldBitmap );
pDC->SelectPalette(pOldPalette, FALSE);
. A7 U& G* C0 @# ^3 velse if( (pDC->GetDeviceCaps(RASTERCAPS) & RC_PALETTE) == 0 && nColors <= 256 )
for( int i=0; i < nColors; i++)
pOriginal.peRed = bmInfo.bmiColors.rgbRed ;
pOriginal.peGreen = bmInfo.bmiColors.rgbGreen;
* N( U3 t; A; T3 @1 TpOriginal.peBlue = bmInfo.bmiColors.rgbBlue ;
- U0 I  |' l. [+ J* i1 p8 s1 Dif(nFlag==1)
* Z4 ~- Q2 k) Q% n) EbmInfo.bmiColors.rgbRed = clrRValue;
bmInfo.bmiColors.rgbGreen = clrGValue;
8 E' {* b" a% k. HbmInfo.bmiColors.rgbBlue = clrBValue;
::SetDIBitsToDevice(pDC->m_hDC,0,0,nWidth,nHeight,0,0,0,nHeight,lpDIBBits,(LPBITMAPINFO)hDIB,DIB_RGB_COLORS);
4 w! z( F- P, P! v// 淡入淡出
: G. f9 B0 P9 O( Pfor( i=1; i <= nLoops; i++ )
for (j = 0; j < nColors; j++)
: h4 [  `9 ]" S. a5 bif(nFlag==1)
: u  j- o* }% i, zbmInfo.bmiColors[j].rgbRed = clrRValue - ((clrRValue-pOriginal[j].peRed)*i)/nLoops;
4 t% Q$ Q8 z) c  ibmInfo.bmiColors[j].rgbGreen = clrGValue - ((clrGValue-pOriginal[j].peGreen)*i)/nLoops;
bmInfo.bmiColors[j].rgbBlue = clrBValue - ((clrBValue-pOriginal[j].peBlue)*i)/nLoops;
else
bmInfo.bmiColors[j].rgbRed = pOriginal[j].peRed - ((pOriginal[j].peRed-clrRValue)*i)/nLoops;
; p9 G( O9 P' d/ \- n9 W9 ?bmInfo.bmiColors[j].rgbGreen = pOriginal[j].peGreen - ((pOriginal[j].peGreen-clrGValue)*i)/nLoops;
bmInfo.bmiColors[j].rgbBlue = pOriginal[j].peBlue - ((pOriginal[j].peBlue-clrBValue)*i)/nLoops;
% }* l/ {: R5 |8 Y3 @) z2 T! |7 W::SetDIBitsToDevice(pDC->m_hDC,0,0,nWidth,nHeight,0,0,0,nHeight,lpDIBBits,(LPBITMAPINFO)hDIB,DIB_RGB_COLORS);
// Delay...
Sleep(nDelay);