Internet Explorer 編程簡述(五)調用IE隱藏的命令(中文版)

 

關鍵字:Add To Favorite, Import/Export Wizard, Shell DocObject View, Internet Explorer_Server

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


2、契機
MSDN中有一篇叫“WebBrowser Customization”的文章,其中介紹了通過IDocHostUIHandler.ShowContextMenu方法自定義WebBrowser上下文菜單的方法。其原理是從“shdoclc.dll”的資源中創建菜單,作一些修改之後用TrackPopupMenu函數(注意在標誌中包含TPM_RETURNCMD)將菜單彈出,然後把返回的Command ID發送給“Internet Explorer_Server”窗口進行處理。
......
// 顯示菜單
int iSelection = ::TrackPopupMenu(hMenu,
  TPM_LEFTALIGN | TPM_RIGHTBUTTON | TPM_RETURNCMD,
  ppt->x,
  ppt->y,
  0,
  hwnd,
  (RECT*)NULL);
// 發送Command ID到外殼窗口
LRESULT lr = ::SendMessage(hwnd, WM_COMMAND, iSelection, NULL);
......

好,如果找到所有上下文菜單的Command ID,不就可以隨時調用了?確實是這樣的。


3、實現
用eXeScope之類應用程序資源探索器打開“shdoclc.dll”便可以在菜單資源下找到上下文菜單的設計,如下圖:

我們要做的,就是將這些ID發送到“Internet Explorer_Server”窗口進行處理。問題是WebBrowser其實是一個OLE容器,我們使用的CHtmlView又是更外層的封裝,他們的m_hWnd成員變量並不是IE窗口的句柄,如何找到我們需要的句柄呢?請看下面的圖:


根據圖中顯示的從屬關係,順藤摸瓜,最內層的窗口“Internet Explorer_Server”的句柄就是我們需要的東西。爲了簡化問題,我這裏使用了來自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);
  }
};

再寫一個函數InvokeIEServerCommand,調用就很方便了,《Internet Explorer 編程簡述(四)“添加到收藏夾”對話框》中最後給出的方法就是從這裏來的。

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);//調用“添加到收藏夾”對話框
}


4、Command IDs
對所有的Command ID逐一嘗試後我們發現:
1)不是所有的Command ID都可以用上面的方法調用;
2)不是所有的Command ID都是由“Internet Explorer_Server”窗口處理;
3)有一些Command ID是由上一級窗口“Shell DocObject View”處理。
所以我們還需要寫一個函數。

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 );
}

調用文章開頭提到的“導入/導出”對話框可以這樣來做:

void CDemoView::OnImportExport()
{
  InvokeShellDocObjCommand(ID_IE_FILE_IMPORTEXPORT);//調用“導入/導出”對話框
}

由"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)這個ID,在TEmbeddedWB中給出了一個當網頁刷新時觸發的OnRefresh事件,其中的關鍵代碼如下:
......
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是內置的刷新命令,那6041呢。見下圖,還是“shdoclc.dll”,6041原來是IE“查看”菜單下“刷新”菜單的命令ID。實際開發中我們發現直接調用WebBrowser的Refresh命令有時候會導致一些錯誤,可以用這裏的方法替換一下。


6、需要注意的問題
1)
用InvokeIEServerCommand(ID_IE_CONTEXTMENU_ADDFAV)調用“添加到收藏夾”對話框時需要注意的是,IE接收到ID_IE_CONTEXTMENU_ADDFAV命令時是對網頁中當前被選中的鏈接來執行“添加到收藏夾”操作的,如果沒有選中的鏈接,纔是將當前網頁添加到收藏夾。
2)新建IE窗口。這是瀏覽器編程中的難題之一,即從當前窗口新建一個Internet Explorer窗口,完全複製當前頁的內容(包括“前進”、“後退”的狀態),這可以通過InvokeShellDocObjCommand(ID_IE_FILE_NEWWINDOW)來實現。
3)顯示IE的版本信息。調用InvokeShellDocObjCommand(ID_IE_HELP_ABOUTIE),如下:

4)InvokeShellDocObjCommand(ID_IE_FILE_PRINT)調出的“打印”對話框是非模態的(我們不太清楚Microsoft的設計意圖,我認爲“打印”對話框應該是模態的),顯示模態窗口的方法請參加我的另一篇文章《利用WH_CBT Hook將非模態對話框顯示爲模態對話框

參考資料
MSDN:WebBrowser Customization

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章