activex嵌入浏览器时线程触发事件

   LONG ThreadProc(LPVOID pParam);

   void CFireeventCtrl::StartLengthyProcess()
   {
     DWORD dwID;
     HANDLE threadHandle = CreateThread(NULL,NULL,
                           (LPTHREAD_START_ROUTINE)ThreadProc,
                           (LPVOID)this, NULL, &dwID);
     TRACE("Started the thread %x\n",dwID);
   }

      //define a custom message:
      #define WM_THREADFIREEVENT WM_APP+101

      //add an entry for the message to the message map of the control
      BEGIN_MESSAGE_MAP(CFireeventCtrl, COleControl)
      //{{AFX_MSG_MAP(CFireeventCtrl)
      //}}AFX_MSG_MAP
      ON_OLEVERB(AFX_IDS_VERB_PROPERTIES, OnProperties)
      ON_MESSAGE(WM_THREADFIREEVENT,OnFireEventForThread) //custom handler
      END_MESSAGE_MAP()

      //add a handler for the custom message that will fire our event
      LRESULT CFireeventCtrl::OnFireEventForThread(WPARAM wParam,
          LPARAM lParam)
      {
        FireLengthyProcessDone();
        return TRUE;
      }

      LONG ThreadProc(LPVOID pParam)
      {
        Sleep(2000); //simulate lengthy processing
        CFireeventCtrl *pCtrl = (CFireeventCtrl*)pParam;
        PostMessage(pCtrl->m_hWnd,
                    WM_THREADFIREEVENT,
                    (WPARAM)NULL,
                    (LPARAM)NULL);
        return TRUE;
      }