想請問一下: 我這裡哪裡有寫錯....我一直找不出原因來 程式用意在於把兩張圖片...做一下RGB運算...輸出於IMAGE3上面 但執行後出現"Scan line index out of range ." 請問是哪裡出錯了ㄋ.....！！！  （＠.＠｜｜｜）    void __fastcall TForm1::Button1Click(TObject *Sender) { Graphics::TBitmap *BMP1 = new Graphics::TBitmap(); Graphics::TBitmap *BMP2 = new Graphics::TBitmap(); Graphics::TBitmap *BMP3 = new Graphics::TBitmap(); Byte *ptr1=NULL,*ptr2=NULL,*ptr3=NULL; BMP1->Assign(Image1->Picture->Bitmap); BMP2->Assign(Image2->Picture->Bitmap); float nb; nb=StrToInt(InputBox("¹Ï¤ù¬Û¥[","³z©ú«×","1")); for (int y=0;yHeight;y ) { ptr1=(Byte *)BMP1->ScanLine[y]; ptr2=(Byte *)BMP2->ScanLine[y]; ptr3=(Byte *)BMP3->ScanLine[y]; for (int x=0 ; xWidth; x ) { int r1,g1,b1,r2,g2,b2,r3,g3,b3; r1=(int)ptr1[x*3 2];g1=(int)ptr1[x*3 1];b1=(int)ptr1[x*3]; r2=(int)ptr2[x*3 2];g2=(int)ptr2[x*3 1];b2=(int)ptr2[x*3]; r3=nb*r1 (1-nb)*r2 ; g3=nb*g1 (1-nb)*g2 ; b3=nb*b1 (1-nb)*b2 ; ptr3[x*3]=(byte)b3; ptr3[x*3 1]=(byte)g3; ptr3[x*3 2]=(byte)r3; BMP3->Width = BMP1->Width; BMP3->Height = BMP1->Height; } } Image3->Picture->Assign(BMP3); }

請問你的 Image3 一開始是不是沒有 Load 一張圖片, 因為你有用到   

ptr3=(Byte *)BMP3->ScanLine[y]; 

但是因為 Image3 沒有圖片, 所以會造成錯誤.. 最簡單的做法, 就是預先放入一個大小跟Image1一樣大的圖片... 這樣就不會有這樣的錯誤發生... ============= 有興趣,就能進步 =============

引言: 想請問一下: 我這裡哪裡有寫錯....我一直找不出原因來 程式用意在於把兩張圖片...做一下RGB運算...輸出於IMAGE3上面 但執行後出現"Scan line index out of range ." 請問是哪裡出錯了ㄋ.....！！！ （＠.＠｜｜｜）

void __fastcall TForm1::Button1Click(TObject *Sender)
{
Graphics::TBitmap *BMP1 = new Graphics::TBitmap();
Graphics::TBitmap *BMP2 = new Graphics::TBitmap();
Graphics::TBitmap *BMP3 = new Graphics::TBitmap();
Byte *ptr1=NULL,*ptr2=NULL,*ptr3=NULL;
BMP1->Assign(Image1->Picture->Bitmap);
BMP2->Assign(Image2->Picture->Bitmap);
BMP3->PixelFormat = pf24bit;
BMP3->Width = BMP1->Width;
BMP3->Height = BMP1->Height;    float nb;
nb=StrToInt(InputBox("¹Ï¤ù¬Û¥[","³z©ú«×","1"));
for (int y=0;yHeight;y  )
   { ptr1=(Byte *)BMP1->ScanLine[y];
     ptr2=(Byte *)BMP2->ScanLine[y];
     ptr3=(Byte *)BMP3->ScanLine[y];
   for (int x=0 ; xWidth; x  )
   {
    int r1,g1,b1,r2,g2,b2,r3,g3,b3;
    r1=(int)ptr1[x*3 2];g1=(int)ptr1[x*3 1];b1=(int)ptr1[x*3];
    r2=(int)ptr2[x*3 2];g2=(int)ptr2[x*3 1];b2=(int)ptr2[x*3];        r3=nb*r1 (1-nb)*r2 ;
    g3=nb*g1 (1-nb)*g2 ;
    b3=nb*b1 (1-nb)*b2 ;        ptr3[x*3]=(byte)b3;
    ptr3[x*3 1]=(byte)g3;
    ptr3[x*3 2]=(byte)r3;        //BMP3->Width = BMP1->Width;
    //BMP3->Height = BMP1->Height;
    }
  }
 Image3->Picture->Assign(BMP3);    }

huangcc你好: 這個問題好熟悉,請參考一下這篇文章 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=59426 如發文所說的,pixelformat沒有設定,而這二行位置也錯誤 BMP3->Width = BMP1->Width; BMP3->Height = BMP1->Height;

程式沒問題,請您先load 一張相同大小的影像 Best Regards, Pauli @.@b 11/12/04'

非常謝謝！！！