Foxtable(狐表)用户栏目专家坐堂 → [求助] 代码引用列属性中的输入掩码


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

主题:[求助] 代码引用列属性中的输入掩码

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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
[求助] 代码引用列属性中的输入掩码  发帖心情 Post By:2013/4/28 11:07:00 [显示全部帖子]

可以在表的列属性中设置输入掩码,但在事件代码中好像无法引用和设置。控件倒是可以。

哪位大侠有办法?


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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2013/4/28 11:29:00 [显示全部帖子]

我是要在控件事件中,将控件的输入掩码,动态的设置成表的列属性中的输入掩码。

一个控件,可能绑定不同的列。

谢谢。

[此贴子已经被作者于2013-4-28 11:30:14编辑过]

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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2013/4/28 11:40:00 [显示全部帖子]

以下是引用Bin在2013-4-28 11:35:00的发言:
DataTables("表A").DataCols("第一列").SetFormat(e.form.Controls("TextBox1").Text)

我一个文本框,动态绑定不确定的列,假如列属性中的输入掩码是:000岁00月00天,到这一列的时候,文本框的输入掩码就该也是这样。

e.Sender.EditMask = CurrentTable.Cols(CurrentTable.ColSel).EditMask.

因为列属性的输入掩码,无法在事件中引用,就不能实现以上需求。

e.Col.EditMask不行,e.DataCol.EditMask也不行,总之是错。

[此贴子已经被作者于2013-4-28 11:44:26编辑过]

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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2013/4/28 11:46:00 [显示全部帖子]

以下是引用Bin在2013-4-28 11:44:00的发言:
你现在是想设置文本框的 掩码.还是要设置列的掩码?

动态设置文本框的输入掩码,设置成当前选定列的输入掩码。

不止这一项,列属性中好多设置,无法在事件代码中返回或设置。

 

我的代码,尽量做到通用,省的到处写代码,这么多属性,不能用代码返回或设置,真的不方便。

 

成不成,都谢谢你。

[此贴子已经被作者于2013-4-28 11:52:23编辑过]

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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2013/4/28 11:57:00 [显示全部帖子]

以下是引用Bin在2013-4-28 11:56:00的发言:
这样的话只能声明一个字典集合.把对应的掩码添加进去
然后根据选中的列名动态为TextBox赋值了.

通用,还得简单,复杂了不划算。


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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2013/4/28 17:21:00 [显示全部帖子]

谢谢。

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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2013/4/28 17:49:00 [显示全部帖子]

以下是引用狐狸爸爸在2013-4-28 15:28:00的发言:

这样:

 

Tables("表A").grid.Cols("第一列").Editmask = "000"

 

绕个大弯,才用上,再次感谢。

e.Sender.EditMask = CurrentTable.Grid.Cols(CurrentTable.Cols(CurrentTable.ColSel).Name).EditMask


 回到顶部