关于权限控制,对于当前用户无权限的菜单或操作按钮等可有以下3种处理方式(1)直接隐藏:用户根本看不到
(2)置为不可用:能看到该项,但是无法使用
(3)正常显示,但操作时提示无权限这3种哪种最好呢?请有经验的朋友讲讲

解决方案 »

  1.   

    yqdragon:我比较赞同你的观点。1.菜单级的直接隐藏--------如果要隐藏的太多,就显得系统功能少了,有点不太好;
    2.功能级的正常显示,操作时提示无权限------------是设为不可用,灰色显示好呢,还是提示无权限好?
      

  2.   

    变灰的话不好写一个小程序遍历你的窗体所有子控件
    然后一句 EnableWindow(Handle,true);
    全部都可以用了
      

  3.   

    function SetEnable(h: HWND; v: integer): Boolean; stdcall;
    var NA: array[0..255] of char;
    begin
       EnableWindow(h,true);
       result := true;
    end;procedure TForm1.Button1Click(Sender: TObject);
    var
     HD:HWND;
    begin
     HD:=FindWindow(nil,'你程序的名称');
     if HD <> 0 then
       EnumChildWindows(Handle, @SetEnable, 0);
    end;