Delphi 6 программирование
ПРОЦЕДУРЫ И ФУНКЦИИ ДЛЯ РАБОТЫ С ФАЙЛАМИ
11.2. ПРОЦЕДУРЫ И ФУНКЦИИ ДЛЯ РАБОТЫ С ФАЙЛАМИ
Ниже описываются процедуры и функции, которые можно использовать с файлами любого вида. Специфика работы с типизированными, текстовыми и нетипизированными файлами рассматривается в следующих разделах.
Таблица 11.1. Подпрограммы для работы с файлами
| Procedure AssignFile(var F; FileName:
String) ; |
Связывает файловую переменную f с именем файла FileName | |
| function ChangeFileExt
(const FileName, Ex tension: String): Strings; |
Изменяет существующее расширение файла на расширение, заданное параметром Extension | |
| Procedure ChDir(Path:
String); |
Изменяет текущий каталог: path - строковое выражение, содержащее путь к устанавливаемому по умолчаниюкаталогу | |
| Procedure CloseFile
(var F) ; |
Закрывает файл, однако связь файловой переменной F с именем файла, установленная ранее процедурой Assign-File, сохраняется. При создании нового или расширении старого файла процедура обеспечивает сохранение в файле всех новых записей и регистрацию файла в каталоге. Функции процедуры CloseFile выполняются автоматически по отношению ко всем открытым файлам при нормальном завершении программы. Поскольку связь файла с файловой переменной сохраняется, файл можно повторно открыть без дополнительного использования Процедуры AssignFile | |
| function DateTime-ToFileDate(DateTime: TDateTime): Integer; | Преобразует значение DateTime в системный формат времени создания (обновления) файла | |
| Function DiskFree(D:
Byte): Longint; |
Возвращает объем в байтах свободного пространства на указанном диске: D - номер диска (0 - устройство по умолчанию, 1 - диск А ,2- диск В и т, д.). Функция возвращает значение -1, если указан номер несуществующего диска | |
| function Delete-
File(const FileName: String): Boolean; |
Уничтожает файл с именем (и, возможно, маршрутом доступа) FileName. Возвращает True, если операция прошла успешно | |
| Function DiskSize(D:
Byte) : Longing; |
Возвращает объем в байтах полного пространства на указанном диске: d - номер диска (0 - устройство по умолчанию, 1 - диск А ,2- диск Д и т. д.). Функция возвращает значение -1, если указан номер несуществующего диска | |
| Function EOF (var F) :
Boolean; |
Тестирует конец файла и возвращает True, если файловый указатель стоит в конце файла. При записи это означает, что очередной компонент будет добавлен в конец файла, при чтении - что файл исчерпан | |
| Procedure Erase(var
F); |
Уничтожает файл f. Перед выполнением процедуры не
обходимо закрыть файл (см. замечание ниже) |
|
| function FileAge(const
FileName: String): In teger; |
Для файла FileName возвращает время его последнего обновления (в системном формате) или -1, если такого файла не существует | |
| function ExcludeTrai-
lingBack.gif" > |
||
