Delete line at cursor position.
Source position: crth.inc line 89
procedure DelLine;  | 
DelLine removes the current line. Lines following the current line are scrolled 1 line up, and an empty line is inserted at the bottom of the current window. The cursor doesn't move.
None.
  | 
Clear from cursor position till end of line.  | 
|
  | 
Insert an empty line at cursor position.  | 
|
  | 
Clear current window.  | 
Program Example10; uses Crt; { Program to demonstrate the InsLine function. } begin ClrScr; WriteLn; WriteLn('Line 1'); WriteLn('Line 2'); WriteLn('Line 2'); WriteLn('Line 3'); WriteLn; WriteLn('Oops, Line 2 is listed twice,', ' let''s delete the line at the cursor postion'); GotoXY(1,3); ReadKey; DelLine; GotoXY(1,10); end.