必須實(shí)現(xiàn)的接口
垂直瀏覽欄例子實(shí)現(xiàn)了四個(gè)必須的接口：IUnknown, IObjectWithSite, IPersistStream, 和IDeskBand，它們都在CExplorerBar類中實(shí)現(xiàn)。
IUnknown
構(gòu)造函數(shù)，析構(gòu)函數(shù)和IUnknown實(shí)現(xiàn)比較簡(jiǎn)單，本文在此不討論。細(xì)節(jié)請(qǐng)參見源代碼。
IObjectWithSite接口
當(dāng)用戶選擇某個(gè)瀏覽欄時(shí)，容器調(diào)用相應(yīng)band對(duì)象的IObjectWithSite::SetSite方法。參數(shù)將被設(shè)置成這個(gè)現(xiàn)場(chǎng)（Site）的IUnknown指針。
通常，SetSite實(shí)現(xiàn)應(yīng)該完成下列步驟：
- 釋放當(dāng)前所把持的任何現(xiàn)場(chǎng)指針。
- 如果傳遞到SetSite的指針被置為NULL，此則區(qū)對(duì)象被刪除。SetSite可以返回S_OK。
- 如果傳遞到SetSite的指針被置為非NULL，則建立新的現(xiàn)場(chǎng)。SetSite應(yīng)該做以下的事情：
- 調(diào)用現(xiàn)場(chǎng)QueryInterface方法請(qǐng)求IOleWindow接口。
- 調(diào)用IOleWindow::GetWindow獲取父窗口句柄，并存儲(chǔ)它，以便以后使用。如果不再使用的話，就釋放IOleWindow接口。
- 創(chuàng)建此band對(duì)象的窗口為一個(gè)子窗口，其父窗口就是上一步獲得的那個(gè)窗口。注意在此不能將它創(chuàng)建成可見窗口。
- 如果此band對(duì)象實(shí)現(xiàn)IInputObject，調(diào)用現(xiàn)場(chǎng)QueryInterface方法請(qǐng)求IInputObjectSite接口，存儲(chǔ)這個(gè)接口的指針以備后用。
- 如果所有步驟都成功，則返回S_OK，否則返回OLE定義的錯(cuò)誤代碼以指示錯(cuò)誤類型。
以下是瀏覽欄實(shí)現(xiàn)SetSite的方法。m_pSite是私有成員變量，用它來保存IInputObjectSite指針，而m_hwndParent保存父窗口句柄。
STDMETHODIMP CExplorerBar::SetSite(IUnknown* punkSite)
{
//如果某個(gè)現(xiàn)場(chǎng)被把持，則釋放它
if(m_pSite)
{
m_pSite->Release();
m_pSite = NULL;
}
//如果punkSite 不為NULL, 建立一個(gè)新的現(xiàn)場(chǎng)
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;
}
這個(gè)例子的GetSite只簡(jiǎn)單地用SetSite保存的現(xiàn)場(chǎng)指針實(shí)現(xiàn)了對(duì)現(xiàn)場(chǎng)QueryInterface方法的調(diào)用。
STDMETHODIMP CExplorerBar::GetSite(REFIID riid, LPVOID *ppvReturn)
{
*ppvReturn = NULL;
if(m_pSite)
return m_pSite->QueryInterface(riid, ppvReturn);
return E_FAIL;
}
窗口創(chuàng)建由私有方法RegisterAndCreateWindow負(fù)責(zé)。如果這個(gè)窗口不存在，此方法將瀏覽欄窗口創(chuàng)建成一個(gè)大小適當(dāng)?shù)淖哟翱冢母复翱诰褪怯蒘etSite獲得的那個(gè)窗口。子窗口的句柄存儲(chǔ)在m_hwnd變量中。
BOOL CExplorerBar::RegisterAndCreateWindow(void)
{
//如果這個(gè)窗口不存在，則創(chuàng)建它
if(!m_hWnd)
{
//子窗口不能沒有父窗口
if(!m_hwndParent)
{
return FALSE;
}
//如果窗口類沒有注冊(cè)，則必須注冊(cè)
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))
{
//如果注冊(cè)失敗，下面的CreateWindow函數(shù)將失敗
}
}
RECT rc;
GetClientRect(m_hwndParent, &rc);
//創(chuàng)建這個(gè)窗口。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);
}
IPersistStream接口
IE將調(diào)用瀏覽欄的IPersistStream接口，以便允許這個(gè)瀏覽欄加載或存儲(chǔ)持久性數(shù)據(jù)。如果沒有持久性數(shù)據(jù)，這個(gè)方法仍然必須返回一個(gè)成功代碼。IPersistStream接口從IPersist繼承而來，所以要實(shí)現(xiàn)五個(gè)方法：
GetClassID, IsDirty, Load, Save, GetSizeMax。
本文的這個(gè)瀏覽欄例子不使用持久性數(shù)據(jù)，并且只有IPersistStream的最小實(shí)現(xiàn)。GetClassID返回對(duì)象的CLSID（CLSID_SampleExplorerBar），其余的方法返回S_OK, 或者S_FALSE, 或者 E_NOTIMPL。有關(guān)細(xì)節(jié)請(qǐng)參見IPersistStream的實(shí)現(xiàn)。
IDeskBand接口
IDeskBand接口是區(qū)對(duì)象專用接口。它只有一個(gè)方法。IDeskBand接口從IDockingWindow繼承而來，而IDockingWindow又從IOleWindow繼承而來。
IOleWindow有兩個(gè)方法：GetWindow 和 ContextSensitiveHelp。瀏覽欄例子的GetWindow實(shí)現(xiàn)返回瀏覽欄的子窗口句柄m_hwnd。因?yàn)椴粚?shí)現(xiàn)上下文敏感幫助，所以ContextSensitiveHelp返回E_NOTIMPL。
IDockingWindow接口有三個(gè)方法：ShowDW, CloseDW, 和 ResizeBorder。ResizeBorder不在任何區(qū)對(duì)象中使用，應(yīng)該返回E_NOTIMPL。ShowDW方法根據(jù)其不同的參數(shù)值控制瀏覽欄窗口的顯示或隱藏：
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;
}
其余的方法，如GetBandInfo是IDeskBand專用的。IE使用它來指定瀏覽欄的標(biāo)示符以及視圖模式。IE還可能填寫DESKBANDINFO結(jié)構(gòu)的dwMask成員從瀏覽欄請(qǐng)求更多的信息，這個(gè)結(jié)構(gòu)用第三個(gè)參數(shù)傳遞。GetBandInfo應(yīng)該存儲(chǔ)這個(gè)標(biāo)示符和視圖模式并用所請(qǐng)求的數(shù)據(jù)填寫DESKBANDINFO結(jié)構(gòu)。下面是本文瀏覽欄例子所實(shí)現(xiàn)GetBandInfo：
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)
{
//通過移開這個(gè)標(biāo)志來使用默認(rèn)的背景顏色
pdbi->dwMask &= ~DBIM_BKCOLOR;
}
return S_OK;
}
return E_INVALIDARG;
}
可選擇的接口實(shí)現(xiàn)
由兩個(gè)接口的實(shí)現(xiàn)是可選擇的，一個(gè)是IInputObject，另一個(gè)是 IContextMenu。本文的瀏覽欄例子實(shí)現(xiàn)了IInputObject。對(duì)于IContextMenu的實(shí)現(xiàn)細(xì)節(jié)請(qǐng)參考有關(guān)文檔。
IInputObject接口
如果某個(gè)band對(duì)象要接受用戶輸入。那就必須實(shí)現(xiàn)IInputObject接口。IE實(shí)現(xiàn)IInputObjectSite并用IInputObject維護(hù)用戶的輸入焦點(diǎn)。瀏覽欄需要實(shí)現(xiàn)三個(gè)方法：UIActivateIO, HasFocusIO, 和 TranslateAcceleratorIO。
IE調(diào)用UIActivateIO通知瀏覽欄它以被激活或者被置灰。當(dāng)被激活時(shí)，瀏覽欄例子調(diào)用SetFocus來設(shè)置窗口輸入焦點(diǎn)。
當(dāng)要確定哪個(gè)窗口有輸入焦點(diǎn)時(shí)，IE調(diào)用HasFocusIO。如果瀏覽欄的窗口或它的子窗口之一有輸入焦點(diǎn)，HasFocusIO返回S_OK。否則，它返回S_FALSE。
TranslateAcceleratorIO允許對(duì)象處理鍵盤加速鍵。本文瀏覽欄例子沒有實(shí)現(xiàn)這個(gè)方法，所以它返回S_FALSE。
瀏覽欄例子實(shí)現(xiàn)IInputObjectSite的細(xì)節(jié)如下：
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;
}
窗口過程
因?yàn)閰^(qū)對(duì)象的顯示用的是子窗口，所以它必須實(shí)現(xiàn)窗口過程來處理Windows消息。瀏覽欄例子實(shí)現(xiàn)了一個(gè)最簡(jiǎn)單的版本，它的窗口過程只處理了五個(gè)消息：WM_NCCREATE, WM_PAINT, WM_COMMAND, WM_SETFOCUS, 和 WM_KILLFOCUS。如果要實(shí)現(xiàn)更多的功能，很容易擴(kuò)充使它處理其它的消息。
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);
//設(shè)置窗口句柄
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);
}
這里WM_COMMAND消息處理器簡(jiǎn)單地返回零。WM_PAINT消息處理器創(chuàng)建文本并顯示在資源管理器或IE的區(qū)對(duì)象中。
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;
}
WM_SETFOCUS 和 WM_KILLFOCUS消息處理器通過調(diào)用本現(xiàn)場(chǎng)的IInputObjectSite::OnFocusChangeIS方法通知輸入焦點(diǎn)現(xiàn)場(chǎng)改變：
LRESULT CExplorerBar::OnSetFocus(void)
{
FocusChange(TRUE);
return 0;
}
LRESULT CExplorerBar::OnKillFocus(void)
{
FocusChange(FALSE);
return 0;
}
void CExplorerBar::FocusChange(BOOL bFocus)
{
m_bFocus = bFocus;
//通知焦點(diǎn)已改變的輸入對(duì)象現(xiàn)場(chǎng)
if(m_pSite)
{
m_pSite->OnFocusChangeIS((IDockingWindow*)this, bFocus);
}
}
四、總結(jié)
區(qū)對(duì)象提供了靈活和強(qiáng)大的擴(kuò)展方式，通過定制瀏覽欄使得IE的功能大為增強(qiáng)。桌面區(qū)的實(shí)現(xiàn)擴(kuò)展了普通窗口的能力。盡管需要一些對(duì)COM的編程，但終究以子窗口的形式提供了一種用戶界面。從而使今后的許多這種編程實(shí)現(xiàn)都能用類似的Windows編程技術(shù)。雖然本文所討論的例子只提供了有限的功能，但它示范了區(qū)對(duì)象全部的特性，并且可以在此基礎(chǔ)上進(jìn)行擴(kuò)充來創(chuàng)建獨(dú)特和功能強(qiáng)大的的用戶界面。 |