当前位置：文江博客话题详情

Delphi 中使用 TWebBrowser 获取网页大小

发布于 2024-08-15 23:27:07 字数 83 浏览 5 评论 0原文

如何获取使用 TWebBrowser 加载的网页的大小（字符或字节）？我的意思是“大小”是加载网页的 HTML 内容的长度。

提前致谢。

原文

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

情绪操控生活 2024-08-22 23:27:07

您必须使用 Document.FileSize 属性，该属性返回 html 文档的大小（以字节为单位）。此属性以字符串形式返回文件大小。请记住，如果没有加载页面或文件在缓存中不可用，它将引发异常。这意味着如果文档标头请求不缓存文件，则调用 FileSize 将引发异常。

试试这个例子：

uses
MSHTML; //the IHTMLDocument2 interface is here

procedure TForm1.WebBrowser1NavigateComplete2(Sender: TObject;
  const pDisp: IDispatch; var URL: OleVariant);    
var
Size : WideString;
begin
 Size:=(WebBrowser1.Document as IHTMLDocument2).FileSize;
 ShowMessage(Size);
 end;

有关更多信息，您可以阅读此链接 http:// www.cryer.co.uk/brian/delphi/twebbrowser/twebbrowser_oleobject.htm

you must use the Document.FileSize property wich returns the size of the html document in bytes.this property returns the file size as a string. keep in mind It will throw an exception if no page is loaded or if the file is not available in the cache. This means that if the document headers request that the file is not cached then calling FileSize will throw an exception.

Try this example:

uses
MSHTML; //the IHTMLDocument2 interface is here

procedure TForm1.WebBrowser1NavigateComplete2(Sender: TObject;
  const pDisp: IDispatch; var URL: OleVariant);    
var
Size : WideString;
begin
 Size:=(WebBrowser1.Document as IHTMLDocument2).FileSize;
 ShowMessage(Size);
 end;

for more info you can read this link http://www.cryer.co.uk/brian/delphi/twebbrowser/twebbrowser_oleobject.htm

回复收藏 0 原文

~没有更多了~