方法一  

  TColor a = Image1->Canvas->Pixels[X][Y];
  unsigned char b;  //rgb value
  b = char(a);
  Label3->Caption = "R: " IntToStr(int(b));
  a >>= 8;
  b = char(a);
  Label4->Caption = "G: " IntToStr(int(b));
  a >>= 8;
  b = char(a);
  Label5->Caption = "B: " IntToStr(int(b));

================================================================ 方法二

  ptr = (Byte *)bmp->ScanLine[r];

================================================================ 想要問一下針對同一張圖 這兩種方法取出的RGB數值為何會不同呢?? 感謝大大的回答

發表人 - sumh 於 2005/06/01 23:20:41

您好 根據我所測試的結果並沒有所謂的不一樣發生 以下是我測試的方式 < class="code"> void __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState Shift, int X, int Y) TColor a = Image1->Canvas->Pixels[X][Y]; unsigned char b; //rgb value b = char(a); Label3->Caption = "R: " IntToStr(int(b)); a >>= 8; b = char(a); Label4->Caption = "G: " IntToStr(int(b)); a >>= 8; b = char(a); Label5->Caption = "B: " IntToStr(int(b)); Graphics::TBitmap *bmp=new Graphics::TBitmap(); bmp->Assign(Image1->Picture->Bitmap); BYTE *ptr; bmp->PixelFormat=pf24bit; ptr = (Byte *)bmp->ScanLine[Y]; Label1->Caption="G: " AnsiString( ptr[X*3 1]); Label2->Caption="R: " AnsiString( ptr[X*3 2]); Label6->Caption="B: " AnsiString( ptr[X*3]); delete bmp; 所以應該不會有你所說的情形發生吧^^

sumh兄 不知道你是不是把ptr[]順序搞錯 以為 ptr[x*3] = R ptr[x*3 1] = G ptr[x*3 2] = B 其實是 ptr[x*3 2] = R ptr[x*3 1] = G ptr[x*3] = B