在线等待!!高分求救?

Question

请问我想实现以下功能怎么样做:
我用mainmenup这个组件来实现动态菜单实现不同用户登录时他所看到的菜单是不一样的,比如说管理员他可以看到所有的,一般用户是根据管理员给他分配的帐号实现不同的功能,菜单上这时也仅显示这些功能.请各位高手指点一下,希望能给个例子给小弟参考.

Answer 1

用多個 mainmenup, 不同用戶權限, 給窗體付與不同的 mainmenup, 就可簡單實現了!!

Answer 2

楼上的办法最好了，另外可以对MAINMENU设置选项，非常麻烦

Answer 3

用actionlist创建action，登陆时扫描每个action的tag 值去设置权限。

Answer 4

to rockswj(石头)
请说清楚一点,能否给小弟一个例子啊.

Answer 5

//加权限
  with dm_main.Query_Temp do
  begin
    Close;
    Sql.Clear;
    Sql.Add('select * from 权限表');
    Open;
  end;  for I:=0 to frmMainForm.ComponentCount -1 do
  begin
    if frmMainForm.Components[i] is Taction  then
    begin
     {tag>0的说明有权限，先把权限都禁止}
      if (frmMainForm.Components[i] as taction).tag>0 then
         (fMainForm.Components[i] as taction).enabled:=false;       if dm_main.Query_Temp.Locate('reny_dm;per_id',VarArrayOf([UserID,inttostr((frmMainForm.Components[i] as taction).tag)]), []) then
         (frmMainForm.Components[i] as taction).enabled:=true;
     end;
   end;