很简单的语句但不知道应该怎么写请大家帮忙看看！！

Question

如果有两个checkbox我这样写
if checkbox1.checked = true then
begin
  ...........
end;
if checkbox2.checked = true then
begin
  ...........
end;
但是如果有30个checkbox应该怎样写呢？一个一个写太麻烦也不方便使用，我想这样写但是不行
for i=0 to 30 do
begin
  if checkbox(i).checked = true then
  begin
    ............
  end;
end;
正确的写法应该是什么呢？？
请大家帮帮忙，多谢了！！

Answer 1

for i=0 to 30 do
begin
  if Tcheckbox(FindComponent('checkbox' +IntToStr（i))).checked = true then
  begin
    ............
  end;
end;

Answer 2

for i := 0 to 30 do
begin
  if Tcheckbox(FindComponent('checkbox' +IntToStr（i))).checked = true then
  begin
    ............
  end;
end;

Answer 3

顺路，不用checked = true，直接checked就行