用TWebBrowser访问页面时,如何获得页面中的图片文件?(85分)

  • 主题发起人 主题发起人 night_cat2000
  • 开始时间 开始时间
应该有选项可以控制吧?
 
在这里解决个问题还真难!!!
 
因为你的问题需要较多的代码实现。
 
http://www.delphibbs.com/delphibbs/dispq.asp?LID=1050442
你自己看吧
 
procedure TForm1.Button1Click(Sender: TObject);
var imgList:IHTMLElementCollection;
img:IHTMLImgElement;
i:Integer;
begin
imgList:=(WebBrowser1.Document as IHTMLDocument2).images;
for I:=0 to imgList.length-1 do
begin
img:=imglist.Item(I,'') as IHTMLimgElement;
NmHTTP1.InputFileMode:=True;
NmHTTP1.Body:=Format('c:/%d%s',[I,ExtractFileExt(img.href)]);
NMHTTP1.Get(img.href);
end;
end;

光说不练不行。给你一个实现,是用NMHTTP做的。
存下来的文件在C:。自己试吧。

有些计数器用Post,那你自己分析Form吧,MSHTML用起来很容易,呵呵!
 
先把页面下载,然后解析一下图片URL,再下载它们,不可以吗????
 
后退
顶部