Процедура GetVerify используется для получения значения флага проверки DOS, имеющего название Verify. Этот флаг служит для определения метода записи данных на диск. Если Verify находится во включенном состоянии, то есть равен ON (истина), то после того, как информация записана на диск, она снова читается и сверяется с оригиналом. Если флаг находится в состоянии OFF (ложь), то информация записывается на диск без проверки. Данная проверка правильности записи сильнее изнашивает жесткие диски (и дисководы) , т.к. необходимо сначала записать, а потом еще и считать, и значительно увеличивает время записи. Поэтому включать этот флаг необходимо, когда информация записывается с винчестера на гибкие диски. Формат процедуры GetVerify:
GetVerify(Var Verify: BOOLEAN);
Представление файла в DOS:
Процедуры и функции обработки файлов:
Procedure FSplit (Patch: string[79]; var Dir: String[67]; var Name: string[8]; var Ext: string[4]) – Разбивает имя файла Patch на 3 составные части (каталог, имя файла, расширение).
Функция FExpand выполняет действия, противоположные процедуре FSplit. FExpand дополняет имя файла до полного имени. Синтаксис:
FExpand (Path: PathStr): PathStr; указанное в параметре Path имя файла функция дополнит значением пути.
Function FSearch (Name: string[79]; DirList: string) : string[79]) – Ищет файл Name в списке DirList каталогов. Элементы списка разделяются точкой с запятой.
FindFirst (Path: String; Attr: Word; Var S: SearchRec). Path – путь и имя для поиска, Attr – задаваемые атрибуты файла, S – переменная типа SearchRec. Производит поиск в заданном (или текущем) каталоге записи, содержимое которой совпадает с заданным именем файла и атрибутами.
FindNext (Var S: SearchRec). Возвращает следующую запись, имя файла и атрибуты в которой совпадают с теми, которые были заданы при предыдущем обращении к процедуре FindFirst.
Если в параметре Path не указан путь, а приведено только имя файла или шаблон, то поиск будет осуществляться в текущем каталоге. Если же поиск нужно осуществить в другом каталоге, то в параметре Path указывается путь к нужному каталогу.
Процедура FindNext ищет следующий файл именем и атрибутами, заданными при вызове FindFirst, если имя файла было задано шаблоном. Если FileNext не находит больше файлов, то в системной переменной DosError устанавливается значение 18.
Если возникает необходимость поиска в различных каталогах, то используется FSearch(Path: PathStr; DirList: STRING): PathStr; Path – путь и имя файла, который необходимо найти, DirList – это список каталогов, в которых будет провдиться поиск.
В случае удачного поиска функция возвращает строку, в которой содержится полное имя файла (путь и имя). В случае неудачи возвращается пустая строка.
GetFAttr (Var F; Var attr: WORD); Возвращает атрибуты файла, связанного с переменной F.
SetFAttr (Var F; Attr: WORD); Устанавливает атрибуты файла. При установке константы атрибутов можно указать по-отдельности. Если необходимо установить атрибуты Hidden (скрытый) и Read-Only (только для чтения), то используется следующая запись:
SetFAttr (F, Hidden + ReadOnly);
В случае ошибки в переменную DosError заносится код ошибки. Значения кода может быть 3 (неправильный путь) или 5 (нет доступа).
Также для работы с файлами в модуле DOS предусмотрены два предопределенных типа: FileRec и TextRec. 1 тип используется самим Турбо Паскалем, он объявляет внутренний формат типизированных и нетипизированных файлов. Тип TextRec используется Турбо Паскалем и предназначен для определения внутреннего формата текстовых файлов.
Процедуры управления процессами:
Procedure Exec (Name: string[79]; CmdLine: String) – Выполняет заданную программу Name с указанной командной строкой CmdLine.
Keep. Сохраняет (прекращает выполнение и сохраняет в памяти) прекратившую работу программу,оставляя ее резидентной в памяти.
SwapVectors. Меняет местами содержимое сохраненных векторов прерываний и текущих векторов.
Функции управления операционной средой:
EnvCount. Возвращает число строк, содержащихся в операционной среде DOS.
EnvStr. Возвращает заданную строку операционной среды.
Уважаемый посетитель!
Чтобы распечатать файл, скачайте его (в формате Word).
Ссылка на скачивание - внизу страницы.