[Дикарь]

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

Код:

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;

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

Код:

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;

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

Код:

 StringGrid1.RowCount:=n;

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

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