GetCBreak: Porovnání verzí

Z Delphi & Pascal (česká wiki)
Skočit na navigaci Skočit na vyhledávání
(Založena nová stránka: Zjistí stav kontrolování stisku Ctrl+Break v DOSu. ;Režim :Windows, Reálný, Chráněný ;Deklarace procedure GetCBreak(var Break: Boolean); ;Poznámky :[[GetCB…)
 
m (1 revízia: Uses DOS)
 
(Žádný rozdíl)

Aktuální verze z 2. 10. 2012, 15:42

Zjistí stav kontrolování stisku Ctrl+Break v DOSu.

Režim
Windows, Reálný, Chráněný
Deklarace
procedure GetCBreak(var Break: Boolean);
Poznámky
GetCBreak nastaví hodnotu Break v závislosti na stavu kontrolování stisku Ctrl+Break v DOSu. Když je vypnuto (False), DOS testuje Ctrl+Break pouze během vstupu a výstupu na konzoli, tiskárnu nebo komunikační zařízení. Když je zapnuto (True), testy se provádějí při každém volání systému.


Viz také
SetCBreak


Vzorový příklad

{ GetCBrk.PAS }
{ Vzorový příklad pro GetCBreak a SetCBreak. }
{ Pro Windows: }
{ uses WinDos, WinCrt; }
uses Dos;
 const
   OffOn : array [Boolean] of String[3] = ('vypnuto','zapnuto');
 var
   cb : Boolean;
 begin
   GetCBreak(cb);
   WriteLn('Kontrola Control-Break : ', OffOn[cb]);
   cb := not(cb);
   WriteLn('Změna stavu kontroly Control-Break do : ', OffOn[cb]);
   SetCBreak(cb);
 end.