KeyPressed

Z Delphi & Pascal (česká wiki)
Verze z 1. 10. 2012, 14:14, kterou vytvořil Zdeno Sekerák (diskuse | příspěvky) (1 revízia: Knihovna CRT)
Skočit na navigaci Skočit na vyhledávání

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.