width.cpp

face tracking function of source code

//---------------------------------------------------------------------------
#include <vcl\vcl.h>
#pragma hdrstop
#include "tccolor.h"
#include "width.h"
//---------------------------------------------------------------------------
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
	: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
OpenDialog1->FileName = "bluesky.BMP";
if(OpenDialog1->Execute())
       {
       PathName = OpenDialog1->FileName;
       Image1->Picture->LoadFromFile(OpenDialog1->FileName);
       }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
 SaveDialog1->FileName = PathName;
 if (SaveDialog1->Execute())
     PathName = SaveDialog1->FileName;
     Image1->Picture->SaveToFile(PathName);

}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button4Click(TObject *Sender)
{
int i,j;
j=0;
int buff[255];
 for(i=0;i<=255;i++)
 {
  j=j+2;
  Canvas->LineTo (j+10, buff[i]/10000000);
 }
	
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{

 int x,y,,k,,sum,i=1,j=1;
 int leftbound[300];rightbound[300]

 for(y=0;y<=Image1->Height;y++)
 {
   for(x=0;x<=Image1->Picture->Width;x++)
   {
   TCColor c=Image1->Canvas->Pixels[x][y];

   //graylevel=((int)c.Red+(int)c.Green+(int)c.Blue)/3;
     if ((int)c.Red>130)
     {
        if ((int)c.Green<30)
        {
            if  ((int)c.Blue<30)
            {
                leftbound[i]=x;
                i++;
                x=Image1->Picture->Width;
            }
        }
   //Image1->Canvas->Pixels[x][y]=TCColor(graylevel,graylevel,graylevel).Color;

     }

   }
 }

 for(y=0;y<=Image1->Height;y++)
 {
   for(x=Image1->Picture->Width;x<=0;x--)
   {
   TCColor c=Image1->Canvas->Pixels[x][y];

   //graylevel=((int)c.Red+(int)c.Green+(int)c.Blue)/3;
     if ((int)c.Red>130)
     {
        if ((int)c.Green<30)
        {
            if  ((int)c.Blue<30)
            {
                rightbound[j]=x;
                j++;
                x=0;
            }
        }
   //Image1->Canvas->Pixels[x][y]=TCColor(graylevel,graylevel,graylevel).Color;

     }

   }
 }

 sum=0;
 for (k=61;k<=199;k++)
 {
    sum=sum+buff[k];
 }
 if (sum==19896)
     Label10->Caption="