以上两个方案，都有严重的缺陷，怎么解决那？如果能有一个新方案，能够合并前两个方案的优点，消灭缺点，该多好呀......微软是作磁盘***作系统起家的，于是很自然地他们提出了一个非常完美的设计方案，那就是把磁盘文件的管理方式移植到文件中了------复合文件，俗称“文件中的文件系统”。连微软当年都没有想到，就这么一个简单的想法，居然最后就演变出了 COM 组件程序设计的方法。可以说，复合文件是 COM 的基石。下图是磁盘文件组织方式与复合文件组织方式的类比图：

图一、左侧表示一个磁盘下的文件组织方式，右侧表示一个复合文件内部的数据组织方式。

三、复合文件的特点

1. 复合文件的内部是使用指针构造的一棵树进行管理的。编写程序的时候要注意，由于使用的是单向指针，因此当做定位***作的时候，向后定位比向前定位要快；
2. 复合文件中的“流对象”，是真正保存数据的空间。它的存储单位为512字节。也就是说，即使你在流中只保存了一个字节的数据，它也要占据512字节的文件空间。啊~~~，这也太浪费了呀？不浪费！因为文件保存在磁盘上，即使一个字节也还要占用一个“簇”的空间那；
3. 不同的进程，或同一个进程的不同线程可以同时访问一个复合文件的不同部分而互不干扰；
4. 大家都有这样的体会，当需要往一个文件中插入一个字节的话，需要对整个文件进行***作，非常烦琐并且效率低下。而复合文件则提供了非常方便的“增量访问”能力；
5. 当频繁地删除文件，复制文件后，磁盘空间会变的很零碎，需要使用磁盘整理工具进行重新整合。和磁盘管理非常相似，复合文件也会产生这个问题，在适当的时候也需要整理，但比较简单，只要调用一个函数就可以完成了。

四、浏览复合文件

　　VC6.0 附带了一个工具软件“复合文件浏览器”，文件名是“vc目录\Common\Tools\DFView.exe”。为了方便使用该程序，可以把它加到工具(tools)菜单中。方法是：Tools\Customize...\Tools卡片中增加新的项目。运行 DFView.exe，就可以打开一个复合文件进行观察了（注4）。但奇怪的是，在 Microsoft Visual Studio .NET 2003 中，我反而找不到这个工具程序了,汗！不过这恰好提供给大家一个练习的机会，在你阅读完本篇文章并掌握了编程方法后，自己写一个“复合文件浏览编辑器”程序，又练手了，还有实用的价值。

五、复合文件函数

　　复合文件的函数和磁盘目录文件的***作非常类似。所有这些函数，被分为3种类型：WIN API 全局函数，存储 IStorage 接口函数，流 IStream 接口函数。什么是接口？什么是接口函数？以后的文章中再陆续介绍，这里大家只要把“接口”看成是完成一组相关***作功能的函数集合就可以了。
　

为了让大家快速地浏览和掌握基本方法，上面所列表的函数并不是全部，我省略了“事务”函数和未实现函数部分。更全面的介绍，请阅读 MSDN。
    下面程序片段，演示了一些基本函数功能和调用方法。 
示例一：建立一个复合文件，并在其下建立一个子存储，在该子存储中再建立一个流，写入数据。

void SampleCreateDoc()
{
	::CoInitialize(NULL);	// COM 初始化
				// 如果是MFC程序，可以使用AfxOleInit()替代

	HRESULT hr;		// 函数执行返回值
	IStorage *pStg = NULL;	// 根存储接口指针
	IStorage *pSub = NULL;	// 子存储接口指针
	IStream *pStm = NULL;	// 流接口指针

	hr = ::StgCreateDocfile(	// 建立复合文件
		L"c:\\a.stg",	// 文件名称
		STGM_CREATE | STGM_WRITE | STGM_SHARE_EXCLUSIVE,	// 打开方式
		0,		// 保留参数
		&pStg);		// 取得根存储接口指针
	ASSERT( SUCCEEDED(hr) );	// 为了突出重点，简化程序结构，所以使用了断言。
				// 在实际的程序中则要使用条件判断和异常处理

	hr = pStg->CreateStorage(	// 建立子存储
		L"SubStg",	// 子存储名称
		STGM_CREATE | STGM_WRITE | STGM_SHARE_EXCLUSIVE,
		0,0,
		&pSub);		// 取得子存储接口指针
	ASSERT( SUCCEEDED(hr) );

	hr = pSub->CreateStream(	// 建立流
		L"Stm",		// 流名称
		STGM_CREATE | STGM_WRITE | STGM_SHARE_EXCLUSIVE,
		0,0,
		&pStm);		// 取得流接口指针
	ASSERT( SUCCEEDED(hr) );

	hr = pStm->Write(		// 向流中写入数据
		"Hello",		// 数据地址
		5,		// 字节长度(注意，没有写入字符串结尾的\0)
		NULL);		// 不需要得到实际写入的字节长度
	ASSERT( SUCCEEDED(hr) );

	if( pStm )	pStm->Release();// 释放流指针
	if( pSub )	pSub->Release();// 释放子存储指针
	if( pStg )	pStg->Release();// 释放根存储指针

	::CoUninitialize()		// COM 释放
				// 如果使用 AfxOleInit(),则不调用该函数
}

＃i nclude 	// ANSI、MBCS、UNICODE 转换

void SampleEnum() 
{	// 假设你已经做过 COM 初始化了

	LPCTSTR lpFileName = _T( "c:\\a.stg" );
	HRESULT hr;
	IStorage *pStg = NULL;
	
	USES_CONVERSION;				// （注6）
	LPCOLESTR lpwFileName = T2COLE( lpFileName );	// 转换T类型为宽字符
	hr = ::StgIsStorageFile( lpwFileName );	// 是复合文件吗？
	if( FAILED(hr) )	return;

	hr = ::StgOpenStorage(			// 打开复合文件
		lpwFileName,			// 文件名称
		NULL,
		STGM_READ | STGM_SHARE_DENY_WRITE,
		0,
		0,
		&pStg);				// 得到根存储接口指针

	IEnumSTATSTG *pEnum=NULL;	// 枚举器
	hr = pStg->EnumElements( 0, NULL, 0, &pEnum );
	ASSERT( SUCCEEDED(hr) );

	STATSTG statstg;
	while( NOERROR == pEnum->Next( 1, &statstg, NULL) )
	{
		// statstg.type 保存着对象类型 STGTY_STREAM 或 STGTY_STORAGE
		// statstg.pwcsName 保存着对象名称
		// ...... 还有时间，长度等很多信息。请查看 MSDN

		::CoTaskMemFree( statstg.pwcsName );	// 释放名称所使用的内存（注6）
	}
	
	if( pEnum )	pEnum->Release();
	if( pStg )	pStg->Release();
}

Revision History:

Version Date Creator Description
 

Implementation Scope：

继续阅读之前，我们假设您熟悉以下知识：

• SAFEARRAY
• ISTREAM
• Microsoft MSMQ

目录：

1:概述

2:借用SAFEARRAY打包把结构写入MSMQ队列

3:借用IStream流打包传递数据到MSMQ队列

1.概述

通常我们建议通过MSMQ传递基于XML的字符串，但有时候也需要传递一些结构或者一些接口指针，那么如何打包传递呢？

这实际上可以转换为一个普适问题：

如何把一个结构体(structure object)或者巨大内存块（比如5MB左右）打包为PROPVARIANT-compatible的类型？

首先，IMSMQMessagePtr的Body属性接收_variant_t参数:

inline void IMSMQMessage::PutBody ( const _variant_t & pvarBody ) {

    HRESULT _hr = put_Body(pvarBody);

    if (FAILED(_hr)) _com_issue_errorex(_hr, this, __uuidof(this));

}

如果我们想把结构作为消息的Body写入MSMQ消息队列，我们需要把我们的结构、大内存块或接口指针转换为_variant_t。

2.借用SAFEARRAY打包把结构写入MSMQ队列

把一个结构体打包为PROPVARIANT-compatible的类型，需要用到SAFEARRAY，一个带有边界信息的数组。这是一个常用技巧，很多文章都有提及，我就不多解释了。

但是，注意这种方式一次只能打包65536字节以下的数据，这是由于

SAFEARRAY* SafeArrayCreateVector(

  VARTYPE      vt,            

  long          lLbound,          

  unsigned int  cElements);

的定义所限制的。

我们通常会用SafeArrayCreateVector API创建一个单维SAFEARRAY，分配一个sizeof(_DATA)大小的连续内存块，而这个函数的第三个参数是一个unsigned int类型，所以最大值就只能是65536了。

更多SAFEARRAY知识，参见使用SAFEARRAY传递对象。

 
2.借用SAFEARRAY打包把结构写入MSMQ队列

续上1.1篇的打包步骤（VC++代码）：

// ChangeStruct2Var函数的定义：

// 第一个参数：

//   类型：CComVariant

//   作用：接收者

// 第二个参数：

//   类型：_DATA*

//   作用：源

HRESULT ChangeStruct2Variant (CComVariant &var, _DATA *pData)

{

HRESULT hr = S_OK;

// 使用SafeArrayCreateVector API创建一个单维SAFEARRAY，分配一个sizeof(_DATA)大小的连续内存块

// VT--UI1代表非负整形的变量类型，1个字节

// 常数'0'定义数组的下界

LPSAFEARRAY lpsa = SafeArrayCreateVector(VT_UI1, 0, sizeof(_DATA));

LPBYTE pbData = NULL;

if (lpsa)

{

     //在你访问SAFEARRAY数据之前，你必须调用SafeArrayAccessData。该函数锁定数据并且返回一个指针。在这里，锁定数组意味着增加该数组的内部计数器（cLocks）

    hr = SafeArrayAccessData(lpsa, (void **)&pbData);

}

else

    hr = HRESULT_FROM_WIN32(GetLastError());

if (SUCCEEDED(hr))

{

     // 使用safe array：

     // 将传入的_DATA指针指向的内存复制到pbData

    CopyMemory(pbData, pData, sizeof(*pData));

// 设置var的类型为数组

    var.vt = VT_ARRAYVT_UI1;

// 将var和我们的单维SAFEARRAY拉上关系：

    var.parray = lpsa;

}

if (pbData)

{

     //相应用来释放数据的函数是SafeArrayUnaccessData()，该功能释放该参数的计数。

    SafeArrayUnaccessData(var.parray);

}

if (FAILED(hr))

{

     // 销毁SAFEARRAY

    SafeArrayDestroy(lpsa);

}

return hr;

}

////////////////////////////////////////////////////////////

//Added Headers:

////////////////////////////////////////////////////////////

#include <comdef.h>

#include <atlbase.h>

///////////////////////////////////////////////////////////

//Added for MSMQ:

///////////////////////////////////////////////////////////

#import "mqoa.dll" no_namespace, named_guids

typedef    struct  _DATA 

{ 

       int    _n; 

       char   _str;

}_DATA;

//main:

{

.. ..

.. ..

IMSMQMessagePtr pisMsg = NULL;

hr = pisMsg.CreateInstance("MSMQ.MSMQMessage");

_DATA msg;

msg._n = 1;

msg._str = '1';

CComVariant var;

// 打包函数：

ChangeStruct2Variant(var, &msg);

// 打包后的CComVariant传递给MSMQMessege的Body属性：

pisMsg->Body= var;

pisMsg->AppSpecific=-1;

// 发送到消息队列：

pisMsg->Send(pisQueue);

.. ..

}
 

这样，就可以成功地把一个结构递交到MSMQ队列中了。

Implementation Scope：
继续阅读之前，我们假设您熟悉以下知识：

• SAFEARRAY
• ISTREAM
• Microsoft MSMQ

目录：

1:概述

2:借用SAFEARRAY打包把结构写入MSMQ队列

3:借用IStream流打包传递数据到MSMQ队列

下面给出读取MSMQ消息时解析的步骤（VC++代码）：

////////////////////////////////////////////////////////////

//Added Headers:

////////////////////////////////////////////////////////////

#include <comdef.h>

#include <atlbase.h>

///////////////////////////////////////////////////////////

//Added for MSMQ:

///////////////////////////////////////////////////////////

#import "mqoa.dll" no_namespace, named_guids

typedef    struct  _DATA 

{ 

       int    _n; 

       char   _str;

}_DATA;

//main:

{

.. ..

.. ..

hr = pisQI->raw_Open(MQ_PEEK_ACCESS,MQ_DENY_NONE,&pisQueue);

IMSMQMessagePtr piMessage;

// 获取MSMQ队列中的一个消息：

piMessage = pisQueue->PeekCurrent();

_DATA *msg = new _DATA();

// 解析函数：

ChangeVariant2Struct(CComVariant(piMessage->Body), msg);

.. ..

}

// ChangeVariant2Struct函数的定义：

// 第一个参数：

//   类型：CComVariant

//   作用：源

// 第二个参数：

//   类型：_DATA*

//   作用：接收者

HRESULT ChangeVariant2Struct (CComVariant &var, _DATA *DP)

{

SAFEARRAY* psa;

BYTE HUGEP *lpb;

psa = var.parray;

SafeArrayAccessData(psa, (void HUGEP **)&lpb);

CopyMemory((LPVOID)DP, (LPVOID)lpb, 8);

SafeArrayUnaccessData(psa);

return S_OK;

}
 

Writen by zhengyun.NoJunk(at)tomosoft.dot.com

Disclaimers：
 

本文档仅供参考。本文档所包含的信息代表了在发布之日，zhengyun对所讨论问题的当前看法，zhengyun不保证所给信息在发布之日以后的准确性。

用户应清楚本文档的准确性及其使用可能带来的全部风险。可以复制和传播本文档，但须遵守以下条款：

复制时不得修改原文，复制内容须包含所有页 ；
所有副本均须含有 zhengyun的版权声明以及所提供的其它声明 ；

Implementation Scope：
继续阅读之前，我们假设您熟悉以下知识：

• SAFEARRAY
• ISTREAM
• Microsoft MSMQ

目录：

1:概述

2:借用SAFEARRAY打包把结构写入MSMQ队列

3:借用IStream流打包传递数据到MSMQ队列

3.借用IStream流传递数据
正如前面所述，当你有一块非常巨大的数据要传递给MSMQ队列时，而且你希望一次液压成型，那么把它打包入IStream流，也是一个很常用技巧，了解COM的人都知道，我也不多解释了。

我们研究了ATL中IPersistMemoryImpl接口Load方法的实现机理，来做我们的事情：

// 函数名：LoadStreamOnHugeMemory

// 功能：  同上

// 第一个参数pvMem指向一块要打包的内存，第二个参数指明这块内存的大小

HRESULT LoadStreamOnHugeMemory(void pvMem, ULONG cbSize)

{

     // Get Memory Handle:

     HGLOBAL h = GlobalAlloc(GMEM_MOVEABLE, cbSize);

     If(NULL == h) return E_OUTOFMEMORY;

     LPVOID pv = GlobalLock(h);

     If(!pv) return E_OUTOFMEMORY;

     // Copy to memory block

     CopyMemory(pv, pvMem, cbSize);

     CComPtr<IStream> spStream;

     // Create stream on Memory:

     HRESULT hr = CreateStreamOHGlobal(h, TRUE, &spStream);

     If(FAILED(hr))

     {

          GlobalUnlock(h);

          GlobalFree(h);

          return hr;

     }

     // stream now owns the memory

// unlock the data

GlobalUnlock(hGlobal);

// Create a stream holder. Load the stream holder from the global stream.

//  THIS STREAM HOLDER IS INTERITED FROM IPersistStream

//  And all virtual functions are Modified to handle the object....

CComPtr <IStreamHolder> pHolder = new CComObject <CStreamHolder>;

CComPtr <IPersistStream> pHolderStream;

hr = pHolder->QueryInterface (IID_IPersistStream, (void **)&pHolderStream);

pStream->Seek( zero, STREAM_SEEK_SET, NULL );

pHolderStream->Load(pStream);

CComVariant vComData = pHolder;

.. ..

//

// now, you have a big chunk of memory loaded into a ComVariant

//

// 现在你可以把打包后的CComVariant传递给MSMQMessege的Body属性了：

pisMsg->Body = vComData;

.. ..

}
 

其实，Aydin的实现和ATL中IPersistMemoryImpl接口Load方法实现异曲同工。我们不妨换一种方式实现。

Writen by zhengyun.NoJunk(at)tomosoft.dot.com

Disclaimers：
本文档仅供参考。本文档所包含的信息代表了在发布之日，zhengyun对所讨论问题的当前看法，zhengyun不保证所给信息在发布之日以后的准确性。

用户应清楚本文档的准确性及其使用可能带来的全部风险。可以复制和传播本文档，但须遵守以下条款：

复制时不得修改原文，复制内容须包含所有页 ；
所有副本均须含有 zhengyun的版权声明以及所提供的其它声明 ；
不得以赢利为目的对本文档进行传播 。

Implementation Scope：
继续阅读之前，我们假设您熟悉以下知识：

• SAFEARRAY
• ISTREAM
• Microsoft MSMQ

目录：

1:概述

2:借用SAFEARRAY打包把结构写入MSMQ队列

3:借用IStream流打包传递数据到MSMQ队列

其实，Aydin的实现和ATL中IPersistMemoryImpl接口Load方法实现异曲同工。我们不妨换一种方式实现。

Aydin给出的VC++代码是：

// 智能流指针

CComPtr<IStream> pStream = NULL;

LARGE_INTEGER zero = {0,0};

// hGlobal是内存句柄：

LPBYTE pChunk = (BYTE *) GlobalLock(hGlobal);

// 创建一个空的stream：

HRESULT hr = CreateStreamOnHGlobal(NULL, TRUE, &pStream );

pStream->Seek( zero, STREAM_SEEK_SET, NULL );

ULONG pcbWritten = 0;

// pChunk现在已经指向我们的巨大内存块；

// 我们把这块内存写入IStream流中：

pStream->Write (pChunk, dwNumRead, &pcbWritten);

// 检查是否全部写入了：

ATLASSERT(pcbWritten==dwNumRead);

// unlock the data

GlobalUnlock(hGlobal);

// 剩下的一样，也是让CComPtr <IPersistStream>来调用Load方法加载IStream

// Create a stream holder. Load the stream holder from the global stream.

//  THIS STREAM HOLDER IS INTERITED FROM IPersistStream

//  And all virtual functions are Modified to handle the object....

CComPtr <IStreamHolder> pHolder = new CComObject <CStreamHolder>;

CComPtr <IPersistStream> pHolderStream;

hr = pHolder->QueryInterface (IID_IPersistStream, (void **)&pHolderStream);

pStream->Seek( zero, STREAM_SEEK_SET, NULL );

pHolderStream->Load(pStream);

CComVariant vComData = pHolder;

.. ..

//

// now, you have a big chunk of memory loaded into a ComVariant

//

// 现在你可以把打包后的CComVariant传递给MSMQMessege的Body属性了：

pisMsg->Body = vComData;

.. ..

//Coder: Aydin T.BAKIR
 

 全文完。

Writen by zhengyun.NoJunk(at)tomosoft.dot.com

Disclaimers：
 

本文档仅供参考。本文档所包含的信息代表了在发布之日，zhengyun对所讨论问题的当前看法，zhengyun不保证所给信息在发布之日以后的准确性。

用户应清楚本文档的准确性及其使用可能带来的全部风险。可以复制和传播本文档，但须遵守以下条款：

复制时不得修改原文，复制内容须包含所有页 ；
所有副本均须含有 zhengyun的版权声明以及所提供的其它声明 ；
不得以赢利为目的对本文档进行传播 。

Windows区对象(Bands)的创建与定制
编译/赵湘宁

本文例子代码

图二 为了创建定制的浏览栏，必须编程实现，然后注册它们。Windows在外壳（Shell）4.71中引入了区对象。它提供与普通窗口一样的功能。但因为它是以IE或外壳为容器的COM对象，所以实现起来就与普通窗口有所不同。图一中显示的就是一个简单的浏览栏例子。图中有一个垂直的浏览栏和一个水平的浏览栏。 工具栏区对象 工具栏区对象简称工具栏，它是在IE5.0中引入用以支持单选工具栏（radio toolbar）特性的。IE工具栏实际上是一个Rebar控件，它包含了几个工具栏（toolbar）控件。通过创建工具栏，你可以将某个区对象功能添加到Rebar控件中。不论是在IE中还是在资源管理器中，区对象都是一样的，所以工具栏也是一个通用窗口。（如图三） 图三 用户可以从“查看”菜单中的“工具栏”子菜单中选择显示单选工具栏，也可以在工具栏区域单击鼠标右键从它的上下文菜单中选择显示单选工具栏。 桌面区对象 区对象也可以用在桌面，也就是创建桌面区对象。虽然它们的基本实现与浏览栏类似，但桌面区与IE没有关系，它不用IE作为容器。它主要用来创建桌面浮动窗口。通过在任务栏上单击右键，然后在弹出的菜单中选择“工具栏”的子菜单选项。（如图四） 图四 桌面区的初始浮动位置在任务栏：（如图五 图五 用户可以将桌面区拖到桌面上，这时它就成了一个普通窗口：（如图六） 图六

HKEY_CLASSES_ROOT
                        ...
                        CLSID
                        ...
                        {Band 对象的 CLSID GUID} = "菜单文本串"
                        InProcServer32 = "DLL 路径名"
                        ThreadingModel = "Apartment"

HKEY_LOCAL_MACHINE
                        Software
                        Microsoft
                        Internet Explorer
                        Toolbar
                        { Band 对象的 CLSID GUID }

HKEY_CLASSES_ROOT
                        ...
                        CLSID
                        ...
                        {Band 对象的 CLSID GUID} = "菜单文本串"
                        InProcServer32 = "DLL 路径名"
                        ThreadingModel = "Apartment"
                        Instance
                        CLSID = "{4D5C8C2A-D075-11D0-B416-00C04FB90376}"
                        InitPropertyBag
                        Url = "HTML文件"
                        ...
                        HKEY_CURRENT_USER
                        ...
                        Software
                        ...
                        Microsoft
                        ...
                        Internet Explorer
                        ...
                        Explorer Bars
                        { Band 对象的 CLSID GUID }
                        BarSize = "23,01,00,00,00,00,00,00"

...
                        //注册浏览栏对象
                        if(!RegisterServer(CLSID_SampleExplorerBar, TEXT("垂直浏览栏例子")))
                        return SELFREG_E_CLASS;
                        //注册浏览栏的对象组件种类
                        if(!RegisterComCat(CLSID_SampleExplorerBar, CATID_InfoBand))
                        return SELFREG_E_CLASS;
                        ...

BOOL RegisterComCat(CLSID clsid, CATID CatID)
                        {
                        ICatRegister   *pcr;
                        HRESULT        hr = S_OK ;
                        CoInitialize(NULL);
                        hr = CoCreateInstance(  CLSID_StdComponentCategoriesMgr,
                        NULL,
                        CLSCTX_INPROC_SERVER,
                        IID_ICatRegister,
                        (LPVOID*)&pcr);
                        if(SUCCEEDED(hr))
                        {
                        hr = pcr->RegisterClassImplCategories(clsid, 1, &CatID);
                        pcr->Release();
                        }
                        CoUninitialize();
                        return SUCCEEDED(hr);
                        }

STDMETHODIMP CExplorerBar::SetSite(IUnknown* punkSite)
                        {
                        //如果某个现场被把持，则释放它
                        if(m_pSite)
                        {
                        m_pSite->Release();
                        m_pSite = NULL;
                        }
                        //如果punkSite 不为NULL, 建立一个新的现场
                        if(punkSite)
                        {
                        //获取父窗口
                        IOleWindow  *pOleWindow;
                        m_hwndParent = NULL;
                        if(SUCCEEDED(punkSite->QueryInterface(IID_IOleWindow, (LPVOID*)&pOleWindow)))
                        {
                        pOleWindow->GetWindow(&m_hwndParent);
                        pOleWindow->Release();
                        }
                        if(!m_hwndParent)
                        return E_FAIL;
                        if(!RegisterAndCreateWindow())
                        return E_FAIL;
                        //获取柄保存IInputObjectSite指针
                        if(SUCCEEDED(punkSite->QueryInterface(IID_IInputObjectSite, (LPVOID*)&m_pSite)))
                        {
                        return S_OK;
                        }
                        return E_FAIL;
                        }
                        return S_OK;
                        }

STDMETHODIMP CExplorerBar::GetSite(REFIID riid, LPVOID *ppvReturn)
                        {
                        *ppvReturn = NULL;
                        if(m_pSite)
                        return m_pSite->QueryInterface(riid, ppvReturn);
                        return E_FAIL;
                        }

BOOL CExplorerBar::RegisterAndCreateWindow(void)
                        {
                        //如果这个窗口不存在，则创建它
                        if(!m_hWnd)
                        {
                        //子窗口不能没有父窗口
                        if(!m_hwndParent)
                        {
                        return FALSE;
                        }
                        //如果窗口类没有注册，则必须注册
                        WNDCLASS wc;
                        if(!GetClassInfo(g_hInst, EB_CLASS_NAME, &wc))
                        {
                        ZeroMemory(&wc, sizeof(wc));
                        wc.style          = CS_HREDRAW | CS_VREDRAW | CS_GLOBALCLASS;
                        wc.lpfnWndProc    = (WNDPROC)WndProc;
                        wc.cbClsExtra     = 0;
                        wc.cbWndExtra     = 0;
                        wc.hInstance      = g_hInst;
                        wc.hIcon          = NULL;
                        wc.hCursor        = LoadCursor(NULL, IDC_ARROW);
                        wc.hbrBackground  = (HBRUSH)CreateSolidBrush(RGB(0, 0, 192));
                        wc.lpszMenuName   = NULL;
                        wc.lpszClassName  = EB_CLASS_NAME;
                        if(!RegisterClass(&wc))
                        {
                        //如果注册失败，下面的CreateWindow函数将失败
                        }
                        }
                        RECT  rc;
                        GetClientRect(m_hwndParent, &rc);
                        //创建这个窗口。WndProc 将建立m_hWnd变量
                        CreateWindowEx(   0,
                        EB_CLASS_NAME,
                        NULL,
                        WS_CHILD | WS_CLIPSIBLINGS | WS_BORDER,
                        rc.left,
                        rc.top,
                        rc.right - rc.left,
                        rc.bottom - rc.top,
                        m_hwndParent,
                        NULL,
                        g_hInst,
                        (LPVOID)this);
                        }
                        return (NULL != m_hWnd);
                        }

STDMETHODIMP CExplorerBar::ShowDW(BOOL fShow)
                        {
                        if(m_hWnd)
                        {
                        if(fShow)
                        {
                        //显示窗口
                        ShowWindow(m_hWnd, SW_SHOW);
                        }
                        else
                        {
                        //隐藏窗口
                        ShowWindow(m_hWnd, SW_HIDE);
                        }
                        }
                        return S_OK;
                        }
                        CloseDW方法摧毁浏览栏窗口：
                        STDMETHODIMP CExplorerBar::CloseDW(DWORD dwReserved)
                        {
                        ShowDW(FALSE);
                        if(IsWindow(m_hWnd))
                        DestroyWindow(m_hWnd);
                        m_hWnd = NULL;
                        return S_OK;
                        }

STDMETHODIMP CExplorerBar::GetBandInfo(DWORD dwBandID, DWORD dwViewMode, DESKBANDINFO* pdbi)
                        {
                        if(pdbi)
                        {
                        m_dwBandID = dwBandID;
                        m_dwViewMode = dwViewMode;
                        if(pdbi->dwMask & DBIM_MINSIZE)
                        {
                        pdbi->ptMinSize.x = MIN_SIZE_X;
                        pdbi->ptMinSize.y = MIN_SIZE_Y;
                        }
                        if(pdbi->dwMask & DBIM_MAXSIZE)
                        {
                        pdbi->ptMaxSize.x = -1;
                        pdbi->ptMaxSize.y = -1;
                        }
                        if(pdbi->dwMask & DBIM_INTEGRAL)
                        {
                        pdbi->ptIntegral.x = 1;
                        pdbi->ptIntegral.y = 1;
                        }
                        if(pdbi->dwMask & DBIM_ACTUAL)
                        {
                        pdbi->ptActual.x = 0;
                        pdbi->ptActual.y = 0;
                        }
                        if(pdbi->dwMask & DBIM_TITLE)
                        {
                        lstrcpyW(pdbi->wszTitle, L"浏览栏例子");
                        }
                        if(pdbi->dwMask & DBIM_MODEFLAGS)
                        {
                        pdbi->dwModeFlags = DBIMF_VARIABLEHEIGHT;
                        }
                        if(pdbi->dwMask & DBIM_BKCOLOR)
                        {
                        //通过移开这个标志来使用默认的背景颜色
                        pdbi->dwMask &= ~DBIM_BKCOLOR;
                        }
                        return S_OK;
                        }
                        return E_INVALIDARG;
                        }

STDMETHODIMP CExplorerBar::UIActivateIO(BOOL fActivate, LPMSG pMsg)
                        {
                        if(fActivate)
                        SetFocus(m_hWnd);
                        return S_OK;
                        }
                        STDMETHODIMP CExplorerBar::HasFocusIO(void)
                        {
                        if(m_bFocus)
                        return S_OK;
                        return S_FALSE;
                        }
                        STDMETHODIMP CExplorerBar::TranslateAcceleratorIO(LPMSG pMsg)
                        {
                        return S_FALSE;
                        }

LRESULT CALLBACK CExplorerBar::WndProc(HWND hWnd, UINT uMessage, WPARAM wParam, LPARAM lParam)
                        {
                        CExplorerBar  *pThis = (CExplorerBar*)GetWindowLong(hWnd, GWL_USERDATA);
                        switch (uMessage)
                        {
                        case WM_NCCREATE:
                        {
                        LPCREATESTRUCT lpcs = (LPCREATESTRUCT)lParam;
                        pThis = (CExplorerBar*)(lpcs->lpCreateParams);
                        SetWindowLong(hWnd, GWL_USERDATA, (LONG)pThis);
                        //设置窗口句柄
                        pThis->m_hWnd = hWnd;
                        }
                        break;
                        case WM_PAINT:
                        return pThis->OnPaint();
                        case WM_COMMAND:
                        return pThis->OnCommand(wParam, lParam);
                        case WM_SETFOCUS:
                        return pThis->OnSetFocus();
                        case WM_KILLFOCUS:
                        return pThis->OnKillFocus();
                        }
                        return DefWindowProc(hWnd, uMessage, wParam, lParam);
                        }

LRESULT CExplorerBar::OnPaint(void)
                        {
                        PAINTSTRUCT ps;
                        RECT        rc;
                        BeginPaint(m_hWnd, &ps);
                        GetClientRect(m_hWnd, &rc);
                        SetTextColor(ps.hdc, RGB(255, 255, 255));
                        SetBkMode(ps.hdc, TRANSPARENT);
                        DrawText(ps.hdc, TEXT("浏览栏例子"), -1, &rc, DT_SINGLELINE | DT_CENTER | DT_VCENTER);
                        EndPaint(m_hWnd, &ps);
                        return 0;
                        }

LRESULT CExplorerBar::OnSetFocus(void)
                        {
                        FocusChange(TRUE);
                        return 0;
                        }
                        LRESULT CExplorerBar::OnKillFocus(void)
                        {
                        FocusChange(FALSE);
                        return 0;
                        }
                        void CExplorerBar::FocusChange(BOOL bFocus)
                        {
                        m_bFocus = bFocus;
                        //通知焦点已改变的输入对象现场
                        if(m_pSite)
                        {
                        m_pSite->OnFocusChangeIS((IDockingWindow*)this, bFocus);
                        }
                        }

下载源代码

关键字：Band，Desk Band，Explorer Band，Tool Band，浏览器栏，工具栏，桌面工具栏

一、引言
　　最近，由于工作的要求，我需要在 IE 上做一些开发工作。于是在 MSDN 上翻阅了一些资料，根据 MSDN 上的说明我用 ATL 胜利完成了“资本家老板”分配的任务。
（并且在白天睡觉的过程中梦到了老板给我加工资啦......）
现在，我把 MSDN 上的原文资料，经过翻译整理并把一个 ATL 的实现奉贤给 VCKBASE 上的朋友们。

• 概念
• 原理
  基本band 对象
  必须实现的 COM 接口
      IPersistStream
      IObjectWithSite
      IDeskBand、IDockingWindow、IOleWindow
  选择实现的 COM 接口
  Band 对象注册
• ATL 实现

二、概念
　　在翻译的过程中，有两个词汇非常不好理解。第一个词是 Band 对象，词典中翻译为“镶边、裙子边、带子、乐队......”我的英文水平有限，实在不知道应该翻译为什么词汇更合适。于是我毅然决然地决定：在如下的论述中，依然使用 band 这个词！（什么？没听明白？我的意思就是说，我不翻译这个词了）但到底 Band 对象应该如何理解那？请看图一：


图一

　　图一中画红圈的地方，分别称作“垂直的浏览器栏”、“水平的浏览器栏”、“工具栏”和“桌面工具栏”。这些“栏”，都可以在 IE 的“查看”菜单中或鼠标右键的上下文快捷方式菜单中显示或隐藏起来。这些界面窗口的实现，其实就是实现一种 COM 接口对象，而这个对象叫 band。这个概念实在是只能意会而无法言传的，我总不能在文章中把它翻译为“总是靠在 IE 主窗口边上的对象”吧？^_^
　　另外，还有一个词叫 site。这个很好翻译，叫“站点”！。呵呵，我敢打包票，如果你要能理解这个翻译在计算机类文章中的含义，那就只能恭喜你了，你的智慧太高了。（都是学计算机软件的人，做人的差距咋就这么大呢？）在本篇文章中，site 可以这样理解：IE 的主框架四周，就好比是“汽车站”，那些 band 对象，就好比是“汽车”。band 汽车总是可以停靠在“汽车站”上。所以，site 就是“站点”，它也是 COM 接口的对象（IObjectWithSite、IInputObjectSite）。

三、原理

3.1　基本 band 对象
　　Band 对象，从 Shell 4.71(IE 5.0) 开始提供支持。Band 是一个 COM 对象，必须放在一个容器中去使用，当然使用它们就好象使用普通窗口是一样的。IE 就是一个容器，桌面 Shell 也是一个容器，它们提供不同的函数功能，但基本的实现是相似的。
　　Band 对象分三种类型，浏览器栏 band（Explorer bands）、工具栏 band（Tool Bands）和桌面工具栏(Desk bands)，而浏览器栏 band 又有两种表现形式：垂直和水平的。那么 IE 和 Shell 如何区分并加载这些 bands 对象呢？方法是：你要对不同的 band 对象，在注册表中注册不同的组件类型（CATID）。

Band 样式	组件类型	CATID
垂直的浏览器栏	CATID_InfoBand	00021493-0000-0000-C000-000000000046
水平的浏览器栏	CATID_CommBand	00021494-0000-0000-C000-000000000046
桌面的工具栏	CATID_DeskBand	00021492-0000-0000-C000-000000000046

　　IE 工具栏不使用组件类型注册，而是使用在注册进行 CLSID 的登记方式。详细情况见 3.3。
　　在例子程序中，实现了全部四个类型的 band 对象，垂直浏览器栏(CVerticalBar)显示了一个 HTML 文件，并且实现了对 IE 主窗口浏览网页的导航等功能；水平的浏览器栏(CHorizontalBar)是一个编辑窗，它同步显示当前网页的 BODY 源文件内容；IE 工具栏(CToolBar)最简单，只是添加了一个空的工具栏；桌面工具栏(CDeskBar)实现了一个单行编辑窗口，你可以在上面输入命令行或文件名称，回车后它会执行 Shell 的打开动作。

3.2　必须实现的 COM 接口
　　Band 对象是 IE 或 Shell 的进程内服务器，所以它被包装在 DLL 中。而作为 COM 对象，它必须要实现 IUnknown 和 IClassFactory 接口。（大家可以不同操心，因为我们用 ATL 写程序，这两个接口是不用我们自己写代码的。）另外，Band 对象还必须实现 IDeskBand、IObjectWithSite 和 IPersistStream 三个接口：
　　IPersistStream 是持续性接口的一种。当 IE 加载 band 对象的时候，它通过这个接口的 Load 方法传递属性值给对象，让其进行初始化；而当卸载前，IE 则调用这个接口的 Save 方法保存对象的属性。用 ATL 实现这个接口很简单：

class ATL_NO_VTABLE Cxxx : 	......	public IPersistStreamInitImpl, // 添加继承	......{public:	BOOL m_bRequiresSave; // IPersistStreamInitImpl 所必须的变量......BEGIN_COM_MAP(CVerticalBar)	......	COM_INTERFACE_ENTRY2(IPersist, IPersistStreamInit)	COM_INTERFACE_ENTRY2(IPersistStream, IPersistStreamInit)	COM_INTERFACE_ENTRY(IPersistStreamInit)	......END_COM_MAP()BEGIN_PROP_MAP(Cxxx)...... // 添加需要持续性的属性END_PROP_MAP()		

STDMETHODIMP Cxxx::SetSite(IUnknown *pUnkSite){	if( NULL == pUnkSite )	// 释放 band 的时候	{		// 如果加载的时候，保存了一些接口		// 那么现在：释放它	}	else	// 加载 band 的时候	{		m_hwndParent = NULL;	// 装载 band 的父窗口(就是带有标题的那个框架窗口)		// 这个窗口的句柄，是调用 IUnknown::QueryInterface() 得到 IOleWindow		// 然后调用 IOleWindow::GetWindow() 而获得的。		CComQIPtr< IOleWindow, &IID_IOleWindow > spOleWindow(pUnkSite);		if( spOleWindow )	spOleWindow->GetWindow(&m_hwndParent);		if( !m_hwndParent )	return E_FAIL;				// 现在，正好是建立子窗口的时机。		// 注意，子窗口建立的时候，不要使用 WS_VISIBLE 属性		... ...		// 在例子程序中，用 CAxWindow 实现了一个能包容ActiveX的容器窗口(垂直浏览器栏)		// 在例子程序中，用 WIN API 函数 CreateWindow 实现了标准窗口(水平浏览器栏、工具栏)		// 在例子程序中，用 CWindowImpl 实现了一个包容窗口(桌面工具栏)		/*********************************************************/		   以下部分，根据 band 对象特有的功能，是可以选择实现的		**********************************************************/				// 如果子窗口实现了用户输入，那么必须实现 IInputObject 接口，		// 而该接口是被 IE 的 IInputObjectSite 调用的，因此在你的对象		// 中，应该保存 IInputObjectSite 的接口指针。		// 在类的头文件中，定义：		// CComQIPtr< IInputObjectSite, &IID_IInputObjectSite > m_spSite;		m_spSite = pUnkSite;	// 保存 IInputObjectSite 指针		if( !m_spSite )		return E_FAIL;		// 你需要控制 IE 的主框架吗？		// 那么在类的头文件中，定义：		// CComQIPtr< IWebBrowser2, &IID_IWebBrowser2 > m_spFrameWB;		// 然后，先取得 IServiceProvider,再取得 IWebBrowser2		CComQIPtr < IServiceProvider, &IID_IServiceProvider> spSP(pUnkSite);		if( !spSP )	return E_FAIL;		spSP->QueryService( SID_SWebBrowserApp, &m_spFrameWB );		if( !m_spFrameWB)	return E_FAIL;		// 如果你取得了 IE 主框架的 IWebBrowser2 指针		// 那么，当它发生了什么事情，你难道不想知道吗？		// 定义：CComPtr m_spCP;		CComQIPtr< IConnectionPointContainer,			&IID_IConnectionPointContainer> spCPC( m_spFrameWB );		if( spCPC )		{			spCPC->FindConnectionPoint( DIID_DWebBrowserEvents2, &m_spCP );			if( m_spCP )			{				m_spCP->Advise( reinterpret_cast< IDispatch * >( this ), &m_dwCookie );			}		}		// 咳~~~ 不说了，看源码去吧。这里能干的事情太多了... ...	}	return S_OK;}		

class ATL_NO_VTABLE Cxxx : 	......	public IDeskBand,	......{......BEGIN_COM_MAP(Cxxx)	......	COM_INTERFACE_ENTRY_IID(IID_IDeskBand, IDeskBand)	......END_COM_MAP()// IOleWindowSTDMETHODIMP Cxxx::GetWindow(HWND * phwnd){	// 取得 band 对象的窗口句柄	// m_hWnd 是建立窗口时候保存的	*phwnd = m_hWnd;		return S_OK;}STDMETHODIMP Cxxx::ContextSensitiveHelp(BOOL fEnterMode){	// 上下文帮助，参考 IContextMenu 接口	return E_NOTIMPL;}// IDockingWindowSTDMETHODIMP CVerticalBar::ShowDW(BOOL bShow){	// 显示或隐藏 band 窗口	if( m_hWnd )		::ShowWindow( m_hWnd, bShow ? SW_SHOW : SW_HIDE);	return S_OK;}STDMETHODIMP CVerticalBar::CloseDW(DWORD dwReserved){	// 销毁 band 窗口	if( ::IsWindow( m_hWnd ) )		::DestroyWindow( m_hWnd );	m_hWnd = NULL;    return S_OK;}STDMETHODIMP CVerticalBar::ResizeBorderDW(LPCRECT prcBorder, IUnknown* punkToolbarSite, BOOL fReserved){	// 当框架窗口的边框大小改变时	return E_NOTIMPL;}// IDeskBandSTDMETHODIMP CVerticalBar::GetBandInfo(DWORD dwBandID, DWORD dwViewMode,  DESKBANDINFO* pdbi){	         // 取得 band 的基本信息，你需要填写 pdbi 参数作为返回	if( NULL == pdbi )		return E_INVALIDARG;	// 如果将来需要调用 IOleCommandTarget::Exec() 则需要保存这2个参数	m_dwBandID = dwBandID;	m_dwViewMode = dwViewMode;	if(pdbi->dwMask & DBIM_MINSIZE)	{	// 最小尺寸		pdbi->ptMinSize.x = 10;		pdbi->ptMinSize.y = 10;	}	if(pdbi->dwMask & DBIM_MAXSIZE)	{	// 最大尺寸 (-1 表示 4G)		pdbi->ptMaxSize.x = -1;		pdbi->ptMaxSize.y = -1;	}	if(pdbi->dwMask & DBIM_INTEGRAL)	{		pdbi->ptIntegral.x = 1;		pdbi->ptIntegral.y = 1;	}	if(pdbi->dwMask & DBIM_ACTUAL)	{		pdbi->ptActual.x = 0;		pdbi->ptActual.y = 0;	}	if(pdbi->dwMask & DBIM_TITLE)	{	// 窗口标题		wcscpy(pdbi->wszTitle,L"窗口标题");	}	if(pdbi->dwMask & DBIM_MODEFLAGS)	{		pdbi->dwModeFlags = DBIMF_VARIABLEHEIGHT;	}	if(pdbi->dwMask & DBIM_BKCOLOR)	{	// 如果使用默认的背景色，则移除该标志		pdbi->dwMask &= ~DBIM_BKCOLOR;	}	return S_OK;}		

STDMETHODIMP CExplorerBar::UIActivateIO(BOOL fActivate, LPMSG pMsg){    if(fActivate)        SetFocus(m_hWnd);    return S_OK;}STDMETHODIMP CExplorerBar::HasFocusIO(void){    if(m_bFocus)        return S_OK;    return S_FALSE;}STDMETHODIMP CExplorerBar::TranslateAcceleratorIO(LPMSG pMsg){    return S_FALSE;}      

• DBID_BANDINFOCHANGED
  Band 的信息变化。设置参数 pvaIn 为 band ID， 该 ID 就是最近一次调用 GetBandInfo 所得到的值，容器会调用 band 对象的 GetBandInfo 函数来更新请求信息。
• DBID_MAXIMIZEBAND
  最大化 band。设置参数 pvaIn 为 band ID，该 ID 就是最近一次调用 ?GetBandInfo ?所得到的值。
• DBID_SHOWONLY
  打开或关闭容器中其它的 bands。 设置参数 pvaIn 为VT_UNKNOWN 类型，它可以是如下的值：
  　

  值	描述
  pUnk	band 对象的 IUnknown 指针，其它的桌面 bands 将被隐藏
  0	隐藏所有的桌面 bands
  1	显示所有的桌面 bands

  
  
• DBID_PUSHCHEVRON
  在菜单项左边显示“v”的选择标志。容器发送一个 RB_PUSHCHEVRON 消息，当 band 对象接收到通知消息 RBN_CHEVRONPUSHED 提示它显示一个"v"的标志。设置 IOleCommandTarget::Exec 函数中 nCmdExecOpt 参数为 band ID，该 ID 是最近一次调用 GetBandInfo ?所得到的值，设置 IOleCommandTarget::Exec 函数中 pvaIn 参数为 VT_I4 类型，这是应用程序定义的一个值，它通过通知消息 RBN_CHEVRONPUSHED 中lAppValue 回传给 band 对象。

3.4　Band 对象注册
　　Band 对象必须注册为一个 OLE 进程内的服务器，并且支持 apartment 线程公寓。注册表中默认键的值是表示菜单的文字。对于浏览器栏，它加到 IE 菜单的“查看\浏览器栏”中；对于工具栏 band ，它加到 IE 菜单的“查看\工具栏”中；对于桌面 band， 它加到系统任务栏的快捷菜单中。在菜单资源中，可以使用“&”指明加速键。

通常，一个基本的 band 对象的注册表项目是：

HKEY_CLASSES_ROOT
CLSID
{你的 band 对象的 CLSID}
　　(Default) = 菜单的文字
　　InProcServer32
　　　(Default) = DLL 的全路径文件名
　　　ThreadingModel= Apartment

工具栏 bands 还必须把它们的 CLSID 注册到 IE 的注册表中。

在 HKEY_LOCAL_MACHINE\Software\Microsoft\Internet Explorer\Toolbar 下给出 CLSID 作为键名，而其键值是被忽略的。

HKEY_LOCAL_MACHINE
Software
Microsoft
Internet Explorer
Toolbar
　　{你的 band 对象的 CLSID}

　　还有几个可选的注册表项目(例子程序并不是这样实现的)。比如，你想让浏览器栏显示 HTML 的话，必须要如下设置注册表：

HKEY_CLASSES_ROOT
CLSID
{你的 Band 对象的 CLSID}
Instance
CLSID
　　(Default) = {4D5C8C2A-D075-11D0-B416-00C04FB90376}

同时，如果要指定一个本地的 HTML 文件，那么要如下设置：

HKEY_CLASSES_ROOT
CLSID
{你的 Band 对象的 CLSID}
Instance
InitPropertyBag
　　Url

　　另外，还可以指定浏览器栏的宽和高，当然，它是依赖于这个栏是纵向还是横向的。其实这个项目无所谓，因为当用户调整了浏览器栏的大小后，会自动保存在注册表中的。

HKEY_CURRENT_USER
Software
Microsoft
Internet Explorer
Explorer Bars
{你的 Band 对象的 CLSID}
　　BarSize

　　BarSize 键的类型必须是 REG_BINARY 类型，它有8个字节。左起前4个字节，是用16进制表示的像素宽度或高度，后4个字节保留，你应该设置为0。下面是一个可以在浏览器栏上显示 HTML 文件的全部注册表项目的例子，默认宽度为291（0x123）个像素点：

HKEY_CLASSES_ROOT
CLSID
{你的 Band 对象的 CLSID}
　(Default) = 菜单文字
　InProcServer32
　　(Default) = DLL 的全路径文件名
　　ThreadingModel= Apartment
Instance
CLSID
　　(Default) = {4D5C8C2A-D075-11D0-B416-00C04FB90376}
InitPropertyBag
　　Url= 你的 HTML 文件名

HKEY_CURRENT_USER
Software
Microsoft
Internet Explorer
Explorer Bars
{你的 Band 对象的 CLSID}
　　BarSize= 23 01 00 00 00 00 00 00

　　对于注册表的设置，用 ATL 实现其实是异常简单的。打开工程的 xxx.rgs 文件，并手工编辑一下就可以了。 下面这个文件源码，是例子程序中 IE 工具栏的注册表样式，HKLM 是需要手工添加的，因为它不使用组件类型方式注册。而对于其它类型的 band 对象只要在类声明中添加：

BEGIN_CATEGORY_MAP(Cxxx)			// 向注册表中注册 COM 类型	IMPLEMENTED_CATEGORY(CATID_InfoBand)	// 垂直样式的浏览器栏END_CATEGORY_MAP()		

HKCR	// 这个项目是 ATL 帮你生成的，你只要手工修改“菜单上的文字”就可以了{	Bands.ToolBar.1 = s ''ToolBar Class''	{		CLSID = s ''{ 你的 CLSID }''	}	Bands.ToolBar = s ''ToolBar Class''	{		CLSID = s ''{ 你的 CLSID }''		CurVer = s ''Bands.ToolBar.1''	}	NoRemove CLSID	{		ForceRemove { 你的 CLSID } = s ''用在菜单上的文字(&T)''		{			ProgID = s ''Bands.ToolBar.1''			VersionIndependentProgID = s ''Bands.ToolBar''			ForceRemove ''Programmable''			InprocServer32 = s ''%MODULE%''			{				val ThreadingModel = s ''Apartment''			}			''TypeLib'' = s ''{xxxx-xxxx-xxxxxxxxxxxxxxx}''		}	}}HKLM	// 这个项目是手工添加的IE工具栏所特有的{	Software	{		Microsoft		{			''Internet Explorer''			{				NoRemove Toolbar				{					ForceRemove val { 你的 CLSID } = s ''随便给个说明性文字串''				}			}		}	}}		

下载源代码

一、前言
　　我们写程序，经常需要实现这样的需求：
例一、程序运行产生一个窗口，用户关闭的时候需要记录窗口的位置，以便下次运行时保持位置不变；
例二、由于程序运行时间很长，今天执行一部分，明天继续执行。那么在下次运行前要恢复前次的状态；
... ... ... ...

智慧的老师：以上这些需求，如何实现呢？
懵懂的学生：这个简单，只要在程序退出前提取必要的信息保存到文件中，下次运行时再从文件中读出来，设置一下就OK了。
智慧的老师：恩，不错，这位同学的思想值得表扬。
懵懂的学生：不好意思，这都要感谢老师的栽培，我对您的景仰如滔滔江水......
智慧的老师：别臭P了，我话还没有说完那......如果你需要提取和保存的信息很多，结构很复杂......怎么办？
懵懂的学生：也好办，我设计一个结构来记录这些信息。
智慧的老师：恩......不错。但如果这些信息提供方是别人写的模块，并且随着版本的不同还经常变化，你怎么办？
懵懂的学生：... ...
智慧的老师：解决这些问题的方法是---持续性。

二、原理
　　持续性，也叫永久性。组件方提供 IPersistXXX 接口，调用者（容器）提供存储介质，比如文件啦、内存啦、注册表啦、流啦、文本啦......啦啦拉。需要保存的时候，调用者通过 IPersistXXX::Save() 接口函数让组件去自己存储属性信息，而调用者根本不用关心存储格式和存储内容；需要还原状态的时候，调用者打开存储介质，然后同样调用 IPersistXXX::Load() 接口函数让组件自己去读取属性信息并完成初始化的设置。
　　目前，微软定义了如下各种类型的持续性接口，足够满足你的需求了。我们只要在自己写的组件中实现其中一个或几个持续性接口，那么调用者就可以按照统一的方式和我们的组件协商完成属性信息的保存和状态还原了。
　

持续性接口	简要说明
IPersist	所有持续性接口的根，下面的接口大多从它派生出来。这个接口很简单，只有一个函数 GetClassID()它返回组件的 CLSID 号，以便调用者能保存这个号为将来 CoCreateInstance() 启动组件用。  　　实现这个函数也很简单，只要返回你组件中的 CLSID_XXX 即可，或者比较省事的方法是返回 GetObjectCLSID() 。
IPersistStream	派生自 IPersist，并增加了4个函数，从流(IStream)中读写组件属性信息。
	IsDirty()	组件内部属性是否发生了变化。为调用者是否需要保存信息提供依据
	Load()	从 IStream 中读入信息，初始化组件属性
	Save()	把属性信息保存到 IStream 中
	GetSizeMax()	返回信息尺寸，以便调用者事先开辟空间
IPersistStreamInit	派生自 IPersistStream，并再增加了一个函数 InitNew() 用来完成一个默认的组件属性初始化。 这个持续性接口是最常用的，本文示例中就实现了该接口。
IPersistMemory	和 IPersistStreamInit 类似，但使用的是内存块，而不是大小可变化的 IStream 流。
IPersistStorage	和 IPersistStream 类似，但保存属性信息使用的是存储 IStorage，一个 IStorage 中可以有多个 IStream。
IPersistFile	和 IPersistStream 类似，但存储介质为文件。
IPersistPropertyBag	使用属性包（属性名、属性值）的文本方式保存信息。在 IE 浏览器中，HTML 嵌入 ActiveX 控件通常使用这个方法。  　　在 HTML 中插入控件，<param name="属性名称" value="值"> 这样的形式你应该见过吧？！  　　在下一回的文章中，我们介绍这个接口。因为在 ActiveX 中，它太常用了。
IPersistPropertyBag2	扩展了 IPersistPropertyBag 接口。提供了更丰富一些的属性管理用函数。
IPersistMoniker	用于命名(moniker)存储和读取状态的持续性接口。
IPersistHistory	运行于 IE 上，想在用户浏览 WEB 页面时存储和读取状态的持续性接口。

三、持续性接口组件的实现
　　示例程序分别在 vc6.0 和 vc.net 上实现了 IPersistStreamInit 接口的 COM 组件和调用举例。组件完成的功能是计算素数，你第一次运行的时候，会得到第一个素数2，然后是3，5，7，11......下班时间到了，今天就运行到这里。于是调用者开辟一个流来保存组件的属性信息。明天继续运行的时候，从流中原换组件状态，开始了新的计算 13，17，19，23......
　　这个示例应用完全是假设性的，其实没有什么实用价值，只是演示了 IPersistStreamInit 接口的实现方法。另外，关于建立流(IStream)的方法，请参阅《COM 组件设计与应用（一）》。

1、建立一个 ATL 工程项目。
2、增加 ATL 组件类，vc.net 使用者注意不要选择“属性化编程”方式，其它的设置全部使用默认方法。当然你愿意适当地改变选择也无所谓。
3、设计完成你的组件功能。
   示例程序中，实现了一个接口函数 GetNext() 负责计算下一个素数。
4、添加IPersistStreamInit 接口。

class ATL_NO_VTABLE Cxxx : 	public CComObjectRootEx<...> ,	public CComCoClass<...>,	......	public IPersistStreamInit	// 手工添加持续性接口{......BEGIN_COM_MAP(Cxxx)	......		// 手工添加接口映射表入口	COM_INTERFACE_ENTRY(IPersistStreamInit)		// 表示如果要取得 IPersistStream 指针，则返回 IPersistStreamInit 指针	COM_INTERFACE_ENTRY_IID(IID_IPersistStream, IPersistStreamInit)		// 表示如果要取得 IPersist 指针，则返回 IPersistStremInit 指针	COM_INTERFACE_ENTRY_IID(IID_IPersist, IPersistStreamInit)END_COM_MAP()

public:// IPersist	STDMETHOD(GetClassID)(/*[out]*/CLSID * pClassID);// IPersistStream	STDMETHOD(IsDirty)(void);	STDMETHOD(Load)(/*[in]*/IStream *pStm);	STDMETHOD(Save)(/*[in]*/IStream *pStm,/*[in]*/BOOL fClearDirty);	STDMETHOD(GetSizeMax)(/*[out]*/ULARGE_INTEGER *pcbSize);// IPersistStreamInit	STDMETHOD(InitNew)(void);

// IPersistSTDMETHODIMP Cxxx::GetClassID(/*[out]*/CLSID * pClassID){	*pClassID = GetObjectCLSID();	return S_OK;}// IPersistStreamSTDMETHODIMP Cxxx::IsDirty(void){	if( 数据已经改变，需要保存 )	return S_OK;	else			return S_FALSE;}STDMETHODIMP Cxxx::Load(/*[in]*/IStream *pStm){	return pStm->Read( 读到哪里, 读多长字节, NULL);}STDMETHODIMP Cxxx::Save(/*[in]*/IStream *pStm,/*[in]*/BOOL fClearDirty){	if( fClearDirty )	清除内部表示数据变化的变量;	return pStm->Write( 需要保存的数据指针, 写多长字节, NULL );}STDMETHODIMP Cxxx::GetSizeMax(/*[out]*/ULARGE_INTEGER *pcbSize){	pcbSize->LowPart = 需要保存数据长度的低位;	pcbSize->HighPart = 需要保存数据长度的高位;// 一般都是0，难道你的数据长度都超过了 4G？	return S_OK;}// IPersistStreamInitSTDMETHODIMP Cxxx::InitNew(void){	内部属性数据默认初始化;	设置或清除内部表示数据变化的变量;	return S_OK;}