各位大大您們好: 想請問一下我作影像反白的結果影像 理當整頁都反白 卻產生下面的現象 我的程式碼 Byte* ptr; Graphics::TBitmap *TheBitmap; TheBitmap=Image1->Picture->Bitmap ; Edit3->Text =TheBitmap->Height ; Edit4->Text =TheBitmap->Width ; for(int y=0; y < TheBitmap->Height ;y++) { ptr = (Byte*)TheBitmap->ScanLine[y]; for(int x=0; x < TheBitmap->Width ; x++ ) { ptr[x]=(Byte)(255-ptr[x]);} } Repaint(); 請各位大大幫我瞧一下哪裡出了問題 謝謝^^ 發表人 - taishyang 於 2004/09/06 12:02:25

您好: 改成下面這樣

for(int x=0; x < TheBitmap->Width ; x   )
{ 
   ptr[x*3  ] = (Byte)(255-ptr[x*3  ]);
   ptr[x*3 1] = (Byte)(255-ptr[x*3 1]);
   ptr[x*3 2] = (Byte)(255-ptr[x*3 2]);
}

P.S: PO程式碼的方式請參考版規說明 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=47262 順心 發表人 -

感謝版主的幫忙 但請問為什麼會這樣呢？？

因為您的pixelformat此時與Image1一樣是24bits 所以要R,G,B都要處理

ptr[x*3]   為B
ptr[x*3 1] 為G
ptr[x*3 2] 為R 

順心

謝謝版主大人 我了解嚕～ 且顯像結果正如我所要~~^^