引言: 不知有沒有 example code 可以參考呢?

arnotsay 你好: 請參考以下的範例程式碼 < class="code"> Graphics::TBitmap *bmp=new Graphics::TBitmap; bmp->LoadFromFile("C:\\24bit.bmp"); bmp->PixelFormat=pf8bit; bmp->SaveToFile("C:\\8bit.bmp"); delete bmp; -- Enjoy Researching & Developing --

引言: arnotsay 是說 8 bit 灰階圖 所以您還要加入 轉成灰階的動作

喔~~謝謝 cmf 的提醒，請改成以下的寫法 < class="code"> void __fastcall TForm1::Button1Click(TObject *Sender) { Graphics::TBitmap *bmp24bitColor=new Graphics::TBitmap; Graphics::TBitmap *bmp8bitGray=new Graphics::TBitmap; bmp24bitColor->LoadFromFile("C:\\24bit.bmp"); bmp8bitGray->Width=bmp24bitColor->Width; bmp8bitGray->Height=bmp24bitColor->Height; for(int i=0; iWidth; i ) { for(int j=0; jHeight; j ) { TColor Color=bmp24bitColor->Canvas->Pixels[i][j]; BYTE R=GetRValue(Color); BYTE G=GetGValue(Color); BYTE B=GetBValue(Color); int Gray=(R G B)/3; Color=(TColor)RGB(Gray, Gray, Gray); bmp8bitGray->Canvas->Pixels[i][j]=Color; Application->ProcessMessages(); } } bmp8bitGray->PixelFormat=pf8bit; bmp8bitGray->SaveToFile("C:\\8bit.bmp"); delete bmp8bitGray; delete bmp24bitColor; } -- Enjoy Researching & Developing -- 發表人 - RaynorPao 於 2003/03/01 20:16:41

引言: arnotsay您好: 試試將bmp8bitGray->Canvas->Pixels[i][j]=Color; 改成 bmp8bitGray->Canvas->Pixels[i][j]=TColor(Color); 順心