怎么判断webbrowser里面的网页是否下载成功? 如果网页打不开。。这时里面的页面显示的是无法显示网页的页面我用webbrowser.busy只能判断是否下载完成 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 WebBrowser的OnNavigateError事件中判断。 doc := IHTMLDocument2(Webbrowser1.Document); if(doc <> nil) then begin item := doc.body; if(item <> nil) then item.style.borderstyle:='none'; end; // if item = nil then就是说下载失败 试了楼上的方法。。不行啊。。当无法显示网页时。。item也有值的。。不为空。。 下载失败时,webbrowser会装入一个Blank页,测试页面内容是不是blank页就可以了。 检查header比较保险如果HTTP/1.0 400 Bad Request就over了 //试了楼上的方法。。不行啊。。当无法显示网页时。。item也有值的。。不为空。。//procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject; const pDisp: IDispatch; var URL: OleVariant);begin Caption := '下载完毕';end;procedure TForm1.Button5Click(Sender: TObject);begin WebBrowser1.Navigate('http://chenyl0857.net');end;管你什么网站,有没有内容,能不能找到,只要完毕都会执行DocumentComplete。 新浪微博开发 怎样做一个NT服务,直接执行这个NT服务,它就自动安装和启动了? ActiveX使用IDUDPSERVER通讯问题 DSPack DVD 没有声音 介绍几本Oracle的书!!!!!!!!!!!! 学历与文凭,在找工作中哪个更好用? 这个程序如何能简化!!!在线等!!! 拨号后从远程win2000服务器上下载文件 在调用窗体类时如何实现类的构造 问:使用TFileStream写文件时,该控制换行? 问几个DELPHI的菜鸟问题? (高手请进) http secure socket is not supported???
if(doc <> nil) then
begin
item := doc.body;
if(item <> nil) then
item.style.borderstyle:='none';
end;
//
if item = nil then就是说下载失败
如果HTTP/1.0 400 Bad Request就over了
试了楼上的方法。。不行啊。。当无法显示网页时。。item也有值的。。不为空。。
//procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject;
const pDisp: IDispatch; var URL: OleVariant);
begin
Caption := '下载完毕';
end;procedure TForm1.Button5Click(Sender: TObject);
begin
WebBrowser1.Navigate('http://chenyl0857.net');
end;管你什么网站,有没有内容,能不能找到,只要完毕都会执行DocumentComplete。