多个CheckBox如何处理？

Question

多个CheckBox如何处理？
这里有60个CheckBox 我如何确定各自的状态是否被选中？
难道要60个If语句吗？
谢谢指教

Answer 1

var I:integer;
begin  for I:=0 to ComponentCount-1 do
  begin
    if Components[i] is TCheckBox then
    begin
      if (Components[i] as TCheckBox).Checked=False then
        (Components[i] as Tadoquery).checked:=true;
      
     end;
   end;

Answer 2

对，楼上兄弟的方法是最好的方法（之一？）了，使用ComponentCount属性和 Components数组来解决问题，效率很高的，很多时候都用得到。大量电脑书籍下载：
http://www.netyi.net/in.asp?id=ForMoreU

Answer 3

最好的方法????60个CheckBox用TCheckListBox不更好?

Answer 4

晕,Additional页有一个叫CheckListBox的控件,拖到窗体上,再把你那60个CheckBox的标题写到它的Items属性里,之后...
60个CheckBox?全部摆到窗体上手都疼了...