本人在软件开发过程中关于用户权限处理的一点点心得体会，拿出来与大家共享，希望大家多提宝贵意见。

       以往大多数文章资料设置用户权限都是通过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;
                               }
                            }
                        }
                     }
                 }
             }
      以上是我在软件开发过程中关于用户权限设置的一点点心得体会，希望能够抛砖引玉。