Změny

Skočit na navigaci Skočit na vyhledávání

KeyPressed

Přidáno 518 bajtů, 1. 10. 2012, 09:27
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]]

Navigační menu