如何实现双击程序托盘图标弹出或者弹入动画效果

天云上人

BOOL WINAPI   DrawAnimatedRects(HWND hwnd, int idAni, CONST RECT * lprcFrom, CONST RECT * lprcTo);   
Eg:   
Bool m_bShow = false;  //区分弹出还是弹入   
7 {2 a+ r, Z0 e9 }- g4 `3 `BOOL WinAnimation()   
" F+ g1 ^1 X0 ?- w! ?5 L' `- i# s{   
     CWnd * pWnd=FindWindow("Shell_TrayWnd",NULL);  //windows底部信息提示窗口   
+ I& X7 g9 f( m- n$ P3 q     if(!pWnd)return FALSE;   
     CRect rectSur,rectDst;   
     GetWindowRect(&rectSur);  //本窗口大小,用户自己处理   
3 K2 a' k: c3 \6 [+ i/ {& O      EnumChildWindows(pWnd->GetSafeHwnd(),My_Find,(LPARAM)&rectDst);  //寻找托盘   
     if(m_bShow)DrawAnimatedRects(GetSafeHwnd(),IDANI_CAPTION,&rectSur,&rectDst);  //弹入   
     else DrawAnimatedRects(GetSafeHwnd(),IDANI_CAPTION,&rectDst,&rectSur); //弹出   
     return TRUE;   
}   
" R1 j2 \: ^8 hBOOL CALLBACK My_Find(HWND hwnd, LPARAM lParam)   
//寻找托盘位置   
7 J9 ^; O0 M+ N6 b$ O% ^{   
. V0 Y& o) C9 n/ L+ o    TCHAR szClassName[256];   
8 V9 J( Q3 j/ S0 T, X1 o2 N     GetClassName(hwnd, szClassName, 255);   
" d9 I8 i7 {( T2 f    // 比较窗口类名   
5 H; ~/ H6 Z0 G. X9 w! Nif (_tcscmp(szClassName, _T("TrayNotifyWnd")) == 0)   
- h1 _. j: x% V0 D! \9 b     {   
" ]0 K" D: _+ Q- Q: e, G% B$ K( \! w3 Z         CRect *pRect = (CRect*) lParam;         
         ::GetWindowRect(hwnd, pRect);   
# c5 Q# P4 }" p7 ?. T' Q        return TRUE;   
     }   
// 当找到时钟窗口时表示可以结束了   
    if (_tcscmp(szClassName, _T("TrayClockWClass")) == 0)   
     {   
. x" m# [" Y5 N9 `( H/ |         CRect *pRect = (CRect*) lParam;   
         CRect rectClock;   
         ::GetWindowRect(hwnd, rectClock);   
         pRect->right = rectClock.left;   
0 X& T! D# l' p! d& G% o: z" m. G        return FALSE;   
, J. O% U  o" p     }   
7 q$ p' Q: a7 ~% I9 v+ V2 @/ E! W    return TRUE;   
}