对了，怎么把数据库里的JPEG图片放在TIMAGE控件里显示呢？

Question

procedure TfaImageView.FDrawBlobImage(AField: TField; AImage: TImage);
var
  mStream: TMemoryStream;
  tmpJpg: TJPEGImage;
begin
  AImage.Visible := False;
  mStream := TMemoryStream.Create;
  tmpJpg := TJPEGImage.Create;
  try
    TBlobField(AField).SaveToStream(mStream);
    mStream.Position := 0;
    tmpJpg.LoadFromStream(mStream);
    AImage.Picture.Bitmap.Assign(tmpJpg);
  finally
    mStream.Free;
    tmpJpg.Free;
  end
end;