刚做了个通用权限控制的控件,谁想要?(0分)

  • 主题发起人 主题发起人 sslxml
  • 开始时间 开始时间
S

sslxml

Unregistered / Unconfirmed
GUEST, unregistred user!
谁要谁给我100分吧,哈哈,是不是有点黑 ^_^ ^_^ ^_^

先给分,够十个了我就上传到某个地方。在此公布 URL。

不好意思,现在分确实太低了。

控件功能可参考:http://www.delphibbs.com/delphibbs/dispq.asp?LID=549353
 
给我一份
gex@drc.dq.cnpc.com.cn
 
你做的控件有用吗?
可能通用吗?,不会要经过很复杂的设置吧?
这一项“程序中的所有功能都是用RightAction表达”就够复杂了,
对写好的程序简直是..........
 
to whsunbin:

不好意思,我觉得你的问题很幼稚(恕我直言)。

1、“你做的控件有用吗?”,没有用DelphiBBS.COM上怎么会有人问这类问题?!没有用
怎么老外也开发了TAppAccessControl这类的控件?难道别人都觉得“这类控件没用”?!

2、可能通用吗?,不会要经过很复杂的设置吧?通用不通用是见任见智的问题,你说VCL
通用,那你可能拿它开发 Vxd 吗?会不会经过复杂的设置就更无稽之谈了,为了达到要求
设置复杂一些不是应当的事,更何况这个组件只有5、6个属性,4、5个事件而已。远比
TButton这个你最常用的少得多。

3、“这一项“程序中的所有功能都是用RightAction表达”就够复杂了,对写好的程序简
直是..........”,准确的说是对“需要权限控制的功能都是用RightAction表达”,
Action 是Delphi 4.0的特性之一,在Delphi6中又有加强,这原本就是一个Delphi推荐的
编程方法,我不知道,我不知道,如何“就够复杂了”??如果你认为功能表述不用
Action的化,我建议你该思考一下自己是否真正明白了什么叫Action了!
 
我也要一份:xxc99@163.net
我在delphibbs.com上有问该问题,发过来立即给分。谢谢
 
我也要一份,jiao_he@sina.com
收到给分,殊不食言!
 
anlhy@fm365.com 我也要。 100分,决不食言
 
一百分没问题,发我一个吧,收到即给分。kens_@263.net
 
ok923@163.net
100分,决不食言
 
ID:565476 已给分,请拿。
 
我要!发我一个吧,收到即给分!!!决不食言!

oldppp@263.net。
 
首先本组件是 delphi 5.0 编译的。

以下是简单的使用:

1、安装RActions.dpk后,组建面板上有TUserRights组件;
2、放置TUserRights到窗体上,假设命名为UR;
3、放置一个TActionList到窗体上;
4、在ActionList上增加标准Action,在标准Action中选择TRightAction;
5、假设命名这个TRightAction为RA;
6、设置RA的UserRights属性为UR;
7、设置RA的Right和RightDescription属性为功能名和功能描述,任意字符串;
8、对RA的其它操作同TAction一样;
9、填写UR的事件,分别为:
OnCheckRight:您需要:验证当前用户权限,当前用户由UR.CurrentUser属性得到
OnPromptUser:您需要:提示用户名和密码,验证用户登陆,由UR.Login得到
OnLogout:您需要:当用户退出时的操作(作为保留,目前没有实际意义)
OnSetupRights:您需要:枚举所有的TRightAction,取出TRightAction的Right和
RightDescription属性,自定义一个设置权限的界面,保存你的权限
配置,由UR.SetupRights调用
10、例子没时间写了,以后再说吧;
11、您对本组件的更新请通知作者,ssl@email.com.cn;
12、有任何好的建议或意见请发送到 ssl@email.com.cn;
13、如果这个组件顶用,哈哈,那时sslxml写的,如果不顶用,我也不知道是谁写的!
14、作者不负责对本组件的维护,您的问题可能得到答复,也可能得不到答复,但无论
如何,请在关于这个组件的问题的邮件标题中包含RightAction字串。

that all, thanks.

上传了:http://projectpage.myetang.com/rightaction.rar (3.34K,好小呀)
 
我也要 zf501@gnetpri.com
 
我收到了。晚上经测试后明天给分。
 
谁再做一个demo,我再加100分.
 
各位:

demo出来了,oldppp记得给我加分呦。

同时改了个错误:
下载URL:http://projectpage.myetang.com/rightaction.rar
 
http://www.delphibbs.com/delphibbs/dispq.asp?LID=565901 sslxml 请进来拿分
 
http://www.delphibbs.com/delphibbs/dispq.asp?lid=565992

sslxml 请进来拿分
 
后退
顶部