void __fastcall TForm2::Button1Click(TObject *Sender)
{
int x;
x=StrToInt(Edit1->Text);
 if
{
(x=6)
ShowMessage("Sasai");

 else
ShowMessage("NeSasai");
}
}
//---------------------------------------------------------------------------