将JPEG文件保存数据库中去后,再让它显示出来的时候,出现一半的图片无法显示(显示为马赛克),请高手赐教 ( 积分: 100 )

  • 主题发起人 主题发起人 redqiao
  • 开始时间 开始时间
R

redqiao

Unregistered / Unconfirmed
GUEST, unregistred user!
将JPEG文件保存数据库中去后,再让它显示出来的时候,出现一半的图片无法显示(显示为马赛克),请高手赐教

这是哪个方面的原因呀。
 
将JPEG文件保存数据库中去后,再让它显示出来的时候,出现一半的图片无法显示(显示为马赛克),请高手赐教

这是哪个方面的原因呀。
 
你用什么方法保存的?用文件流的方式么
 
var
 MS: TStream;
begin
 with Table1 do
 MS:=CreateBlobStream
(FieldbyName('image'),bmRead);
 Image1.Picture.Bitmap.
LoadFromStream(MS);
 MS.Free;
end;
但你的是JPEG格式,还要进行转换:参考
var
bmp:tBitmap;
Jpg:TJpegImage;
begin
Jpg:=TJpegImage.Create;//
bmp:=tBitmap.Create ;
jpg.LoadFromFile(f1);
bmp.Assign(jpg);
...
 
也建议用BlobStream来处理,一直用得较稳定.也许出在显示部分,你是用什么显示图片?
 
如是用BDE连接,将所建立的数据连接的bolb size值改为256,bolbs to cache的值改为512。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部