try
try
Stream := TMemoryStream.Create;
Jpeg := TJPEGImage.Create;
idc.Get('http://xxxxx/RandomImgGenServlet',Stream);
Jpeg.LoadFromStream(Stream);
F_query.Image1.Picture.Bitmap.Assign(Jpeg);
F_query.Image1.Show;
except
end;
finally
Stream.Free;
Jpeg.Free;
end;
加载流时报错jpeg error #42
try try Stream := TMemoryStream.Create; Jpeg := TJPEGImage.Create; idc.Get('http://xxxxx/RandomImgGenServlet',Stream);
Stream.position := 0;//应指到流首位
Jpeg.LoadFromStream(Stream); F_query.Image1.Picture.Bitmap.Assign(Jpeg); F_query.Image1.Show; except end; finally Stream.Free; Jpeg.Free; end;
加载图片正常
转载请注明原文地址: https://ju.6miu.com/read-1309832.html
