1 578
editací
Změny
Created page with "Zjistí, zda byla stisknuta nějaká klávesa klávesnice. ;Deklarace function KeyPressed: Boolean; ;Režim :Windows, Reálný, Chráněný ;Poznámky :Klávesu lze př..."
Zjistí, zda byla stisknuta nějaká klávesa klávesnice.
;Deklarace
function KeyPressed: Boolean;
;Režim
:Windows, Reálný, Chráněný
;Poznámky
:Klávesu lze přečíst pomocí Readkey.
;Návratová hodnota
:[[False]] jestliže byla stisknuta nějaká klávesa.
Vzorový příklad
{KeyPress.PAS}
{Vzorový příklad pro funkci KeyPressed.}
{ Pro Windows: }
{ uses WinCrt; }
uses Crt;
begin
repeat
Write('Xx');
until KeyPressed;
end.
[[Category:CRT]]
[[Category:Procedúra CRT]]
;Deklarace
function KeyPressed: Boolean;
;Režim
:Windows, Reálný, Chráněný
;Poznámky
:Klávesu lze přečíst pomocí Readkey.
;Návratová hodnota
:[[False]] jestliže byla stisknuta nějaká klávesa.
Vzorový příklad
{KeyPress.PAS}
{Vzorový příklad pro funkci KeyPressed.}
{ Pro Windows: }
{ uses WinCrt; }
uses Crt;
begin
repeat
Write('Xx');
until KeyPressed;
end.
[[Category:CRT]]
[[Category:Procedúra CRT]]