笔下有余

  博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理
取得body区域源码,并且修改

代码
void __fastcall TForm1::CppWebBrowser1DocumentComplete(TObject *Sender,
      LPDISPATCH pDisp, Variant *URL)
{
  if(!CppWebBrowser1->Busy &&flag==1)
  {
    IHTMLDocument2  *document;
    IHTMLElement  *body;
    BSTR  source;
    (void *)document=CppWebBrowser1->Document;
    if (document == NULL) return;
    if(SUCCEEDED(document->get_body(&body)))
    {
       if(SUCCEEDED(body->get_outerHTML(&source)))
       {
           ht=AnsiString(source);       
           ht=StringReplace(ht,"原来的","最新的"+Kucun,TReplaceFlags()<<rfReplaceAll) ;
           body->put_innerHTML(WideString(ht));     //只添加body处，对<html>没有影响
       }
    }
    document->Release();
    body->Release();

  }
  flag=0;  //
}

 

posted on 2010-01-11 15:47  笔下有余  阅读(784)  评论(0)    收藏  举报