Выполнить код из обработчика нажатия Button1 при нажатии Button2

void __fastcall TForm1::Button1Click(TObject *Sender)
{
//тут действия 1 кнопки
}
 
void __fastcall TForm1::Button2Click(TObject *Sender)
{
//тут действия 2 кнопки
// а тут надо чтобы сработала 1 кнопка
}

void __fastcall TForm1::Button2Click(TObject *Sender)
{
//тут действия 2 кнопки
  Button1->Click(); // а тут надо чтобы сработала 1 кнопка
}

void __fastcall TForm1::Button2Click(TObject *Sender)
{
//тут действия 2 кнопки
  Button1Click(NULL);
}

  if (Sender->Name=="Button2") {
   // действия 2-й кнопки
  }
   // действия обоих кнопок

if ( ((TButton*)Sender)->Name=="Button2" ) {
   // действия 2-й кнопки
  }
   // действия обоих кнопок

try {
  if ( dynamic_cast<TButton*>(Sender)->Name == "Button2" ) {
     // действия 2-й кнопки
  }
}
catch(...) {
  return; // нехорошо всякую брехню заместо Sender пихать, да уж бывает...
}
// действия обоих кнопок

void __fastcall TForm*::Button2Click(TObject *Sender)
{
Button1Click(Sender); /* Для большинства случаев можно использовать переменную Sender в 
качестве параметра для вызова другого метода формы, где требуется аргумент TObject *Sender. */
}

Button2->OnClick = Button1Click;