简单问题，在线等！

Question

用了9个checkbox1...checkbox9
要做一个循环
想用i代替checkbox后的数字
请问有什么办法吗

Answer 1

var
  I : Integer;
begin
  for I := 1 to 9 do
    Tcheckbox(FindComponent('checkbox' + IntToStr(I))).Checked :=true;
end;

Answer 2

我用的是下载的flatcheckbox
按楼上的方法运行的时候会提示findcomponent出错
会是什么问题？

Answer 3

findcomponent在uses里应该引用哪个单元啊？

Answer 4

findcomponent在classes单元假设你的flatcheckbox是tflatcheckbox类
那就把tcheckbox改成tflatcheckbox

Answer 5

我加了classes单元
还是提示undeclared identifier:'findcomponent';
请问怎么办？

Answer 6

如果是在with结构里面加findcomponent函数，
记得用上self.findcomponent（）

Answer 7

tflatcheckbox(findcomponent('flatcheckbox'+inttostr(i))).Checked:=true;
就这个不能运行呀
楼上的给个QQ成吗
我的是5091353

Answer 8

有些下载的空间会有些bug,用checkbox实施