delphi 权限问题
请问一下 DELPHI 如何做权限控制，请给一个实例可以吗？谢谢？数据库SQL

[解决办法]
实例参数：
数据库：ＭＳＳＱＬ2005/ＭＳＳＱＬ2008
数据库名称：ＴＥＳＴ
表名：ＵＳＥＲ
内的字段：
用户ＩＤ 用户名　　权限
ＵＳＥＲ01 王某　　　　１
ＵＳＥＲ02 admin 0
ＵＳＥＲ03 刘某　　　　２
//解释
０：管理员权限　　　添加／修改／删除／查询记录，添加用户，报表打印
１：基本操作权限　　添加／修改／删除／查询记录，报表打印
２：普通权限　　　　查询记录／报表打印
／／－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
此时可以用ＤＥＬＰＨＩ中编写读取这些＂权限＂后，再激活＂菜单＂中的相关选择项目即可