How to call events on events

TForm1::Button1Click(TObject *Sender)
{
  Application->MessageBox("Button1 Handler!", NULL, MB_Ok);
};

TForm1::Button2Click(TObject *Sender)
{
  Button1Click(Sender);  //calls Button1's handler
};

TForm1::Button2Click(TObject *SEnder)
{
  if (this->Button1->OnClick)
  this->Button1->OnClick(Sender); // Calls Button1's OnClick Event through it's event property if it is assigned
}