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

天云上人

BOOL WINAPI   DrawAnimatedRects(HWND hwnd, int idAni, CONST RECT * lprcFrom, CONST RECT * lprcTo);   
0 m. r0 l& ~: ^! F* `* r7 FEg:   
0 p; J* P+ v1 YBool m_bShow = false;  //区分弹出还是弹入   
BOOL WinAnimation()   
/ S) l+ c) Z: t% t1 r  h{   
, C; C1 ?7 ?1 y     CWnd * pWnd=FindWindow("Shell_TrayWnd",NULL);  //windows底部信息提示窗口   
7 Z& A* Y1 n. d% c' \9 g4 b5 k     if(!pWnd)return FALSE;   
/ Y- E7 v& U( u& L     CRect rectSur,rectDst;   
, l; R+ f- @0 S: f     GetWindowRect(&rectSur);  //本窗口大小,用户自己处理   
9 w- r2 L: f. H9 z- [      EnumChildWindows(pWnd->GetSafeHwnd(),My_Find,(LPARAM)&rectDst);  //寻找托盘   
     if(m_bShow)DrawAnimatedRects(GetSafeHwnd(),IDANI_CAPTION,&rectSur,&rectDst);  //弹入   
4 Y, V4 W+ K# H- W     else DrawAnimatedRects(GetSafeHwnd(),IDANI_CAPTION,&rectDst,&rectSur); //弹出   
     return TRUE;   
" y; C* }* p1 h+ ?  S2 v) Z! O& N8 N}   
, ?! o0 }. H% |$ K( |2 MBOOL CALLBACK My_Find(HWND hwnd, LPARAM lParam)   
//寻找托盘位置   
; ]4 u7 ?/ r$ V* r4 y{   
. M8 g" y! d9 A! m" w    TCHAR szClassName[256];   
     GetClassName(hwnd, szClassName, 255);   
7 @4 I5 s, a* n' l( y    // 比较窗口类名   
if (_tcscmp(szClassName, _T("TrayNotifyWnd")) == 0)   
     {   
& S* s% T( W$ ?* v* B         CRect *pRect = (CRect*) lParam;         
         ::GetWindowRect(hwnd, pRect);   
5 u9 Q& b; A4 Y0 v        return TRUE;   
1 d2 O; N+ n$ Y- O     }   
% g4 L  \! `# E7 f& i% ]// 当找到时钟窗口时表示可以结束了   
    if (_tcscmp(szClassName, _T("TrayClockWClass")) == 0)   
5 W% N* B6 G% P* T8 \- S, `1 T6 i     {   
         CRect *pRect = (CRect*) lParam;   
# J+ U& y6 N- A+ _1 `         CRect rectClock;   
         ::GetWindowRect(hwnd, rectClock);   
. y: t0 C+ J; y$ _7 R# m         pRect->right = rectClock.left;   
8 u1 v! h+ J+ l3 p* h+ ?        return FALSE;   
  w  {0 f- [  w6 l" N+ d     }   
& S2 \& T" b& H; i3 z( N  d    return TRUE;   
}