[IceExecutioner]

Здравствуйте, форумчане. Помогите решить проблему с указателями. На форме имеется 8 чекбоксов (имена у них CheckBox1 - CheckBox8). Задача стоит пройти по всем и определить их состояние (то бишь выбран он или нет). Так вот вопрос: как организовать цикл чтобы менять только номер чекбокса?

[TOJluK]

Код:

  for i:= 1 to 8 do
   if TCheckBox(FindComponent('CheckBox' + IntToStr(i))).Checked then
    begin
    // делай что надо
    end;