Reference TWSTerminal

  TWSTerminal = class(TWSWinControl)
  published
    class function CreateHandle(const AWinControl: TWinControl; const AParams: TCreateParams): HWND; override;
  public
    { True if the control has a terminal widget, false if it paints itself }
    class function HasTerminal(AWinControl: TWinControl): Boolean;
    { Set the sixteen numbered colors together with the text and background
      colors. The other colors must be set again afterwards. }
    class procedure SetPalette(AWinControl: TWinControl; Palette: TTerminalPalette; Fore, Back: TColor);
    class procedure SetColor(AWinControl: TWinControl; Element: TTerminalElement; Color: TColor);
    class procedure SetFont(AWinControl: TWinControl; Font: TFont);
    { Show or hide the vertical scroll bar beside the terminal }
    class procedure SetScrollBar(AWinControl: TWinControl; Visible: Boolean);
    { Clear the terminal and run the shell in it again }
    class procedure Restart(AWinControl: TWinControl);
  end;