[[Bicho]]

Pues no lo había probado, lo había hecho de cabeza, y el efecto esperado se consigue con la solución de dec

Código Delphi [-]
var
  i: integer;
begin
  StringGrid1.RowCount := 100;
  for i := 0 to StringGrid1.RowCount-1 do
  begin
    StringGrid1.Rows[i].Add(IntToStr(i));
    StringGrid1.Row := i;
  end;
end;

Es curioso, y no lo entiendo. Hubiera jurado que era culpa del optimizador de Delphi, pero lo he desactivado y sigue haciendo el mismo efecto.
Será como dice David, cosas del StringGrid.

Saludos