delphi中如何用image控件显示网络图片

在窗体添加一个Image,一个IdHttp,一个Buttonuses Jpegprocedure TForm1.Button1Click(Sender: TObject);var    imagestream:TMemoryStream;    jpg:TJpegImage;begin    imagestream := TMemoryStream.Create();    jpg:=TJpegImage.Create;    idhttp1.Get('http://img466.ph.126.net/Ec1UwEf2zmavmPCIjXb7tA==/180988410025918883.jpg',imagestream);    imagestream.Position:=0;    jpg.LoadFromStream(imagestream);    image1.Picture.Assign(jpg);end;