以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请问内置的高级筛选日期部分的内容填写是怎么做的？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=75899)
--  作者：mxm121
--  发布时间：2015/10/17 1:21:00
--  请问内置的高级筛选日期部分的内容填写是怎么做的？
高级筛选器里 如果筛选列是日期类型的 则后面输入内容部分是时间格式的  请问这部分是如何做的
因为需要跨多个表进行组合筛选 我自己重新做了一个 就是在筛选日期列的时候 内容部分不知道如何处理输入
--  作者：mxm121
--  发布时间：2015/10/18 0:17:00
--  
没人知道吗
--  作者：mxm121
--  发布时间：2015/10/18 10:50:00
--  
版主 帮我看看啊
--  作者：大红袍
--  发布时间：2015/10/18 11:02:00
--  

很麻烦的，要自己添加grid，然后，要自己绑定各种事件

 

Dim _flex = New C1.Win.C1FlexGrid.C1FlexGrid()
_flex.Cols.Count = 3
_flex.Rows.Count = 7
_flex.Cols(1).Caption = "Item"
_flex.Cols(2).Caption = "Value"
_flex.Styles.Fixed.BackColor = Color.DarkGray
_flex.Styles.Fixed.ForeColor = Color.White

\'create styles with data types, formats, etc
Dim cs = _flex.Styles.Add("emp")
cs.DataType = Gettype(String)
cs.ComboList = "|Tom|Dick|Harry"
cs.ForeColor = Color.Navy

cs = _flex.Styles.Add("date")
cs.DataType = Gettype(DateTime)
cs.Format = "dd-MMM-yy"
cs.ForeColor = Color.DarkGoldenrod

cs = _flex.Styles.Add("curr")
cs.DataType = Gettype(Decimal)
cs.Format = "c"
cs.ForeColor = Color.DarkGreen

cs = _flex.Styles.Add("bool")
cs.DataType = Gettype(Boolean)
cs.ImageAlign = 1

\'show captions
_flex(1, 1) = "Employee"
_flex(2, 1) = "Start"
_flex(3, 1) = "End"
_flex(4, 1) = "Amount"
_flex(5, 1) = "Discount"
_flex(6, 1) = "Active"

\'assign styles to editable cells
Dim rg = _flex.GetCellRange(1, 2)
rg.Style = _flex.Styles("emp")

rg = _flex.GetCellRange(2, 2, 3, 2)
rg.Style = _flex.Styles("date")

rg = _flex.GetCellRange(4, 2, 5, 2)
rg.Style = _flex.Styles("curr")

rg = _flex.GetCellRange(6, 2)
rg.Style = _flex.Styles("bool")

 

Forms("窗口1").panel.Controls.add(_flex)

 

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