1、概述
除了“整理收藏夾”和“添加到收藏夾”對(duì)話框外,還有其它一些對(duì)話框是我們希望直接通過(guò)WebBrowser調(diào)用的,
比如“導(dǎo)入/導(dǎo)出”對(duì)話框,用一般的方法很難調(diào)用。IShellUIHelper盡管提供了ImportExportFavorites方法,但結(jié)果只是
顯示一個(gè)選擇文件的對(duì)話框,且只能導(dǎo)入/導(dǎo)出收藏夾而不能對(duì)Cookies操作。

2、契機(jī)
MSDN中有一篇叫“WebBrowser Customization”的文章,其中介紹了通過(guò)IDocHostUIHandler.ShowContextMenu方法自定義WebBrowser上下文菜單的方法。
其
原理是從“shdoclc.dll”的資源中創(chuàng)建菜單,作一些修改之后用TrackPopupMenu函數(shù)(注意在標(biāo)志中包含
TPM_RETURNCMD)將菜單彈出,然后把返回的Command ID發(fā)送給“Internet Explorer_Server”窗口進(jìn)行處理。
|
...... // 顯示菜單 int iSelection = ::TrackPopupMenu(hMenu, TPM_LEFTALIGN | TPM_RIGHTBUTTON | TPM_RETURNCMD, ppt->x, ppt->y, 0, hwnd, (RECT*)NULL); // 發(fā)送Command ID到外殼窗口 LRESULT lr = ::SendMessage(hwnd, WM_COMMAND, iSelection, NULL); ...... |
好,如果找到所有上下文菜單的Command ID,不就可以隨時(shí)調(diào)用了?確實(shí)是這樣的。
3、實(shí)現(xiàn)
用eXeScope之類應(yīng)用程序資源探索器打開(kāi)“shdoclc.dll”便可以在菜單資源下找到上下文菜單的設(shè)計(jì),如下圖:

我們要做的,就是將這些ID發(fā)送到“Internet
Explorer_Server”窗口進(jìn)行處理。問(wèn)題是WebBrowser其實(shí)是一個(gè)OLE容器,我們使用的CHtmlView又是更外層的封裝,他們
的m_hWnd成員變量并不是IE窗口的句柄,如何找到我們需要的句柄呢?請(qǐng)看下面的圖:

根據(jù)圖中顯示的從屬關(guān)系,順藤摸瓜,最內(nèi)層的窗口“Internet Explorer_Server”的句柄就是我們需要的東西。為了簡(jiǎn)化問(wèn)題,我這里使用了來(lái)自MSDN Magazine資深專欄撰稿人Paul Dilascia的CFindWnd類,非常好用。
|
//////////////////////////////////////////////////////////////// // MSDN Magazine -- August 2003 // If this code works, it was written by Paul DiLascia. // If not, I don't know who wrote it. // Compiles with Visual Studio .NET on Windows XP. Tab size=3. // // --- // This class encapsulates the process of finding a window with a given class name // as a descendant of a given window. To use it, instantiate like so: // // CFindWnd fw(hwndParent,classname); // // fw.m_hWnd will be the HWND of the desired window, if found. // class CFindWnd { private: ////////////////// // This private function is used with EnumChildWindows to find the child // with a given class name. Returns FALSE if found (to stop enumerating). // static BOOL CALLBACK FindChildClassHwnd(HWND hwndParent, LPARAM lParam) { CFindWnd *pfw = (CFindWnd*)lParam; HWND hwnd = FindWindowEx(hwndParent, NULL, pfw->m_classname, NULL); if (hwnd) { pfw->m_hWnd = hwnd; // found: save it return FALSE; // stop enumerating } EnumChildWindows(hwndParent, FindChildClassHwnd, lParam); // recurse return TRUE; // keep looking } public: LPCSTR m_classname; // class name to look for HWND m_hWnd; // HWND if found // ctor does the work--just instantiate and go CFindWnd(HWND hwndParent, LPCSTR classname) : m_hWnd(NULL), m_classname(classname) { FindChildClassHwnd(hwndParent, (LPARAM)this); } }; |
再寫一個(gè)函數(shù)InvokeIEServerCommand,調(diào)用就很方便了,《Internet Explorer 編程簡(jiǎn)述(四)“添加到收藏夾”對(duì)話框》中最后給出的方法就是從這里來(lái)的。
|
void CMyHtmlView::InvokeIEServerCommand(int nID) { CFindWnd FindIEWnd( m_wndBrowser.m_hWnd, "Internet Explorer_Server"); ::SendMessage( FindIEWnd.m_hWnd, WM_COMMAND, MAKEWPARAM(LOWORD(nID), 0x0), 0 ); } |
void CMyHtmlView::OnFavAddtofav()
{
InvokeIEServerCommand(ID_IE_CONTEXTMENU_ADDFAV);//調(diào)用“添加到收藏夾”對(duì)話框
}
4、Command IDs
對(duì)所有的Command ID逐一嘗試后我們發(fā)現(xiàn):
1)不是所有的Command ID都可以用上面的方法調(diào)用;
2)不是所有的Command ID都是由“Internet Explorer_Server”窗口處理;
3)有一些Command ID是由上一級(jí)窗口“Shell DocObject View”處理。
所以我們還需要寫一個(gè)函數(shù)。
|
void CMyHtmlView::InvokeShellDocObjCommand(int nID) { CFindWnd FindIEWnd( m_wndBrowser.m_hWnd, "Shell DocObject View"); ::SendMessage( FindIEWnd.m_hWnd, WM_COMMAND, MAKEWPARAM(LOWORD(nID), 0x0), 0 ); } |
調(diào)用文章開(kāi)頭提到的“導(dǎo)入/導(dǎo)出”對(duì)話框可以這樣來(lái)做:
|
void CDemoView::OnImportExport() { InvokeShellDocObjCommand(ID_IE_FILE_IMPORTEXPORT);//調(diào)用“導(dǎo)入/導(dǎo)出”對(duì)話框 }
由"Internet Explorer_Server"窗口處理的Command ID: #define ID_IE_CONTEXTMENU_ADDFAV 2261 #define ID_IE_CONTEXTMENU_VIEWSOURCE 2139 #define ID_IE_CONTEXTMENU_REFRESH 6042
由"Shell DocObject View"窗口處理的Command ID: #define ID_IE_FILE_SAVEAS 258 #define ID_IE_FILE_PAGESETUP 259 #define ID_IE_FILE_PRINT 260 #define ID_IE_FILE_NEWWINDOW 275 #define ID_IE_FILE_PRINTPREVIEW 277 #define ID_IE_FILE_NEWMAIL 279 #define ID_IE_FILE_SENDDESKTOPSHORTCUT 284 #define ID_IE_HELP_ABOUTIE 336 #define ID_IE_HELP_HELPINDEX 337 #define ID_IE_HELP_WEBTUTORIAL 338 #define ID_IE_HELP_FREESTUFF 341 #define ID_IE_HELP_PRODUCTUPDATE 342 #define ID_IE_HELP_FAQ 343 #define ID_IE_HELP_ONLINESUPPORT 344 #define ID_IE_HELP_FEEDBACK 345 #define ID_IE_HELP_BESTPAGE 346 #define ID_IE_HELP_SEARCHWEB 347 #define ID_IE_HELP_MSHOME 348 #define ID_IE_HELP_VISITINTERNET 349 #define ID_IE_HELP_STARTPAGE 350 #define ID_IE_FILE_IMPORTEXPORT 374 #define ID_IE_FILE_ADDTRUST 376 #define ID_IE_FILE_ADDLOCAL 377 #define ID_IE_FILE_NEWPUBLISHINFO 387 #define ID_IE_FILE_NEWCORRESPONDENT 390 #define ID_IE_FILE_NEWCALL 395 #define ID_IE_HELP_NETSCAPEUSER 351 #define ID_IE_HELP_ENHANCEDSECURITY 375
|
5、Refresh
熟悉TEmbeddedWB的讀者可能注意到了ID_IE_CONTEXTMENU_REFRESH(6042)這個(gè)ID,在TEmbeddedWB中給出了一個(gè)當(dāng)網(wǎng)頁(yè)刷新時(shí)觸發(fā)的OnRefresh事件,其中的關(guān)鍵代碼如下:
|
...... if Assigned(FOnRefresh) and ((nCmdID = 6041 { F5}) or (nCmdID = 6042 { ContextMenu}) or (nCmdID = 2300)) then begin FCancel := False; FOnRefresh(self, nCmdID, FCancel); if FCancel then Result := S_OK; end; ...... |
其中的6402就是我們這里的ID_IE_CONTEXTMENU_REFRESH,2300是內(nèi)置的刷新命令,那6041呢。見(jiàn)下圖,還是
“shdoclc.dll”,6041原來(lái)是IE“查看”菜單下“刷新”菜單的命令I(lǐng)D。實(shí)際開(kāi)發(fā)中我們發(fā)現(xiàn)直接調(diào)用WebBrowser的
Refresh命令有時(shí)候會(huì)導(dǎo)致一些錯(cuò)誤,可以用這里的方法替換一下。

6、需要注意的問(wèn)題
1)用InvokeIEServerCommand
(ID_IE_CONTEXTMENU_ADDFAV)調(diào)用“添加到收藏夾”對(duì)話框時(shí)需要注意的是,IE接收到
ID_IE_CONTEXTMENU_ADDFAV命令時(shí)是對(duì)網(wǎng)頁(yè)中當(dāng)前被選中的鏈接來(lái)執(zhí)行“添加到收藏夾”操作的,如果沒(méi)有選中的鏈接,才是將當(dāng)前網(wǎng)頁(yè)
添加到收藏夾。
2)新建IE窗口。這是瀏覽器編程中的難題之一,即從當(dāng)前窗口新建一個(gè)Internet
Explorer窗口,完全復(fù)制當(dāng)前頁(yè)的內(nèi)容(包括“前進(jìn)”、“后退”的狀態(tài)),這可以通過(guò)InvokeShellDocObjCommand
(ID_IE_FILE_NEWWINDOW)來(lái)實(shí)現(xiàn)。
3)顯示IE的版本信息。調(diào)用InvokeShellDocObjCommand(ID_IE_HELP_ABOUTIE),如下:

4)InvokeShellDocObjCommand(ID_IE_FILE_PRINT)調(diào)出的“打印”對(duì)話框是非模態(tài)的(我們不太清楚
Microsoft的設(shè)計(jì)意圖,我認(rèn)為“打印”對(duì)話框應(yīng)該是模態(tài)的),顯示模態(tài)窗口的方法請(qǐng)參考我的另一篇文章《利用WH_CBT
Hook將非模態(tài)對(duì)話框顯示為模態(tài)對(duì)話框》