| [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.