如何给treeview授权
  是这样的
         +系统维护
             系统初始化
             ……
             ……
          +档案管理
              添加人员档案
              ……
              ……
如何才能实现给用户user1授权“系统维护”之后不让他操作“档案管理”。user1只能操作“系统管理”中的项目。

解决方案 »

  1.   

    //假设noSys为非系统标志:
    procedure TForm1.TreeView1Click(Sender: TObject);
    begin
      if noSys and ((TreeView1.Selected.Text = '档案管理') or (TreeView1.Selected.Parient.Text = '档案管理') then
      begin
        ShowMessage('no right');
        Exit;
      end;
      ShowMessage('yeah');
    end;
      

  2.   

    在节点的Data中存储相关的权限信息如: (0,1,2,3,4)权限级别等等,在操作员登陆的时候取得操作员的权限信息。操作的时候在进行比较.....