Difference between revisions of "TPageControl/zh CN"
From Lazarus wiki
Jump to navigationJump to searchTyphonFinger (talk | contribs) |
TyphonFinger (talk | contribs) |
||
(2 intermediate revisions by the same user not shown) | |||
Line 8: | Line 8: | ||
当前Page可以通过 ''ActivePage'' 属性来进行访问操作。 | 当前Page可以通过 ''ActivePage'' 属性来进行访问操作。 | ||
− | == | + | ==删除页面== |
− | + | 有多种方式可以删除Tab | |
− | + | 下面所有方法都可以删除Tab,让Tab从控件中消失,已达到删除的目的。 | |
− | === | + | ===隐藏页面=== |
这个代码是隐藏该页,用户无法看到,但依旧存在,可以再次显示。 | 这个代码是隐藏该页,用户无法看到,但依旧存在,可以再次显示。 | ||
<source lang="pascal"> | <source lang="pascal"> | ||
Tabsheet2.TabVisible := false; | Tabsheet2.TabVisible := false; | ||
</source> | </source> | ||
− | === | + | ===改变父控件=== |
你可以将页面的父控件修改为任何控件,也可以设置为 '''[[Nil|nil]]''' | 你可以将页面的父控件修改为任何控件,也可以设置为 '''[[Nil|nil]]''' | ||
如果你想移动页面或者稍后再显示,此方法很好用。 | 如果你想移动页面或者稍后再显示,此方法很好用。 | ||
Line 22: | Line 22: | ||
Tabsheet2.Parent := nil; | Tabsheet2.Parent := nil; | ||
</source> | </source> | ||
− | === | + | ===释放控件=== |
如果完全不需要这个控件的时候可以Free掉。 | 如果完全不需要这个控件的时候可以Free掉。 | ||
<source lang="pascal"> | <source lang="pascal"> | ||
Line 29: | Line 29: | ||
</source> | </source> | ||
− | == | + | ==其他资料== |
* [[doc:lcl/comctrls/tpagecontrol.html|TPageControl doc]] | * [[doc:lcl/comctrls/tpagecontrol.html|TPageControl doc]] | ||
* [[doc:lcl/extctrls/multi-pagecontrols.html|Multi-page controls doc]] | * [[doc:lcl/extctrls/multi-pagecontrols.html|Multi-page controls doc]] |
Latest revision as of 00:56, 26 April 2020
│
English (en) │
suomi (fi) │
français (fr) │
русский (ru) │
中文(中国大陆) (zh_CN) │
TPageControl 是页面控件,可以容纳别的控件在自己的页面内。 TPageControl 继承于 TWinControl ,在 Common Controls tab 的 Component Palette.
不像 TTabControl, 每个tab都连接到自己的页面. TPageControl的 (TTabSheets) 都来自 Pages property. 右键可以显示相关菜单, 使用“添加页”可以添加页面。
当前Page可以通过 ActivePage 属性来进行访问操作。
删除页面
有多种方式可以删除Tab 下面所有方法都可以删除Tab,让Tab从控件中消失,已达到删除的目的。
隐藏页面
这个代码是隐藏该页,用户无法看到,但依旧存在,可以再次显示。
Tabsheet2.TabVisible := false;
改变父控件
你可以将页面的父控件修改为任何控件,也可以设置为 nil 如果你想移动页面或者稍后再显示,此方法很好用。
Tabsheet2.Parent := nil;
释放控件
如果完全不需要这个控件的时候可以Free掉。
TabSheet2.Free;
TabSheet2:=nil; // this is optional
其他资料