- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 动态增加列的BUG (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=175797)
-- 发布时间：2022/3/19 14:58:00
-- 动态增加列的BUG
在一个关联表里动态增加了几个列，但是设置列位置的时候，关联明细里不显示，必须要重新关联一次才显示，这个应该是BUG 很久之前我提过一次后来不了了之。
如果不是关联表就没这个问题
Dim t1 As Table=Tables("工单.工单用料明细")
Dim t2 As Table=Tables("工单.领料入")
If t1.DataTable.DataCols.Contains("删") = False Then
t1.DataTable.DataCols.Add("删",Gettype(String),1)
End If
If t1.DataTable.DataCols.Contains("存") = False Then
t1.DataTable.DataCols.Add("存",Gettype(String),1)
End If
Dim ss() As String="增,删,改,存".split(",")
For i As Integer=0 To ss.Length-1
If t2.DataTable.DataCols.Contains(ss(i)) = False Then
t2.DataTable.DataCols.Add(ss(i),Gettype(String),1)
End If
Next
蓝色代码在afteropenproject事件中
t1.SetColVisibleWidth("删|24|存|24|物料编号|60|物料名称|80|长度|45|高度|45|领料库房|120|数量|40|面积|90|批号|100|可用库存|90|发生日期|90" )
t2.SetColVisibleWidth("增|24|删|24|改|24|存|24|物料编号|60|物料名称|80|长度|45|高度|45|存料仓库|120|数量|40|面积|90|批号|100|经手人|90|入库时间|100|备注|90" )
这个 工单.工单用料明细 和工单.领料入关联表是在窗口中
红字代码单独用了一个按钮 但是不起作用，需要把两个表重新关联一次才显示，
-- 发布时间：2022/3/19 15:10:00
--
更新Foxtable到最新版。我测试没有问题，请上传实例测试
-- 发布时间：2022/3/19 15:21:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:动态列的问题.zip |
更正一下 刚刚做例子的时候发现，如果有数据就正常，没有数据就不正常 ，看例子
-- 发布时间：2022/3/19 15:24:00
--
有数据且第一次加载能正常显示 没有数据即使后面加载了数据再用代码也不显示
-- 发布时间：2022/3/19 15:50:00
--
已反馈