IMAGE与QRDBIMAGE中显示的图片大小不一样，变型了，何解？解决办法

IMAGE与QRDBIMAGE中显示的图片大小不一样，变型了，何解？



好久没来****发问题了。    
 
  if     image1.picture.Graphic     <>     nil     then     //避免image1中无图像保存出错    
                                      begin    
                                              strm     :=     tmemorystream.Create     ;    
                                              try    
                                                      image1.Picture.Graphic.SaveToStream(strm);    
                                                      strm.Position:=0;    
                                                      tblobfield(adotable1.FieldByName( '样带 ')).LoadFromStream(strm);    
                                                      adotable1.FieldByName( 'isbmp ').Value     :=     1;     //BMP型图像数据    
                                              finally    
                                                              strm.Free     ;        
                                              end;    
 
将IMAGE1中的图片保存到ACCESS数据库中。以BMP的格式。    
 
              //样带显示    
              strm     :=     tadoblobstream.Create(tblobfield(adotable1.fieldbyname( '样带 ')),bmread);    
              try     //try1    
                      strm.position     :=0;    
                      image1.Picture.Graphic     :=     nil;     //清除图像    
                      //     BMP、JPEG两种图像数据必需分别处理    
                      if     adotable1.fieldbyname( 'isbmp ').AsBoolean     =true     then     //BMP型图像数据