| [Overview][Constants][Types][Procedures and functions][Variables][Index] | 
Set text color
Source position: crth.inc line 90
procedure TextColor(  | 
Color: Byte  | 
);  | 
TextColor sets the foreground color to CL. CL can be one of the predefined color constants.
None.
  | 
Set text background  | 
|
  | 
Switch to highlighted text mode  | 
|
  | 
Switch to low intensity colors.  | 
|
  | 
Return to normal (startup) modus  | 
Program Example12; uses Crt; { Program to demonstrate the TextColor function. } begin WriteLn('This is written in the default color'); TextColor(Red); WriteLn('This is written in Red'); TextColor(White); WriteLn('This is written in White'); TextColor(LightBlue); WriteLn('This is written in Light Blue'); end.