level 7
shionlin24
楼主
Delphi加载网络图片
uses Jpeg
procedure TForm1.Button1Click(Sender: TObject);
var
imagestream:TMemoryStream;
jpg:TJpegImage;
Url : string;
begin
Try
imagestream := TMemoryStream.Create();
jpg:=TJpegImage.Create;
idhttp1.Get(Url ,imagestream);
imagestream.Position:=0;
jpg.LoadFromStream(imagestream);
image1.Picture.Assign(jpg);
end;
提示HTTP/1.1 400 Bad Request
关闭模块的时候进去还是提示这个错误，关闭主程序重新登录进去又可以正常读取。
2014年10月29日 03点10分
1
uses Jpeg
procedure TForm1.Button1Click(Sender: TObject);
var
imagestream:TMemoryStream;
jpg:TJpegImage;
Url : string;
begin
Try
imagestream := TMemoryStream.Create();
jpg:=TJpegImage.Create;
idhttp1.Get(Url ,imagestream);
imagestream.Position:=0;
jpg.LoadFromStream(imagestream);
image1.Picture.Assign(jpg);
end;
提示HTTP/1.1 400 Bad Request
关闭模块的时候进去还是提示这个错误，关闭主程序重新登录进去又可以正常读取。
![[呵呵]](/static/emoticons/u5475u5475.png)
谢谢哥的帮忙。 应该不是URL的问题吧？ 图片可以读出来，但是我关掉模块重新打开这个模块想读取图片的时候就报那个错，然后我把主程序退出去重新登录进来之后就又可以正常读取图片了。 在读取图片之前，show出来的Url也是正常的Url.![[OK]](/static/emoticons/OK.png)
那我晚点整理好联系你！谢谢啦~~
