以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]datamap引用其它表的数据字典 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=173891) |
-- 作者:chnfo -- 发布时间:2021/12/21 14:34:00 -- [求助]datamap引用其它表的数据字典 表A中有一列K(整数型),它设置了数据字典,例如1=苹果,2=梨子,3=香蕉,4=…… 现在表B中把表A的所有列都转成行,分别是列名、标题、数据类型、值(当有数据字典的时候,可以下拉这一列的数据字典) 在表B的PrepareEdit事件中: Dim dmp As DataMap = Tables("A").Cols(e.Row("K")).DataMap If dmp IsNot Nothing Then e.Table.Cols("值").DataMap = dmp Else e.Table.Cols("值").DataMap = Nothing End If 这样倒是实现了有字典就下拉字典,没有字典就手工输入。 问题是:下拉数据字典,显示的是Value,如果增加一个辅助列X,如何让这个辅助列显示数据字典的text,这样就可以用drawcell事件,在值这一列显示text了 另外,如何获取数据表的列类型,现在有日期型、字符型、逻辑型,但对于数值型就有多种了(有bit\\double\\integer等),如何精确获取列类型? |
-- 作者:有点蓝 -- 发布时间:2021/12/21 15:21:00 -- 数据类型参考:http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=147575&skin=0
|