Váš zpusob je jednodužší než ta moje obluda, když ho upravím takto.
begin
StringGrid1.RowCount := StringGrid1.RowCount + 1;
Row := StringGrid1.RowCount - 2;
StringGrid1.Cells[1, Row]:='test';
StringGrid1.Row := Row;
end;ale furt tam je ten prazdný řadek.