1、利用钩子实现菜单阴影效果程序运行效果截图:也许有很多人曾和我一样, 对 Office XP 里面的菜单的阴影效果羡慕不已,它不需要在 Windows XP 中就可以在菜单后面显示阴影, 当然在 Windows XP 中, 已经完全支持菜单阴影了。虽然我们不一定很有必要自己来实现这个较难实现的效果。但是正如有很多人想实现那种 IE 风格的菜单栏一样,尽管它 们并不能为我们带来更多实用的功能, 却可以使我们的程序看起来与众不同。:) 菜单也是一个窗口, 假如我们能得到它的窗口的句柄, 要实现像添加阴影这样的效果, 就不会很难了。可惜我们根本找不到这个窗口是在哪里被创建的,也没办法很容易地取得它的窗
2、口句柄,甚至几乎难以相信它是一个窗口,因为我实在找不到它的窗口句柄啊。经过对许多别人已经做好的类的源代码的“研究“, 我终于找到了一个方法。那就是万能的钩子,如果说在 Windows 里面抓“人“,连钩子也办不到的话,那我就不知道该用什么方法实现了,呵呵。 下面我就一起来看看如何抓到这些“可恶“的家伙吧。为了便于移植,我们就写一个专用的类吧,就取名为 CMenuWndHook。添加两个静态成员先: static CMap m_WndMenuMap; static HHOOK m_hMenuHook; 被我们抓到的这些家伙肯定不止一个,我们需要一个映射模板类来保存它们的句柄和对应的CMenuWn
3、dHook 类对象的指针。m_hMenuHook 则为我们将要创建的钩子的钩子句柄。再在 CPP 文件中初始化它们: CMap CMenuWndHook:m_WndMenuMap; HHOOK CMenuWndHook:m_hMenuHook = NULL; 下面再添加两个函数来做安装与卸载 hook 之用, 它们都是静态函数: void CMenuWndHook:InstallHook() if (m_hMenuHook = NULL) m_hMenuHook = :SetWindowsHookEx(WH_CALLWNDPROC, WindowHook, AfxGetApp()-m_hIns
4、tance, :GetCurrentThreadId(); Windows 之下一般用上面的 SetWindowsHookEx API 函数来安装 HOOK,它的函数原型如下: HHOOK SetWindowsHookEx(int idHook, /钩子的类型,即它处理的消息类型 HOOKPROC lpfn, /子函数的入口地址,当钩子钩到任何消息后先调用这个函数。 / (如果 dwThreadId 参数为 0,或是一个由别的进程创建的线程的标识, /lpfn 必须指向 DLL 中的钩子子程。除此以外,lpfn 可以指向当前进 /程的一段钩子子程代码) HINSTANCE hMod, /应用程
5、序实例的句柄。标识包含 lpfn 所指的子程的 DLL。 / 如果 dwThreadId 标识当前进程创建的一个线程, /而且子程代码位于当前进程,hMod 必须为 NULL。 /可以很简单的设定其为本应用程序的实例句柄。 DWORD dwThreadId /与安装的钩子子程相关联的线程的标识符。 /如果为 0,钩子子程与所有的线程关联,即为全局钩子。 /但这时,你钩子只能是放在 DLL 中。 ); 函数成功则返回钩子子程的句柄,失败返回 NULL。 我们用到的是 WH_CALLWNDPROC 类型的钩子,它使你可以监视发送到窗口过程的消息, 系统在消息发送到 接收窗口过程之前会调用你指定的W
6、H_CALLWNDPROC Hook 子程,这样你就可以等它们自投罗网,然后就可以 对它们为所欲为了。 卸载钩子就简单多了,只需要调用 UnhookWindowsHookEx 即可,当然,我们还需要额外做一点清理工作: void CMenuWndHook:UnInstallHook() POSITION pos = m_WndMenuMap.GetStartPosition(); while (pos != NULL) HWND hwnd; CMenuWndHook *pMenuWndHook; m_WndMenuMap.GetNextAssoc(pos, hwnd, pMenuWndHook
7、); delete pMenuWndHook; pMenuWndHook= NULL; m_WndMenuMap.RemoveAll(); if (m_hMenuHook != NULL) :UnhookWindowsHookEx(m_hMenuHook); 在介绍如何安装钩子时,提到要一个钩子子程,这个子程必须按下面的格式声明,否则不能使用: LRESULT CALLBACK WindowHook(int code, WPARAM wParam, LPARAM lParam); 函数名随意,同样把它声明为静态函数,下面各位注意了,我们的逮捕行动就是在这个函数中展开的: LRESULT CAL
8、LBACK CMenuWndHook:WindowHook(int code, WPARAM wParam, LPARAM lParam) /如果你安装的是 WH_CALLWNDPROC 类型的钩子的话,系统就会传递一个这个家伙的指针: CWPSTRUCT* pStruct = (CWPSTRUCT*)lParam; while (code = HC_ACTION) HWND hWnd = pStruct-hwnd; / 截获 WM_CREATE 消息, 为了保证不抓错“人“,我们必须严格确定这是否是我们要抓的家伙, / 这样我们就可以在它们刚出头就把它们逮住: if(pStruct-mess
9、age != WM_CREATE / 是否为菜单类 - TCHAR strClassName10; int Count = :GetClassName(hWnd, strClassName, sizeof(strClassName) / sizeof(strClassName0); / 再次确认它的身份(菜单窗口类的类名为“#32768“,且为 6 个字符长): if (Count != 6 | _tcscmp(strClassName, _T(“#32768“) != 0 ) / 对不起,认错人了,pass :-) break; /是否已经被子类化- / 我们抓到一个之后,会给它用 SetP
10、rop 挂个牌(后面会介绍) if(:GetProp(pStruct-hwnd, CoolMenu_oldProc) ! = NULL ) / 已经在编? pass. break; / 抓到一个,给它登记注册(这个函数我会在后面介绍), 而且不能登记失败, :) VERIFY(AddWndHook(pStruct-hwnd) != NULL); /下面该叫它去洗心革面了- /取得原来的窗口过程 - WNDPROC oldWndProc = (WNDPROC)(long):GetWindowLong(pStruct-hwnd, GWL_WNDPROC); if (oldWndProc = NUL
11、L) break; ASSERT(oldWndProc != CoolMenuProc); /这个过程一样不能出错 / 保存到窗口的属性中 - / 哈哈,给它打个记号吧 (SetProp API 函数是用来给一个窗口加上一个属性的, / RemoveProp 则是删除一个属性,GetProp 是取得一个属性的值) / CoolMenu_oldProc 为一字符数组, 我在 CPP 文件的开头声明了它,表示你要 / 添加的属性名: const TCHAR CoolMenu_oldProc=_T(“CoolMenu_oldProc“); / 这里保存的是它的原来的窗口过程,这种该随身带的东西还是让
12、它自己拿着比较好 if (!SetProp(pStruct-hwnd,CoolMenu_oldProc, oldWndProc) break; / 子类化- / 这个不用我说了吧,这里我们用了偷梁换柱的方法,呵呵,这可是子类化的惯技了: if (!SetWindowLong(pStruct-hwnd, GWL_WNDPROC,(DWORD)(ULONG)CoolMenuProc) ) /没有成功!唉,就放过他吧,虽然忙了半天了,不过这种情况我想是不可能发生的! :RemoveProp(pStruct-hwnd, CoolMenu_oldProc); break; / 这句可是绝对不能少的,叫那
13、些闲杂人等该干什么就干什么去,不要? / 嘿嘿,看你的程序怎么死吧! return CallNextHookEx(m_hMenuHook, code, wParam, lParam); 我们再来看看,怎么“登记“它们: CMenuWndHook* CMenuWndHook:AddWndHook(HWND hwnd) CMenuWndHook* pWnd = NULL; if (m_WndMenuMap.Lookup(hwnd, pWnd) / 有这个人了,不用再登记了。 return pWnd; / 给它分配个房间(牢房! 嘿嘿) pWnd = new CMenuWndHook(hwnd);
14、if (pWnd != NULL) m_WndMenuMap.SetAt(hwnd, pWnd); return pWnd; / 另外还可有一个对应的查找函数: CMenuWndHook* CMenuWndHook:GetWndHook(HWND hwnd) CMenuWndHook* pWnd = NULL; if (m_WndMenuMap.Lookup(hwnd, pWnd) return pWnd; return NULL; 上面的函数和变量大部分都是静态成员,因为 hook 系统只要有一套就可以了到 这里为止,坚巨的任务已经完成了一半,做下面的事,就得心应手多了。下面是窗口的新过程,
15、依然为一个静态的函数。 LRESULT CALLBACK CMenuWndHook:CoolMenuProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam) WNDPROC oldWndProc = (WNDPROC):GetProp(hWnd, CoolMenu_oldProc); CMenuWndHook* pWnd = NULL; switch (uMsg) / 计算非客户区的大小- case WM_NCCALCSIZE: LRESULT lResult = CallWindowProc(oldWndProc, hWnd, uMsg
16、, wParam, lParam); if (pWnd = GetWndHook(hWnd) != NULL) pWnd-OnNcCalcsize(NCCALCSIZE_PARAMS*)lParam); return lResult; break; / 当窗口的位置将要发生改变, 在这里它一般发生在菜单被弹出之前, / 给你最后一次机会设置它的位置. case WM_WINDOWPOSCHANGING: if (pWnd = GetWndHook(hWnd) != NULL) pWnd-OnWindowPosChanging(LPWINDOWPOS)lParam); break; / 为什么要
17、响应这个消息呢? 我也不知道啊,我只知道,当菜单是以动画的方式弹出的时候 / 系统是通过发送这个消息来绘制菜单的,wParam 是对应的设备上下文句柄,不过我也不知 / 道它到底是属于谁的. case WM_PRINT: LRESULT lResult = CallWindowProc(oldWndProc, hWnd, uMsg, wParam, lParam); if (pWnd = GetWndHook(hWnd) != NULL) pWnd-OnPrint(CDC:FromHandle(HDC)wParam); return lResult; break; /这个就不同说了吧. cas
18、e WM_NCPAINT: if (pWnd = GetWndHook(hWnd) != NULL) pWnd-OnNcPaint(); return 0; break; / 菜单窗口被隐藏的时候,我也不知道这种情况会不会发生, :(, 主要是看到人家这样处理了. case WM_SHOWWINDOW: if (pWnd = GetWndHook(hWnd) != NULL) pWnd-OnShowWindow(wParam != NULL); break; / 菜单窗口被销毁的时候 case WM_NCDESTROY: if (pWnd = GetWndHook(hWnd) != NULL)
19、 pWnd-OnNcDestroy(); break; return CallWindowProc(oldWndProc, hWnd, uMsg, wParam, lParam); 下面就看如何慢慢实现这些消息的响应函数吧: void CMenuWndHook:OnWindowPosChanging(WINDOWPOS *pWindowPos) if (!IsShadowEnabled() /加一块区域来显示阴影- pWindowPos-cx += 4; pWindowPos-cy += 4; / 为了绘制阴影,我们须要先保存这个区域的图像,以便绘制半透明的阴影. if (!IsWindowV
20、isible(m_hWnd) m_bmpBack.Attach(GetScreenBitmap(CRect(pWindowPos-x, pWindowPos-y, pWindowPos-cx, pWindowPos-cy); void CMenuWndHook:OnNcCalcsize(NCCALCSIZE_PARAMS* lpncsp) if (!IsShadowEnabled() /留出一点区域来显示阴影- lpncsp-rgrc0.right -= 4; lpncsp-rgrc0.bottom -= 4; 上面我用到了两个全局函数, 其中 IsShadowEnabled 是检测系统是否开
21、启了菜单阴影(主要针对于Windows XP, Windows 2003 及他更高的版本) 如果系统已经给我们开启了阴影,我们还忙乎什么哦。BOOL WINAPI IsShadowEnabled() BOOL bEnabled = FALSE; if (SystemParametersInfo(SPI_GETDROPSHADOW, 0, bEnabled,0) return bEnabled; return FALSE; 其中 SPI_GETDROPSHADOW 在 VC6 里面没有被声明,你需要自已声明它: #ifndef SPI_GETDROPSHADOW #define SPI_GETD
22、ROPSHADOW 0x1024 #endif 另外还有 GetScreenBitmap 函数用于截取屏幕上指定区域内的图像: HBITMAP WINAPI GetScreenBitmap (LPCRECT pRect) HDC hDC; HDC hMemDC; HBITMAP hNewBitmap = NULL; if (hDC = :GetDC(NULL) != NULL ) if (hMemDC = :CreateCompatibleDC(hDC) != NULL) if (hNewBitmap = :CreateCompatibleBitmap(hDC, pRect-right - p
23、Rect-left, pRect-bottom - pRect-top) != NULL) HBITMAP hOldBitmap = (HBITMAP):SelectObject(hMemDC, hNewBitmap); :BitBlt(hMemDC, 0, 0, pRect-right - pRect-left, pRect-bottom - pRect-top, hDC, pRect-left, pRect-top, SRCCOPY); :SelectObject(hMemDC, (HGDIOBJ)hOldBitmap); :DeleteDC(hMemDC); :ReleaseDC(NUL
24、L, hDC); return hNewBitmap; 下面这两个函数要做的事就差不多了: void CMenuWndHook:OnNcPaint() CWindowDC dc(CWnd:FromHandle(m_hWnd); OnPrint( void CMenuWndHook:OnPrint(CDC *pDC) CRect rc; GetWindowRect(m_hWnd, rc.OffsetRect(-rc.TopLeft(); / 绘制阴影 if (!IsShadowEnabled() CDC cMemDC; cMemDC.CreateCompatibleDC (pDC); HGDIO
25、BJ hOldBitmap = :SelectObject (cMemDC.m_hDC, m_bmpBack); pDC-BitBlt (0, rc.bottom - 4, rc.Width() - 4, 4, pDC-BitBlt (rc.right - 4, 0, 4, rc.Height(), DrawShadow(pDC, rc); rc.right -= 4; rc.bottom -= 4; / 绘制边框 pDC-Draw3dRect(rc, m_crFrame0, m_crFrame1); rc.DeflateRect (1, 1); pDC-Draw3dRect(rc, m_cr
26、Frame2, m_crFrame3); 在指定的矩形区域内绘制阴影的全局函数(当然这些函数不一定都要做成全局函数,我把它们写成了全局函数是因为在好几个类中都用到了它们, 写成全局函数便于调用) 也许你会觉得这不符合面向对象编程的思想,其实面向过程的编程思想,并不一定就比面向对象的思想落后,我把这些比较独立的函数写成全局函数,当作 API 函数用,还是觉得很方便的,如果硬要将它们塞到一个类里面,反而觉得很郁闷 。:-). void DrawShadow(CDC *pDC, CRect rect); void DrawShadow(CDC *pDC, CRect rect) COLORREF o
27、ldcolor = RGB(255, 255, 255); BYTE newValR, newValG, newValB; BYTE AlphaArray = 140, 170, 212, 240; BYTE AlphaArray2 = 170, 205, 220, 240, 240, 250, 255; / 底部的阴影 - int i, j; for (j = 0; j GetPixel(i, rect.bottom - (4 - j); newValR = GetRValue(oldcolor) * AlphaArrayj / 255; newValG = GetGValue(oldcol
28、or) * AlphaArrayj / 255; newValB = GetBValue(oldcolor) * AlphaArrayj / 255; pDC-SetPixel(i, rect.bottom - (4 - j), RGB(newValR, newValG, newValB); / 右边的阴影 - for (i = 0; i GetPixel(rect.right - (4 - i), j); newValR = GetRValue(oldcolor) * AlphaArrayi / 255; newValG = GetGValue(oldcolor) * AlphaArrayi / 255; newValB = GetBValue(oldcolor) * AlphaArrayi / 255; pDC-SetPixel(rect.right - (4 - i), j, RGB(newValR, newValG, newValB); / 角上的阴影 - for (i = 0; i 4; i+)