在PageControl里动态建立的页面怎么动态删除 ?
//动态建立的按钮
void __fastcall TForm1::Button1Click(TObject *Sender)
{
TTabSheet *ts = new TTabSheet(this);
ts->PageControl = PageControl1;
ts->Caption = String().sprintf(TEXT("新窗体%d"), PageControl1->PageCount);
ts->Show();
}
//动态删除按钮
void __fastcall TForm1::Button2Click(TObject *Sender)
{
// 删除新窗体 ts
???
}