Проверка Checkbox

[bokky]

Всем доброго времени суток! Прошу подсказать следующее:

Есть форма на которой существует 8 CheckBox. Задача состоит в том, чтобы считать какие checbox.checked=true а какие нет и занести только true в фильтр для поиска файлов (то есть фактически поулчается поиск по нескольким маскам с помощью checkbox). Возможно я ошибаюсь в методе решения, буду рад выслушать все мнения.

[FaTaL]

ну так пробегись по чекбоксам if then else или циклом for i:=0 to form1.ComponentCount do

[Bayazet]

  for i := 0 to form1.ComponentCount-1 do
    if (form1.Components[i] is TCheckBox) then
      if (form1.Components[i] as TCheckBox).Checked then //ToDO

[bokky]

Спасибо! Реализовал с помощью оператора If then else ;
вышло вот так (если кому интересно):

begin
     if checkbox3.Checked then // Чекбокс проверяет включен ли поиск по маскам
      begin
      lbfiles.Items.Clear;           // очищаем lisbox
        if checkbox1.Checked then // 1 чекбокс
          begin
          FFilename:=CheckBox1.Caption; //задание маски
          FindFiles(dolDirectories.Directory); // запуск процедуры поиск
          end;

        if checkbox2.Checked  then // проверяем 2 чекбокс
          begin
            FFilename:=Checkbox2.Caption; //задание маски
            FindFiles(dolDirectories.Directory); // запуск процедуры поиска