image载入流后图片错误
procedure TMainFrm.btn2Click(Sender: TObject);var MS: TMemoryStream;begin MS := TMemoryStream.Create; with tbl1 do begin TBlobField(FieldByName('u_Portrait')).SaveToStream(MS); end; img1.Picture.Bitmap.LoadFromStream(MS); img1.Picture.Bitmap.SaveToFile('C:\Users\FKY\Desktop\123.bmp'); MS.Free;end;上面这个123.bmp打开后图片错误,而且ima1也显示不了而下面的就正常,请问哪里错了?procedure TMainFrm.btn3Click(Sender: TObject);var MS: TMemoryStream;begin MS := TMemoryStream.Create; with tbl1 do begin TBlobField(FieldByName('u_Portrait')).SaveToStream(MS); end; MS.SaveToFile('C:\Users\FKY\Desktop\123.bmp'); MS.Free;end;