- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]关于窗口表的列宽自适应显示的问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=174019)
-- 发布时间：2021/12/27 16:00:00
-- [求助]关于窗口表的列宽自适应显示的问题
做了一个窗口，放了一个分区面板，其中Panel2设为固定分区
在Panel1方了表1，在Panel2放了表二
用了在论坛找的代码设置列宽自适应
Dim t1 = e.Form.Controls("Table1").Table
Dim cs1 As String = "列一，列二，列三"
Dim cs2 As String = "20,30,50"
Dim w As Integer = (t1.grid.width-30) / 100
Dim str As String = ""
Dim ary1 = cs1.split(",")
Dim ary2 = cs2.split(",")
For i As Integer = 0 To ary1.length-1
t1.cols(ary1(i)).width = w * ary2(i)
Next
对比发现，设为固定分区的Panel2的表能自适应窗口分配了列宽
而分区Panel1的表却达不到效果
请问老师，这段代码只针对固定分区才有效吗？还是其他原因造成的？
-- 发布时间：2021/12/27 16:26:00
--
请提供实例测试
-- 发布时间：2021/12/27 16:31:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
-- 发布时间：2021/12/27 16:32:00
--
对比发现，只要不是固定分区，自适应列宽就达不到效果
-- 发布时间：2021/12/27 16:37:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1 (3).zip |
-- 发布时间：2021/12/27 17:10:00
--
可以了，谢谢