События формы С++ Builder

void __fastcall TForm1::Button1Click(TObject *Sender)
{
    if(Sender->ClassNameIs("TCheckBox"))
   {  if(((TCheckBox*)Sender)->Name=="CheckBox1")
       ((TCheckBox*)Sender)->Caption="ChikBoks1";
      if(((TCheckBox*)Sender)->Name=="CheckBox2")
       ((TCheckBox*)Sender)->Caption="ChikBoks2";
   }
    if(Sender->ClassNameIs("TButton"))
   {  if(((TButton*)Sender)->Name=="Button1")
       ShowMessage("Push btn1!");
      if(((TButton*)Sender)->Name=="Button2")
       ShowMessage("Push btn2!");
   }
}

void __fastcall TForm1::Button1Click(TObject *Sender)
{
    //
    // выполнение своих действий
    //
    Function();
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button2Click(TObject *Sender)
{
    //
    // выполнение своих действий
    //
    Function();
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button3Click(TObject *Sender)
{
    //
    // выполнение своих действий
    //
    Function();
}
//---------------------------------------------------------------------------
 
 
void TForm1::Function() 
{
    // была нажата какая-то клавиша!!! 
}

void __fastcall TForm1::sButtonClick(TObject *Sender)

void __fastcall TForm1::sButtonClick(TObject *Sender)
{
 TButton *sButton=(TButton*)Sender;//1 
 int a=sButton->Tag;//2         1,2  Если нужно будет, например что-то типа  f(a,b,sButton)    
 
int a=((TButton*)Sender)->Tag;// Если sButton никуда посылать не нужно    
switch Tag
    {
       case  0 : {......}  break;
        ............................       
       case 100: {......}  break;
      default  : {......}  break;
    }   
}