[Kaktuz]

Появился один небольшой нюанс. Когда очищаешь некоторые боксы, то проверка выдает ошибку.
Как бы его правильно проверить. Может что-то вроде
if Box[1] and Box[2] ... <> ' ' then (хотя видно где-то я ошибся тут в чем-то)

Код:

 if Box[1] = StrToInt(Edit1.Text) then
    if Box[2] = StrToInt(Edit2.Text) then
      if Box[3] = StrToInt(Edit3.Text) then
        if Box[4] = StrToInt(Edit4.Text) then
          if Box[5] = StrToInt(Edit5.Text) then
            if Box[6] = StrToInt(Edit6.Text) then
              if Box[7] = StrToInt(Edit7.Text) then
                if Box[8] = StrToInt(Edit8.Text) then
                  if Box[9] = StrToInt(Edit9.Text) then
                  begin
                  Timer2.Enabled := False;
                  MessageBeep(mb_IconAsterisk);
                  ShowMessage('Ãîòîâî!!!');
                  end;