Утечка памяти 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);
        }
}