指定背景的淡入淡出

天云上人

创建步骤：
1、如果系统支持调色板，创建动态调色板pAnimate与初始调色板pOriginal。
  [( X" f- V: m' \4 _从位图中获取初始调色板，若为淡入将背景色赋予动态调色板。利用前面所
提到的公式，根据淡入淡出标志，在循环中更改动态调色板，用AnimatePalette
函数设置调色板，改变显示结果。
2、如果系统不支持调色板，保存位图调色板到初始调色板，若为淡入将背景
色赋予位图调色板，利用前面所提到的公式，根据淡入淡出标志，在循环中更
改位图调色板，显示位图改变显示结果
返回：位图的淡入淡出
2 V$ g% m. D3 m# \7 M. o" f//参数说明：
1 m5 u. O! w4 D9 ?! [//hDIB -位图句柄
( @( L) Z; Q7 g9 p0 ?" ?* n//color -指定背景色
6 ^* O0 n" i: E; I0 @$ a' O& o- v3 `//xDest -显示位图的左上角x坐标
% z. y# x# c3 e//yDest -显示位图的左上角y坐标
//nLoops -循环次数
//nDelay -每次循环中的延时
% f; N7 V, O$ b, }//nFlag -淡入淡出标志 1--淡入 其它--淡出
6 @# w, u! w( s/ a6 C0 |% Jvoid FadeInORFadeOut( CDC *pDC, HANDLE hDIB, COLORREF color, int xDest, int yDest,
1 U/ l% w: \1 yint nLoops, int nDelay ,int nFlag)
int i,j;
HPALETTE hPal;
PALETTEENTRY pAnimate[256];
, Q+ m6 b4 c- a# GPALETTEENTRY pOriginal[256];
* U% r" [7 ~- B# s5 zCPalette pal;
1 G! }- p/ v- f; _6 z: d! r; [// 创建236色调色板
　
  _- Q+ \0 d& V8 H* m8 n  |BITMAPINFO &bmInfo = *(LPBITMAPINFO)hDIB ;
　
  U& b  W9 R+ h% ?( I" w& cint nColors = bmInfo.bmiHeader.biClrUsed ? bmInfo.bmiHeader.biClrUsed :
7 \2 s4 S' u/ `) ~4 v: R9 [1 << bmInfo.bmiHeader.biBitCount;
int nWidth = bmInfo.bmiHeader.biWidth;
int nHeight = bmInfo.bmiHeader.biHeight;
: }2 d+ q* l& {2 BLPVOID lpDIBBits = (LPVOID)(bmInfo.bmiColors + nColors);
int clrRValue = GetRValue(color);
+ a5 C! W$ T! i% Q1 o6 P, uint clrGValue = GetGValue(color);
int clrBValue = GetBValue(color);
if( pDC->GetDeviceCaps(RASTERCAPS) & RC_PALETTE && nColors <= 256 )
6 [% r6 Z/ x2 K+ O9 gif (!(hPal = Create236Palette(hDIB)))
return;
$ h% I  Y+ e; P0 X, G) opal.Attach( hPal );
$ h7 F4 Q/ I- j' R4 u( }// 得到调色板初始值
9 c3 M0 i4 k: B: s+ [0 i! NGetPaletteEntries(hPal, 0, nColors, (LPPALETTEENTRY)&pOriginal);
- J9 ~; Q& x( t& i+ l// 设定动态调色板初始值为指定色
if(nFlag==1)
for (j = 0; j < nColors; j++)
3 I; X8 e4 y% S" t8 spAnimate[j].peRed = clrRValue;
" ~! F% E" A/ n; }0 c5 wpAnimate[j].peGreen = clrGValue;
# }  o/ u0 D3 i' j0 spAnimate[j].peBlue = clrBValue;
pAnimate[j].peFlags = PC_RESERVED;
/ ~2 ^2 p7 `: {$ b) ~) eelse
/ I! f! s% o, V6 o+ [! D7 aGetPaletteEntries(hPal, 0, nColors, (LPPALETTEENTRY)&pAnimate);
CPalette *pOldPalette = pDC->SelectPalette(&pal, FALSE);
pDC->RealizePalette();
CDC memDC;
! u% S! d( k5 c- M/ p# r$ YmemDC.CreateCompatibleDC( pDC );
CBitmap bmp;
bmp.CreateCompatibleBitmap( pDC, nWidth, nHeight );
CBitmap *pOldBitmap = memDC.SelectObject( &bmp );
  y- h% B% U+ w/ _! PCPalette *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);
AnimatePalette(hPal, 0, nColors, (LPPALETTEENTRY)&pAnimate);
& h8 X1 r1 c2 w; t; A/ MpDC->BitBlt(xDest, yDest, nWidth, nHeight, &memDC,0,0,SRCCOPY );
// 淡入淡出
+ {- b0 W; q+ Z* Wfor( i=1; i <= nLoops; i++ )
for (j = 0; j < nColors; j++)
6 g# ]+ O0 ]4 x9 W5 ?" o5 t% |' Xif(nFlag==1)
$ M( D3 b5 j9 e" ]pAnimate[j].peRed = clrRValue - ((clrRValue-pOriginal[j].peRed)*i)/nLoops;
pAnimate[j].peGreen = clrGValue - ((clrGValue-pOriginal[j].peGreen)*i)/nLoops;
6 ]  N' r& |# \$ L! O' VpAnimate[j].peBlue = clrBValue - ((clrBValue-pOriginal[j].peBlue)*i)/nLoops;
/ G: ~: A) g$ W2 p/ h1 Z/ H$ e8 Felse
pAnimate[j].peRed = pOriginal[j].peRed - ((pOriginal[j].peRed - clrRValue)*i)/nLoops;
pAnimate[j].peGreen = pOriginal[j].peGreen - ((pOriginal[j].peGreen - clrGValue)*i)/nLoops;
6 n% ]) _& Y2 m8 C! FpAnimate[j].peBlue = pOriginal[j].peBlue - ((pOriginal[j].peBlue - clrBValue)*i)/nLoops;
pal.AnimatePalette(0, nColors, (LPPALETTEENTRY)&pAnimate);
0 u7 E2 a( f+ A( c6 j// Delay...
Sleep(nDelay);
+ _, \" E8 [  _: qmemDC.SelectPalette(pOldMemPalette, FALSE);
memDC.SelectObject( pOldBitmap );
1 G  V# F4 f8 M4 |' cpDC->SelectPalette(pOldPalette, FALSE);
' ?2 C7 n0 o: _7 Y3 G( Belse if( (pDC->GetDeviceCaps(RASTERCAPS) & RC_PALETTE) == 0 && nColors <= 256 )
for( int i=0; i < nColors; i++)
# h  q& i0 T/ {4 ^5 MpOriginal.peRed = bmInfo.bmiColors.rgbRed ;
pOriginal.peGreen = bmInfo.bmiColors.rgbGreen;
pOriginal.peBlue = bmInfo.bmiColors.rgbBlue ;
if(nFlag==1)
bmInfo.bmiColors.rgbRed = clrRValue;
bmInfo.bmiColors.rgbGreen = clrGValue;
0 E/ ?2 p- @( }4 @: ~bmInfo.bmiColors.rgbBlue = clrBValue;
::SetDIBitsToDevice(pDC->m_hDC,0,0,nWidth,nHeight,0,0,0,nHeight,lpDIBBits,(LPBITMAPINFO)hDIB,DIB_RGB_COLORS);
// 淡入淡出
for( i=1; i <= nLoops; i++ )
! s* k3 H# F! p7 ]; @* J4 Jfor (j = 0; j < nColors; j++)
if(nFlag==1)
bmInfo.bmiColors[j].rgbRed = clrRValue - ((clrRValue-pOriginal[j].peRed)*i)/nLoops;
bmInfo.bmiColors[j].rgbGreen = clrGValue - ((clrGValue-pOriginal[j].peGreen)*i)/nLoops;
& w# o8 g" K" T; cbmInfo.bmiColors[j].rgbBlue = clrBValue - ((clrBValue-pOriginal[j].peBlue)*i)/nLoops;
else
bmInfo.bmiColors[j].rgbRed = pOriginal[j].peRed - ((pOriginal[j].peRed-clrRValue)*i)/nLoops;
/ R, M6 ]+ n; [bmInfo.bmiColors[j].rgbGreen = pOriginal[j].peGreen - ((pOriginal[j].peGreen-clrGValue)*i)/nLoops;
' R3 U+ T& Q: b! b0 i$ QbmInfo.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...
* f# X5 k0 K" tSleep(nDelay);