WebBrowser 里面 打开的图片(验证码),如何保存到本地?(不要下载的,临时文件夹里面也没有) 希望各位大侠能帮帮小弟 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 主要是针对验证码,如果用idhttp下载后就不是当前的验证码了所要的就是当前WebBrowser 显示的验证码 function TForm1.GetURLFile(strURL:string;strFileName:string):boolean; //保存图片var ms:TMemoryStream;begin ms:=TMemoryStream.Create; Result:=true; IdHTTP1.Disconnect; try IdHTTP1.Get(strURL,ms); ms.Position:=0; ms.SaveToFile(strFileName); except Result:=false; end; ms.Free;end;procedure TForm1.bsSkinButton8Click(Sender: TObject);begin GetURLFile('http://61.152.248.132/pass9/gd.php','1.bmp');end; 楼上大侠的方法保存php图片成bmp图片后,无法在delphi打开啊 新手上路 高手帮忙下 新手1756 怎么将D7的dfm文件里的Unicode的汉字信息还原成汉字? 大家来评论一下 几个问题——在线等 求一SQL语句 sql语言中字符串参数param用法的一个问题。 关于图片缩放--------为什么这段代码有问题? 怎样用label和edit编成一个控件,我在曾编过,但安装时不是找不到vcl5.0就是破坏system 操纵XML:如何直接替换IXmlnode.xml? delphi调用COM端口问题 ############支持国产共享软件,请大家投上最神圣的一票!!!!散分 请教:怎么下载网页中的图片,并存为bmp文件?有已有链接
所要的就是当前WebBrowser 显示的验证码
var
ms:TMemoryStream;
begin
ms:=TMemoryStream.Create;
Result:=true;
IdHTTP1.Disconnect;
try
IdHTTP1.Get(strURL,ms);
ms.Position:=0;
ms.SaveToFile(strFileName);
except
Result:=false;
end;
ms.Free;
end;procedure TForm1.bsSkinButton8Click(Sender: TObject);
begin
GetURLFile('http://61.152.248.132/pass9/gd.php','1.bmp');
end;