以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何让新生成的窗口中的TABLE自动列宽  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=160394)
--  作者：夜点蚊香
--  发布时间：2021/2/1 9:28:00
--  如何让新生成的窗口中的TABLE自动列宽
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自动列宽
红色部分,如何确定主坐标以后,自动填满屏幕
--  作者：有点蓝
--  发布时间：2021/2/1 9:40:00
--  
tbl.Dock = System.Windows.Forms.DockStyle.Fill
--  作者：夜点蚊香
--  发布时间：2021/2/1 13:46:00
--  自动列宽怎么做呢?
自动列宽怎么做呢?
--  作者：有点蓝
--  发布时间：2021/2/1 14:01:00
--  
http://www.foxtable.com/webhelp/topics/2380.htm
--  作者：夜点蚊香
--  发布时间：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
--  作者：有点蓝
--  发布时间：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)
--  作者：夜点蚊香
--  发布时间：2021/2/1 14:41:00
--  
编译报错  ExtendLastCol 不是 winform.table的成员.
错误代码 tbl.ExtendLastCol = True
[此贴子已经被作者于2021/2/1 14:42:51编辑过]
--  作者：有点蓝
--  发布时间：2021/2/1 14:50:00
--  
tbl.table.ExtendLastCol = True
--  作者：夜点蚊香
--  发布时间：2021/2/1 15:15:00
--  
谢谢,不过列宽还是没有自动出来.
AUTOSIZECOLS() 效果怎么样可以出来
--  作者：有点蓝
--  发布时间：2021/2/1 15:20:00
--  
我测试没有问题，截图说明一下