Утечка памяти CppWebBrowser

IHTMLDocument2 *pHTMLDocument;
IHTMLElementCollection *pCollection;
IDispatch *pDisp;
IHTMLFormElement *forma;
 
if (SUCCEEDED(CppWebBrowser->ControlInterface->Document->QueryInterface(IID_IHTMLDocument2, LPVOID*)&pHTMLDocument)))
{
    if (SUCCEEDED(pHTMLDocument->get_forms(&pCollection)))
    {
        if (SUCCEEDED(pCollection->item(TVariant(0), TVariant(0), &pDisp)))
        {
            if (SUCCEEDED(pDisp->QueryInterface<IHTMLFormElement>(&forma)))
            {
                forma->submit();
                forma->Release();
                forma = NULL;
            }
            pDisp->Release();
            pDisp = NULL;
        }
        pCollection->Release();
        pCollection = NULL;
    }
    pHTMLDocument->Release();
    pHTMLDocument = NULL;
}

void ClearMem()
{
    THandle MainHandle;
    if (Win32Platform == VER_PLATFORM_WIN32_NT)
    {
        HANDLE ProcessHandle, ThreadHandle;
        DWORD ProcessID = GetCurrentProcessId();
        ProcessHandle = OpenProcess(PROCESS_ALL_ACCESS,false,ProcessID);
        SetProcessWorkingSetSize(ProcessHandle, DWORD(-1), DWORD(-1));
        CloseHandle(ProcessHandle);
    }
}