怎样用TDBImage控件来装.jpg之类的相片？？

Question

我用DBImage1.Picture.LoadFromFile（）只能装入.bmp之类的，不能装.jpg的，怎么办？？

Answer 1

记得可以将文件转换成BMP格式的来显示，

Answer 2

to ansili
有TJpegImage这个类的吗？我看不到啊！！！
to sduzjw
详细说明下怎样转换啊？

Answer 3

那就用image吧
procedure Tfrm_XTDZDDYXX.showimage;
var j: TJPEGImage;
bs:TBlobstream;
begintry
j:=TJPEGImage.create;
bs := TBlobStream(sub_table.CreateBlobStream(sub_tablenr, bmRead));
j.LoadFromStream(bs);
image1.Picture.assign(j);
finally
if j<>nil then j.free;
if bs<>nil then bs.free;
end;
end;

Answer 4

我刚刚复制你这个过程去试下，它说TJpegImage没有定义，这么奇怪？？？

Answer 5

只要use jpeg 那个单元,一切OK.