如果是要把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;
你的意思是,勾选一个“全选”然后所有的CheckBox都选上,反过来就全部都取消?