ВУЗ:
Составители:
Рубрика:
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) код аналогичен, однако для разделения
чисел в тексте между ними выводятся пробелы:
Страницы
- « первая
- ‹ предыдущая
- …
- 4
- 5
- 6
- 7
- 8
- …
- следующая ›
- последняя »