Clear from cursor position till end of line.
Source position: crth.inc line 87
procedure ClrEol;  | 
ClrEol clears the current line, starting from the cursor position, to the end of the window. The cursor doesn't move
None.
  | 
Delete line at cursor position.  | 
|
  | 
Insert an empty line at cursor position.  | 
|
  | 
Clear current window.  | 
Program Example9; uses Crt; { Program to demonstrate the ClrEol function. } var I,J : integer; begin or:=1 to 15 do or:=1 to 80 do begin gotoxy(j,i); Write(j mod 10); end; Window(5,5,75,12); Write('This line will be cleared from', ' here till the right of the window'); GotoXY(27,WhereY); ReadKey; ClrEol; WriteLn; end.