Заполнение последней строки StringGrid нулями.

[Asblue]

Дана таблица StringGrid (Delphi).
Количество строк неизвестно.
Как заполнить последнюю строку нулями?

[Roof]

procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  with StringGrid1 do
    for i := 0 to ColCount - 1 do // от 0 - с нулевого столбца
      //RowCount - 1 - это и есть последняя строка
      Cells[i, RowCount - 1] := '0';
end;

[Asblue]

Спасибо большое