读书人

提示: JPEG ERROR #41 如何解

发布时间: 2012-03-27 13:44:24 作者: rapoo

求助:提示: JPEG ERROR #41 怎么解?
Delphi6.0+Access2000;

Bmp-> Image-> Jpg(转存到指定位置,路径连带文件名存在数据库中,重新加载该.jpg文件时)提示:JPEG ERROR #41 ;

请大哥大姐帮忙解一下。

[解决办法]
jpeg:=tjpegimage.Create;
stream :=TMemoryStream.Create;
tblobfield(adoquery1.FieldByName( 'jpg ')).savetostream(stream);
Stream.Seek(0,soFromBeginning);
jpeg.loadfromstream(stream);
image.Picture.Bitmap.Assign(jpeg);
jpeg.Free;
stream.Free;

读书人网 >.NET

热点推荐