如何用流的方式打开一张jpg图片,再显示在IMAGE中 (100分)

如何用流的方式打开一张jpg图片,再显示在IMAGE中

Myjpg.SaveToStream(MyStream); {将JPG图象写入流中}
b.LoadFromStream(m); //将流M中的数据读至bmp图像对象b中
Image1.Picture.Bitmap.Assign(b); //分配给image1元件显示出来
具体自己实现

var
filename:string;
t:tmemorystream;
j:tjpegimage;
begin
try
t:=tmemorystream.Create;
j:=tjpegimage.Create;
if opendialog1.Execute then
begin
filename:=opendialog1.filename;
try
t.LoadFromFile(filename);
j.LoadFromStream(t);
image1.Picture.Bitmap.Assign(j);
//tblobfield(datamodule2.info1table.FieldByName('photo')).LoadFromStream(t);
//dbimage1.Picture.LoadFromFile(filename);
except
showmessage('产生错误，文件格式不对,只能保存jpg文件');
end;
end;
finally
t.Free;
j.Free;
end;
end[brown][/brown]

多人接受答案了。