Урок Delphi 7
Работа с файлами в Delphi

Delphi функции для работы с файлами


Компоненты работающие с файлами
Классическая работа с файлами
Диалоги выбора файлов
Определение размера файла
Поиск файлов
Таблица функций






Уроки Delphi
  1.  Первая программа
  2.  Использование компонентов
  3.  События Delphi
  4.  Типы данных Delphi
  5.  Создание своих типов данных
  6.  Выражения и операторы
  7.  Работа с файлами в Delphi
  8.  Дополнительные формы
  9.  Подпрограммы в Delphi
  10. Исключительные ситуации
  11. Взаимодействие приложения с пользователем
  12. Указатели в Delphi
  13. Обзор компонентов
  14. Работа со строками
  15. Создание интерфейса
  16. Графика в Delphi
  17. Многопоточность в Delphi
  18. Динамическое создание
        компонентов
Поиск по сайту




 Это важно:
   Метод Application.ProcessMessages;

 Это полезно:
   Параметр Sender в обработчиках событий;










Бояться не надо



   Ниже описываются Delphi функции для работы с файлами. В таблице содержатся практически все Delphi функции для работы с файлами, как создающие, переименовывающие, удаляющие файлы и каталоги, так и Delphi функции поиска файлов, обладающих заданными характеристиками.

procedure AssignFile (var F; FileName: String); Связывает файловую переменную F с именем файла FileName.
procedure ChDir (Path: String); Изменяет текущий каталог. Path - переменная, задающая путь к устанавливаемой по умолчанию папке.
procedure CloseFile (var F); Закрывает файл, однако связь файловой переменной с именем файла, установленная ранее процедурой AssignFile сохраняется. Функции процедуры CloseFile на системном уровне выполняются автоматически по отношению ко всем открытым файлам при нормальном завершении программы. Если после применения процедуры CloseFile файл нужно открыть повторно, процедуру AssignFile можно не применять, так как связь файловой переменной с файлом не разрывается.
function DateTimeToFileDate (DateTime: TDateTime): Integer; Преобразует значение переменной DateTime типа TDateTime Delphi в системный формат времени создания (обновления) файла.
function FileDateToDateTime (FileDate: Integer): TDateTime; Преобразует системный формат времени создания (обновления) файла в формат TDateTime Delphi.
function DiskFree (D: Byte): LongInt; Возвращает объём в байтах свободного пространства на указанном диске. Переменная D - номер диска (0 - устройство по умолчанию, текущий диск; 1 - диск А; 2 - диск B; 3 - диск С и т.д.). Функция возвращает значение -1, если указан номер несуществующего диска.
function DiskSpace (D: Byte): Integer; Возвращает объём в байтах полного пространства на указанном диске. Переменная D - номер диска (0 - устройство по умолчанию, текущий диск; 1 - диск А; 2 - диск B; 3 - диск С и т.д.). Функция возвращает значение -1, если указан номер несуществующего диска.
function EOF (var F:): Boolean; Тестирует конец файла и возвращает True, если файловый указатель стоит в конце файла. При записи это означает, что очередной компонент будет добавлен в конец файла, при чтении - что файл исчерпан.
procedure Erase (var F); Уничтожает файл F. Перед выполнением процедуры файл должен быть закрыт процедурой CloseFile.
function FileAge (const FileName: String): Integer; Для файла FileName возвращает время его последнего обновления (в системном формате) или -1, если такого файла не существует.
function FileExists (const FileName: String): Boolean; Возвращает True, если файл FileName существует, и False в противном случае.
function FileGetDate (Handle: Integer): Integer; По заданному дескриптору файла Handle возвращает время и дату его создания (в системном формате). Если дескриптор не существует, возвращает -1.
function FileSetDate (Handle: Integer; Age: Integer): Integer; Для файла с дескриптором Handle устанавливает новое время и дату его создания Age (в системном формате). В случае удачи возвращает 0 или код ошибки в противном случае.
function FindFirst (const Path: String; Attr: Integer; var F: TSearchRec): Integer; Возвращает в переменной F типа TSearchRec первый из файлов, зарегистрированных в указанном каталоге. Path: путь поиска с маской выбора файлов; Attr: атрибуты выбираемых файлов.
function FindNext (var F: TSearchRec): Integer; Возвращает в переменной F следующий файл в каталоге. Переменная F должна быть предварительно инициирована обращением к функции FindFirst.
procedure FindClose (var F: TSearchRec); Освобождает память, выделенную для поиска файлов функциями FindNext и FindFirst.
procedure Flush(var F); Очищает внутренний буфер файла, гарантируя тем самым сохранность всех последних изменений файла на диске.
procedure GetDir (D: Byte; var S: String); Возвращает текущий каталог (каталог по умлочанию). D - номер устройства (0: устройство по умолчанию, 1 - диск А, 2 - диск В и т.д.); S - переменная типа String, в которой возвращается путь к текущему каталогу на указанном диске.
procedure MkDir (Dir: String); Создаёт новый каталог на текущем диске. Dir - адрес нового каталога, который не может совпадать с именем уже существующего каталога.
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. Удаляемый каталог должен быть пустым, т.е. не содержать файлов или вложенных каталогов.
function CopyFile (OldName, NewName: AnsiChar; FileExists: Boolean): Boolean; Копирует файл. Эта функция - не встроенная функция Delphi, а одна из API функций ОС Windows. Возможность работать с ними программа получает после добавления в секцию uses модуля Windows. Параметры функции:
OldName - прежние адрес и имя файла;
NewName - новые адрес и имя файла;
FileExists - переменная, определяющая реакцию на существование файла по новому адресу. При FileExists=False файл будет перезаписан. При FileExists=True функция завершится ошибкой.
function GetLogicalDrives: Cardinal; Эта функция - также из состава WinAPI функций. Как и следует из её названия, позволяет получить структуру логических дисков компьютера. Пример её использования смотрите в комментариях к предыдущей страничке, в ответе на вопрос "как определить состав дисков компьютера"


Работа с файлами           В начало урока          Работа с дополнительными формами  

Уроки Delphi начинающим



Вопросы и комментарии (4)      Решение задач в Delphi

Оставить комментарий:

Имя  

Текст комментария