这条语句怎么错了?

i:=1;
if TCheckBox('CheckBox'+IntToStr(i)).Checked then
...

解决方案 »

  1.   

    if TCheckBox(FindComponent('CheckBox'+IntToStr(i))).Checked then
      

  2.   

    请问fincomponent()这个函数起什么作用呢?
      

  3.   

    这是TCOMPONENT的一个方法，假设你的CheckBox是放在FOMR1上的那么CheckBox的宿主是FORM1，这样在Form1的内部组件列表中就有了CheckBox的引用，而fincomponent就是根据组件的名字在部组件列表中找出这一组件的引用
      

  4.   

    即然找出了组件的引用,为什么在前面还要加上TCheckBox()这个强制型类型将后面的内容转换为TCheckBox类呢?
      

  5.   

    FindComponent返回的类型是TComponent,它是TCheckBox的祖先类，当然要转为TCheckBox，