Модуль WinDos
Возвращает состояние флага проверки на Ctrl-Break в DOS.
Объявление:
Procedure GetCBreak(Var Break : Boolean);
Режим:
Windows, Real, Protected
Замечание:
Если Break = False, то DOS проверяет Ctrl+Break только в течение операций ввода/вывода на консоль, принтер или устройства связи. А если Break = True, то проверка осуществляется при каждом системном вызове.
Пример:
{ Пример программы для процедур GetCBreak и SetCBreak }
Uses Dos;
Const OffOn : Array [Boolean] Of String[4] = ('выкл','вкл');
Var Cb : Boolean;
Begin
GetCBreak(Cb);
WriteLn('Проверка на Ctrl-Break : ', OffOn[Cb]);
Cb:=Not(Cb);
WriteLn('Переключение проверки на : ', OffOn[Cb]);
SetCBreak(Cb);
End.