Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共19 条记录, 每页显示 10 条, 页签: [1] [2]
[浏览完整版]

标题:DataList数具绑定

1楼
狐哥 发表于:2009/5/18 13:24:00

如table数具列隐藏了,datalist不能显示此隐藏列,如何设置.

2楼
yangming 发表于:2009/5/18 13:43:00

做表视图,在打开窗口前执行一个显示所隐藏列的视图

3楼
狐哥 发表于:2009/5/18 13:55:00
呵,也只有这个办法了,我只是说不明白为什么的问题.呵呵

明白了,绑定的是TABLE而不是DATATABLE.
[此贴子已经被作者于2009-5-18 13:56:54编辑过]
4楼
狐狸爸爸 发表于:2009/5/18 15:27:00
Datalist可以单独设置显示那些列啊。所以楼主的问题,是可以解决的:

Dim ColumnList As String
For each c as Col in Tables("某表").Cols 
  If c.Visible Then
      ColumnList = ColumnList & c.Name & ","
  End if
Next
Dim dst As WinForm.DataList = e.Form.Controls("DataList1")
dst.ColumnList= ColumnList.Trim(",")
dst.DataTable = DataTables("某表")
dst.Build()

[此贴子已经被作者于2009-5-18 15:28:37编辑过]
5楼
yangming 发表于:2009/5/18 15:42:00
以下是引用狐狸爸爸在2009-5-18 15:27:00的发言:
Datalist可以单独设置显示那些列啊。所以楼主的问题,是可以解决的:

Dim ColumnList As String
For each c as Col in Tables("某表").Cols 
  If c.Visible Then
      ColumnList = ColumnList & c.Name & ","
  End if
Next
Dim dst As WinForm.DataList = e.Form.Controls("DataList1")
dst.ColumnList= ColumnList.Trim(",")
dst.DataTable = DataTables("某表")
dst.Build()

[此贴子已经被作者于2009-5-18 15:28:37编辑过]

学习!

6楼
狐哥 发表于:2009/5/18 16:19:00
以下是引用狐狸爸爸在2009-5-18 15:27:00的发言:
Datalist可以单独设置显示那些列啊。所以楼主的问题,是可以解决的:

Dim ColumnList As String
For each c as Col in Tables("某表").Cols 
  If c.Visible Then
      ColumnList = ColumnList & c.Name & ","
  End if
Next
Dim dst As WinForm.DataList = e.Form.Controls("DataList1")
dst.ColumnList= ColumnList.Trim(",")
dst.DataTable = DataTables("某表")
dst.Build()

[此贴子已经被作者于2009-5-18 15:28:37编辑过]

非常感谢.

7楼
yangming 发表于:2009/5/18 16:26:00
4楼的代码还是不能显示已隐藏的列啊
8楼
狐狸爸爸 发表于:2009/5/18 16:29:00
那个代码是排除隐藏列
9楼
don 发表于:2009/5/18 16:33:00
以下是引用yangming在2009-5-18 16:26:00的发言:
4楼的代码还是不能显示已隐藏的列啊

老六提供的是思路!关键的完善得自己解决.

10楼
yangming 发表于:2009/5/18 16:33:00
以下是引用狐狸爸爸在2009-5-18 16:29:00的发言:
那个代码是排除隐藏列

楼主要的是显示隐藏列的,呵呵

共19 条记录, 每页显示 10 条, 页签: [1] [2]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .04297 s, 2 queries.