KeyPressed: Porovnání verzí

Z Delphi & Pascal (česká wiki)
Skočit na navigaci Skočit na vyhledávání
 
(Není zobrazena jedna mezilehlá verze od stejného uživatele.)
Řádek 22: Řádek 22:
 
  {KeyPress.PAS}
 
  {KeyPress.PAS}
 
  {Vzorový příklad pro funkci KeyPressed.}
 
  {Vzorový příklad pro funkci KeyPressed.}
 +
 
  { Pro Windows: }
 
  { Pro Windows: }
 
  { uses WinCrt; }
 
  { uses WinCrt; }
Řádek 33: Řádek 34:
  
  
 +
[[Category:Pascal]]
 
[[Category:CRT]]
 
[[Category:CRT]]
 
[[Category:Funkce CRT]]
 
[[Category:Funkce CRT]]

Aktuální verze z 23. 1. 2014, 10:26

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.