luisgulo/gambas-source-code
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

TerminalView: Use a bit more readable yellow colors.

Browse source 
[GB.FORM.TERMINAL]
* NEW: TerminalView: Use a bit more readable yellow colors.
This commit is contained in:
gambas 2021-03-08 00:05:38 +01:00
parent 768a928dd3
commit 8dc5116e3e
2 changed files with 5 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
comp/src/gb.form.terminal/.src/TerminalView/TerminalScreen.class
View file

@ -25,13 +25,13 @@ Public WrapMode As Boolean
Public HideCursor As Boolean
Static Private $aDarkColor As Integer[] = [
&H404040, &HC00000, &H00C000, &HD0C000, &H005090, &H900090, &H009090, &HC0C0C0,
&HA0A0A0, &HFF0000, &H00FF00, &HFFFF00, &H0080FF, &HFF00FF, &H00FFFF, &HFFFFFF]
&H404040, &HC00000, &H00C000, &HC0A300, &H005090, &H900090, &H009090, &HC0C0C0,
&HA0A0A0, &HFF0000, &H00FF00, &HFFDD00, &H0080FF, &HFF00FF, &H00FFFF, &HFFFFFF]
'&H808080, &HC00000, &H00C000, &HD0C000, &H0060C0, &H800080, &H008080, &HFFFFFF,
'&H000000, &HFF0000, &H00FF00, &HFFFF00, &H0080FF, &HFF00FF, &H00FFFF, &HC0C0C0]
Static Private $aColor As Integer[] = [
&H000000, &HC00000, &H00C000, &HD0C000, &H0060C0, &H900090, &H009090, &HC0C0C0,
&H000000, &HC00000, &H00C000, &HC0A300, &H0060C0, &H900090, &H009090, &HC0C0C0,
&H808080, &H800000, &H008000, &H606000, &H004080, &H600060, &H006060, &HF0F0F0,
&H000000, &H00005F, &H000087, &H0000AF, &H0000D7, &H0000FF,
&H005F00, &H005F5F, &H005F87, &H005FAF, &H005FD7, &H005FFF,

2
comp/src/gb.form.terminal/.src/TerminalView/test/FTestTerminalView.form
View file

@ -7,6 +7,8 @@
{ TerminalView1 TerminalView
MoveScaled(4,3,63,35)
Font = Font["Gambas,11"]
Background = Color.TextBackground
Foreground = Color.TextForeground
Expand = True
Border = False
Limit = 0