1 578
editací
Změny
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…
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.
[[Category:DOS]]
[[Category:WinDos]]
[[Category:Procedúry DOS]]
;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.
[[Category:DOS]]
[[Category:WinDos]]
[[Category:Procedúry DOS]]