Sign in Join
FPDoc Onlineexperiment

TextColor procedure

In unit Crt

Set text color.

Declaration

pascal
procedure TextColor(Color: Byte)

Description

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

Errors

None.

See also

Example: ex12

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

An experiment, built from development snapshots. Not the official Free Pascal or Lazarus documentation.