TextColor

   

Declaration:

Procedure TextColor (CL: Byte) ;

Description:

TextColor sets the foreground color to CL. CL can be one of the predefined color constants.

Errors:

None.

See also:

TextBackground, HighVideo, LowVideo, NormVideo

Example

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.