在delphi中如何实现checkbox.checked:=true是主窗口的button.enable:=true?
时间:2011-12-15
来源:互联网
启动时增加权限设置,可以赋予某个操纵员添加、删除、修改、查询等具体权限,不同权限操作员进去,对应功能的按钮将可用或禁用。
作者: lu774237848 发布时间: 2011-12-15
按位来存储吧,如第一位为1新,第二位为删除,第三位为修改.初始化界面时
if iright and 1=1 then
begin
新增按扭.Enable := True;
end
else
begin
新增按扭.Enable := False;
end;
if iright and 2=2 then
begin
删除按扭.Enable := True;
end
else
begin
删除按扭.Enable := False;
end;
if iright and 4=4 then
begin
修改按扭.Enable := True;
end
else
begin
修改按扭.Enable := False;
end;
if iright and 1=1 then
begin
新增按扭.Enable := True;
end
else
begin
新增按扭.Enable := False;
end;
if iright and 2=2 then
begin
删除按扭.Enable := True;
end
else
begin
删除按扭.Enable := False;
end;
if iright and 4=4 then
begin
修改按扭.Enable := True;
end
else
begin
修改按扭.Enable := False;
end;
作者: jzy_QQ_396638838 发布时间: 2011-12-15
把用户名和权限存到数据库里,加载时通过数据库判断
作者: funxu 发布时间: 2011-12-15
我的代码if checkbox1.checked:=true
Tmainform.button1.enable:=true
else
Tmainform.button1.enable:=flase;
帮忙看一下哪里有错,为什么运行时总有错的?
Tmainform.button1.enable:=true
else
Tmainform.button1.enable:=flase;
帮忙看一下哪里有错,为什么运行时总有错的?
作者: lu774237848 发布时间: 2011-12-15
相关阅读 更多
热门阅读
-
office 2019专业增强版最新2021版激活秘钥/序列号/激活码推荐 附激活工具
阅读:74
-
如何安装mysql8.0
阅读:31
-
Word快速设置标题样式步骤详解
阅读:28
-
20+道必知必会的Vue面试题(附答案解析)
阅读:37
-
HTML如何制作表单
阅读:22
-
百词斩可以改天数吗?当然可以,4个步骤轻松修改天数!
阅读:31
-
ET文件格式和XLS格式文件之间如何转化?
阅读:24
-
react和vue的区别及优缺点是什么
阅读:121
-
支付宝人脸识别如何关闭?
阅读:21
-
腾讯微云怎么修改照片或视频备份路径?
阅读:28