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
- La position du curseur n'est pas modifiée par la procédure ClrEos.
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 :
- Program ClrEosSamples;
- Uses Crt;
- Var
- X:Integer;
- BEGIN
- For X := 1 to 1999 do Begin
- GoToXY(Random(Lo(WindMax))+1,Random(Hi(WindMax))+1);
- Write(' * ') ;
- End;
- GOTOXY (1,10) ;
- ClrEos;
- END.
Dernière mise à jour : Lundi, le 20 avril 2020