Delphi隐藏TPageControl的标签实例介绍

陈泽达

下面是个简单的例子：
.....

复制代码 代码如下:

begin
//先屏蔽掉所有标签
for i := 0 to PageControl.PageCount - 1 do
PageControl.Pages.TabVisible := False;//隐藏

//再开启首先要显示的tab页，Tab_Page1:TTabSheet;
PageControl.ActivePage := Tab_Page1; //这就是要控制跳转的页面
end;

您可能感兴趣的文章:

• 一个简单的花指令伪装器-Delphi版木马彩衣
• Delphi实现窗口文字淡入淡出渐变效果的方法
• Delphi实现限定软件使用时间的方法
• Delphi实现图像文本旋转特效完整实例代码
• Delphi实现图片滚动切换的完整实例代码
• Delphi实现读取系统时间与日期完整实例
• Delphi中对时间操作方法汇总
• delphi7连接mysql5的实现方法
• delphi设置开机自动启动函数具体实现
• DELPHI7.0 获取硬盘、CPU、网卡序列号的代码
• Delphi实现木马自我拷贝方法