같은 내용을 서로 다른 버튼의 이벤트에 적용 시키는 작업을 하고 있습니다. 완전 초보라 어떻게 해야되는지를 잘 모르겠습니다.

void __fastcall TForm1::CheckBox3MouseDown(TObject *Sender, TMouseButton Button,
      TShiftState Shift, int X, int Y)
{


           if(Shift.Contains(ssLeft))
    {
        TCheckBox *ChkBox=(TCheckBox *)Sender;
        if(!ChkBox->Checked)
        {
    if(GetCheckBoxCheckedCount()>=3){
                ReleaseCapture();
            }
    }
    }
    }
//---------------------------------------------------------------------------
void __fastcall TForm1::CheckBox4MouseDown(TObject *Sender, TMouseButton Button,
      TShiftState Shift, int X, int Y)
{
               if(Shift.Contains(ssLeft))
    {
        TCheckBox *ChkBox=(TCheckBox *)Sender;
        if(!ChkBox->Checked)
        {
            if(GetCheckBoxCheckedCount()>=3)
            {
                ReleaseCapture();
            }
            }
        }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::CheckBox5MouseDown
    (TObject *Sender, TMouseButton Button,TShiftState Shift, int X, int Y)
{
           if(Shift.Contains(ssLeft))
    {
        TCheckBox *ChkBox=(TCheckBox *)Sender;
        if(!ChkBox->Checked)
        {
            if(GetCheckBoxCheckedCount()>=3)
            {
                ReleaseCapture();
            }
            }
        }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::CheckBox6MouseDown(TObject *Sender, TMouseButton Button,
      TShiftState Shift, int X, int Y)
{
               if(Shift.Contains(ssLeft))
    {
        TCheckBox *ChkBox=(TCheckBox *)Sender;
        if(!ChkBox->Checked)
        {
            if(GetCheckBoxCheckedCount()>=3)
            {
                ReleaseCapture();
        }
        }
        }
    }
//---------------------------------------------------------------------------


지금은 버튼이 얼마 없어 크게 문제가 안되는데 나중에 100개 이상 처럼 많은 양을 사용 하게 되면 노가다가 될것 같은데 쉽게 구현 할수 있는방법이 있을까요?