动态加减pagecontrol的页数

动态添加：
tabsheet2:=ttabsheet.Create(self);
tabsheet2.Caption:='fkjsd';
tabsheet2.PageControl:=pagecontrol1;
删除：
tabsheet1.PageControl:=nil;