keypress.pas

Пример программы для функции KeyPressed.

Код примера
 {KeyPress.PAS}
 
 { Пример программы для функции KeyPressed }
 
 Uses WinCrt;
 
 Begin
  Repeat
   Write('Xx');
  Until KeyPressed;
 End.

Скачать keypress.pas