现在的位置: 首页 > 综合 > 正文

让WebBrowser控件响应键盘快捷键或者鼠标信息

2013年03月19日 ⁄ 综合 ⁄ 共 2302字 ⁄ 字号 评论关闭

通过SDK方式或者Atl方式添加的IE控件(WebBrowser控件)无法响应键盘的tab消息,这在输入表单的时候非常不方便,每次都需要鼠标点击输入框,我在网上看过一些文章,据说可以通过IE控件的IDocHostShowUI接口和IDocHostUIHandler2接口获取响应的消息,不过我试过这些方法,没成功~_~.于是采用了一种比较偏门的方法:挂钩键盘消息。

首先,设置键盘消息处理函数,该函数的功能是获取键盘的输入键信息,如果该键是tab键,并且是按下状态,则将该消息发送给IE控件的快捷键处理函数进行快捷键处理,同样的,为了能通过回车键提交html表单,判断输入键是回车键,并且是按键释放时,将该消息发送给IE控件的快捷键处理函数进行快捷键处理。

 

先声明一个全局的HHOOK句柄

HHOOK h_Keyboard;

消息处理函数如下:

LRESULT CALLBACK KeyboardProc(  
    int code,       // hook code  
    WPARAM wParam,  // virtual-key code  
    LPARAM lParam   // keystroke-message information  
    )  
{  
    if(wParam==VK_TAB  && GetKeyState(wParam)< 0)  
    {  
        //按下tab键
        //::MessageBox(NULL, _T("TAB"), _T(""), 0);
        //以下是获取浏览器对象并像对象发送快捷键的代码,我这里的m_wndIE是AxWindow类型,如果直接用SDK创建IE控件的话,前面的代码有所不同,但后面的获取接口的方式是一致的
        CWebWindow* pWebWindow = g_webWindow; 
        MSG msg;
        msg.hwnd = pWebWindow->m_wndIE.m_hWnd;
        msg.message = WM_KEYDOWN;
        msg.lParam = lParam;
        msg.wParam = wParam;
        HRESULT hr = S_OK;
        IWebBrowser2Ptr browser;
        hr = pWebWindow->m_wndIE.QueryControl(__uuidof(IWebBrowser2), (void**)&browser);
        ATLASSERT(SUCCEEDED(hr));
        CComPtr<IDispatch> disp;
        hr = browser->get_Document(&disp);
        ATLASSERT(SUCCEEDED(hr)); 
        //CComPtr<IHTMLDocument2> doc;
        CComQIPtr<IOleInPlaceActiveObject> spInPlace;  
        hr = disp->QueryInterface(__uuidof(IOleInPlaceActiveObject), (void**)&spInPlace);
        ATLASSERT(SUCCEEDED(hr));
        if (spInPlace)  
            bool bRet = (spInPlace->TranslateAccelerator(&msg) == S_OK) ? TRUE : FALSE;  
    }  
    else if (wParam ==  VK_RETURN && GetKeyState(wParam)> 0)
    {
        ///释放回车键
        //::MessageBox(NULL, _T("ENTER"), _T(""), 0);
        ////以下是获取浏览器对象并像对象发送快捷键的代码,我这里的m_wndIE是AxWindow类型,如果直接用SDK创建IE控件的话,前面的代码有所不同,但后面的获取接口的方式是一致的
        CWebWindow* pWebWindow = g_webWindow;
        MSG msg;
        msg.hwnd = pWebWindow->m_wndIE.m_hWnd;
        msg.message = WM_KEYUP;
        msg.lParam = lParam;
        msg.wParam = wParam;
        HRESULT hr = S_OK;
        IWebBrowser2Ptr browser;
        hr = pWebWindow->m_wndIE.QueryControl(__uuidof(IWebBrowser2), (void**)&browser);
        ATLASSERT(SUCCEEDED(hr));
        CComPtr<IDispatch> disp;
        hr = browser->get_Document(&disp);
        ATLASSERT(SUCCEEDED(hr)); 
        //CComPtr<IHTMLDocument2> doc;
        CComQIPtr<IOleInPlaceActiveObject> spInPlace;  
        hr = disp->QueryInterface(__uuidof(IOleInPlaceActiveObject), (void**)&spInPlace);
        ATLASSERT(SUCCEEDED(hr));
        if (spInPlace)  
            bool bRet = (spInPlace->TranslateAccelerator(&msg) == S_OK) ? TRUE : FALSE; 
    }
    //返回非0值,表示我们已处理此键盘消息了  
    return CallNextHookEx(h_Keyboard,code,wParam,lParam); 
}  

 

然后,就是设置挂钩函数,这个放在主函数的初始化部分:

h_Keyboard=SetWindowsHookEx(WH_KEYBOARD,KeyboardProc,hInstance,0);  

最后,释放挂钩,这个放在主函数的退出之前:

UnhookWindowsHookEx(h_Keyboard);

 

抱歉!评论已关闭.