Правила форума
GetVerify (процедура) (модуль WinDos)Язык:
Русский
English
GetVerify (процедура) (модуль WinDos)
Возвращает состояние флага проверки в DOS.
Объявление
Procedure GetVerify(Var Verify : Boolean);
Режим
Windows, Real, Protected
Замечания
Функция GetVerify возвращает состояние флага проверки в DOS. Если Verify равно False, то запись на диск не проверяется. Если Verify = True, то запись на диск проверяется, чтобы гарантировать ее правильность.
Смотри также
Пример
Язык:
Русский
English
uses Dos, Crt;
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.
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.
::
::
::
