怎么用字符串为系统分配权限？

Question

在pass表里有qxs这一项
把qxs select出后，在form close事件里应该怎么写

Answer 1

qxs是什么格式的，是不是00001110010101的？

Answer 2

参照windows的权限分配方法，用分号分开

Answer 3

是00001110010101的,
在form.close怎么写呢？

Answer 4

数据库里定义一个字符串子段
保存成这样
|dddd|bbbb|ssss|eeee|应用时
if pos(dddd) then 
就可了我的都是这么用的

Answer 5

登录是将权限付给一个字符串
data.Empower.caption := dataset.FieldByName('权限').AsString;然后根据字符串分配权限if pos('专项督查明细',data.Empower.caption)>0 then
   begin
      menu_zxdc.Visible:=true ;
      ToolButton1.Enabled:=true;
   end else
   begin
     ToolButton1.Enabled:=false;
     menu_zxdc.Visible:=false;
   end;