Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > Запись в текстовый файл

Автор: Sergo9 7.4.2015, 15:42

Добрый день. Подскажите пожалуйста новичку, что не так делаю. Как сделать чтоб он сохранял до 5 строк , а потом заново начинал с первой записывать.

Код


var f:System.Text;
    i:Integer;

begin
label1.Caption:=meta;

 AssignFile(f,'file.txt');
 append(f);
 for i:=1 to 1  do

  Writeln( f,label1.Caption);
  CloseFile(f);
end;

Заранее спасибо за помощь.

Автор: Poseidon 8.4.2015, 10:25

9 строка:
for i:=1 to 5 do