Как проверить все ли ячейки в StringGrid заполнены или нет ? Опции

[Виталий_Сигов]

Здравствуйте, уважаемые форумчане.

Решаю задачу:
Формируется массив из 10 целых чисел путем ввода с клавиатуры. Числа заносятся в ячейки компонента StringGrid

Подскажите, пожалуйста, как можно проверить заполнены ли все ячейки в компоненте StringGrid или нет ?

И если ни одна ячейка не заполнена или заполнены не все ячейки, то вывести сообщение "Не все ячейки заполнены"

[volvo]

Ну, проходи в цикле и проверяй:

  bad := False;
  with StringGrid1 do
  begin
    for i := FixedCols to ColCount - 1 do
      for j := FixedRows to RowCount - 1 do
        bad := bad or (Cells[i, j] = '');
  end;

  if bad then
  begin
    ShowMessage('Не все ячейки заполнены');
  end;