Delphi:RzPageControl(pagecontrol)实现多标签的动态添加,切换,关闭
来源:互联网 发布:mysql 分类排序 编辑:程序博客网 时间:2024/06/11 23:58
使用RzPageControl来实现多标签页
使用菜单来打开标签页,通过标签页的caption来判断将标签页是否已经被打开过了.
1.创建标签页,并判断是否是已经打开过的页面
procedure TFmain.Page1Click(Sender: TObject);
var
begin
end;
gotopage函数,跳转到需要显示的那页,不存在的话就创建那一页
{
}
function TFmain.gotopage(scaption:string;newpage:TRzTabSheet):boolean;
var
begin
end;
findpage函数,找到指定caption的那一页,返回那页的index,如果那页不存在,返回-1
{
}
function TFmain.findpage(scaption:string):integer;
var
begin
end;
2.双击标签,关闭标签页
RzpageControl的双击事件,如果标题不是’首页’就关闭当前显示的这页
procedure TFmain.PageControl1DblClick(Sender: TObject);
begin
end;
3.通过关闭按钮关闭
先设置ShowCloseButton属性为true
然后重写OnClose事件
procedure TFmain.PageControl1Close(Sender: TObject;
begin //如果只剩下一页不关闭,或当前页是首页不关闭
end;
- RzPageControl(pagecontrol)实现多标签的动态添加,切换,关闭
- RzPageControl(pagecontrol)实现多标签的动态添加,切换,关闭
- RzPageControl(pagecontrol)实现多标签的动态添加,切换,关闭
- Delphi:RzPageControl(pagecontrol)实现多标签的动态添加,切换,关闭
- 实现 托动PageControl上的标签页
- delphi PageControl
- Delphi使用pageControl实现镶嵌窗体
- Delphi 中 RadioGroup / pagecontrol 的使用
- Delphi中多标签页面的实现
- juqery实现多标签页的切换
- Android中的多标签切换的实现
- CB的PageControl控件动态删除TABSHEET
- RzPageControl设置多页时显示关闭按钮
- delphi PageControl显示窗体
- delphi PageControl显示窗体
- jquery动态关闭左边的tab标签
- Delphi 用INI实现多语言界面的切换
- LinearLayout 动态添加 TextView 实现标签效果
- Win操作系统相关配置还原
- DTD中的ELEMENT和ATTLIST
- Twitter为什么不学Google+或Facebook采用实名制
- DB2的字符转换
- 索引在什么情况下失去作用
- Delphi:RzPageControl(pagecontrol)实现多标签的动态添加,切换,关闭
- 进程上下文和中断上下文的区别
- CSS精灵2
- 为App签名(为apk签名)
- logical standby 同步缓慢
- Git用法相关文章乱炖
- Sharepoint 2010 根据用户权限隐藏Ribbon菜单(利用css)
- 今天正式开始在csdn上写博客了(2011年9月19日)
- HttpHelpers类普通GET和POST方式,带Cookie和带证书验证模式