指定背景的淡入淡出

天云上人

创建步骤：
+ w+ r: L& r8 z1、如果系统支持调色板，创建动态调色板pAnimate与初始调色板pOriginal。
从位图中获取初始调色板，若为淡入将背景色赋予动态调色板。利用前面所
提到的公式，根据淡入淡出标志，在循环中更改动态调色板，用AnimatePalette
函数设置调色板，改变显示结果。
2、如果系统不支持调色板，保存位图调色板到初始调色板，若为淡入将背景
色赋予位图调色板，利用前面所提到的公式，根据淡入淡出标志，在循环中更
改位图调色板，显示位图改变显示结果
& N8 g. a0 \: r7 x返回：位图的淡入淡出
+ c3 T, K/ A2 F2 U1 [//参数说明：
//hDIB -位图句柄
! z+ O5 n% s6 J. p//color -指定背景色
1 G' q( d" h$ v  Y, O4 J0 Q//xDest -显示位图的左上角x坐标
" ?' g% F+ S( H//yDest -显示位图的左上角y坐标
, ]0 P4 P# ]& S( U' D//nLoops -循环次数
//nDelay -每次循环中的延时
# a" J$ O: p# d/ l//nFlag -淡入淡出标志 1--淡入 其它--淡出
void FadeInORFadeOut( CDC *pDC, HANDLE hDIB, COLORREF color, int xDest, int yDest,
int nLoops, int nDelay ,int nFlag)
+ O4 T9 b% C5 B% I! ~" Uint i,j;
HPALETTE hPal;
PALETTEENTRY pAnimate[256];
( V- A2 l7 z8 n  s6 z/ `. BPALETTEENTRY pOriginal[256];
0 Y' [/ b1 y& k6 g9 V; V% s! e3 f$ [  SCPalette pal;
% n; g: N5 W, e; a2 p6 ?( W2 |5 J// 创建236色调色板
　
) y. F! M7 M4 t& s- j' W7 [BITMAPINFO &bmInfo = *(LPBITMAPINFO)hDIB ;
" `8 n3 K7 _3 m　
* i2 [4 e2 R. U0 E" fint nColors = bmInfo.bmiHeader.biClrUsed ? bmInfo.bmiHeader.biClrUsed :
1 << bmInfo.bmiHeader.biBitCount;
int nWidth = bmInfo.bmiHeader.biWidth;
int nHeight = bmInfo.bmiHeader.biHeight;
9 I4 z( L9 s1 n, j& WLPVOID lpDIBBits = (LPVOID)(bmInfo.bmiColors + nColors);
! P8 a  r& ]3 Y: {2 Xint clrRValue = GetRValue(color);
' I5 C" Y! A6 P# o( Wint clrGValue = GetGValue(color);
$ o9 X( h' a! c, ~( oint clrBValue = GetBValue(color);
; \0 Z& R$ \& g' B! f' wif( pDC->GetDeviceCaps(RASTERCAPS) & RC_PALETTE && nColors <= 256 )
if (!(hPal = Create236Palette(hDIB)))
7 n# P) A% L: a/ Hreturn;
* _" k) j) E: S% J5 Npal.Attach( hPal );
// 得到调色板初始值
GetPaletteEntries(hPal, 0, nColors, (LPPALETTEENTRY)&pOriginal);
1 ^; @1 E, ~' n# A2 Q// 设定动态调色板初始值为指定色
) [5 Y. S6 d, x! n% d* w  @+ C0 Dif(nFlag==1)
8 S; S4 q$ i% h% H6 b  y3 Z5 Z3 Yfor (j = 0; j < nColors; j++)
( c, N7 Q: |2 K( b% XpAnimate[j].peRed = clrRValue;
pAnimate[j].peGreen = clrGValue;
pAnimate[j].peBlue = clrBValue;
, X1 J: L! v; W% @6 spAnimate[j].peFlags = PC_RESERVED;
else
' _, K: R* T8 L* uGetPaletteEntries(hPal, 0, nColors, (LPPALETTEENTRY)&pAnimate);
8 y3 R7 A) _. ^. bCPalette *pOldPalette = pDC->SelectPalette(&pal, FALSE);
pDC->RealizePalette();
* S+ F9 Q: Q, G: T( ?9 L) P6 E/ gCDC memDC;
memDC.CreateCompatibleDC( pDC );
7 _& h8 T4 [; v6 r0 ^8 s4 `CBitmap bmp;
bmp.CreateCompatibleBitmap( pDC, nWidth, nHeight );
. {4 P$ q9 Y4 b9 nCBitmap *pOldBitmap = memDC.SelectObject( &bmp );
CPalette *pOldMemPalette = memDC.SelectPalette(&pal, FALSE);
$ ~. @$ ]- ]  K" h4 amemDC.RealizePalette();
::SetDIBitsToDevice(memDC.m_hDC,0,0,nWidth,nHeight,0,0,0,nHeight,lpDIBBits,(LPBITMAPINFO)hDIB,DIB_RGB_COLORS);
AnimatePalette(hPal, 0, nColors, (LPPALETTEENTRY)&pAnimate);
pDC->BitBlt(xDest, yDest, nWidth, nHeight, &memDC,0,0,SRCCOPY );
# R# D6 T# f9 J& \; b( Z  N// 淡入淡出
$ x: _& `0 x# T" K; Hfor( i=1; i <= nLoops; i++ )
for (j = 0; j < nColors; j++)
if(nFlag==1)
pAnimate[j].peRed = clrRValue - ((clrRValue-pOriginal[j].peRed)*i)/nLoops;
  d/ K  w6 [: v- `6 |6 OpAnimate[j].peGreen = clrGValue - ((clrGValue-pOriginal[j].peGreen)*i)/nLoops;
) P3 h" W4 h8 Q$ ^  ppAnimate[j].peBlue = clrBValue - ((clrBValue-pOriginal[j].peBlue)*i)/nLoops;
' U' J6 I( C  A* u' P* belse
pAnimate[j].peRed = pOriginal[j].peRed - ((pOriginal[j].peRed - clrRValue)*i)/nLoops;
7 b  y2 @2 l. j5 PpAnimate[j].peGreen = pOriginal[j].peGreen - ((pOriginal[j].peGreen - clrGValue)*i)/nLoops;
5 b2 g; f/ o. p: X. ]& @9 ypAnimate[j].peBlue = pOriginal[j].peBlue - ((pOriginal[j].peBlue - clrBValue)*i)/nLoops;
  d* L! ?* H5 _pal.AnimatePalette(0, nColors, (LPPALETTEENTRY)&pAnimate);
// Delay...
Sleep(nDelay);
memDC.SelectPalette(pOldMemPalette, FALSE);
memDC.SelectObject( pOldBitmap );
" B; S$ H. b- A& |pDC->SelectPalette(pOldPalette, FALSE);
6 B! Q& {) j  [" L: t" g# j9 ^else if( (pDC->GetDeviceCaps(RASTERCAPS) & RC_PALETTE) == 0 && nColors <= 256 )
for( int i=0; i < nColors; i++)
5 B) j7 h" `5 r' v+ a; ~+ u& ]pOriginal.peRed = bmInfo.bmiColors.rgbRed ;
7 {# R2 r1 v0 y: b" QpOriginal.peGreen = bmInfo.bmiColors.rgbGreen;
, Z) K! K5 |3 xpOriginal.peBlue = bmInfo.bmiColors.rgbBlue ;
if(nFlag==1)
% ?! |0 K/ }+ bbmInfo.bmiColors.rgbRed = clrRValue;
bmInfo.bmiColors.rgbGreen = clrGValue;
: O: E4 Y& }0 i$ k2 A1 HbmInfo.bmiColors.rgbBlue = clrBValue;
::SetDIBitsToDevice(pDC->m_hDC,0,0,nWidth,nHeight,0,0,0,nHeight,lpDIBBits,(LPBITMAPINFO)hDIB,DIB_RGB_COLORS);
// 淡入淡出
$ @3 \5 a  G0 v" Nfor( i=1; i <= nLoops; i++ )
for (j = 0; j < nColors; j++)
if(nFlag==1)
* L4 y+ p% Q4 N/ IbmInfo.bmiColors[j].rgbRed = clrRValue - ((clrRValue-pOriginal[j].peRed)*i)/nLoops;
& @) d2 }& k- y" j8 t! ?bmInfo.bmiColors[j].rgbGreen = clrGValue - ((clrGValue-pOriginal[j].peGreen)*i)/nLoops;
bmInfo.bmiColors[j].rgbBlue = clrBValue - ((clrBValue-pOriginal[j].peBlue)*i)/nLoops;
4 c: z  b$ ]1 ]" l2 A1 f; ~else
bmInfo.bmiColors[j].rgbRed = pOriginal[j].peRed - ((pOriginal[j].peRed-clrRValue)*i)/nLoops;
7 `  d2 t! m8 H8 d* lbmInfo.bmiColors[j].rgbGreen = pOriginal[j].peGreen - ((pOriginal[j].peGreen-clrGValue)*i)/nLoops;
5 a5 x0 @4 X  T+ D2 j) ^2 HbmInfo.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);