如何显示/埋没IE欣赏器东西窗口

本文报告如安在措施中节制显示/埋没所有的IE欣赏器东西窗口，如“保藏”，“汗青”，“搜索”等左侧窗口。

实现流程：

在同一个时刻，系统中大概存在N个Shell窗口(包罗IE窗口和文件欣赏器窗口)，需要遍历每个Shell窗口并将文件欣赏器窗口解除(因为我们只对IE窗口举办处理惩罚)，然后再取得IWebBrowser2，挪用ShowBrowserBar函数，这个函数在MSDN中描写如下：

HRESULT ShowBrowserBar(VARIANT *pvaClsid,
　　VARIANT *pvarShow,
　　VARIANT *pvarSize
);

可重用代码如下(已颠末测试，无法编译者请查自身的问题或咨询ccrun)：

#pragma link "bcbie.lib"
#include "SHDocVw_OCX.h"
//---------------------------------------------------------------------------
void __fastcall MyShowIEBrowserBar(LPSTR lpCLSID, bool bShow)
{
　　Variant v1, v2, v3;
　　String strCLSID(lpCLSID);
　　v1 = strCLSID.c_str(); // 要显示/埋没的东西窗口CLSID
　　v2 = bShow; // 是否显示
　　v3 = 0; // 略
　　//---------------------------------------------------------------------------
　　// 歉仄，这个提示又来了，为了防备不认真任的转载者，只亏得此留些信息。
　　// by ccrun(老妖) [email protected]
　　// 接待会见 C++Builder研究 - http://www.ccrun.com
　　//---------------------------------------------------------------------------
　　TCppShellWindows *pShellWin = new TCppShellWindows(NULL);
　　// 遍历每个Shell窗口
　　for(int i=0; i<pShellWin->Count; i++)
　　{
　　　　IDispatch *pDisp = (IDispatch *)pShellWin->Item(Variant(i));
　　　　if(pDisp == NULL)
　　　　　　continue;
　　　　// 取得IWebBrowser2接口
　　　　IWebBrowser2 *pBrowser;
　　　　HRESULT hr = pDisp->QueryInterface(IID_IWebBrowser2, (void**)&pBrowser);
　　　　pDisp->Release();
　　　　if(SUCCEEDED(hr))
　　　　{
　　　　　　String strUrl = String(pBrowser->get_LocationURL()); // 获取欣赏器地点
　　　　　　if(strUrl.LowerCase().SubString(1, 5) == "file:") // 解除文件打点器
　　　　　　　　continue;
　　　　　　pBrowser->ShowBrowserBar(v1, v2, v3); // 显示或埋没欣赏东西窗口
　　　　}
　　}
　　delete pShellWin;
}
// MyShowIEBrowserBar("{EFA24E61-B078-11d0-89E4-00C04FC9E26E}", 1); // 显示保藏夹
// MyShowIEBrowserBar("{30D02401-6A81-11d0-8274-00C04FD5AE38}", 0); // 埋没搜索栏
其他IE东西窗口CLSID参考：
Favorites {EFA24E61-B078-11d0-89E4-00C04FC9E26E}
Folders　 {EFA24E64-B078-11d0-89E4-00C04FC9E26E}
History　 {EFA24E62-B078-11d0-89E4-00C04FC9E26E}
Search　　{30D02401-6A81-11d0-8274-00C04FD5AE38}