delphi下载网络图片

2025-04-25 13:06:41

1、添加一个空间image ，一个idhttp，一个button控件即可

2、双击Button写上代码const sURL='此处jpg地址';var 门钙蹲茌jpg:TJPEGImage稆糨孝汶; sm:TMemoryStream;begin try sm:=TMemoryStream.Create; jpg:=TJPEGImage.Create; idhtp1.Get(sURL,sm); sm.Position:=0; jpg.LoadFromStream(sm); img1.Picture.Assign(jpg); except jpg.Free; sm.Free; Exit; end;

3、点击下载

声明：本网站引用、摘录或转载内容仅供网站访问者交流或参考，不代表本站立场，如存在版权或非法内容，请联系站长删除，联系邮箱：site.kefu@qq.com。