|
| |
Процедуры и функции для работы с файлами
<<< Назад
Procedure AsignFile(var F; FileName: string); Связывает файловую переменную F с именем файла FileName
function ChangeFileExt(const FileName, Extension: String): String; Изменяет существующее расширение файла на расширение, заданное параметром Extension
Procedure ChDir(path: string); Изменяет текущий каталог: Path - строковое выражение, содержащее путь к устанавливаемому по умолчанию каталогу
Procedure CloseFile(var F); Закрывает файл, однако связь файловой переменной F с именем файла, установленная ранее процедурой AsignFile, сохраняется
function DateTimeToFileDate(DateTime: TdateTime):integer; Преобразует значение DateTime в системный формат времени создания (обновления) файла
function DiskFree(D: Byte) : LongInt; Возвращает объем в байтах свободного пространства на указанном диске: D - номер диска ( 0 - устройство по умолчанию, 1 - диск A, 2 - диск B, и т.д.). Функция возвращает значение - 1, если указан номер несуществующего диска
function DeleteFile(const FileName: string) : Boolean; Уничтожает файл с именем ( и, возможно, маршрутом доступа) FileName. Возвращает true, если операция прошла успешно
function DiskSize (D: Byte) : LongInt; Возвращает объем в байтах полного пространства на указанном диске: D - номер диска… см. выше
function EOF(var F) : Boolean; Тестирует конец файла и возвращает True, если файловый указатель стоит в конце файла. При записи это означает, что очередной компонент будет добавлен в конец файла, при чтении - что файл исчерпан
Procedure Erase(var F); Уничтожает файл F. Перед выполнением процедуры необходимо закрыть файл
function FileAge(const FileName: string): integer; Для файла FileName возвращает время его последнего обновления (в системном формате) или -1, если такого файла не существует
function ExcludeTrailingBackslash(const S: string): string; Исключает из строки S замыкающей символ "/" (если этот символ не замыкает строку, возвращает S без изменения)
function ExpandFileName(const FileName: string): string; Дополняет имя файла текущим каталогом (и диском)
function ExpandUNCFileName(const FileName: string): string; Дополняет имя файла текущим сетевым каталогом (и диском)
function ExtractFileDir(const FileName: string): string; Извлекает из полного имени файла маршрут доступа к нему (без последнего символа "/")
function ExtractFileExt(const FileName: sting): string; Извлекает из полного имени файла его расширение (с ведущей точкой)
function ExtractFileName(const FileName: sting): string; Извлекает из полного имени файла его имя (с расширением)
function ExtractFilePath(const FileName: sting): string; Извлекает из полного имени файла маршрут доступа к нему (с последним символом "\")
function ExtractRelativePath(const BaseName, DestName: string): string; Извлекает из полного имени файла имя маршрута относительно DestName (промежуточные каталоги заменяются символами "../")
function ExtractShortPathName(const FileName: sting): string; Преобразует имя файла к короткому формату 8.3 для MS_DOS и Windows 3.x
function FileDateToDateTime(FileDate: Integer): TDateTime; Преобразует системный формат FileDate времени создания файла в формат дата-время
function FileExists(const FileName: sting): Boolean; Возвращает True, если файл с именем (и, возможно, маршрутом доступа) FileName существует
function FileGetDate(Handle: Integer): Integer; По заданному дескриптору файла Handle возвращает время и дату его создания в системном формате. Возвращает 0 в случае успеха или код ошибки
function FileSetDate(Handle: Integer; Age: Integer): Integer; Для файла с дескриптором Handle устанавливает новое время и дату его создания Age в системном формате. Возвращает 0 в случае успеха или код ошибки
function FindFirst(const Path: string; Attr: Integer; var F: TSearchRec): Integer; Возвращает атрибуты первого из файлов, зарегистрированных в указанном каталоге: Path - маршрут поиска и маска выбора файлов: Attr - атрибуты выбираемых файлов; F - переменная типа TSearchRec, в которой будет возвращено имя первого выбранного файла. При успешном поиске возвращает значение 0
Procedure FindClose(var F: TSearchRec); Освобождает память, выделенную для поиска файлов функциями FindFirst / FindNext
function FindNext(var F: TSearchRec): Integer; Возвращает в переменной F имя следующего файла в каталоге. Переменная F должна предварительно инициироваться обращением к функции FindFirst. При успешном поиске возвращает значение 0
Procedure Flush(var F); Очищает внутренний буфер файла и, таким образом, гарантирует сохранность всех последних файлов на диске
Procedure GetDir(D: Byte; var S: String); Возвращает имя текущего каталога (каталога по умолчанию): D - номер устройства (0 - устройство по умолчанию, 1 - диск А, 2 - диск В и т.д.) S - переменная типа String, в которой возвращает путь к текущему каталогу на указанном диске
function IncludeTrailingBackslash(const S: String): String; Возвращает полный маршрут доступа к файлу с ведомым символом "\"
function IOResult: integer; Возвращает условный признак последней операции ввода-вывода
function IsPathDelimiter(const S: String; Index: Integer): Boolean; Возвращает true, если в строке S символ Index есть "\"
function MatchesMask(const FileName, Mask: String): Boolean; Возвращает true, если имя FileName соответствует групповому имени Mask
Procedure MkDir(Dir: String); Создает новый каталог на указанном диске: Dir маршрут поиска каталога. Последним именем в маршруте, т.е. именем вновь создаваемого каталога, не может быть имя уже существующего каталога
Procedure ProcessPath(const EditText: String; var Drive: Char; var DirPart: String; var FilePart: String); Возвращает имя диска, маршрут поиска и имя файла в переменных Drive, DirPart и FilePart соответственно; EditText полное имя файла
Procedure Rename( var F; NewName: String); Переименовывает файл F; NewName - строковое выражение, содержащее новое имя файла. Перед выполнением процедуру необходимо закрыть файл
Procedure Reset(var F: File [; RecSize: Word]); Открывает существующий файл. RecSize имеет смысл только для нетипизированных файлов и указывает размер блока данных
Procedure Rewrite(var F: File [; Recsize: Word]); Создает новый файл. RecSize имеет смысл только для нетипизированных файлов и указывает размер блока данных
Procedure RmDir(Dir: String); Удаляет каталог Dir. Удаляемый катлог должен быть пустым, т.е. не содержать файлов или имен каталогов нижнего уровня
<<< Назад |
|
|
|
|
