我读取它时写的代码如下:var
  Ms: TMemoryStream;
begin
  ms := TMemoryStream.Create;
  try
    TBlobField(table1.FieldByName('huibiao')).SaveToStream(ms);
    ///////////////////////////////////////////
    ms.Position := 0; //添加这一行
    ///////////////////////////////////////////
    DBImage1.Picture.Bitmap.LoadFromStream(ms);
    image2.Picture.Bitmap.LoadFromStream(ms);
  finally
    ms.Free;
  end;
end;