有8个Checkbox,从Checkbox1 到Checkbox 8 怎么循环取它们的状态? For i:=1 to 8 do
begin
  if checkBox[i].checked =true 
then ...
else 
...
end这样编译通不过?应该怎么写

解决方案 »

  1.   

    这样当然不行,又不是VB下的控件数组.
    可以这样:
    for i:=0 to controlcount do
    begin
      if controls[i] is TCheckBox then
      ....
    end;
      

  2.   

    additional页面下第10个东西也许能帮你~~
      

  3.   

    2楼怎么取的是不是Checked呢?
      

  4.   

    For i:=1 to 8 do
    begin
      if CheckListBox1.Checked[i] then
    then ...
    else 
    ...
    end
      

  5.   

    我用CheckGroup搞定了,和jinjazz(近身剪(N-P攻略))的做法一样!呵。谢谢大家!