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;
 

相关阅读 >>

Delphi cxdbtreelist：最简单的节点图标添加方法

Delphi获取操作系统已运行的所有窗口程序

Delphi tanimate组件

Delphi 不可移动的窗体

Delphi截取字符串 防止中文截断

Delphi idftp用法

Delphi xe可执行文件上启用dep和aslr

Delphi 由类名获取父类

Delphi中从windows资源管理器中拖放图片到timage控件上

Delphi rect()

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

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