Foxtable(狐表)用户栏目专家坐堂 → Tag属性,丢失的宝贝


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

主题:Tag属性,丢失的宝贝

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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
Tag属性,丢失的宝贝  发帖心情 Post By:2014/6/6 16:51:00 [显示全部帖子]

窗口、控件都有Tag属性,菜单不知有没有。

狐表省掉了,好可惜,有了这个属性,又好用、又安全。

我现在正纠结于用户权限管理。

狐表帮助中的,狐友自己总结的,甚至我们医院的管理系统,权限管理不是不灵活,就是太复杂,或者说是太啰嗦。

 

如果有Tag属性,可以通过设置其值,大大简化权限管理。

Name属性不能随便改,Text属性又显示出来了,都不理想。


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


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

ToolTip也是一个比较安全易用的属性,可惜跟Text一样,也会显示出来,要让他不显示,还得代码控制,也不省心。


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


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

以下是引用有点甜在2014-6-6 17:06:00的发言:
UserData 好像没有什么用途。

不能在属性栏直接设置吧,如果需要用代码设置,就达不到“简单”的效果了。


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


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

哈哈,还是用ToolTip代替Tag吧,总算能让他有而不显了。

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


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

ListView的Tag属性,能存储任何类型的值。

不是没有窗口级变量吗,加一个看不见的ListView控件,什么类型的窗口级变量都有了。


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


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

唉......菜单的提示,又没办法隐藏了。

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


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

以下是引用逛逛在2014-6-7 8:54:00的发言:

唉!

 

你如果真想用,就试试这样

 

1)  淡化隐藏提示

Dim obj As object =   BaseMainForm.Controls("C1Ribbon1")

obj.ToolTipSettings.Border = False  无边框

obj.ToolTipSettings.Opacity = 0.1    透明度

obj.ToolTipMaxWidth = 1           ‘提示的最大宽度

 

模拟隐藏,但我自己没正式用过。

先谢过,怎么着也得试试。


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


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

以下是引用jspta在2014-6-7 11:09:00的发言:
只是为存储变量,加个全局的字典变量应该可以了吧,有规律的命名就行了
dim gdic as new dictionary(of string ,object)

是为了简化权限管理,直接设置属性,才能达到简化的目的。


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


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

Dim obj As object =  BaseMainForm.Controls("C1Ribbon1")

obj.ToolTipSettings.Opacity = 0    '透明度

 

这样就有不错的效果了,办法很好。


 回到顶部