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 调用shellexecute打开txt文本

Delphi整理八（对话框）

Delphi 反转字符串方法2

Delphi得到cpu的序列号

Delphi tdbgrideh导出excel

Delphi idhttp访问http与https不同点

Delphi自动以管理员身份在vista 和 windows7 下运行程序

Delphi 将word嵌入Delphi中

Delphi 去掉ide开启后弹出安全警告框

Delphi webbrowser控件的事件

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

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