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

天云上人

BOOL WINAPI   DrawAnimatedRects(HWND hwnd, int idAni, CONST RECT * lprcFrom, CONST RECT * lprcTo);   
3 X- i' O% A1 N3 P- t" tEg:   
; O5 ^2 |; G: h5 aBool m_bShow = false;  //区分弹出还是弹入   
BOOL WinAnimation()   
{   
     CWnd * pWnd=FindWindow("Shell_TrayWnd",NULL);  //windows底部信息提示窗口   
     if(!pWnd)return FALSE;   
     CRect rectSur,rectDst;   
" h) c$ g' a4 A9 ^" }* X9 o% x. Z     GetWindowRect(&rectSur);  //本窗口大小,用户自己处理   
% t1 G4 C- I( k  A# g% C      EnumChildWindows(pWnd->GetSafeHwnd(),My_Find,(LPARAM)&rectDst);  //寻找托盘   
1 K& q0 b% e& Y( W     if(m_bShow)DrawAnimatedRects(GetSafeHwnd(),IDANI_CAPTION,&rectSur,&rectDst);  //弹入   
! t- I6 ?& b$ S5 D8 J3 N     else DrawAnimatedRects(GetSafeHwnd(),IDANI_CAPTION,&rectDst,&rectSur); //弹出   
     return TRUE;   
}   
% K1 ]  k' _& Z5 A8 TBOOL CALLBACK My_Find(HWND hwnd, LPARAM lParam)   
8 H+ K( k9 e0 ~- ?//寻找托盘位置   
3 y; O7 V; d' p/ W{   
    TCHAR szClassName[256];   
     GetClassName(hwnd, szClassName, 255);   
2 H; ?# Z( D* [7 Z1 m) R) a    // 比较窗口类名   
if (_tcscmp(szClassName, _T("TrayNotifyWnd")) == 0)   
& `1 h0 G! C! M3 q6 J     {   
1 b0 T+ Z' r0 e6 N% \# z& D6 P: x3 a         CRect *pRect = (CRect*) lParam;         
& R; g& K8 a) K& O$ U         ::GetWindowRect(hwnd, pRect);   
9 C' j% D/ p6 x6 o+ |        return TRUE;   
     }   
& c! I& X& `) F+ K1 m2 }* d% `// 当找到时钟窗口时表示可以结束了   
4 _7 q  [' ]- I! A; A6 O7 V( t8 i    if (_tcscmp(szClassName, _T("TrayClockWClass")) == 0)   
3 P7 l  a& l/ v* W8 F! G  K     {   
         CRect *pRect = (CRect*) lParam;   
         CRect rectClock;   
% K$ P7 ^' X& c0 s         ::GetWindowRect(hwnd, rectClock);   
) Q3 C6 v) G+ }& b         pRect->right = rectClock.left;   
" Q+ S/ ?( ^* B5 s- T( Z        return FALSE;   
     }   
    return TRUE;   
}