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" >

Начало Вперед