Para insertar:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
TTabSheet *nueva_pagina = new TTabSheet(PageControl1);
nueva_pagina->PageControl = PageControl1;
nueva_pagina->Caption = "Nueva página";
}
Para eliminar:
void __fastcall TForm1::Button2Click(TObject *Sender)
{
delete PageControl1->ActivePage;
}