多页控制组件PageControl

PageControl组件位于组件板的Win32页中,该组件用于

实现窗体上多页面技术,每个页面上均能添加若干控件。程序运行时,单击页面标签就可以在多页之间切换。


1.建立多页
用鼠标右键单击PageControl组件,在弹出式菜单中选择New Page子菜单可添加新页,用Delete子菜单可删除当前
页。读者应注意:
·单击PageControl组件标题时,选中的是PageControl对象。
·单击PageControl组件页面时,选中的是TabSheet对象。

选择不同对象,在对象监视器中将显示不同对象的属性,即显示PageControl对象或TabSheet对象的属性。


2.PageControl对象的主要属性
(1)ActivePage属性
ActivePage属性用于设置PageControl组件的当前页。单击ActivePage属性的下拉列表框,从列表框中可选择不同
页面。
(2)Muhiline属性
Muhiline属性值为True时,PageControl控件呈多行风格。
(3)Image属性
Image属性表示与PageControl相关联的ImageList名。选定后PageControl就可使用Image-List中的图像。
(4)Pages属性
PageControl的所有页面记录在Page属性中,Pages是运行时的属性,即设计时在对象监视器中不可见,而运行时
却能在程序中引用。
Pages是一个数组,其元素类型为TTabSheet,元素个数放在PageCount中,Pages[0]是第一页,Pages[PageCount
一1]是最后一页。
(5)ActivePageIndex属性

ActivePageIndex属性是当前活动页的Page属性的下标,从0开始计数。ActivePageIndex也是运行时的属性。


3.TabSheet对象的常用属性
(1)Caption属性
该属性用于设置页标签名称。
(2)PageIndex属性
Pagelndex为该页在Pages数组中的下标,从0开始。
(3)TabVisible属性
TabVisible属性用于设置本页是否可见。
(4)Imagelndex属性
该页使用图像在ImageList中的索引值。


自己变通一下啊,在一Panel排列控件
var
T : TTabsheet;
begin
T := TTabsheet.Create(self);
T.Caption := 'Tst';
T.PageControl := PageControl1;
T.TabVisible := True;
PageControl1.ActivePage := T;
Panel1.Parent:=T;//设置其Parent为T
end;
  • 2
    点赞
  • 5
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值