Реферат: Закраска гранично-заданной области с затравкой, Машинная графика, C Builder 4.0

}

if (Button==mbRight)

{

Canvas->Pen->Color = bcolor;

Canvas->LineTo(x0,y0);

metka=0;

start=0;

}

}

//---------------------------------------------------------------------------

//---------------------------------------------------------------------------

void __fastcall TForm1::movexy(TObject *Sender, TShiftState Shift, int X,

int Y)

{

Label2->Caption=X;

Label4->Caption=Y;

// xtmp=X;ytmp=Y;

//Label6->Caption=Canvas->Pixels[x0][y0];

//Zaliv();

}

//---------------------------------------------------------------------------

void __fastcall TForm1::vpered(TObject *Sender, TMouseButton Button,

TShiftState Shift, int X, int Y)

{

Edit1->Text=" Выберите точку закраски";

start=5;

}

//---------------------------------------------------------------------------

void __fastcall TForm1::reset_key(TObject *Sender, TMouseButton Button,