BCB实现BMP图片的RGB分解（转）

源：BCB实现BMP图片的RGB分解

1、打开BMP图片文件，在Image控件中显示；

  if(dlgOpen1->Execute())
  {
    edt1->Text=dlgOpen1->FileName;
    img1->Picture->LoadFromFile(edt1->Text);
  }

2、逐行扫描图片，获取图片中每点的像素颜色值；        color=img1->Canvas->Pixels[i][j];

3、从获取的颜色值中提取R、G、B分量；         rgbbuf[0][i][j]=GetRValue(color);         rgbbuf[1][i][j]=GetGValue(color);         rgbbuf[2][i][j]=GetBValue(color);

BMP与JPG格式的相互转换

函数代码如下,在程序头文件中加入：#include <jpeg.hpp>

void   bmptojpeg(TMemoryStream   *pms)
  {
        TJPEGImage   *j=new   TJPEGImage;
        Graphics::TBitmap   *b=new   Graphics::TBitmap;
        b->LoadFromStream(pms);
        j->Assign(b);
        j->CompressionQuality=;       //等级太高有可能压缩出错！
        j->Compress();
        pms->Clear();
        j->SaveToStream(pms);
        pms->Position=;
        delete   b;
        delete   j;   

  }
  void   jpegtobmp(TMemoryStream   *pms)
  {
      TJPEGImage   *j=new   TJPEGImage;
      Graphics::TBitmap   *b=new   Graphics::TBitmap;   

      j->LoadFromStream(pms);
      j->DIBNeeded();
      b->Assign(j);
      pms->Clear();
      b->SaveToStream(pms);
      pms->Position=;   

      delete   b;
      delete   j;   

  }

要将转换后的流保存成文件可以使用：SaveToFile方法保存；