Section courante

A propos

Section administrative du site

DELAY

Délai
Turbo Pascal 3+ CRT

Syntaxe

Procedure Delay(sec_1000:Integer); Version 3
Procedure Delay(sec_1000:Word); Version 4 à 7

Paramètres

Nom Description
sec_1000 Ce paramètre permet d'indiquer le nombre de millième de secondes d'attente.

Description

Cette procédure permet d'effectuer une pause correspondant au nombre de millième de seconde spécifié.

Remarques

Exemples

Le programme suivant permet d'attendre 2 secondes et affiche un message lorsque les 2 secondes se sont écoulés :

Essayer maintenant !
  1. Program DelaySamples;
  2.      
  3. Uses Crt;
  4.      
  5. BEGIN
  6.  WriteLn('En attente...');
  7.  Delay(2000);
  8.  WriteLn('Deux secondes d''écoulées');
  9. END.

L'exemple suivant permet de créer un signal sonore «Bip» :

  1. Program Beep;
  2.  
  3. Uses Crt;
  4.  
  5. BEGIN
  6.   Sound(220);        { Bip }
  7.   Delay(250);        { Pendant 250 ms }
  8.   NoSound;           { Arrête le son }
  9. END.

Référence

Aide-mémoire de Turbo Pascal versions de 3 à 6, Edition Marabout, De Groote, Virga, 1992, ISBN: 2-501-01833-8, page 138.
Le grand livre du Turbo & Borland Pascal 7.0, Edition Micro Application, Reiner Scholles, 1993, ISBN: 2-86899-873-9, page 1221.

Dernière mise à jour : Dimanche, le 25 janvier 2015