mirror of
https://github.com/reactos/reactos.git
synced 2024-06-24 06:51:47 +00:00
523 lines
16 KiB
C++
523 lines
16 KiB
C++
/*
|
|
* Shell Desktop
|
|
*
|
|
* Copyright 2008 Thomas Bluemel
|
|
* Copyright 2020 Katayama Hirofumi MZ
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
|
|
*/
|
|
|
|
#include "shelldesktop.h"
|
|
|
|
// Support for multiple monitors is disabled till LVM_SETWORKAREAS gets implemented
|
|
#ifdef MULTIMONITOR_SUPPORT
|
|
#include <atlcoll.h>
|
|
#endif
|
|
|
|
WINE_DEFAULT_DEBUG_CHANNEL(desktop);
|
|
|
|
static const WCHAR szProgmanClassName[] = L"Progman";
|
|
static const WCHAR szProgmanWindowName[] = L"Program Manager";
|
|
|
|
class CDesktopBrowser :
|
|
public CWindowImpl<CDesktopBrowser, CWindow, CFrameWinTraits>,
|
|
public CComObjectRootEx<CComMultiThreadModelNoCS>,
|
|
public IShellBrowser,
|
|
public IServiceProvider
|
|
{
|
|
private:
|
|
HACCEL m_hAccel;
|
|
HWND m_hWndShellView;
|
|
CComPtr<IShellDesktopTray> m_Tray;
|
|
CComPtr<IShellView> m_ShellView;
|
|
|
|
CComPtr<IOleWindow> m_ChangeNotifyServer;
|
|
HWND m_hwndChangeNotifyServer;
|
|
|
|
LRESULT _NotifyTray(UINT uMsg, WPARAM wParam, LPARAM lParam);
|
|
HRESULT _Resize();
|
|
|
|
public:
|
|
CDesktopBrowser();
|
|
~CDesktopBrowser();
|
|
HRESULT Initialize(IShellDesktopTray *ShellDeskx);
|
|
|
|
// *** IOleWindow methods ***
|
|
virtual HRESULT STDMETHODCALLTYPE GetWindow(HWND *lphwnd);
|
|
virtual HRESULT STDMETHODCALLTYPE ContextSensitiveHelp(BOOL fEnterMode);
|
|
|
|
// *** IShellBrowser methods ***
|
|
virtual HRESULT STDMETHODCALLTYPE InsertMenusSB(HMENU hmenuShared, LPOLEMENUGROUPWIDTHS lpMenuWidths);
|
|
virtual HRESULT STDMETHODCALLTYPE SetMenuSB(HMENU hmenuShared, HOLEMENU holemenuRes, HWND hwndActiveObject);
|
|
virtual HRESULT STDMETHODCALLTYPE RemoveMenusSB(HMENU hmenuShared);
|
|
virtual HRESULT STDMETHODCALLTYPE SetStatusTextSB(LPCOLESTR pszStatusText);
|
|
virtual HRESULT STDMETHODCALLTYPE EnableModelessSB(BOOL fEnable);
|
|
virtual HRESULT STDMETHODCALLTYPE TranslateAcceleratorSB(MSG *pmsg, WORD wID);
|
|
virtual HRESULT STDMETHODCALLTYPE BrowseObject(LPCITEMIDLIST pidl, UINT wFlags);
|
|
virtual HRESULT STDMETHODCALLTYPE GetViewStateStream(DWORD grfMode, IStream **ppStrm);
|
|
virtual HRESULT STDMETHODCALLTYPE GetControlWindow(UINT id, HWND *lphwnd);
|
|
virtual HRESULT STDMETHODCALLTYPE SendControlMsg(UINT id, UINT uMsg, WPARAM wParam, LPARAM lParam, LRESULT *pret);
|
|
virtual HRESULT STDMETHODCALLTYPE QueryActiveShellView(struct IShellView **ppshv);
|
|
virtual HRESULT STDMETHODCALLTYPE OnViewWindowActive(struct IShellView *ppshv);
|
|
virtual HRESULT STDMETHODCALLTYPE SetToolbarItems(LPTBBUTTON lpButtons, UINT nButtons, UINT uFlags);
|
|
|
|
// *** IServiceProvider methods ***
|
|
virtual HRESULT STDMETHODCALLTYPE QueryService(REFGUID guidService, REFIID riid, void **ppvObject);
|
|
|
|
// message handlers
|
|
LRESULT OnEraseBkgnd(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL &bHandled);
|
|
LRESULT OnSize(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL &bHandled);
|
|
LRESULT OnSettingChange(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL &bHandled);
|
|
LRESULT OnClose(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL &bHandled);
|
|
LRESULT OnOpenNewWindow(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL &bHandled);
|
|
LRESULT OnCommand(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL &bHandled);
|
|
LRESULT OnSetFocus(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL &bHandled);
|
|
LRESULT OnGetChangeNotifyServer(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL &bHandled);
|
|
|
|
DECLARE_WND_CLASS_EX(szProgmanClassName, CS_DBLCLKS, COLOR_DESKTOP)
|
|
|
|
BEGIN_MSG_MAP(CBaseBar)
|
|
MESSAGE_HANDLER(WM_ERASEBKGND, OnEraseBkgnd)
|
|
MESSAGE_HANDLER(WM_SIZE, OnSize)
|
|
MESSAGE_HANDLER(WM_SYSCOLORCHANGE, OnSettingChange)
|
|
MESSAGE_HANDLER(WM_SETTINGCHANGE, OnSettingChange)
|
|
MESSAGE_HANDLER(WM_CLOSE, OnClose)
|
|
MESSAGE_HANDLER(WM_EXPLORER_OPEN_NEW_WINDOW, OnOpenNewWindow)
|
|
MESSAGE_HANDLER(WM_COMMAND, OnCommand)
|
|
MESSAGE_HANDLER(WM_SETFOCUS, OnSetFocus)
|
|
MESSAGE_HANDLER(WM_DESKTOP_GET_CNOTIFY_SERVER, OnGetChangeNotifyServer)
|
|
END_MSG_MAP()
|
|
|
|
BEGIN_COM_MAP(CDesktopBrowser)
|
|
COM_INTERFACE_ENTRY_IID(IID_IOleWindow, IOleWindow)
|
|
COM_INTERFACE_ENTRY_IID(IID_IShellBrowser, IShellBrowser)
|
|
COM_INTERFACE_ENTRY_IID(IID_IServiceProvider, IServiceProvider)
|
|
END_COM_MAP()
|
|
};
|
|
|
|
CDesktopBrowser::CDesktopBrowser():
|
|
m_hAccel(NULL),
|
|
m_hWndShellView(NULL),
|
|
m_hwndChangeNotifyServer(NULL)
|
|
{
|
|
}
|
|
|
|
CDesktopBrowser::~CDesktopBrowser()
|
|
{
|
|
if (m_ShellView.p != NULL && m_hWndShellView != NULL)
|
|
{
|
|
m_ShellView->DestroyViewWindow();
|
|
}
|
|
|
|
if (m_hwndChangeNotifyServer)
|
|
{
|
|
::DestroyWindow(m_hwndChangeNotifyServer);
|
|
}
|
|
}
|
|
|
|
#ifdef MULTIMONITOR_SUPPORT
|
|
BOOL CALLBACK MonitorEnumProc(
|
|
_In_ HMONITOR hMonitor,
|
|
_In_ HDC hdcMonitor,
|
|
_In_ LPRECT lprcMonitor,
|
|
_In_ LPARAM dwData
|
|
)
|
|
{
|
|
CAtlList<RECT> *list = (CAtlList<RECT>*)dwData;
|
|
MONITORINFO MonitorInfo;
|
|
MonitorInfo.cbSize = sizeof(MonitorInfo);
|
|
if (::GetMonitorInfoW(hMonitor, &MonitorInfo))
|
|
{
|
|
list->AddTail(MonitorInfo.rcWork);
|
|
}
|
|
|
|
return TRUE;
|
|
}
|
|
#endif
|
|
|
|
HRESULT CDesktopBrowser::_Resize()
|
|
{
|
|
RECT rcNewSize;
|
|
|
|
#ifdef MULTIMONITOR_SUPPORT
|
|
|
|
UINT cMonitors = GetSystemMetrics(SM_CMONITORS);
|
|
if (cMonitors == 1)
|
|
{
|
|
SystemParametersInfoW(SPI_GETWORKAREA, 0, &rcNewSize, 0);
|
|
}
|
|
else
|
|
{
|
|
SetRect(&rcNewSize,
|
|
GetSystemMetrics(SM_XVIRTUALSCREEN),
|
|
GetSystemMetrics(SM_YVIRTUALSCREEN),
|
|
GetSystemMetrics(SM_XVIRTUALSCREEN) + GetSystemMetrics(SM_CXVIRTUALSCREEN),
|
|
GetSystemMetrics(SM_YVIRTUALSCREEN) + GetSystemMetrics(SM_CYVIRTUALSCREEN));
|
|
}
|
|
|
|
::MoveWindow(m_hWnd, rcNewSize.left, rcNewSize.top, rcNewSize.right - rcNewSize.left, rcNewSize.bottom - rcNewSize.top, TRUE);
|
|
::MoveWindow(m_hWndShellView, 0, 0, rcNewSize.right - rcNewSize.left, rcNewSize.bottom - rcNewSize.top, TRUE);
|
|
|
|
if (cMonitors != 1)
|
|
{
|
|
CAtlList<RECT> list;
|
|
EnumDisplayMonitors(NULL, NULL, MonitorEnumProc, (LPARAM)&list);
|
|
RECT* prcWorkAreas = new RECT[list.GetCount()];
|
|
int i = 0;
|
|
for (POSITION it = list.GetHeadPosition(); it; list.GetNext(it))
|
|
prcWorkAreas[i++] = list.GetAt(it);
|
|
|
|
HWND hwndListView = FindWindowExW(m_hWndShellView, NULL, WC_LISTVIEW, NULL);
|
|
|
|
::SendMessageW(hwndListView, LVM_SETWORKAREAS , i, (LPARAM)prcWorkAreas);
|
|
}
|
|
|
|
#else
|
|
SystemParametersInfoW(SPI_GETWORKAREA, 0, &rcNewSize, 0);
|
|
::MoveWindow(m_hWnd, rcNewSize.left, rcNewSize.top, rcNewSize.right - rcNewSize.left, rcNewSize.bottom - rcNewSize.top, TRUE);
|
|
::MoveWindow(m_hWndShellView, 0, 0, rcNewSize.right - rcNewSize.left, rcNewSize.bottom - rcNewSize.top, TRUE);
|
|
|
|
#endif
|
|
return S_OK;
|
|
}
|
|
|
|
HRESULT CDesktopBrowser::Initialize(IShellDesktopTray *ShellDesk)
|
|
{
|
|
CComPtr<IShellFolder> psfDesktop;
|
|
HRESULT hRet;
|
|
hRet = SHGetDesktopFolder(&psfDesktop);
|
|
if (FAILED_UNEXPECTEDLY(hRet))
|
|
return hRet;
|
|
|
|
m_Tray = ShellDesk;
|
|
|
|
Create(NULL, NULL, szProgmanWindowName, WS_POPUP | WS_CLIPSIBLINGS | WS_CLIPCHILDREN, WS_EX_TOOLWINDOW);
|
|
if (!m_hWnd)
|
|
return E_FAIL;
|
|
|
|
CSFV csfv = {sizeof(CSFV), psfDesktop};
|
|
hRet = SHCreateShellFolderViewEx(&csfv, &m_ShellView);
|
|
if (FAILED_UNEXPECTEDLY(hRet))
|
|
return hRet;
|
|
|
|
m_Tray->RegisterDesktopWindow(m_hWnd);
|
|
if (FAILED_UNEXPECTEDLY(hRet))
|
|
return hRet;
|
|
|
|
FOLDERSETTINGS fs;
|
|
RECT rcShellView = {0,0,0,0};
|
|
fs.ViewMode = FVM_ICON;
|
|
fs.fFlags = FWF_DESKTOP | FWF_NOCLIENTEDGE | FWF_NOSCROLL | FWF_TRANSPARENT;
|
|
hRet = m_ShellView->CreateViewWindow(NULL, &fs, (IShellBrowser *)this, &rcShellView, &m_hWndShellView);
|
|
if (FAILED_UNEXPECTEDLY(hRet))
|
|
return hRet;
|
|
|
|
_Resize();
|
|
|
|
HWND hwndListView = FindWindowExW(m_hWndShellView, NULL, WC_LISTVIEW, NULL);
|
|
|
|
m_hAccel = LoadAcceleratorsW(shell32_hInstance, MAKEINTRESOURCEW(IDA_DESKBROWSER));
|
|
|
|
#if 1
|
|
/* A Windows8+ specific hack */
|
|
::ShowWindow(m_hWndShellView, SW_SHOW);
|
|
::ShowWindow(hwndListView, SW_SHOW);
|
|
#endif
|
|
ShowWindow(SW_SHOW);
|
|
UpdateWindow();
|
|
|
|
return hRet;
|
|
}
|
|
|
|
HRESULT STDMETHODCALLTYPE CDesktopBrowser::GetWindow(HWND *lphwnd)
|
|
{
|
|
if (lphwnd == NULL)
|
|
return E_POINTER;
|
|
*lphwnd = m_hWnd;
|
|
return S_OK;
|
|
}
|
|
|
|
HRESULT STDMETHODCALLTYPE CDesktopBrowser::ContextSensitiveHelp(BOOL fEnterMode)
|
|
{
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
HRESULT STDMETHODCALLTYPE CDesktopBrowser::InsertMenusSB(HMENU hmenuShared, LPOLEMENUGROUPWIDTHS lpMenuWidths)
|
|
{
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
HRESULT STDMETHODCALLTYPE CDesktopBrowser::SetMenuSB(HMENU hmenuShared, HOLEMENU holemenuRes, HWND hwndActiveObject)
|
|
{
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
HRESULT STDMETHODCALLTYPE CDesktopBrowser::RemoveMenusSB(HMENU hmenuShared)
|
|
{
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
HRESULT STDMETHODCALLTYPE CDesktopBrowser::SetStatusTextSB(LPCOLESTR lpszStatusText)
|
|
{
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
HRESULT STDMETHODCALLTYPE CDesktopBrowser::EnableModelessSB(BOOL fEnable)
|
|
{
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
HRESULT STDMETHODCALLTYPE CDesktopBrowser::TranslateAcceleratorSB(LPMSG lpmsg, WORD wID)
|
|
{
|
|
if (!::TranslateAcceleratorW(m_hWnd, m_hAccel, lpmsg))
|
|
return S_FALSE;
|
|
return S_OK;
|
|
}
|
|
|
|
HRESULT STDMETHODCALLTYPE CDesktopBrowser::BrowseObject(LPCITEMIDLIST pidl, UINT wFlags)
|
|
{
|
|
/*
|
|
* We should use IShellWindows interface here in order to attempt to
|
|
* find an open shell window that shows the requested pidl and activate it
|
|
*/
|
|
|
|
DWORD dwFlags = ((wFlags & SBSP_EXPLOREMODE) != 0) ? SH_EXPLORER_CMDLINE_FLAG_E : 0;
|
|
return SHOpenNewFrame(ILClone(pidl), NULL, 0, dwFlags);
|
|
}
|
|
|
|
HRESULT STDMETHODCALLTYPE CDesktopBrowser::GetViewStateStream(DWORD grfMode, IStream **ppStrm)
|
|
{
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
HRESULT STDMETHODCALLTYPE CDesktopBrowser::GetControlWindow(UINT id, HWND *lphwnd)
|
|
{
|
|
if (lphwnd == NULL)
|
|
return E_POINTER;
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
HRESULT STDMETHODCALLTYPE CDesktopBrowser::SendControlMsg(UINT id, UINT uMsg, WPARAM wParam, LPARAM lParam, LRESULT *pret)
|
|
{
|
|
if (pret == NULL)
|
|
return E_POINTER;
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
HRESULT STDMETHODCALLTYPE CDesktopBrowser::QueryActiveShellView(IShellView **ppshv)
|
|
{
|
|
if (ppshv == NULL)
|
|
return E_POINTER;
|
|
*ppshv = m_ShellView;
|
|
if (*ppshv != NULL)
|
|
(*ppshv)->AddRef();
|
|
|
|
return S_OK;
|
|
}
|
|
|
|
HRESULT STDMETHODCALLTYPE CDesktopBrowser::OnViewWindowActive(IShellView *ppshv)
|
|
{
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
HRESULT STDMETHODCALLTYPE CDesktopBrowser::SetToolbarItems(LPTBBUTTON lpButtons, UINT nButtons, UINT uFlags)
|
|
{
|
|
return E_NOTIMPL;
|
|
}
|
|
|
|
HRESULT STDMETHODCALLTYPE CDesktopBrowser::QueryService(REFGUID guidService, REFIID riid, PVOID *ppv)
|
|
{
|
|
/* FIXME - handle guidService */
|
|
return QueryInterface(riid, ppv);
|
|
}
|
|
|
|
LRESULT CDesktopBrowser::_NotifyTray(UINT uMsg, WPARAM wParam, LPARAM lParam)
|
|
{
|
|
HWND hWndTray;
|
|
HRESULT hRet;
|
|
|
|
hRet = m_Tray->GetTrayWindow(&hWndTray);
|
|
if (SUCCEEDED(hRet))
|
|
::PostMessageW(hWndTray, uMsg, wParam, lParam);
|
|
|
|
return 0;
|
|
}
|
|
|
|
LRESULT CDesktopBrowser::OnCommand(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL &bHandled)
|
|
{
|
|
switch (LOWORD(wParam))
|
|
{
|
|
case FCIDM_DESKBROWSER_CLOSE:
|
|
return _NotifyTray(TWM_DOEXITWINDOWS, 0, 0);
|
|
case FCIDM_DESKBROWSER_FOCUS:
|
|
if (GetKeyState(VK_SHIFT))
|
|
return _NotifyTray(TWM_CYCLEFOCUS, 1, 0xFFFFFFFF);
|
|
else
|
|
return _NotifyTray(TWM_CYCLEFOCUS, 1, 1);
|
|
case FCIDM_DESKBROWSER_SEARCH:
|
|
SHFindFiles(NULL, NULL);
|
|
break;
|
|
case FCIDM_DESKBROWSER_REFRESH:
|
|
if (m_ShellView)
|
|
m_ShellView->Refresh();
|
|
break;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
LRESULT CDesktopBrowser::OnEraseBkgnd(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL &bHandled)
|
|
{
|
|
return (LRESULT)PaintDesktop((HDC)wParam);
|
|
}
|
|
|
|
LRESULT CDesktopBrowser::OnSize(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL &bHandled)
|
|
{
|
|
if (wParam == SIZE_MINIMIZED)
|
|
{
|
|
/* Hey, we're the desktop!!! */
|
|
::ShowWindow(m_hWnd, SW_RESTORE);
|
|
}
|
|
|
|
::InvalidateRect(m_hWndShellView, NULL, TRUE);
|
|
|
|
return 0;
|
|
}
|
|
|
|
LRESULT CDesktopBrowser::OnSettingChange(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL &bHandled)
|
|
{
|
|
if (uMsg == WM_SETTINGCHANGE /* == WM_WININICHANGE */ &&
|
|
lstrcmpiW((LPCWSTR)lParam, L"Environment") == 0)
|
|
{
|
|
LPVOID lpEnvironment;
|
|
RegenerateUserEnvironment(&lpEnvironment, TRUE);
|
|
}
|
|
|
|
if (m_hWndShellView)
|
|
{
|
|
/* Forward the message */
|
|
::SendMessageW(m_hWndShellView, uMsg, wParam, lParam);
|
|
}
|
|
|
|
if (uMsg == WM_SETTINGCHANGE && wParam == SPI_SETWORKAREA && m_hWndShellView != NULL)
|
|
{
|
|
_Resize();
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
LRESULT CDesktopBrowser::OnClose(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL &bHandled)
|
|
{
|
|
return _NotifyTray(TWM_DOEXITWINDOWS, 0, 0);
|
|
}
|
|
|
|
LRESULT CDesktopBrowser::OnOpenNewWindow(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL &bHandled)
|
|
{
|
|
TRACE("Proxy Desktop message 1035 received.\n");
|
|
SHOnCWMCommandLine((HANDLE)lParam);
|
|
return 0;
|
|
}
|
|
|
|
LRESULT CDesktopBrowser::OnSetFocus(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL &bHandled)
|
|
{
|
|
::SetFocus(m_hWndShellView);
|
|
return 0;
|
|
}
|
|
|
|
// Message WM_DESKTOP_GET_CNOTIFY_SERVER: Get or create the change notification server.
|
|
// wParam: BOOL bCreate; The flag whether it creates or not.
|
|
// lParam: Ignored.
|
|
// return: The window handle of the server window.
|
|
LRESULT CDesktopBrowser::OnGetChangeNotifyServer(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL &bHandled)
|
|
{
|
|
BOOL bCreate = (BOOL)wParam;
|
|
if (bCreate && !::IsWindow(m_hwndChangeNotifyServer))
|
|
{
|
|
HRESULT hres = CChangeNotifyServer_CreateInstance(IID_PPV_ARG(IOleWindow, &m_ChangeNotifyServer));
|
|
if (FAILED_UNEXPECTEDLY(hres))
|
|
return NULL;
|
|
|
|
hres = m_ChangeNotifyServer->GetWindow(&m_hwndChangeNotifyServer);
|
|
if (FAILED_UNEXPECTEDLY(hres))
|
|
return NULL;
|
|
}
|
|
return (LRESULT)m_hwndChangeNotifyServer;
|
|
}
|
|
|
|
HRESULT CDesktopBrowser_CreateInstance(IShellDesktopTray *Tray, REFIID riid, void **ppv)
|
|
{
|
|
return ShellObjectCreatorInit<CDesktopBrowser, IShellDesktopTray*>(Tray, riid, ppv);
|
|
}
|
|
|
|
/*************************************************************************
|
|
* SHCreateDesktop [SHELL32.200]
|
|
*
|
|
*/
|
|
HANDLE WINAPI SHCreateDesktop(IShellDesktopTray *Tray)
|
|
{
|
|
if (Tray == NULL)
|
|
{
|
|
SetLastError(ERROR_INVALID_PARAMETER);
|
|
return NULL;
|
|
}
|
|
|
|
CComPtr<IShellBrowser> Browser;
|
|
HRESULT hr = CDesktopBrowser_CreateInstance(Tray, IID_PPV_ARG(IShellBrowser, &Browser));
|
|
if (FAILED_UNEXPECTEDLY(hr))
|
|
return NULL;
|
|
|
|
return static_cast<HANDLE>(Browser.Detach());
|
|
}
|
|
|
|
/*************************************************************************
|
|
* SHCreateDesktop [SHELL32.201]
|
|
*
|
|
*/
|
|
BOOL WINAPI SHDesktopMessageLoop(HANDLE hDesktop)
|
|
{
|
|
if (hDesktop == NULL)
|
|
{
|
|
SetLastError(ERROR_INVALID_PARAMETER);
|
|
return FALSE;
|
|
}
|
|
|
|
MSG Msg;
|
|
BOOL bRet;
|
|
|
|
CComPtr<IShellBrowser> browser;
|
|
CComPtr<IShellView> shellView;
|
|
|
|
browser.Attach(static_cast<IShellBrowser*>(hDesktop));
|
|
HRESULT hr = browser->QueryActiveShellView(&shellView);
|
|
if (FAILED_UNEXPECTEDLY(hr))
|
|
return FALSE;
|
|
|
|
while ((bRet = ::GetMessageW(&Msg, NULL, 0, 0)) != 0)
|
|
{
|
|
if (bRet != -1)
|
|
{
|
|
if (shellView->TranslateAcceleratorW(&Msg) != S_OK)
|
|
{
|
|
::TranslateMessage(&Msg);
|
|
::DispatchMessageW(&Msg);
|
|
}
|
|
}
|
|
}
|
|
|
|
return TRUE;
|
|
}
|