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从路径中分离文件名

winapi 字符及字符串函数(12): lstrlen - 串长度

Delphi 移动windows开始按钮到任务栏中的任何位置

firemonkey 手机 app 的手势

Delphi xe的firemonkey获取当前文件所在路径的方法

Delphi firemonkey限制tedit只能输入数字的完美方法

Delphi将image存入mysql数据库

Delphi twebbrowser 响应回车键(ewb响应正常，无需额外代码)

Delphi 检测用户超过多长时间没有操作键盘或鼠标

Delphi 动态创建窗体

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