Get rid of big orange panels.
[DEVELOPMENT ENVIRONMENT] * NEW: Get rid of big orange panels.
This commit is contained in:
parent
57db6fa51c
commit
034542f2b8
7 changed files with 379 additions and 495 deletions
File diff suppressed because it is too large
Load diff
|
@ -705,7 +705,7 @@
|
||||||
{ Label69 Label
|
{ Label69 Label
|
||||||
MoveScaled(0,0,47,4)
|
MoveScaled(0,0,47,4)
|
||||||
Expand = True
|
Expand = True
|
||||||
Text = ("Adapt colors to dark themes")
|
Text = ("Invert colors for dark themes")
|
||||||
}
|
}
|
||||||
{ btnInvertTheme SwitchButton
|
{ btnInvertTheme SwitchButton
|
||||||
MoveScaled(48,0,8,4)
|
MoveScaled(48,0,8,4)
|
||||||
|
|
|
@ -77,7 +77,7 @@ Public Sub Form_Open()
|
||||||
hVoid.ResizeScaled(1, 1)
|
hVoid.ResizeScaled(1, 1)
|
||||||
hVoid.Expand = True
|
hVoid.Expand = True
|
||||||
hVoid = New Separator(panGroup)
|
hVoid = New Separator(panGroup)
|
||||||
hVoid.Foreground = Color.SetAlpha(Project.COLOR_ORANGE, 128)
|
'hVoid.Foreground = Color.LightForeground 'Color.SetAlpha(Project.COLOR_ORANGE, 128)
|
||||||
hVoid.ResizeScaled(1, 3)
|
hVoid.ResizeScaled(1, 3)
|
||||||
hVoid.Expand = True
|
hVoid.Expand = True
|
||||||
Continue
|
Continue
|
||||||
|
|
|
@ -1,7 +1,7 @@
|
||||||
# Gambas Form File 3.0
|
# Gambas Form File 3.0
|
||||||
|
|
||||||
{ Form Form
|
{ Form Form
|
||||||
MoveScaled(0,0,115,82)
|
MoveScaled(0,0,115,83)
|
||||||
Background = Color.TextBackground
|
Background = Color.TextBackground
|
||||||
Text = ("Gambas Software Farm")
|
Text = ("Gambas Software Farm")
|
||||||
Arrangement = Arrange.Vertical
|
Arrangement = Arrange.Vertical
|
||||||
|
@ -11,8 +11,7 @@
|
||||||
}
|
}
|
||||||
{ VBox1 HBox
|
{ VBox1 HBox
|
||||||
MoveScaled(0,10,98,6)
|
MoveScaled(0,10,98,6)
|
||||||
Background = &HDF6B00&
|
Background = Color.ButtonBackground
|
||||||
Foreground = &HFFFFFF&
|
|
||||||
Spacing = True
|
Spacing = True
|
||||||
{ btnGoBack ToolButton
|
{ btnGoBack ToolButton
|
||||||
MoveScaled(0,0,6,6)
|
MoveScaled(0,0,6,6)
|
||||||
|
@ -50,8 +49,11 @@
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
{ Separator2 Separator
|
||||||
|
MoveScaled(44,18,14,0)
|
||||||
|
}
|
||||||
{ wizFarm Wizard
|
{ wizFarm Wizard
|
||||||
MoveScaled(1,17,97,64)
|
MoveScaled(1,21,97,60)
|
||||||
Expand = True
|
Expand = True
|
||||||
Arrangement = Arrange.Vertical
|
Arrangement = Arrange.Vertical
|
||||||
Count = 3
|
Count = 3
|
||||||
|
|
|
@ -52,7 +52,7 @@ Public Sub Panel_Draw()
|
||||||
Endif
|
Endif
|
||||||
|
|
||||||
If $bInside And If Me.Enabled Then
|
If $bInside And If Me.Enabled Then
|
||||||
Paint.FillRect(0, 0, Paint.W, Paint.H, Color.SetAlpha(Color.TextBackground, 192))
|
Paint.FillRect(0, 0, Paint.W, Paint.H, Color.SetAlpha(Color.TextForeground, 224))
|
||||||
Endif
|
Endif
|
||||||
|
|
||||||
Paint.DrawPicture($hPict, 16, ($hPanel.H - $hPict.H) \ 2)
|
Paint.DrawPicture($hPict, 16, ($hPanel.H - $hPict.H) \ 2)
|
||||||
|
|
|
@ -80,7 +80,7 @@ Public Sub Form_Open()
|
||||||
btnSoft.Tag = LIST_SOFTWARE
|
btnSoft.Tag = LIST_SOFTWARE
|
||||||
|
|
||||||
For Each hCtrl In [btnNew, btnOpen, btnRecent, btnExample, btnSoft, btnFarm, btnOpenExtern, btnAbout, btnQuit]
|
For Each hCtrl In [btnNew, btnOpen, btnRecent, btnExample, btnSoft, btnFarm, btnOpenExtern, btnAbout, btnQuit]
|
||||||
hCtrl.Foreground = Color.White
|
hCtrl.Foreground = Color.Foreground
|
||||||
'hCtrl.Highlight = &H61A7C3&
|
'hCtrl.Highlight = &H61A7C3&
|
||||||
Next
|
Next
|
||||||
|
|
||||||
|
@ -213,7 +213,7 @@ Private Sub Toggle(iState As Integer)
|
||||||
End Select
|
End Select
|
||||||
|
|
||||||
For Each hCtrl In [btnRecent, btnExample, btnSoft]
|
For Each hCtrl In [btnRecent, btnExample, btnSoft]
|
||||||
hCtrl.Background = If($iRecent = hCtrl.Tag, Color.SetAlpha(Color.TextBackground, 160), Color.Default)
|
hCtrl.Background = If($iRecent = hCtrl.Tag, Color.SetAlpha(Color.TextForeground, 240), Color.Default)
|
||||||
'hCtrl.Foreground = If($iRecent = hCtrl.Tag, Color.TextForeground, Color.White)
|
'hCtrl.Foreground = If($iRecent = hCtrl.Tag, Color.TextForeground, Color.White)
|
||||||
Next
|
Next
|
||||||
|
|
||||||
|
|
|
@ -37,12 +37,15 @@
|
||||||
Arrangement = Arrange.Horizontal
|
Arrangement = Arrange.Horizontal
|
||||||
{ panButton ScrollView
|
{ panButton ScrollView
|
||||||
MoveScaled(6,3,35,35)
|
MoveScaled(6,3,35,35)
|
||||||
Background = &HDF6B00&
|
Background = Color.ButtonBackground
|
||||||
Foreground = Color.TextForeground
|
Foreground = Color.TextForeground
|
||||||
Arrangement = Arrange.Vertical
|
Arrangement = Arrange.Vertical
|
||||||
Border = False
|
Border = False
|
||||||
ScrollBar = Scroll.None
|
ScrollBar = Scroll.None
|
||||||
}
|
}
|
||||||
|
{ Separator1 Separator
|
||||||
|
MoveScaled(43,10,0,6)
|
||||||
|
}
|
||||||
{ panList Panel
|
{ panList Panel
|
||||||
MoveScaled(46,5,28,30)
|
MoveScaled(46,5,28,30)
|
||||||
Visible = False
|
Visible = False
|
||||||
|
|
Loading…
Reference in a new issue