TAnsi

type TAnsi = record

public

const

  Black = 0

  Red = 1

  Green = 2

  Yellow = 3

  Blue = 4

  Magenta = 5

  Cyan = 6

  White = 7

  BrightBlack = 8

  BrightRed = 9

  BrightGreen = 10

  BrightYellow = 11

  BrightBlue = 12

  BrightMagenta = 13

  BrightCyan = 14

  BrightWhite = 15

public

  function RGB();

  function GrayScale();

  function FgRGB();

  function BgRGB();

  function Fg();

  function Bg();

  function Blinking;

  function Bold;

  function Faint;

  function Strikethrough;

  function ToString;

  class function CursorAt();

  class function CursorAtCol();

  class function CursorUp();

  class function CursorDown();

  class function CursorForward();

  class function CursorBackward();

  class function CursorNextLine();

  class function CursorPreviousLine();

  class function EraseDisplay();

  class function EraseLine();

  function At();

  function AtCol();

  function Up();

  function Down();

  function Forward();

  function Backward();

  function NextLine();

  function PreviousLine();

  function Emit();

  function EmitLn();

  function Clear();

  class operator assign(AnsiString):TAnsi();

  class operator assign(TAnsi):AnsiString();

  class operator assign(ShortString):TAnsi();

  class operator assign(TAnsi):ShortString();

end;