Процедура GetVerify

Модуль DOS

Возвращает состояние флага проверки в DOS.

Объявление:

Procedure GetVerify(Var Verify : Boolean);

Режим:

Windows, Real, Protected

Замечание:

Функция GetVerify возвращает состояние флага проверки в DOS. Если Verify равно False, то запись на диск не проверяется. Если Verify = True, то запись на диск проверяется, чтобы гарантировать ее правильность.

Пример:

{ Пример программы для процедур GetVerify и SetVerify }

Uses WinDos, WinCrt;

Const OffOn : Array [Boolean] Of String[4] = ('выкл', 'вкл');

Var V : Boolean;

Begin
 GetVerify(V);
 WriteLn('Проверка записи : ', OffOn[V]);
 V:=Not(V);
 WriteLn('Проверку переключена на ', OffOn[V]);
 SetVerify(V);
End.