我使用ListView  來顯示圖片 但是卻會出現Scanline out of range的訊息 到最後發現是jpg->Scale=jsEighth;這一行出了問題   不使用載入圖片時又會很慢~~~ 程式碼如下 是哪出了問題呢~~~~               

 
TListItem* Itm;               
          Itm=ListView2->Items->Add();
          Itm->Caption=AnsiString(filename1);              Graphics::TBitmap *bmp=new Graphics::TBitmap();                TJPEGImage *jpg=new TJPEGImage();
          jpg->Scale=jsEighth;///////////////////比例
          jpg->LoadFromFile(filename);
          bmp->Assign(jpg);              SetStretchBltMode(bmp->Canvas->Handle, STRETCH_HALFTONE);
          bmp->Canvas->CopyMode=cmSrcCopy;              TRect SrcRect=Rect(0,0,bmp->Width,bmp->Height); 
          TRect DesRect=Rect(0,0,150,150);              if (bmp->Width>150 || bmp->Height>150)
              bmp->Canvas->CopyRect(DesRect,bmp->Canvas,SrcRect);                 bmp->Width=150;        
          bmp->Height=150;              Itm->ImageIndex=ImageList1->Add(bmp,NULL);               delete bmp;
          delete jp;

yachu721 您好：    您貼上來的資料中並無 Scanline 的處理敘述，把發生錯誤的那段處理程序也貼上來吧。      7 天天敲鍵盤 v 時時按滑鼠 8

RedSnow 大大您好~~ 但問題是我並沒有使用過Scanline這函式呀 對圖形有敘訴的只有這了~~~

yachu721 您好：    那個錯誤是發生在讀入某張特定的圖檔時，還是讀入每張圖檔時都會？我單獨測試您貼上來的那一段敘述是 OK 的，如果是讀入某張特定圖檔時才會發生的話，可能是圖檔所造成的錯誤，如果是讀入任何一張時都會發生那個錯誤的話，以您所貼上的程式片段看不太出來問題出在那裡？方便的話請將檔案打包上傳，讓有興趣的人幫忙測試一下。      7 天天敲鍵盤 v 時時按滑鼠 8

如RedSnow 大大所說 是圖形的問題 謝謝RedSnow的回答 發表人 - yachu721 於 2005/08/03 19:22:05