Delphi TWebBrowser get HTML source after AJAX load

本文整理自网络，侵删。

 
function TBrowser.GetWebBrowserHTML(const WebBrowser: TWebBrowser): string;var  LStream: TStringStream;  Stream : IStream;  LPersistStreamInit : IPersistStreamInit;begin  try    if not Assigned(WebBrowser.Document) then exit;    LStream := TStringStream.Create('', TEncoding.UTF8);    try      LPersistStreamInit := WebBrowser.Document as IPersistStreamInit;      Stream := TStreamAdapter.Create(LStream,soReference);      LPersistStreamInit.Save(Stream,true);      result := LStream.DataString;    finally      LStream.Free();    end;  except  end;end;
 

相关阅读 >>

Delphi2010新功能:tdirectory.getfiles 支持通配符

Delphi webbrowser获取iframe页面内容

Delphi 打开网页的两种方法

Delphi 运行中申请uac权限

Delphi xe6调用android手机标准功能

Delphi twebbrowser 屏蔽右键菜单

Delphi idhttp 实战用法(tidhttpex)

Delphi ascii 码对照表

Delphi memo1 光标跟随鼠标移动

Delphi try except与try finally不同之处

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi TWebBrowser get HTML source after AJAX load