Section courante

A propos

Section administrative du site

ClrEos

Efface jusqu'à la fin de l'écran
HighSpeed Pascal CRT

Syntaxe

Procedure ClrEos;

Description

Cette procédure permet d'effacer la fenêtre CLI en commençant à l'emplacement actuel du curseur.

Remarque

Exemple

L'exemple suivant affiche des astérisques de façon aléatoire à l'écran et efface l'écran à partir de la dixième ligne :

  1. Program ClrEosSamples;
  2. Uses Crt;
  3. Var
  4.  X:Integer;
  5. BEGIN
  6.  For X := 1 to 1999 do Begin
  7.   GoToXY(Random(Lo(WindMax))+1,Random(Hi(WindMax))+1);
  8.   Write(' * ') ;
  9.  End;
  10.  GOTOXY (1,10) ;
  11.  ClrEos;
  12. END.


Dernière mise à jour : Lundi, le 20 avril 2020