1)считывание текста из текстового файла,
2)добавление в него текста,
3)переименование файла,
4) копирование файла,
5) удаление файла
вот тело программы
   {прочитаем построчно}
   assign(f, 'file');  { associate it }
   reset(f);         { open it      }
   while not eof(f) do  { read it until it's done }
   begin
     readln(f, s);
     writeln(s);
   end;
   close(f);
   
   {допишем}
   append(f);
   writeln(f, 'new stroka');
   close(f);
   
   {переименуем}
   rename(f, 'new_file');
   
   {удалим}
   erase(f);тут можно скачать полную версию
Комментариев нет:
Отправить комментарий