Foxtable(狐表)用户栏目专家坐堂 → 如何让新生成的窗口中的TABLE自动列宽


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

主题:如何让新生成的窗口中的TABLE自动列宽

帅哥哟,离线,有人找我吗?
夜点蚊香
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:641 积分:4920 威望:0 精华:0 注册:2020/4/15 19:53:00
如何让新生成的窗口中的TABLE自动列宽  发帖心情 Post By:2021/2/1 9:28:00 [只看该作者]

Dim g As New CrossTableBuilder("时段统计人数", DataTables("统计表时段人数"))
g.Caption = "时段统计人数"
g.HGroups.AddDef("时段")
g.VGroups.AddDef("日期", DateGroupEnum.Day, "{0}日")
g.Totals.AddDef("人数", "人数")
g.Build()
Dim tbl As WinForm.Table
tbl = e.Form.CreateTable("Table1", "时段统计人数", True)
tbl.SetBounds(0, 130, 1200, 600) 
e.Form.AddControl(tbl)

如何让新生成的窗口中的TABLE自动列宽
红色部分,如何确定主坐标以后,自动填满屏幕

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


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/2/1 9:40:00 [只看该作者]

tbl.Dock = System.Windows.Forms.DockStyle.Fill

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


加好友 发短信
等级:三尾狐 帖子:641 积分:4920 威望:0 精华:0 注册:2020/4/15 19:53:00
自动列宽怎么做呢?  发帖心情 Post By:2021/2/1 13:46:00 [只看该作者]

自动列宽怎么做呢?

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/2/1 14:01:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
夜点蚊香
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:641 积分:4920 威望:0 精华:0 注册:2020/4/15 19:53:00
  发帖心情 Post By:2021/2/1 14:36:00 [只看该作者]

Dim g As New CrossTableBuilder("时段统计人数", DataTables("统计表时段人数"))
g.Caption = "时段统计人数"
g.HGroups.AddDef("时段")
g.VGroups.AddDef("日期", DateGroupEnum.Day, "{0}日")
g.Totals.AddDef("人数", "人数")
g.Build()
Dim tbl As WinForm.Table
tbl = e.Form.CreateTable("Table1", "时段统计人数", True)
tbl.Dock = System.Windows.Forms.DockStyle.Fill '自动大小
e.Form.Controls("Panel1").AddControl(tbl)
下面这个代码加到哪里.
Tables("时段统计人数").ExtendLastCol = True

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/2/1 14:38:00 [只看该作者]

Dim g As New CrossTableBuilder("时段统计人数", DataTables("统计表时段人数"))
g.Caption = "时段统计人数"
g.HGroups.AddDef("时段")
g.VGroups.AddDef("日期", DateGroupEnum.Day, "{0}日")
g.Totals.AddDef("人数", "人数")
g.Build()
Dim tbl As WinForm.Table
tbl = e.Form.CreateTable("Table1", "时段统计人数", True)
tbl.Dock = System.Windows.Forms.DockStyle.Fill '自动大小
tbl.ExtendLastCol = True
e.Form.Controls("Panel1").AddControl(tbl)


 回到顶部
帅哥哟,离线,有人找我吗?
夜点蚊香
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:641 积分:4920 威望:0 精华:0 注册:2020/4/15 19:53:00
  发帖心情 Post By:2021/2/1 14:41:00 [只看该作者]

编译报错  ExtendLastCol 不是 winform.table的成员.
错误代码 tbl.ExtendLastCol = True
[此贴子已经被作者于2021/2/1 14:42:51编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/2/1 14:50:00 [只看该作者]

tbl.table.ExtendLastCol = True

 回到顶部
帅哥哟,离线,有人找我吗?
夜点蚊香
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:641 积分:4920 威望:0 精华:0 注册:2020/4/15 19:53:00
  发帖心情 Post By:2021/2/1 15:15:00 [只看该作者]

谢谢,不过列宽还是没有自动出来.
AUTOSIZECOLS() 效果怎么样可以出来


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/2/1 15:20:00 [只看该作者]

我测试没有问题,截图说明一下

 回到顶部
总数 12 1 2 下一页