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.