• 钩子函数举例


    用VS2010建立一个基于对话框的应用程序HOOKDLG,添加修改以下函数可以使程序屏蔽掉鼠标和键盘消息,按Alt+F4键退出程序:

     1 HWND hWnd = NULL; //定义成全局变量
     2 HHOOK hKeyboard;
     3 HHOOK hMouse;
     4 
     5 LRESULT CALLBACK MouseProc( int nCode, WPARAM wParam, LPARAM lparam )        // 鼠标钩子函数
     6 {
     7     return 1;        // 返回非零值表示已经对当前消息进行了处理,这样系统就不会再将这个消息传递给目标窗口过程
     8 }
     9 
    10 LRESULT CALLBACK KeyboardProc( int nCode, WPARAM wParam, LPARAM lparam )
    11 {
    12     if( VK_F4 == wParam && (1 == (lparam>>29&1)) )    // 系统后门:Alt+F4键退出程序
    13     {
    14         ::SendMessageA( hWnd, WM_CLOSE, 0, 0 );
    15         // 卸载钩子函数
    16         UnhookWindowsHookEx( hKeyboard );
    17         UnhookWindowsHookEx( hMouse );
    18     }
    19     return 1;
    20 }
    21 
    22 
    23 // CHookDlg 消息处理程序
    24 
    25 BOOL CHookDlg::OnInitDialog()
    26 {
    27     CDialogEx::OnInitDialog();
    28 
    29     // 将“关于...”菜单项添加到系统菜单中。
    30 
    31     // IDM_ABOUTBOX 必须在系统命令范围内。
    32     ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
    33     ASSERT(IDM_ABOUTBOX < 0xF000);
    34 
    35     CMenu* pSysMenu = GetSystemMenu(FALSE);
    36     if (pSysMenu != NULL)
    37     {
    38         BOOL bNameValid;
    39         CString strAboutMenu;
    40         bNameValid = strAboutMenu.LoadString(IDS_ABOUTBOX);
    41         ASSERT(bNameValid);
    42         if (!strAboutMenu.IsEmpty())
    43         {
    44             pSysMenu->AppendMenu(MF_SEPARATOR);
    45             pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
    46         }
    47     }
    48 
    49     // 设置此对话框的图标。当应用程序主窗口不是对话框时,框架将自动
    50     //  执行此操作
    51     SetIcon(m_hIcon, TRUE);            // 设置大图标
    52     SetIcon(m_hIcon, FALSE);        // 设置小图标
    53 
    54     // TODO: 在此添加额外的初始化代码
    55     hWnd = m_hWnd;
    56 
    57     // 安装钩子函数
    58     hMouse = SetWindowsHookEx( WH_MOUSE, MouseProc, NULL, GetCurrentThreadId() );
    59     hKeyboard = SetWindowsHookEx( WH_KEYBOARD, KeyboardProc, NULL, GetCurrentThreadId() );
    60     
    61     return TRUE;  // 除非将焦点设置到控件,否则返回 TRUE
    62 }
  • 相关阅读:
    Map Rectifier
    倡议“开源GIS团队”成员集思广言
    动力火车终于明白
    搜索操作被google拒绝
    请教ArcGIS server 9.2做的题目的部署问题
    总结基于ArcGIS Server 9.2 Dot Net ADF的WebGIS项目部署问题
    读:『博客家园』 [博客人生]结婚是因为无路可逃
    [Gdaldev] gdalwarp/gcps and ERROR 1: Failed to compute polynomial equations of desired order
    [Gdaldev]用GCPs纠正影像的完整代码(多项式纠正)
    转:将 Oracle Spatial 与 Google Earth 集成
  • 原文地址:https://www.cnblogs.com/dongsheng/p/3656273.html
Copyright © 2020-2023  润新知