ClrEol |
Efface jusqu'à la fin de la ligne |
---|---|
HighSpeed Pascal | CRT |
Syntaxe
Procedure ClrEol; |
Description
Cette procédure permet d'effacer la ligne courante à partir du curseur jusqu'à la fin de la ligne de l'écran de texte.
Remarques
- La procédure ClrEol supprime tous les caractères de la ligne actuelle, en commençant à la position actuelle du curseur.
- La position du curseur n'est pas modifiée par l'appel de cette procédure.
Exemple
L'exemple suivant permet de remplir l'écran de chaîne de caractères «0123456789» et de les effacer en plein milieu :
- Program ClrEolSamples;
- Uses Crt;
- Var
- Y:Byte;
- BEGIN
- ClrScr;
- For Y:=1 to 24 do Writeln(' 0123456789 ') ;
- For Y:=1 to 25 do Begin
- GoToXY(5,Y);
- ClrEol;
- End;
- End.
Dernière mise à jour : Lundi, le 20 avril 2020