Spy++原理初探

在CMyPic类中，我们就可以响应鼠标左键按下和弹起的消息了。按Ctrl + W打开Class Wizard，选择Message Maps标签页，在Class name下拉列表中选择CMyPic。从Messages列表中分别增加WM_LBUTTONDOWN和WM_LBUTTONUP消息，并接受其缺省函数名OnLButtonDown和OnLButtonUp。图标交换和鼠标光标交换的代码如下：

void CMyPic::OnLButtonDown(UINT nFlags, CPoint point)
{
　　// TODO: Add your message handler code here and/or call default
　　SetCapture();　　　//鼠标捕获
　　HCURSOR hc = LoadCursor(AfxGetApp()->m_hInstance, MAKEINTRESOURCE (IDC_CURSOR1));
　　//IDC_CURSOR1是靶形光标资源号
　　::SetCursor(hc);
　　HICON hicon2 = LoadIcon(AfxGetApp()->m_hInstance, MAKEINTRESOURCE (IDI_ICON2));
　　//IDI_ICON2为无靶图标资源号
　　this->SetIcon(hicon2);
　　CStatic::OnLButtonDown(nFlags, point);
}
void CMyPic::OnLButtonUp(UINT nFlags, CPoint point)
{
　　// TODO: Add your message handler code here and/or call default
　　ReleaseCapture(); //释放鼠标捕获
　　HICON hicon1 = LoadIcon(AfxGetApp()->m_hInstance, MAKEINTRESOURCE (IDI_ICON1));
　　//IDI_ICON1是有靶图标资源号
　　this->SetIcon(hicon1);
　　CStatic::OnLButtonUp(nFlags, point);
}

探测器外观制作完成了。可以先运行一下，把鼠标按下后拖动试试。下面来实现其功能：获取窗口句柄。根据鼠标位置来确定窗口需要用到API函数GetCursorPos和WindowFromPoint。此外，我们还想做到像抓图程序那样，鼠标移动到的地方，窗口四周会出现闪烁的矩形。这一点，我们用定时器来实现。定时器设在CSpyXXDlg类中，但要由CMyPic中的OnLButtonUp来启动。所以，我们定义一个全局变量g_hMe将CSpyXXDlg的实例句柄保存起来。同时，被选取的窗口句柄也涉及到在多个标签页中显示，所以也用全局变量g_hWnd将之保存。其余的用于显示标签页的属性页对话框句柄分别用g_hPage0、g_hPage1、g_hPage2、g_hPage3和g_hPage4来保存。启动定时器的代码如下：

FromHandle(g_hMe)->SetTimer(1,600,NULL);

在定时器中，我们要实现桌面范围内的矩形绘制。代码如下：

POINT pnt;
RECT rc;
HWND DeskHwnd = ::GetDesktopWindow(); //取得桌面句柄
HDC DeskDC = ::GetWindowDC(DeskHwnd); //取得桌面设备场景
int oldRop2 = SetROP2(DeskDC, R2_NOTXORPEN);
::GetCursorPos(&pnt); //取得鼠标坐标
HWND UnHwnd = ::WindowFromPoint(pnt) ; //取得鼠标指针处窗口句柄
g_hWnd=UnHwnd;
::GetWindowRect(g_hWnd, &rc); //获得窗口矩形
if( rc.left < 0 ) rc.left = 0;
if (rc.top < 0 ) rc.top = 0;
HPEN newPen = ::CreatePen(0, 3, 0); //建立新画笔,载入DeskDC
HGDIOBJ oldPen = ::SelectObject(DeskDC, newPen);
::Rectangle(DeskDC, rc.left, rc.top, rc.right, rc.bottom); //在窗口周围显示闪烁矩形
Sleep(400); //设置闪烁时间间隔
::Rectangle( DeskDC, rc.left, rc.top, rc.right, rc.bottom);
::SetROP2(DeskDC, oldRop2);
::SelectObject( DeskDC, oldPen);
::DeleteObject(newPen);
::ReleaseDC( DeskHwnd, DeskDC);
DeskDC = NULL;

到此，探测器功能全部完成。