c++ Borland 6 filtr gausa

Question

potrzebuje w c++ borland 6 napisać aplikacje która wyświetla obraz z filtrami gausa i uwypuklającymi

filter

int GAUSS1_SIZE = 3;

int GAUSS1[9] = {1, 2, 1,

                            2, 4, 2,

                            1, 2, 1};

 

void __fastcall TForm1::Button1Click(TObject *Sender)
{
int rsume, gsume, bsume, graysume;
int margin = ((Size-1)/2);
 
//filtr dla obrazu
for (int i=margin; i<ObrazKolorowy->Width-margin; i++)
for (int j=margin; j<ObrazKolorowy->Height-margin; j++)
{
rsume = 0;
gsume = 0;
bsume = 0;
for (int k=0; k<Size; k++)
for (int l=0; l<Size; l++)
{
rsume += Filter[k*Size+l]*red[i+k-margin][j+l-margin];
gsume += Filter[k*Size+l]*green[i+k-margin][j+l-margin];
bsume += Filter[k*Size+l]*blue[i+k-margin][j+l-margin];
}
rsume /= Norm;
gsume /= Norm;
bsume /= Norm;
 
if (rsume > 255) rsume = 255;
else if (rsume < 0) rsume = 0;
if (gsume > 255) gsume = 255;
else if (gsume < 0) gsume = 0;
if (bsume > 255) bsume = 255;
else if (bsume < 0) bsume = 0;
 
WynikKolorowy->Canvas->Pixels[i][j] = (TColor)rsume + (gsume << 8) + (bsume << 16);
}

mógłby ktoś podpowiedzieć jak zarobić aby w formie po naciśnięciu przycisku pojawiał się 2 obrazek z filtrem gausa próbuje przebudować powyższy kod ale z marnym skutkiem