Question

我有以下代码将html字符串加载到嵌入的WebBrowser控件。该代码在 GlobalFree 时出错（我已标记并接近结尾）。调试器只是说：TestProgram.exe has triggered a breakpoint，没有其他解释。

如果我评论该错误行，我的程序可以正常运行，我的浏览器控件成功加载我的html字符串。但如果我发表评论，我的应用肯定会被记忆泄露。

那么这里的确切问题是什么？如何解决？

我的环境：

操作系统：Windows 10
IDE：Visual Studio社区2017
Complier Toolset：v120

代码：

HRESULT STDMETHODCALLTYPE WebBrowser::displayHTMLStr(LPCTSTR htmlSource) {
    HRESULT                   hr;

    IDispatch                 *pDispatch = 0;
    IHTMLDocument2            *pHtmlDoc2 = 0;
    IPersistStreamInit        *pPSI = 0;
    IStream                   *pStream = 0;
    HGLOBAL                   hHTMLContent;

    hr = webBrowser2->get_Document(&pDispatch);
    if (FAILED(hr) || !pDispatch) {
        goto displayHTMLStr_clean;
    }

    hr = pDispatch->QueryInterface(IID_IHTMLDocument2, (void **)&pHtmlDoc2);
    if (FAILED(hr) || !pHtmlDoc2) {
        goto displayHTMLStr_clean;
    }

    hr = pHtmlDoc2->QueryInterface(IID_IPersistStreamInit, (void **)&pPSI);
    if (FAILED(hr) || !pPSI) {
        goto displayHTMLStr_clean;
    }







    // allocate global memory to copy the HTML content to
    hHTMLContent = ::GlobalAlloc(GPTR, (::wcslen(htmlSource) + 1) * sizeof(TCHAR));
    if (!hHTMLContent) {
        hr = E_OUTOFMEMORY;
        goto displayHTMLStr_clean;
    }

    ::wcscpy((TCHAR *)hHTMLContent, htmlSource);

    // create a stream object based on the HTML content
    hr = ::CreateStreamOnHGlobal(hHTMLContent, TRUE, &pStream);
    if (FAILED(hr) || !pStream) {
        goto displayHTMLStr_clean;
    }

    hr = pPSI->InitNew();
    if (FAILED(hr)) {
        goto displayHTMLStr_clean;
    }

    hr = pPSI->Load(pStream);
    displayHTMLStr_clean:

    if (pStream) {
        pStream->Release();
    }
    if (hHTMLContent) {
        GlobalFree(hHTMLContent);                      // <------ Error here
    }
    if (pPSI) {
        pPSI->Release();
    }
    if (pHtmlDoc2) {
        pHtmlDoc2->Release();
    }
    if (pDispatch) {
        pDispatch->Release();
    }

    return hr;
}

Answer 1

您正在调用CreateStreamOnHGlobal，将TRUE作为 fDeleteOnRelease 参数传递。这会将内存的所有权转移到IStream实现。在最终版本中，它将释放通过 hGlobal 参数引用的内存。在GlobalFree对象发布后，再次在该句柄上调用IStream是一个双重错误。

有两种解决方案：

将FALSE作为 fDeleteOnRelease 参数传递。
取消对GlobalFree的调用。

顺便说一下，传递给CreateStreamOnHGlobal的内存句柄应该被分配为可移动的：

句柄必须分配为可移动且不可丢弃。

SHCreateMemStream

MSDN

＆＃34;产生更好的效果＆＃34;

IStream* pStream = ::SHCreateMemStream(reinterpret_cast<const BYTE*>(htmlSource),
                                       _tcslen(htmlSource) * sizeof(TCHAR));

GlobalFree给出错误。调试器没有解释

1 个答案: