以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]保存列宽设置问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=127191)

--  作者:一只田鸡
--  发布时间:2018/11/8 8:46:00
--  [求助]保存列宽设置问题
我弄了个自定义函数,保存窗口中表的列宽,
然后同样的代码,有的窗口会出现不显示列名和行内容的问题,但是行号有显示。
而还有一些窗口就没有问题。
请老师帮忙看下代码有无问题。

内部函数colsetup代码:
Dim t As Table = args(0)
\'获取列宽
Dim tb As DataTable = DataTables("colwidth")
Dim dr As DataRow = tb.find("tableName = \'" & t.name & "\'")
T.SetColVisibleWidth(dr("colVisibleWidth"))
t.ExtendLastCol = True

--  作者:有点甜
--  发布时间:2018/11/8 8:52:00
--  
实例发上来测试。