Delphi 内存流方式获取页面验证码图片


本文整理自网络,侵删。

 

显示图片

 

var

  png: TPngImage;

begin

  png := TPngImage.Create;

  png.LoadFromFile('F:\DelphiSource\yzm_demo\Win32\Debug\yzm.png');

  img1.Picture.Bitmap.Assign(png);

  img1.AutoSize := True;

end;

 

内存流方式获取页面验证码图片

procedure TForm1.Button2Click(Sender: TObject);

var

ms:TMemoryStream;

jpg:TJpegImage;

vp:string;

begin

ms:=TMemoryStream.Create;

jpg:=TJpegimage.Create;

vp:='http://ptlogin2.qq.com/getimage?aid=15000102&0.04531191241475274';

IdHTTP1.Get(vp,ms);

ms.Position:=0;

jpg.LoadFromStream(ms);

image1.Picture.Assign(jpg);

ms.Free;

jpg.free;

end;

来源:http://www.coder163.com/language/delphi/

相关阅读 >>

Delphi 程序窗体及控件自适应分辨率

Delphi研究之驱动开发篇(五)--使用后备列表

pos、ansipos、fillchar在Delphi2010中unicode的问题

Delphi 中showmodal与show的区别

Delphi 写3389自动登录器

Delphi修改资源文件的代码

Delphi中使用isuperobject解析json数据

Delphi一句话获取本机ip

Delphi 获取单汉字拼音首字母

Delphi 字符串左右添加字符

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...