delphi 如何对容器中的控件进行统一操作?
假如我一个界面上有20+的CHECKBOX,当我选中一个的时候其他全部取消选中,如果一个写的话,代码太多了,有没有简单的方法!最好附上代码!...
假如 我一个界面上有20+的CHECKBOX,当我选中一个的时候其他全部取消选中,如果一个写的话,代码太多了,有没有简单的方法!最好附上代码!
展开
3个回答
展开全部
如果是要把CHECKBOX的事件统一 ,可以在事件里选择他要关联的方法。这样就可以了,只需要写一个
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
可以用组件搜索的办法啊
var
i:integer;
begin
for i:=0 to self.componentcount-1 do begin
if self.component[i] is Tcheckbox then
Tcheckbox(self.component[i]).checked:=true;
end;
end;
var
i:integer;
begin
for i:=0 to self.componentcount-1 do begin
if self.component[i] is Tcheckbox then
Tcheckbox(self.component[i]).checked:=true;
end;
end;
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2010-01-25
展开全部
你的意思是,勾选一个“全选”然后所有的CheckBox都选上,反过来就全部都取消?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询