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

[Ветас]

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

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

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

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

[raxp]

проверять cells[i,0]<>''

[Ветас]

Большое спасибо за ответ.
Но почему то у меня происходит зацикливание в программе:

for i:=1 to 10 do
    if StringGrid1.Cells[i,0]='' then begin
    ShowMessage('Не все ячейки заполнены!!!'); //появляется многократно
    end
   else
   a[i]:=StrToInt(StringGrid1.Cells[i-1,0]);

Подскажите, пожалуйста, что не так ?

[anGeee]

for i:=1 to 10 do
    if StringGrid1.Cells[i,0]='' then begin
    ShowMessage('Не все ячейки заполнены!!!');
    break;
    end
   else
   a[i]:=StrToInt(StringGrid1.Cells[i-1,0]);

[raxp]

лучше флагом...

var p: boolean;
begin
 
 for i:=1 to stringgrid1.colCount-1 do
  if StringGrid1.Cells[i,0]='' then begin p:= true; break end; // условие если хотя-бы одна не заполнена

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