1、在uses 中添加jpeg2、用query定位到需要显示的记录,3、然后
var tempsream:tstringstream;
tempjpeg:tjpegimage;
try
tempstream:=tstringstream.create('');
tblobfield(query1.fieldbyname('image')).savetostream(tempstream);
tempstream.position:=0;
tempjpeg:=tjpegimage.create;
tempjpeg.loadfromstream(tempstream);
dbimage1.picture.bitmap.assign(tempjpeg);
finally
tempstream.free;
tempjpeg.free;
end;
var tempsream:tstringstream;
tempjpeg:tjpegimage;
try
tempstream:=tstringstream.create('');
tblobfield(query1.fieldbyname('image')).savetostream(tempstream);
tempstream.position:=0;
tempjpeg:=tjpegimage.create;
tempjpeg.loadfromstream(tempstream);
dbimage1.picture.bitmap.assign(tempjpeg);
finally
tempstream.free;
tempjpeg.free;
end;
我加入后要出错