StringGrid сохранение в файл

[Ирина647]

Пишу дипломный проект, и не могу разобраться со StringGridом. В нем у меня имеется одна строка и пять столбцов. Мне нужно сделать так, чтобы он сохранял данные в файл(он сохраняет), но если там имеется уже какой-либо текст, то с новой строки добавляет его(а у меня заменяет) Вот код моей программы:

AssignFile(Fn,'res.txt');
Rewrite(Fn); // создаем файл
Append(Fn); // открываем файл
for k:=0 to Form5.StringGrid1.ColCount-0 do
begin
s1:= s1 + '  '+ Form5.StringGrid1.Cells[k,0];
end;
Writeln(fn,s1); // пишем значения ячеек
s1:='';
CloseFile(Fn);

[Streletz]

Смотрите в сторону процедуры Append.

[Utkin]

Я бы добавлял в StringList и сохранял через SaveToFile. Быстро, надежно, удобно.

[pu4koff]

Rewrite нужно убрать и оставить Append.