.....
实现代码如下:
begin
//先屏蔽掉所有标签
for i := 0 to PageControl.PageCount - 1 do
PageControl.Pages[i].TabVisible := False;//隐藏
//再开启首先要显示的tab页,Tab_Page1:TTabSheet;
PageControl.ActivePage := Tab_Page1; //这就是要控制跳转的页面
end;
以上就是【Delphi隐藏TPageControl的标签实例介绍】的全部内容了,欢迎留言评论进行交流!