← All compilation units

Flyology_TUI.Styles

Description

Default

Default : constant Style := (others => <>);

Emphasized

function Emphasized (Item : Style) return Style
Parameters
Item
Return value

Inherit_Colors

function Inherit_Colors (Item, Parent : Style) return Style

Fill only unset foreground/background channels from Parent. Explicit child colors and every child text attribute remain unchanged.

Parameters
Item
Parent
Return value

Style

type Style is record
   Foreground    : Flyology_TUI.Colors.Color := Flyology_TUI.Colors.Default;
   Background    : Flyology_TUI.Colors.Color := Flyology_TUI.Colors.Default;
   Bold          : Boolean := False;
   Faint         : Boolean := False;
   Italic        : Boolean := False;
   Underline     : Boolean := False;
   Blink         : Boolean := False;
   Reverse_Video : Boolean := False;
   Strikethrough : Boolean := False;
end record;
Record fields
Foreground
Background
Bold
Faint
Italic
Underline
Blink
Reverse_Video
Strikethrough

With_Background

function With_Background
  (Item : Style;
   Color : Flyology_TUI.Colors.Color) return Style
Parameters
Item
Color
Return value

With_Foreground

function With_Foreground
  (Item : Style;
   Color : Flyology_TUI.Colors.Color) return Style
Parameters
Item
Color
Return value