权限设置
在登陆界面里，点击登陆，如何读取权限0，访问form5

[解决办法]
登录之后根据用户名查询改用户的权限，如果拥有这个权限就显示form5...
[解决办法]
ADOQuery->SQL->Add("select 权限 from worker ");
if(0==Adoquery->fieldbyname('权限')->asinteger)
{
form5->show;
}