从ORACLE的一BLOB字段中读出JPEG2000图片并通过TIMAGE显示,
不知道为什么总是说JPeg Error #53!procedure TForm1.ADOQuery2AfterOpen(DataSet: TDataSet);
var
tmpstream : tmemorystream;
jpg : tjpegimage;
begin
tmpstream:=tmemorystream.Create;
jpg:=tjpegimage.create;
tblobfield(adoquery2.Fields[0]).SaveToStream(tmpstream);
tmpstream.Position:=0;
jpg.loadfromstream(tmpstream); //这里出现JPEG ERROR #53
image1.Picture.Graphic := jpg;
tmpstream.Free;
jpg.free;
end
不知道为什么总是说JPeg Error #53!procedure TForm1.ADOQuery2AfterOpen(DataSet: TDataSet);
var
tmpstream : tmemorystream;
jpg : tjpegimage;
begin
tmpstream:=tmemorystream.Create;
jpg:=tjpegimage.create;
tblobfield(adoquery2.Fields[0]).SaveToStream(tmpstream);
tmpstream.Position:=0;
jpg.loadfromstream(tmpstream); //这里出现JPEG ERROR #53
image1.Picture.Graphic := jpg;
tmpstream.Free;
jpg.free;
end
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货