Основы программирования. Файлы. Рекурсия - 6 стр.

UptoLike

Составители: 

8
DeleteFile(name)функция, удаляющая файл с именем name и воз-
вращающая True, если файл удален, и False в противном случае.
RemoveDir(name)функция, удаляющая каталог с именем name и воз-
вращающая True, если каталог удален, и False в противном случае.
GetCurrentDirфункция, возвращающая имя текущего каталога.
SetCurrentDir(name)процедура, устанавливающая каталог с именем
name текущим.
CreateDir(name)процедура, создающая каталог с именем name.
Если в переменной s типа string хранится полное имя файла, то
ExtractFilePath(s)функция, возвращающая путь к файлу.
ExtractFileName(s)функция, возвращающая имя файла.
ExtractFileExt(s)функция, возвращающая расширение файла.
Например, для s='D:\MyPrograms\a.pas' функция
ExtractFilePath(s) возвращает 'D:\MyPrograms\', функция
ExtractFileName(s) возвращает 'a.pas' и функция
ExtractFileExt(s) возвращает
'.pas'.
Процедуры Assign, Rename и Close, а также тип text в Delphi имеют
синонимы AssignFile, RenameFile, CloseFile и TextFile. Они были
введены для устранения коллизии имен при совместном использовании с класса-
ми компонент, в которых имеются методы с именами Assign, Rename, Close,
Text.
2.3 Простые примеры: чтение и запись
Пример 1. Рассмотрим задачу записи всех целых чисел от 1 до 9 в файл.
Приведем код для типизированных файлов:
var f: file of integer;
i: integer;
begin
Assign(f,'a.dat');
Rewrite(f);
for i:=1 to 9 do
write(f,i);
Close(f);
end;
Вначале с файловой переменной f связывается файл на диске a.dat, затем файл
создается и одновременно открывается, в цикле в него записываются числа, после
чего
файл закрывается.
Для текстовых файлов (тип text) код аналогичен, однако для разделения
чисел в тексте между ними выводятся пробелы: