指定背景的淡入淡出

天云上人

创建步骤：
5 q7 M3 x* J' [0 u3 s1、如果系统支持调色板，创建动态调色板pAnimate与初始调色板pOriginal。
从位图中获取初始调色板，若为淡入将背景色赋予动态调色板。利用前面所
" ^3 F2 W& o; K6 A% a& N提到的公式，根据淡入淡出标志，在循环中更改动态调色板，用AnimatePalette
8 p+ j! f4 e) M( |0 `函数设置调色板，改变显示结果。
1 H( A" w" q! o; l/ h2、如果系统不支持调色板，保存位图调色板到初始调色板，若为淡入将背景
% m, O6 J5 N5 M# v" Y/ Z! p色赋予位图调色板，利用前面所提到的公式，根据淡入淡出标志，在循环中更
) p5 \2 R5 A5 n改位图调色板，显示位图改变显示结果
返回：位图的淡入淡出
//参数说明：
//hDIB -位图句柄
//color -指定背景色
6 z2 }: j: Q7 G: Z7 F: z* C//xDest -显示位图的左上角x坐标
//yDest -显示位图的左上角y坐标
8 z& y  }' j  M+ e$ j- P5 J1 I0 n" t% Z//nLoops -循环次数
//nDelay -每次循环中的延时
//nFlag -淡入淡出标志 1--淡入 其它--淡出
6 Z+ ^7 K& J% ?2 d" S- Q: |1 p5 Uvoid FadeInORFadeOut( CDC *pDC, HANDLE hDIB, COLORREF color, int xDest, int yDest,
int nLoops, int nDelay ,int nFlag)
int i,j;
5 a1 y& |! [3 t# U! C( Y# d8 mHPALETTE hPal;
PALETTEENTRY pAnimate[256];
PALETTEENTRY pOriginal[256];
CPalette pal;
0 m  a# V2 S( p8 E" s; x2 o4 L// 创建236色调色板
　
BITMAPINFO &bmInfo = *(LPBITMAPINFO)hDIB ;
　
int nColors = bmInfo.bmiHeader.biClrUsed ? bmInfo.bmiHeader.biClrUsed :
1 << bmInfo.bmiHeader.biBitCount;
) K5 f% B+ B, g3 _8 d4 Oint nWidth = bmInfo.bmiHeader.biWidth;
, ~  A/ Q' }8 c  x# P- p8 X% {int nHeight = bmInfo.bmiHeader.biHeight;
5 M+ c" z* \$ ]LPVOID lpDIBBits = (LPVOID)(bmInfo.bmiColors + nColors);
( Z7 \- o4 m' g" c5 Cint clrRValue = GetRValue(color);
int clrGValue = GetGValue(color);
1 O/ c# i0 b. r2 Cint clrBValue = GetBValue(color);
if( pDC->GetDeviceCaps(RASTERCAPS) & RC_PALETTE && nColors <= 256 )
0 c) L  n- ]0 h5 j4 ~if (!(hPal = Create236Palette(hDIB)))
+ F! |2 r' j0 ^. O" [; Greturn;
  d' A5 r" T7 n( |pal.Attach( hPal );
: I4 `4 \' \6 _0 m// 得到调色板初始值
GetPaletteEntries(hPal, 0, nColors, (LPPALETTEENTRY)&pOriginal);
6 n6 J* [& X5 X) o) P  J7 j// 设定动态调色板初始值为指定色
. G" k0 y9 `% S: y4 bif(nFlag==1)
for (j = 0; j < nColors; j++)
pAnimate[j].peRed = clrRValue;
pAnimate[j].peGreen = clrGValue;
+ b' ?6 [" t1 ?+ s, C2 m2 xpAnimate[j].peBlue = clrBValue;
( b# [  x; ^- S: W; ApAnimate[j].peFlags = PC_RESERVED;
else
GetPaletteEntries(hPal, 0, nColors, (LPPALETTEENTRY)&pAnimate);
CPalette *pOldPalette = pDC->SelectPalette(&pal, FALSE);
pDC->RealizePalette();
  o, C/ J3 C2 i! tCDC memDC;
/ m# H# W& n' J$ O! n# ?8 lmemDC.CreateCompatibleDC( pDC );
CBitmap bmp;
, Z/ a6 P/ l: z4 Wbmp.CreateCompatibleBitmap( pDC, nWidth, nHeight );
CBitmap *pOldBitmap = memDC.SelectObject( &bmp );
4 `( ~- W# C0 s: rCPalette *pOldMemPalette = memDC.SelectPalette(&pal, FALSE);
% m6 y3 l- v* a4 L- @memDC.RealizePalette();
1 F6 a8 S  B+ l" z- ~: p. {::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 );
/ J/ s4 }: Y" e0 e// 淡入淡出
- n  z& K1 b( _, @! v$ b& Ufor( i=1; i <= nLoops; i++ )
for (j = 0; j < nColors; j++)
if(nFlag==1)
8 U2 Q9 |. V. f! V$ o* m, HpAnimate[j].peRed = clrRValue - ((clrRValue-pOriginal[j].peRed)*i)/nLoops;
pAnimate[j].peGreen = clrGValue - ((clrGValue-pOriginal[j].peGreen)*i)/nLoops;
, p5 [* x" E; J% Z5 K( l* NpAnimate[j].peBlue = clrBValue - ((clrBValue-pOriginal[j].peBlue)*i)/nLoops;
9 c2 t" o( F4 e9 jelse
  H& T# r3 E3 p: [, w: S" k' ppAnimate[j].peRed = pOriginal[j].peRed - ((pOriginal[j].peRed - clrRValue)*i)/nLoops;
pAnimate[j].peGreen = pOriginal[j].peGreen - ((pOriginal[j].peGreen - clrGValue)*i)/nLoops;
pAnimate[j].peBlue = pOriginal[j].peBlue - ((pOriginal[j].peBlue - clrBValue)*i)/nLoops;
pal.AnimatePalette(0, nColors, (LPPALETTEENTRY)&pAnimate);
4 m2 Y3 w( ^- U3 K0 c& G1 C) b// Delay...
; _4 d8 _- r" t( p/ r- L4 h9 USleep(nDelay);
5 T5 h1 c1 W0 qmemDC.SelectPalette(pOldMemPalette, FALSE);
4 k* b) ]. {1 hmemDC.SelectObject( pOldBitmap );
pDC->SelectPalette(pOldPalette, FALSE);
$ x& C6 ]- R. S! T. t% g" Y  u6 q: pelse if( (pDC->GetDeviceCaps(RASTERCAPS) & RC_PALETTE) == 0 && nColors <= 256 )
) s! q/ c: a( A2 cfor( int i=0; i < nColors; i++)
pOriginal.peRed = bmInfo.bmiColors.rgbRed ;
. z( J' z0 t+ S8 J/ `0 `9 e/ dpOriginal.peGreen = bmInfo.bmiColors.rgbGreen;
pOriginal.peBlue = bmInfo.bmiColors.rgbBlue ;
if(nFlag==1)
" {0 l3 [# g( p. F5 P; \bmInfo.bmiColors.rgbRed = clrRValue;
bmInfo.bmiColors.rgbGreen = clrGValue;
bmInfo.bmiColors.rgbBlue = clrBValue;
::SetDIBitsToDevice(pDC->m_hDC,0,0,nWidth,nHeight,0,0,0,nHeight,lpDIBBits,(LPBITMAPINFO)hDIB,DIB_RGB_COLORS);
; z4 P% F6 G, h* X// 淡入淡出
for( i=1; i <= nLoops; i++ )
# _6 `4 k9 Q8 n5 ]; n0 b1 F: \0 tfor (j = 0; j < nColors; j++)
& S6 B" q' W  fif(nFlag==1)
+ A( G* O% c1 i2 {) H& l  E7 L4 l5 m1 mbmInfo.bmiColors[j].rgbRed = clrRValue - ((clrRValue-pOriginal[j].peRed)*i)/nLoops;
bmInfo.bmiColors[j].rgbGreen = clrGValue - ((clrGValue-pOriginal[j].peGreen)*i)/nLoops;
9 Q, u" W& l- b! g) PbmInfo.bmiColors[j].rgbBlue = clrBValue - ((clrBValue-pOriginal[j].peBlue)*i)/nLoops;
5 D3 Z! L6 A2 L9 pelse
* v9 V) a0 |' ?% nbmInfo.bmiColors[j].rgbRed = pOriginal[j].peRed - ((pOriginal[j].peRed-clrRValue)*i)/nLoops;
. ~; I+ m& [0 ?" nbmInfo.bmiColors[j].rgbGreen = pOriginal[j].peGreen - ((pOriginal[j].peGreen-clrGValue)*i)/nLoops;
! Q% ~3 j/ G) z9 b3 _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);
// Delay...
Sleep(nDelay);