Crt

Deutsch · English

CRT is a unit providing subroutines for programming in text mode. It is similar to ncurses C library. It's intention is to be compatible with the Borland Pascal / Turbo Pascal 7 CRT unit.

Procedures and Functions

Keyboard:

pascal

Function KeyPressed: Boolean;          
Function ReadKey: Char;

Display:

pascal

Procedure TextMode (Mode: word);        
Procedure Window(X1,Y1,X2,Y2: Byte);    
Procedure Window32(X1,Y1,X2,Y2: DWord); 
Procedure ClrScr;                       
Procedure ClrEol;                       
Procedure InsLine;                      
Procedure DelLine;                      
Procedure TextColor(Color: Byte);       
Procedure TextBackground(Color: Byte);  
Procedure LowVideo;                     
Procedure HighVideo;                    
Procedure NormVideo;

Cursor Control:

pascal

Procedure cursoron;                     
Procedure cursoroff;                    
Procedure cursorbig;                    
Procedure GotoXY(X,Y: tcrtcoord);       
Procedure GotoXY32(X,Y: DWord);         
Function WhereX: tcrtcoord;            
Function WhereY: tcrtcoord;            
Function WhereX32: DWord;              
Function WhereY32: DWord;

Sound:

pascal

Procedure Sound(Hz: Word);              
Procedure NoSound;

Delay: (Typically used with sound)

pascal

Procedure Delay(MS: Word);

===File:===

pascal

Procedure AssignCrt(var F: Text);

Variables and Constants

Color Constants:

pascal

const
  Black        =   0;
  Blue         =   1;
  Green        =   2;
  Cyan         =   3;
  Red          =   4;
  Magenta      =   5;
  Brown        =   6;
  LightGray    =   7;
  DarkGray     =   8;
  LightBlue    =   9;
  LightGreen   =  10;
  LightCyan    =  11;
  LightRed     =  12;
  LightMagenta =  13;
  Yellow       =  14;
  White        =  15;
  Blink        = 128;

From the Free Pascal wiki, page "Crt", as it stood on 2019-12-27 after a change by Trev, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's Licensing page. If you have concerns about this material, message the admin.

Revision 5, last changed by WikiArchive 2026-11-06.

Talk about this page

Nobody has opened a bench for this page yet. Sign in to open one.