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

天云上人

BOOL WINAPI   DrawAnimatedRects(HWND hwnd, int idAni, CONST RECT * lprcFrom, CONST RECT * lprcTo);   
Eg:   
& s+ V+ y- v. k7 l1 u- M( ABool m_bShow = false;  //区分弹出还是弹入   
: Q1 b* u) N6 X6 t& XBOOL WinAnimation()   
{   
     CWnd * pWnd=FindWindow("Shell_TrayWnd",NULL);  //windows底部信息提示窗口   
% b# d) L) a$ y( j     if(!pWnd)return FALSE;   
4 S& Y; F# N; [     CRect rectSur,rectDst;   
6 K* s  t/ N0 x& S- s1 d     GetWindowRect(&rectSur);  //本窗口大小,用户自己处理   
3 l+ {6 T9 m6 B* ]4 d9 v) O4 c      EnumChildWindows(pWnd->GetSafeHwnd(),My_Find,(LPARAM)&rectDst);  //寻找托盘   
& b6 {! f* `4 b% r( Z0 _' R     if(m_bShow)DrawAnimatedRects(GetSafeHwnd(),IDANI_CAPTION,&rectSur,&rectDst);  //弹入   
     else DrawAnimatedRects(GetSafeHwnd(),IDANI_CAPTION,&rectDst,&rectSur); //弹出   
0 V# R$ a6 L1 l% g9 x9 d4 ^/ v     return TRUE;   
}   
* j8 T5 d) T3 b' `BOOL CALLBACK My_Find(HWND hwnd, LPARAM lParam)   
//寻找托盘位置   
+ r. `, L' c/ y: R0 a3 k{   
: ~! u: _( z- s' F. T    TCHAR szClassName[256];   
+ V! Y" w' x. M/ @" y     GetClassName(hwnd, szClassName, 255);   
6 @; z6 U1 p( o: l, Q% \( C    // 比较窗口类名   
if (_tcscmp(szClassName, _T("TrayNotifyWnd")) == 0)   
     {   
# c4 U* p+ T. @% [         CRect *pRect = (CRect*) lParam;         
8 S, [5 L* f4 y, k         ::GetWindowRect(hwnd, pRect);   
4 ~* B2 ]; |: E* ~6 G% ?. [        return TRUE;   
     }   
// 当找到时钟窗口时表示可以结束了   
    if (_tcscmp(szClassName, _T("TrayClockWClass")) == 0)   
     {   
         CRect *pRect = (CRect*) lParam;   
         CRect rectClock;   
         ::GetWindowRect(hwnd, rectClock);   
         pRect->right = rectClock.left;   
        return FALSE;   
     }   
    return TRUE;   
}