[Дикарь]

Мне нужно захранить в файл во время закрытия программы количество строк в таблице а при запуске из файла это число извлечь и соответственно установить колчество строк таблицы.
Коды получились следующие:
сохранение в файл:

Код:

1 2 3 4 5 6 7 8 9

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); var f:TStringList; begin  f := TStringlist.Create;  f.Add(IntToStr(StringGrid1.RowCount));  f.SaveToFile('razmer.raz');  f.Free; end;

загрузка из файла:

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14

procedure TForm1.FormCreate(Sender: TObject); var  n:INTEGER; f:tStringList; begin  f := TStringlist.Create;  f.Add(IntToStr(StringGrid1.RowCount));  if FileExists('razmer.raz') then begin  f.LoadFromFile('razmer.raz');  n:=StrToInt(f.Strings[1]);  StringGrid1.RowCount:=n  else  StringGrid1.RowCount:=2;  end;

Клмпилятор указывает ошибку в строке

Код:

1	StringGrid1.RowCount:=n;

даже если вместо переменной поставить число.

Помогите разобраться в чем ошибка и как исправить.
Может кто лучше вариант решения найдет.