Foxtable(狐表)用户栏目专家坐堂 → [求助]导航


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

主题:[求助]导航

帅哥哟,离线,有人找我吗?
大红袍
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/8/24 19:21:00 [显示全部帖子]

 设置字体,要总体设置。

 

o.font = new font("宋体", 12)


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/8/24 19:40:00 [显示全部帖子]


Dim o = e.Form.Controls("Panel1").basecontrol.controls("o")
o.Pages("p1").Text = "123456"

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/8/24 21:12:00 [显示全部帖子]

Dim o As new C1.Win.C1Command.C1OutBar
o.name="o"
o.dock=5 '锚定
o.VisualStyle=9 '主题
o.pagetitleheight=22 '页面高度

Dim p1 As new C1.Win.C1Command.C1OutPage '新建页面
p1.name="aaa"
p1.text="bbb"
o.Pages.add(p1)

p1 = new C1.Win.C1Command.C1OutPage '新建页面
p1.name="ccc"
p1.text="ddd"
o.Pages.add(p1)

e.Form.Controls("Panel1").basecontrol.controls.add(o)


 回到顶部