Foxtable(狐表)用户栏目专家坐堂 → 代码设置列属性


  共有3473人关注过本帖树形打印复制链接

主题:代码设置列属性

帅哥哟,离线,有人找我吗?
袁冬
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:54 积分:592 威望:0 精华:0 注册:2013/7/15 3:28:00
代码设置列属性  发帖心情 Post By:2014/6/30 23:45:00 [只看该作者]

请教各位,怎样用代码设置列属性
详细问题:有一个窗口SQLTABLE型的表,数据源为后台ACCESS表的一个表,其中ACCESS的第二列的属性是日期和时间,可是到SQLTABLE里只剩日期了,我想让SQLTABLE同步显示ACCESS里的日期和时间,如下图。
图片点击可在新窗口打开查看此主题相关图片如下:access.jpg
图片点击可在新窗口打开查看
图片点击可在新窗口打开查看此主题相关图片如下:sqltable.jpg
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/7/1 8:35:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
ShotHit
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:127 积分:1463 威望:0 精华:0 注册:2014/10/15 11:39:00
  发帖心情 Post By:2014/10/30 9:33:00 [只看该作者]

感谢。

表Tb_CusInfo中PrepareEdit事件设置:
If e.IsFocusCell Then
    If e.Col.Name = "sales_user" Then 
        e.Col.Combolist = DataTables("Tb_UserInfo").GetComboListString("user_id", "[user_area] = '" & e.Row("sales_area") & "'") 
    End If
End If

同时在MainTableChanged事件中设置:
If MainTable.Name="Tb_CusInfo" Then
   Dim dmp As New TableDataMap
   dmp.DataTable="Tb_UserInfo"                                 //这个地方能否动态设置?
   dmp.ValueCol="user_id"
   dmp.DisplayCol="user_name"
   dmp.ListCols="user_area,user_name"
   dmp.Sort="user_area"
   Tables("Tb_CusInfo").Cols("sales_user").DataMap=dmp.CreateDataMap()
End If

这样的会,后面的数据字典设置就无效。
请问,如何让两个同时有效果?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/10/30 9:39:00 [只看该作者]

 不能同时

 回到顶部