高分求救！很急的，有关用户权限的设置问题。（在线等待，谢谢！）

Question

N1.Enabled:=false;
Case useType of
  M_admin: 
      begin
         N1.Enabled:=True;
         N2.Enabled:=True;
         ...
      end;
  m_use:
      begin
          N1.enabled:=False;
          n2.enabled:=False;
      end;
end;

Answer 1

N1.Enabled:=false;
Case useType of//用户类型判断
  M_admin: //超级用户
      begin
         N1.Enabled:=True;
         N2.Enabled:=True;
         ...//等
      end;
  m_use://普通用户
      begin
          N1.enabled:=False;
          n2.enabled:=False;
          ...//等
      end;
end;

Answer 2

将菜单的Enabled属性值置为False;菜单机可变灰。
对于登录的用户，首先要获得其权限，判断是管理员、保管员，普通借用人中哪一种，再根据权限置灰响应菜单。

Answer 3

将菜单的Enabled属性值置为False;菜单机可变灰。
对于登录的用户，首先要获得其权限，判断是管理员、保管员，普通借用人中哪一种，再根据权限置灰响应菜单。

Answer 4

唉，用Taction来实现，不同用户不同权限

Answer 5

我从未用过Taction，不知道怎么用

Answer 6

那就写语句，先判断是何种用户，然后根据用户类别不同，使不同的菜单Visbled 和 Enabled

Answer 7

可以实现的在密码表中定义权限：然后在登录的时候判断：
case  table1.fieldbyname('权限').value  of  
'管理员'：  。（一些按纽的enabled属性为false）；
'保管员'： 。。

end；

Answer 8

usetype:string;
begin
adoquery1.close;
adoquery1.sql.text:=format('select * from table where id=''%s''',[edit1.text]);
adoquery1.open;
usetype:=adoquery1.fieldbyname('usetype').asstring;N1.Enabled:=false;
Case useType of
  M_admin: 
      begin
         N1.Enabled:=True;
         N2.Enabled:=True;
         ...
      end;
  m_use:
      begin
          N1.enabled:=False;
          n2.enabled:=False;
      end;
end;