一個DBImage圖片問題，源代碼開放!高手請進!!!!!!

Question

我在用OpenDialog1，DBImage1，結合時，編寫以下代碼：
var
  extname,fname:string;
  jpg:TJPEGImage;//此句顯示為[Error] form1.pas(1947): Undeclared identifier: 'TJPEGImage'
begin
  if OpenDialog1.Execute then
  begin
   fname:=OpenDialog1.filename;
   extname:=uppercase(extractfileext(fname));
   if extname='.bmp' then dbimage1.picture.loadfromfile(fname);
   if (extname='.jpg') or (extname='.jpeg') then
     begin
       jpg:=TJPEGImage.create;
       try
         jpg.loadfromfile(fname);
         dbimage1.Picture.Graphic.assign(jpg);
         finally
           jpg.free;
           end;
       end;
     end;
end;
這變量申明沒錯，怎麼會有這樣的提示，請指出問題所在，並幫忙修正，謝謝

Answer 1

你没有引用Jpeg单元。这个只能手工增加到uses中的。

Answer 2

wg007(迈克) ( ) :錯誤提示是消除了，但我點選圖片時卻加截不到DBImage中，不管是.bmp文檔，還是.jpg,.jpeg文檔，都無法在DBImage中顯示，這是為什麼？

Answer 3

上面問題OK，再想問一個問題是，如何將所顯示的圖片自動調整其大小，因我的DBImage中的圖片顯示出來的是扭曲的圖片。請指教

Answer 4

上面說得對在UESE中加JPEG，至於為什麼失真建議你去看看圖像處理的書或帖子。