VPF::Word automation и Windows 7 - Форум программистов

Sartorius

Дата 4.6.2010, 13:43 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1568
Регистрация: 18.7.2006
Где: Ivory tower

Репутация: нет
Всего: 37

Всем привет.

Открываю диалог печати через Word automation. В XP окно открывается нормально (поверх всех окон), в Windows 7 под другим окном и пользователю его соответственно не видно

Вот код:

Код


               DISPID dispID;
    LPOLESTR szDlgItem = L"Item";
    hr = m_pDialogs->GetIDsOfNames(IID_NULL, &szDlgItem, 1, LOCALE_SYSTEM_DEFAULT, &dispID);
    
    varg.vt = VT_INT;
    varg.intVal = 88; // dwDialogFilePrint
    DISPPARAMS dpGetItem88 = { &varg, NULL, 1, 0 };

    hr = m_pDialogs->Invoke(dispID, IID_NULL, LOCALE_SYSTEM_DEFAULT, DISPATCH_METHOD, &dpGetItem88, &varRetVal, NULL, NULL);
    if (!SUCCEEDED(hr))
    {
        Destroy();        
        return -1;
    }
    
    // keep the Dispatch pointer in the member variable for later use.
    m_pDlgItem = varRetVal.pdispVal;    
            
    varg.vt = VT_BSTR;
    varg.bstrVal = _bstr_t(""); 
    DISPPARAMS dpShow = { &varg, NULL, 1, 0 };

    LPOLESTR szOpenDlg = L"Show";
    DISPID dispShowID;
    hr = m_pDlgItem->GetIDsOfNames(IID_NULL, &szOpenDlg, 1, LOCALE_SYSTEM_DEFAULT, &dispShowID);
    hr = m_pDlgItem->Invoke(dispShowID, IID_NULL, LOCALE_SYSTEM_DEFAULT, DISPATCH_METHOD, &dpOpen, &varRetVal, NULL, NULL);
    if (FAILED(hr))
    {
        DebugPrint("Error showing the dialog\n");
        Destroy();
        return -1;
    }

m_pDialogs - это соответственно IDispatch для диалогов. Кто нибудь сталкивался с подобными проблемами при переносе на семерку?

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Программирование, связанное с MS Office \| Следующая тема »