顯示數據庫中JPG圖片問題請高手指點,謝謝！

Question

一下語句執行到Image1.Picture.Bitmap.Assign(Jpg)提示:"JPEG error #41." 
 var
    Mem: TMemoryStream;
    Jpg: TJpegImage;
begin
  Mem := TMemoryStream.Create;
  Jpg := TJpegImage.Create;
  TBlobField(SysDM.ADOQryEmpPortrait.Fields[1]).SaveToStream(Mem);
  Jpg.LoadFromStream(Mem);
  Image1.Picture.Bitmap.Assign(Jpg);
  Mem.Free;
  Jpg.Free; 
end;

Answer 1

就不转贴过来了，自己参考一下http://community.csdn.net/Expert/topic/4781/4781068.xml?temp=.2768671

Answer 2

position := 0 ok!
謝謝各位大俠，分馬上給。

Answer 3

var
    Mem: TMemoryStream;
    Jpg: TJpegImage;
begin
  Mem := TMemoryStream.Create;
  Jpg := TJpegImage.Create;
  Mem.Position:=0;
  TBlobField(SysDM.ADOQryEmpPortrait.Fields[1]).SaveToStream(Mem);
  Jpg.LoadFromStream(Mem);
  Image1.Picture.Bitmap.Assign(Jpg);
  Mem.Free;
  Jpg.Free; 
end;

Answer 4

Mem.Position:=0;  一定能搞定！