指定背景的淡入淡出

天云上人

创建步骤：
  e0 R& F* B: \3 Y! Z1、如果系统支持调色板，创建动态调色板pAnimate与初始调色板pOriginal。
从位图中获取初始调色板，若为淡入将背景色赋予动态调色板。利用前面所
提到的公式，根据淡入淡出标志，在循环中更改动态调色板，用AnimatePalette
) h3 a' Y0 X; G( r+ ~2 B% M) b函数设置调色板，改变显示结果。
2、如果系统不支持调色板，保存位图调色板到初始调色板，若为淡入将背景
5 D! `# g# Y6 H8 r色赋予位图调色板，利用前面所提到的公式，根据淡入淡出标志，在循环中更
改位图调色板，显示位图改变显示结果
返回：位图的淡入淡出
! m# }- S/ g  ~) m. m" \1 J  ]//参数说明：
. Y7 e* r% q; v$ `0 y//hDIB -位图句柄
//color -指定背景色
//xDest -显示位图的左上角x坐标
  ~5 p7 @- M# D  K1 _//yDest -显示位图的左上角y坐标
( _* I0 x* r! h9 G& P3 `) S5 J4 P//nLoops -循环次数
' J/ m3 W: |( E, I" [4 n//nDelay -每次循环中的延时
" w7 A3 j3 n/ Y9 {: K//nFlag -淡入淡出标志 1--淡入 其它--淡出
8 W/ f2 k' p* s" hvoid FadeInORFadeOut( CDC *pDC, HANDLE hDIB, COLORREF color, int xDest, int yDest,
int nLoops, int nDelay ,int nFlag)
4 _. D( n9 ~% ]& Q2 tint i,j;
! ~4 V! B" y/ r8 Z  W- p7 E5 rHPALETTE hPal;
PALETTEENTRY pAnimate[256];
PALETTEENTRY pOriginal[256];
CPalette pal;
// 创建236色调色板
　
BITMAPINFO &bmInfo = *(LPBITMAPINFO)hDIB ;
, B; E4 O, r" x. e　
6 ]8 @# ~% f6 D8 D4 dint nColors = bmInfo.bmiHeader.biClrUsed ? bmInfo.bmiHeader.biClrUsed :
5 @5 ~- o0 {5 Q  f. u8 j" _: V8 u1 << bmInfo.bmiHeader.biBitCount;
int nWidth = bmInfo.bmiHeader.biWidth;
int nHeight = bmInfo.bmiHeader.biHeight;
2 [: k1 z, l6 A+ a) F. E+ _; XLPVOID lpDIBBits = (LPVOID)(bmInfo.bmiColors + nColors);
int clrRValue = GetRValue(color);
int clrGValue = GetGValue(color);
2 p4 ?! f9 ~; [3 _0 jint clrBValue = GetBValue(color);
if( pDC->GetDeviceCaps(RASTERCAPS) & RC_PALETTE && nColors <= 256 )
1 p+ u7 k, }" z+ Rif (!(hPal = Create236Palette(hDIB)))
) h+ q9 W/ E* u( oreturn;
9 x, L: G; M. a6 b" o+ fpal.Attach( hPal );
+ ?2 Y0 X, u! }3 o  }7 p// 得到调色板初始值
GetPaletteEntries(hPal, 0, nColors, (LPPALETTEENTRY)&pOriginal);
// 设定动态调色板初始值为指定色
if(nFlag==1)
for (j = 0; j < nColors; j++)
- K4 A9 Q( H3 Y# w# ipAnimate[j].peRed = clrRValue;
pAnimate[j].peGreen = clrGValue;
; y* u* M2 P/ B1 ]" Y3 m4 N. wpAnimate[j].peBlue = clrBValue;
pAnimate[j].peFlags = PC_RESERVED;
; A) {# h+ o  Y2 L+ selse
7 }* [7 S7 ]) eGetPaletteEntries(hPal, 0, nColors, (LPPALETTEENTRY)&pAnimate);
; V( {6 a( \  F0 k6 h5 I$ rCPalette *pOldPalette = pDC->SelectPalette(&pal, FALSE);
pDC->RealizePalette();
: U( L9 J7 B9 E2 Y& tCDC memDC;
memDC.CreateCompatibleDC( pDC );
CBitmap bmp;
* p7 e# l( ?. F: \; Mbmp.CreateCompatibleBitmap( pDC, nWidth, nHeight );
+ l: L2 Y3 b" m) ?* KCBitmap *pOldBitmap = memDC.SelectObject( &bmp );
# Y3 ?/ U! b. }+ |CPalette *pOldMemPalette = memDC.SelectPalette(&pal, FALSE);
memDC.RealizePalette();
- s7 _$ c1 N* ]. o" s# R. {- H& a::SetDIBitsToDevice(memDC.m_hDC,0,0,nWidth,nHeight,0,0,0,nHeight,lpDIBBits,(LPBITMAPINFO)hDIB,DIB_RGB_COLORS);
1 ]7 O! r4 L5 H; Y& {9 KAnimatePalette(hPal, 0, nColors, (LPPALETTEENTRY)&pAnimate);
pDC->BitBlt(xDest, yDest, nWidth, nHeight, &memDC,0,0,SRCCOPY );
; [- l: o! B" ^  t& |4 I// 淡入淡出
( p3 L9 g( G! Z% v$ @, M9 Xfor( i=1; i <= nLoops; i++ )
3 J7 a7 G0 ^6 t  f$ @8 Wfor (j = 0; j < nColors; j++)
if(nFlag==1)
pAnimate[j].peRed = clrRValue - ((clrRValue-pOriginal[j].peRed)*i)/nLoops;
pAnimate[j].peGreen = clrGValue - ((clrGValue-pOriginal[j].peGreen)*i)/nLoops;
pAnimate[j].peBlue = clrBValue - ((clrBValue-pOriginal[j].peBlue)*i)/nLoops;
0 `- U( X  W3 I8 _8 yelse
. O: T; ~: j: n( {0 Y6 bpAnimate[j].peRed = pOriginal[j].peRed - ((pOriginal[j].peRed - clrRValue)*i)/nLoops;
5 y  H+ [4 o3 U3 ^pAnimate[j].peGreen = pOriginal[j].peGreen - ((pOriginal[j].peGreen - clrGValue)*i)/nLoops;
2 ^( [$ k! T* {pAnimate[j].peBlue = pOriginal[j].peBlue - ((pOriginal[j].peBlue - clrBValue)*i)/nLoops;
, e$ X  `( j0 B" A  ]$ Epal.AnimatePalette(0, nColors, (LPPALETTEENTRY)&pAnimate);
8 n* v3 n/ \! |5 U) H  _$ [// Delay...
+ d( n1 W! M  R2 A  A8 f5 eSleep(nDelay);
memDC.SelectPalette(pOldMemPalette, FALSE);
memDC.SelectObject( pOldBitmap );
6 l4 j; x- j8 J' YpDC->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 ;
pOriginal.peGreen = bmInfo.bmiColors.rgbGreen;
* T  ~' F( J* {pOriginal.peBlue = bmInfo.bmiColors.rgbBlue ;
: b5 \* o, H0 v/ X1 c8 jif(nFlag==1)
bmInfo.bmiColors.rgbRed = clrRValue;
: v$ _: _, p, W# VbmInfo.bmiColors.rgbGreen = clrGValue;
bmInfo.bmiColors.rgbBlue = clrBValue;
9 f( \) X% S% s& X1 h::SetDIBitsToDevice(pDC->m_hDC,0,0,nWidth,nHeight,0,0,0,nHeight,lpDIBBits,(LPBITMAPINFO)hDIB,DIB_RGB_COLORS);
3 C3 T# l% m. o: q' f// 淡入淡出
  O& R. c8 H3 \/ V7 U( Ofor( i=1; i <= nLoops; i++ )
5 v( u9 n& U2 C" Z: j7 xfor (j = 0; j < nColors; j++)
  ^7 ^3 ]7 s; O8 O+ E$ f$ U" _if(nFlag==1)
9 Z6 U. k' X$ O( }2 @8 i: \# Y7 z" O1 PbmInfo.bmiColors[j].rgbRed = clrRValue - ((clrRValue-pOriginal[j].peRed)*i)/nLoops;
: S  Z' M  Y5 E7 I( x) N/ @2 TbmInfo.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;
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;
::SetDIBitsToDevice(pDC->m_hDC,0,0,nWidth,nHeight,0,0,0,nHeight,lpDIBBits,(LPBITMAPINFO)hDIB,DIB_RGB_COLORS);
) i: r$ E- K, E/ S9 `// Delay...
" ]; @6 _* Z5 m; F, l9 s2 vSleep(nDelay);