StrinGrid

[Настенька..Блонди]

надо чтоб в первый столбик было записаны числа от 1 до 50 по порядку

помогите плизз

[Serge_Bliznykov]

var i: integer;
begin
  if StringGrid1.RowCount < 51 then StringGrid1.RowCount := 51;
  for i:=1 to 50 do
     StringGrid1.Cells[1,i] := IntToStr(i)
end;

[Настенька..Блонди]

спасибо огромное