Skip to content

    TextBackground

    Set text background.

    Declaration

    Source position: crth.inc line 91

    procedure TextBackground(Color: Byte);

    Description

    TextBackground sets the background color to CL. CL can be one of the predefined color constants.

    Errors

    None.

    See also

    Name Description
    TextColor Set text color.
    HighVideo Switch to highlighted text mode.
    LowVideo Switch to low intensity colors.
    NormVideo Return to normal (startup) modus.

    Example

    Program Example13;
uses Crt;

{ Program to demonstrate the TextBackground function. }

begin
  TextColor(White);
  WriteLn('This is written in with the default background color');
  TextBackground(Green);
  WriteLn('This is written in with a Green background');
  TextBackground(Brown);
  WriteLn('This is written in with a Brown background');
  TextBackground(Black);
  WriteLn('Back with a black background');
end.