本人在软件开发过程中关于用户权限处理的一点点心得体会，拿出来与大家共享，希望大家多提宝贵意见。
以往大多数文章资料设置用户权限都是通过ActionList与数据库中的权限表相联实现。我经过实践通过控件的Tag属性（每个控件都有一个保留的Tag属性，默认值为0），也可以实现权限的设置，下面我就具体说明实现方法。
1、将所有需要设置权限的菜单和按钮的Tag属性从1开始分配不重复的阿拉伯数字（1，2，3......），这里不用0（控件Tag属性的默认值），表示此控件不需做权限设置。
2、将所有权限名称加到CheckBoxList中，包括菜单和按钮，其顺序一定要与分配阿拉伯数字的顺序完全一致。
3、在数据库中建立操作员表（包括编号、姓名、权限）权限用一个只包含0和1的字符串表示。用0表示有相应的权限（对应的菜单或按钮可用，Enabled=true)，用1表示没有相应的权限（对应的菜单或按钮不可用，Enabled=false)。这个字段要设置足够长（我预留了50位），以备扩充之用。
4、设置权限主要代码如下：
/* qx，用户权限字符串，operator操作员表，privilege权限字段 */ AnsiString qx=""; for (i=1;i<=CheckListBox1->Items->Count;i ) { if (CheckListBox1->Checked[i-1]) { qx=qx "0"; } else { qx=qx "1"; } } Sql="update operator set privilege='" qx "' where Operator_name='" CboOperatorName->Text "'"; 5、设置用户的全局变量，在窗体的FormShow事件中加入权限判断代码如下：
/* 系统管理员具有所有权限 */ if (FrmDM->GetUserName()!="系统管理员"){ AnsiString qx; /* 还没有设置权限 */ if (strPrivilege.Length()==0){ for (int j=0;j<=Parent->ComponentCount-1;j ){ if (Parent->Components[j]->Tag!=0){ if (Parent->Components[j]->ClassNameIs("TMenuItem")){ ((TMenuItem *)Parent->Components[j])->Enabled=false ; } else { ((TButton *)Parent->Components[j])->Enabled=false; } } } } else { for (i=1; i<=strPrivilege.Length();i ){ /*已经设置权限*/ qx=strPrivilege.SubString(i,1); if (qx=="1"){ for (j=0;j<=Parent->ComponentCount-1;j ) { if (Parent->Components[j]->Tag==i){ if (Parent->Components[j]->ClassNameIs("TMenuItem")){ ((TMenuItem *)Parent->Components[j])->Enabled=false ; } else { ((TButton *)Parent->Components[j])->Enabled=false; break; } } } } } } 以上是我在软件开发过程中关于用户权限设置的一点点心得体会，希望能够抛砖引玉。