TPageControl 如何消隐标签(50分)

  • 主题发起人 主题发起人 puzzle
  • 开始时间 开始时间
P

puzzle

Unregistered / Unconfirmed
GUEST, unregistred user!
help说,不提倡使用TNoteBook,因为是win3.1继承下来的控件。建议使用TPageControl代替,
但是TPageControl如何像TNoteBook那样让标签栏消隐。
 
嘿嘿,问对人了
答案很简单
在Form Create 时:
for i:=0 to PageControl.PageCount-1 do
PageControl.Pages.TabVisible:=False;
在需要显示时:
PageControl1.ActivePage:=Tabsheet3; // the tabsheet you want show
 
方法一:改tabHeigth:=1,但是效果不好,上面有一黑线。
方法二:将TPageContro放在Panel内,改其Top:=-20。
 
to terry_lzs,
佩服!这办法你也能发现,不过很实用。
 
设置TabSheet的TabVisible属性为False
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
I
回复
0
查看
656
import
I
后退
顶部