Section courante

A propos

Section administrative du site

KEYPRESSED

 Touche enfoncé
Free Pascal Crt

Syntaxe

Function KeyPressed:Boolean;

Description

Cette fonction permet de vérifier si l'utilisateur appui actuellement sur une touche.

Exemple

Voici un exemple de l'utilisation de cette fonction :

  1. Program KeyPressedSamples;
  2.  
  3. Uses Crt;
  4.  
  5. BEGIN
  6.  WriteLn('Presse n''importe quel touche pour continuer...');
  7.  Repeat Until KeyPressed;
  8.  WriteLn('Fin du programme');
  9. END.

on obtiendra le résultat suivant :

Presse n'importe quel touche pour continuer...

le programme attend qu'on enfonce une touche, peu importe laquelle sans avoir besoin d'enfoncer «ENTER» et affiche :

Fin du programme

Dernière mise à jour : Samedi, le 18 juillet 2015