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.