Модуль 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.