以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  字段之列表项目  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=81972)

--  作者:santde
--  发布时间:2016/3/9 16:16:00
--  字段之列表项目
tb.Cols("FSFromTbalesj").ComboList="AfterCheckRow|AfterDragColumn|AfterEdit|AfterFilter|AfterFreezeColumn|AfterLoad"

能否用代码设置 这个列的 列表字段为多值字段

--  作者:santde
--  发布时间:2016/3/9 16:51:00
--  
Dim tb As Table = e.Form.Controls("Table1").Table
tb.DataTable.DataCols("第四列").ExtendType = ExtendTypeEnum.Values
tb.Cols("第四列").ComboList = "测试一|测试二|测试三|测试四"

这个是可以实现 ,但能实现官方 列字段里的 多值 字段的属性设置: 取值列和显示列不一样不。

另控件 ComboBox 可以方便地设置 .ComboList 属性值,但貌似无法设置多值字段,希望官方能提供一致性功能

--  作者:大红袍
--  发布时间:2016/3/9 16:56:00
--  

1、不能取值列和显示列不一样。要做,就只能变通地做,如

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=80415&skin=0

 

 

2、用 CheckedComboBox 控件。


--  作者:santde
--  发布时间:2016/3/9 16:56:00
--  
Dim cmb As WinForm.ComboBox
cmb = e.Form.Controls("ComboBox1")
cmb.DisplayMember = "客户名称" \'设置显示列
cmb.ValueMember = "客户编号" \'设置取值列
cmb.DataFilter = "[区] = \'A\'"
cmb.DataSource = "客户" \'列表项目来自于客户表


希望官方修复 这个在帮助中有出现的代码,但是运行不成功的BUG


--  作者:大红袍
--  发布时间:2016/3/9 17:31:00
--  

这段代码没什么问题,最后再filter就行,只是修改不太及时而已。

 

Dim cmb As WinForm.ComboBox
cmb = e.Form.Controls("ComboBox1")

cmb.DisplayMember = "客户名称" \'设置显示列
cmb.ValueMember = "客户编号" \'设置取值列

cmb.DataSource = "客户" \'列表项目来自于客户表
cmb.DataFilter = "区 = \'A\'"