图像压缩存储问题，程序报错，在线等待!!(100分)

var pjpg:tjpegimage;
begin
pjpg:=tjpegimage.Create;
pjpg.Assign(image1.Picture.bitmap);
pjpg.CompressionQuality:=80;
pjpg.Compress;
table1.append;
table1ss.Assign(pjpg);
pjpg.Free;
table1.Post;
end;
保存时不出错，但如果用 dbimage显示时则报以上错误。

用TblobField

是的 压缩后作为流来保存 很简单的