[code cpp]
//---------------------------------------------------------------------------
//---------------------------------------------------------------------------

#include
#include <math.h><br />#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"

TForm1 *Form1;

//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
if (OpenPictureDialog1->Execute())
Image1->Picture->LoadFromFile(OpenPictureDialog1->FileName);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{ if (Image2->Picture->Bitmap->Empty==true)
ShowMessage("No image to save!");
else
if (SavePictureDialog1->Execute())
Image2->Picture->SaveToFile(SavePictureDialog1->FileName);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{
Graphics::TBitmap *Bmp = new Graphics::TBitmap();
Bmp->PixelFormat=pf24bit;
Bmp->Assign(Image1->Picture->Bitmap);
Byte *ptr;
int r,g,b;
int gray;
int i,j;
int threshold;

for(j=0;jHeight;j )
{ptr = (Byte *)Bmp->ScanLine[j];
for(i=0;iWidth;i )
{
b=ptr[i*3];
g=ptr[i*3 1];
r=ptr[i*3 2];
gray=(b*28 g*151 r*77)/256;
ptr[i*3]=(Byte)gray;
ptr[i*3 1]=(Byte)gray;
ptr[i*3 2]=(Byte)gray;
}
}
Image2->Picture->Assign(Bmp);
delete Bmp ;

}

//---------------------------------------------------------------------------
void __fastcall TForm1::Button4Click(TObject *Sender)
{
Graphics::TBitmap *Bmp = new Graphics::TBitmap();
Byte *ptr;
int gray;
int i,j;
int threshold;
Bmp->PixelFormat=pf24bit;
Bmp->Assign(Image1->Picture->Bitmap);
for(j=0; jHeight; j ) {
ptr = (Byte *)Bmp->ScanLine[j];
for(i=0; iWidth*3; i =3) {
gray = (ptr[i]*0.114 ptr[i 1]*0.587 ptr[i 2]*0.299);
if(gray > 0) gray = 255;
else gray = 0;
ptr[i] = ptr[i 1] = ptr[i 2] = (Byte)gray;
}
}
Image2->Picture->Assign(Bmp);
delete Bmp;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button5Click(TObject *Sender)
{
Graphics::TBitmap *Bmp = new Graphics::TBitmap();
Byte *ptr;
int gray;
int i,j;
int sx = 0;
int sy = 0;
int **pic = 0;
int thresh;


Bmp->Assign(Image1->Picture->Bitmap);
Bmp->PixelFormat=pf24bit;

pic = new int*[Bmp->Height];
for(i = 0; i< Bmp->Height; i )
pic[i] = new int[Bmp->Width];

Bmp->Assign(Image1->Picture->Bitmap);
for(j=0; jHeight; j ) {
ptr = (Byte *)Bmp->ScanLine[j];
for(i=0; iWidth; i ) {
gray = (ptr[i*3]*0.114 ptr[i*3 1]*0.587 ptr[i*3 2]*0.299);
pic[j][i] = ptr[i*3] = ptr[i*3 1] = ptr[i*3 2] = (Byte)gray;
}
}

for(j=1; jHeight-1; j ) {
ptr = (Byte *)Bmp->ScanLine[j];
for(i=1; iWidth-1; i ) { // convolution
sx = -1*pic[j-1][i-1] pic[j 1][i-1] -2*pic[j-1][i]
2*pic[j 1][i] - pic[j-1][i 1] pic[j 1][i 1];
sy = pic[j-1][i-1] 2*pic[j][i-1] pic[j 1][i-1] -
1*pic[j-1][i 1] - 2*pic[j][i 1] - pic[j 1][i 1];

if(sqrt(sx*sx sy*sy)>thresh) {
ptr[i*3] = ptr[i*3 1] = ptr[i*3 2] = 0;
} else ptr[i*3] = ptr[i*3 1] = ptr[i*3 2] = 255;
}
}
Image2->Picture->Assign(Bmp);

for (i=0; i< Bmp->Height; i ) delete [] pic[i];
delete [] pic;
delete Bmp;
}
//---------------------------------------------------------------------------

[/code]
執行灰階後，解析度變低了，而且顏色也沒有改變。

附加檔案：4b0a65bf84386_灰階.rar

編輯記錄

解法有2

法一:把color.bmp換成24bit的
法二:
順序改成
Bmp->PixelFormat=pf24bit;

 之前的問題已經解決了，可是在做sobel的時候，他的邊緣的線很粗(color的圖)，
而且假如我使用的是灰階的圖片的話，在做sobel的時候卻不能執行，
這是為什麼呢?該如何解決上述問題呢(附加檔案已有更新)

編輯記錄

1.新問題與標題無關
2.sobel站上已有很多相關討論與程式碼供您參考


===================引 用 silent852 文 章===================
之前的問題已經解決了，可是在做sobel的時候，他的邊緣的線很粗(color的圖)，
而且假如我使用的是灰階的圖片的話，在做sobel的時候卻不能執行，
這是為什麼呢?該如何解決上述問題呢(附加檔案已有更新)