Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]当窗体设置为并列时


  共有2490人关注过本帖树形打印复制链接

主题：[求助]当窗体设置为并列时
帅哥哟，离线，有人找我吗？
WENFEIZHU
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：67 积分：588 威望：0 精华：0 注册：2017/3/17 21:53:00 		[求助]当窗体设置为并列时  发帖心情 Post By：2017/4/13 19:51:00 [只看该作者]

当窗体设置为并列时，如何调整窗体主题的字体大小？
 回到顶部
帅哥哟，离线，有人找我吗？
有点色
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2017/4/13 19:58:00 [只看该作者]

参考代码

 

Dim tab = forms("窗口1").panel.parent.parent
tab.font = new font("宋体", 20)
tab.tabpages(1).font = new font("宋体", 9)
 回到顶部
帅哥哟，离线，有人找我吗？
WENFEIZHU
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：67 积分：588 威望：0 精华：0 注册：2017/3/17 21:53:00 		  发帖心情 Post By：2017/4/13 20:02:00 [只看该作者]

写在窗体的afterload里面？
 回到顶部
帅哥哟，离线，有人找我吗？
有点色
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2017/4/13 20:09:00 [只看该作者]

AfterLoad事件

 

Dim tab = e.Form.panel.parent.parent
tab.font = new font("宋体", 20)
For Each p As object In tab.tabpages
    p.font = new font("宋体", 9)
Next
 回到顶部
帅哥哟，离线，有人找我吗？
WENFEIZHU
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：67 积分：588 威望：0 精华：0 注册：2017/3/17 21:53:00 		  发帖心情 Post By：2017/4/13 20:20:00 [只看该作者]

谢谢~虽然不理解
 回到顶部
帅哥哟，离线，有人找我吗？
WENFEIZHU
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：67 积分：588 威望：0 精华：0 注册：2017/3/17 21:53:00 		  发帖心情 Post By：2017/5/7 10:28:00 [只看该作者]

有点色版主，怎么在帮助文件里找不到相关的资料？

1、可否设置tab（标题栏）的color？如何设置？
2、可否在标题栏上显示关闭按钮？
 回到顶部
帅哥哟，离线，有人找我吗？
有点色
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2017/5/7 12:31:00 [只看该作者]


 回到顶部
帅哥哟，离线，有人找我吗？
WENFEIZHU
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：67 积分：588 威望：0 精华：0 注册：2017/3/17 21:53:00 		  发帖心情 Post By：2017/5/7 17:20:00 [只看该作者]

第二条未解决，你给的链接讲的是窗口中TABCONTROL控件的关闭按钮。

我需要设置的是【并列窗口】的标题栏上显示关闭按钮。请帮忙解答，谢谢~
 回到顶部
帅哥哟，离线，有人找我吗？
WENFEIZHU
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：67 积分：588 威望：0 精华：0 注册：2017/3/17 21:53:00 		  发帖心情 Post By：2017/5/7 17:24:00 [只看该作者]

OK了，试了下，应该这样写

Dim tab = e.Form.panel.parent.parent
tab.font = new font("宋体", 10)
tab.canclosetabs = True
For Each p As object In tab.tabpages
    p.font = new font("宋体",10)
Next
 回到顶部
帅哥哟，离线，有人找我吗？
WENFEIZHU
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：67 积分：588 威望：0 精华：0 注册：2017/3/17 21:53:00 		  发帖心情 Post By：2017/5/7 17:27:00 [只看该作者]

但是还想问下，foxtable并未提示tab有哪些属性，在哪里可以查到？
 回到顶部
总数 11 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05469 秒, 4 次数据查询