Мои Конспекты
Главная | Обратная связь


Автомобили
Астрономия
Биология
География
Дом и сад
Другие языки
Другое
Информатика
История
Культура
Литература
Логика
Математика
Медицина
Металлургия
Механика
Образование
Охрана труда
Педагогика
Политика
Право
Психология
Религия
Риторика
Социология
Спорт
Строительство
Технология
Туризм
Физика
Философия
Финансы
Химия
Черчение
Экология
Экономика
Электроника

Процедуры для работы с любыми файлами



 

Assign (файловая_переменная,имя_файла) – связать файловую переменную с именем файла.

 

Close (файловая_переменная) – закрыть файл.

 

Rename (файловая_переменная, новое_имя) – переименовать файл.

 

Erase (файловая_переменная) – уничтожить файл.

 

Flush (файловая_переменная) – очищает внутренний буфер файла и, таким образом гарантирует сохранность всех последних изменений файла на диске. Процедура игнорируется, если файл был открыт для чтения процедурой Reset.

 

ChDir (путь) – изменение текущего каталога. Путь – это строковое выражение, содержащее путь к устанавливаемому по умолчанию каталогу.

 

GetDir (устройство, каталог) – определяет имя текущего каталога. Устройство – выражение типа Word, содержащее номер устройства: 1 – диск А, 2 – диск В и т.д. Каталог – переменная строкового типа, в которой возвращается путь к текущему каталогу на указанном диске.

 

MkDir (каталог) – создает новый каталог на указанном диске. каталог – переменная строкового типа, задающая путь к каталогу.

 

RmDir (каталог) – удаляет каталог. Удаляемый каталог должен быть пустым.

 

FindFirst (маска, атрибуты, имя) – возвращает атрибуты первого из файлов, зарегистрированных в указанном каталоге.

Маска – строковое выражение, содержащее маску файл, например a?.pas, *.dat. Маске может предшествовать путь.

Атрибуты – выражение типа Byte, содержащее уточнение к маске. В модуле Dos.tpu определены следующие файловые атрибуты:

ReadOnly – только чтение,

Hidden – скрытый файл,

SysFile – системный файл,

VolumeID – идентификатор тома,

Directory – имя подкаталога,

Archive – архивный файл,

AnyFile – любой файл.

Имя – переменная типа SearchRec, в которой будет возвращено имя файла. Этот тип в модуле Dos.tpu определяется следующим образом:

Type

SearchRec=record

Fill:array[1..21] of Byte;

Attr:Byte; {атрибуты файла}

Time:LongInt; {время создания или последнего обновления}

{файла; возвращается в упакованном формате}

Size:LongInt; {длина файла в байтах}

Name:String[12] {имя и расширение файла}

end;

Для распаковки параметра Time используется процедура:

UnPackTime (Time:LongInt; var T:DateTime);

В модуле Dos.tpu объявлен следующий тип DateTime:

Type

DateTime=record

year :Word; {год в формате XXXX}

month:Word; {месяц 1..12}

day :Word; {день 1..31}

hour :Word; {час 0..23}

min :Word; {минуты 0..59}

sec :Word; {секунды 0..59}

end;

Результат обращения к процедуре FindFirst можно проконтролировать с помощью функции DosError типа Word, которая возвращает значения:

0 – нет ошибок;

2 – не найден каталог;

18 – каталог пуст (нет указанных файлов).

 

FindNext (следующий_файл) – возвращает имя следующего файла в каталоге.

Пример. Вывести на экран список всех pas-файлов текущего каталога.

Uses Dos;

Var

S:SearchRec;

Begin

FindFirst(’*.pas’,AnyFile,S);

While DosError=0 do

Begin

With S do

WriteLn(Name:12;Size:12);

FindNext(S)

End

End.

 

GetfTime (файловая_переменная, время) – возвращает время создания или последнего обновления файла. Время – переменная типа LongInt. Время возвращается в упакованном формате.

 

SetfTime (файловая_переменная, время) – устанавливает новую дату создания или обновления файла. Время – переменная типа LongInt, указывающая дату и время в упакованном формате.

Упаковать запись типа DateTime в переменную типа LongInt можно процедурой

PackTime (var T:DateTime; var Time:LongInt);

 

GetfAttr(файловая_переменная, атрибуты) – позволяет получить атрибуты файла.

 

SetfAttr(файловая_переменная, атрибуты) – позволяет установить атрибуты файла.

 

Fsplit (файл, путь, имя, расширение) – «расщепляет» имя файла, т.е. возвращает в качестве отдельных параметров путь к файлу, его имя и расширение. Процедура не проверяет наличие на диске указанного файла.

 




Поиск по сайту:







©2015-2020 mykonspekts.ru Все права принадлежат авторам размещенных материалов.