Language:
Русский
English
{KeyPress.PAS}
▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
{Sample code for the KeyPressed function.}
uses WinCrt;
begin
repeat
Write('Xx');
until KeyPressed;
end.
KeyPress.PAS |
Language: {KeyPress.PAS} uses WinCrt; begin |
|
|