TWebBrowser QueryInterface IID_IHTMLElement2 总是 returns E_NOINTERFACE

Question

我正在做一个简单的 QueryInterface() 来获取 IHTMLElement2 接口，但它总是失败 E_NOINTERFACE。

更新： 我需要获取 body 元素的 IHTMLElement2 接口，因为它有一个 focus() 方法，所以我可以设置专注于 body。用IHTMLElement界面做不到。

知道为什么会出现此错误（或如何到达 body->focus()）吗？

WebBrowser1->Navigate(L"c:\test.htm");
while (WebBrowser1->Busy) Application->ProcessMessages();

DelphiInterface<IHTMLDocument2> diDoc = WebBrowser1->Document;
if (diDoc) {
    DelphiInterface<IHTMLElement2> diBodyElement;

    // all good until this point
    if (SUCCEEDED(diDoc->QueryInterface(IID_IHTMLElement2, reinterpret_cast<void**>(&diBodyElement))) && diBodyElement) {
        // Never reaches this part - always E_NOINTERFACE when querying for IID_IHTMLElement2
        diBodyElement->focus();
        }
    }

Answer 1

我已经找到了如何达到 body->focus() 的自己的解决方案，如下所示：

DelphiInterface <IHTMLDocument2> diDoc2 = WebBrowser1->Document;

if (diDoc2) {
    DelphiInterface<IHTMLElement>     pBody1;
    DelphiInterface<IHTMLElement2>    pBody2;
    DelphiInterface<IHTMLBodyElement> pBodyElem;

    if (SUCCEEDED(diDoc2->get_body(&pBody1)) && pBody1) {
        if (SUCCEEDED(pBody1->QueryInterface(IID_IHTMLBodyElement, reinterpret_cast<void**>(&pBodyElem))) && pBodyElem) {
        if (SUCCEEDED(pBodyElem->QueryInterface(IID_IHTMLElement2, reinterpret_cast<void**>(&pBody2))) && pBody2) {
            pBody2->focus();
            }
        }
    }
}

编辑（Reby Lebeau 建议） - 简化版：

DelphiInterface <IHTMLDocument2> diDoc2 = WebBrowser1->Document;

if (diDoc2) {
    DelphiInterface<IHTMLElement>  pBody1;
    DelphiInterface<IHTMLElement2> pBody2;

    if (SUCCEEDED(diDoc2->get_body(&pBody1)) && pBody1) {
        if (SUCCEEDED(pBody1->QueryInterface(IID_IHTMLElement2, reinterpret_cast<void**>(&pBody2))) && pBody2) {
            // focus to <body> element
            pBody2->focus();
            }
        }
    }

TWebBrowser QueryInterface IID_IHTMLElement2 总是 returns E_NOINTERFACE

TWebBrowser QueryInterface IID_IHTMLElement2 always returns E_NOINTERFACE

mshtml

interface

c++builder

twebbrowser