Jenter Алекс
Шрифт:
Я не буду рассматривать этот способ подробно, поскольку он сильно устарел и очень неудобен. Тем не менее, в приложении DrawImg этот способ реализован наравне с другими.
Способ 6 (Снова Фильтры импорта)
Майкрософт Офис, начиная с версии 8.0 (97) использует новый API с теми же фильтрами.
HRESULT Load(LPCTSTR szFile) {
HMODULE hModule = g_pMapExtToFilter->LoadFilter(szFile);
if (NULL == hModule) return E_FAIL;
struct NameStruct {
DWORD dwHead[2];
char szName[MAX_PATH];
DWORD dwTail[2];
};
typedef DWORD (__stdcall *GetFilterInfo_t)
(DWORD dwVersion, DWORD dwReserved, HGLOBAL *phFilterData, DWORD dwReserved2);
typedef DWORD (__stdcall *SetFilterPref_t)
(HGLOBAL hFilterData, LPCSTR szOption, LPCSTR szValue, DWORD dwReserved2, DWORD dwReserved1);
typedef DWORD (__stdcall *ImportGr_t)
(DWORD dwReserved, NameStruct *pFile, ImgInfo *pInfo, HGLOBAL hFilterData);
GetFilterInfo_t pGetFilterInfo = (GetFilterInfo_t)::GetProcAddress(hModule, "GetFilterInfo");
SetFilterPref_t pSetFilterPref = (SetFilterPref_t)::GetProcAddress(hModule, "SetFilterPref");
ImportGr_t pImportGr = (ImportGr_t)::GetProcAddress(hModule, "ImportGr");
if (NULL == pImportGr) pImportGr = (ImportGr_t)::GetProcAddress(hModule, "ImportGR");
if (pImportGr) {
NameStruct name = {0};
HGLOBAL hFilterData = NULL;
if (pGetFilterInfo) {
DWORD dwVer = pGetFilterInfo(2, 0, &hFilterData, 0x00170000);
ATLASSERT(2 == dwVer);
if (2 != dwVer) {
::FreeLibrary(hModule);
return E_UNEXPECTED;
}
}
// PB 01/26/2001 Turn off dialogs
if (pSetFilterPref) {
pSetFilterPref(hFilterData, "ShowProgressDialog", "No", 2, 1);
pSetFilterPref(hFilterData, "ShowOptionsDialog", "No", 2, 1);
}
USES_CONVERSION;
::lstrcpynA(name.szName, T2CA(szFile), MAX_PATH);
DWORD dwRet = pImportGr(0, &name, &m_Image, hFilterData);
if (hFilterData) ::GlobalFree(hFilterData);
if (0 != dwRet || NULL == m_Image.hObj) {
::FreeLibrary(hModule);
return E_FAIL;
}
if (OBJ_METAFILE != ::GetObjectType(m_Image.hObj)) {
HGLOBAL hObj = (HGLOBAL)m_Image.hObj;
LPBYTE pObj = (LPBYTE)::GlobalLock(hObj);
m_Image.hObj = ::SetMetaFileBitsEx(::GlobalSize(hObj), pObj);
::GlobalUnlock(hObj);
::GlobalFree(hObj);
}
if (NULL == m_Image.hObj) {
::FreeLibrary(hModule);
return E_FAIL;
}
return S_OK;
}
::FreeLibrary(hModule);
return E_UNEXPECTED;
}
HRESULT DrawImg(HDC hdc, const RECT& rcBounds) {
if (m_Image.hObj) {
::SetMapMode(hdc, MM_ANISOTROPIC);
::SetViewportExtEx(hdc,
rcBounds.right - rcBounds.left, rcBounds.bottom - rcBounds.top,
NULL);
::PlayMetaFile(hdc, m_Image.hObj);
return S_OK;
}
return E_UNEXPECTED;
}
Достоинства: понимает очень редкие форматы. Например wpg или cdr
Недостатки: Нет никакой гарантии, что на компьютере пользователя будет установлен нужный фильтр.