读书人

delphi checkbox 有关问题求教

发布时间: 2012-02-15 12:09:44 作者: rapoo

delphi checkbox 问题求教
我的数据库是这样的:

功能表
功能名
A
B
C

用户功能表
用户 功能名
123 A
123 B
123 C
==========
页面上有3个checkbox控件 名字分别为 A,B,C
问题:想做到这样的效果:程序启动时,先选择“用户”,界面里的功能根据
“功能表”,里面的内容 对应名字的checkbox自动勾选。

请问,怎么才能做到对应名字的checkbox的选中,谢谢

[解决办法]
begin
adoquery1.SQL.Add('select 功能名 from 功能表 where 用户=user');
adoquery1.ExecSQL;
while not adoquery1.Eof do
begin
if checkbox.name=adoquery1.FieldByName('功能名').AsString then
checkbox.checked:=true;
end;
end;

读书人网 >.NET

热点推荐