dunestorm/GBM
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added three new themes (colors not yet final).

Browse Source
This commit is contained in:
Dunestorm
2019-06-10 15:02:13 +01:00
parent cd185755c8
commit 9c3643fa2e
4 changed files with 239 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
GBM/Forms/frmSettings.vb
+9
View File
@@ -269,6 +269,9 @@ Public Class frmSettings
oThemeItems.Add(New KeyValuePair(Of Integer, String)(0, frmSettings_cboThemeSelection_Light))
oThemeItems.Add(New KeyValuePair(Of Integer, String)(1, frmSettings_cboThemeSelection_Dark))
oThemeItems.Add(New KeyValuePair(Of Integer, String)(2, frmSettings_cboThemeSelection_Crimson))
oThemeItems.Add(New KeyValuePair(Of Integer, String)(3, frmSettings_cboThemeSelection_Emerald))
oThemeItems.Add(New KeyValuePair(Of Integer, String)(4, frmSettings_cboThemeSelection_GBM))
cboThemeSelection.DataSource = oThemeItems
@@ -462,6 +465,12 @@ Public Class frmSettings
oThemeEngine.SetTheme(cboThemeSelection.SelectedIndex)
ElseIf cboThemeSelection.SelectedIndex = 1 Then
oThemeEngine.SetTheme(cboThemeSelection.SelectedIndex)
ElseIf cboThemeSelection.SelectedIndex = 2 Then
oThemeEngine.SetTheme(cboThemeSelection.SelectedIndex)
ElseIf cboThemeSelection.SelectedIndex = 3 Then
oThemeEngine.SetTheme(cboThemeSelection.SelectedIndex)
ElseIf cboThemeSelection.SelectedIndex = 4 Then
oThemeEngine.SetTheme(cboThemeSelection.SelectedIndex)
End If
'Only set the theme once it has been defined.
GBM/Managers/mgrThemeEngine.vb
+49
View File
@@ -70,6 +70,9 @@ Public Class mgrThemeEngine
Public Enum eBaseTheme
Light = 0
Dark = 1
Crimson = 2
Emerald = 3
GBM = 4
End Enum
''' <summary>
@@ -107,6 +110,52 @@ Public Class mgrThemeEngine
mgrThemeEngine_RGB_Light_HighlightSecondary)
_bThemeHasBeenDefined = True
Case eBaseTheme.Crimson
_ColorBase = New ColorConverter().ConvertFromString(
mgrThemeEngine_RGB_Crimson_Base)
_ColorBaseSecondary = New ColorConverter().ConvertFromString(
mgrThemeEngine_RGB_Crimson_BaseSecondary)
_ColorHighlight = New ColorConverter().ConvertFromString(
mgrThemeEngine_RGB_Crimson_Highlight)
_ColorHighlightSecondary = New ColorConverter().ConvertFromString(
mgrThemeEngine_RGB_Crimson_HighlightSecondary)
_bThemeHasBeenDefined = True
Case eBaseTheme.Emerald
_ColorBase = New ColorConverter().ConvertFromString(
mgrThemeEngine_RGB_Emerald_Base)
_ColorBaseSecondary = New ColorConverter().ConvertFromString(
mgrThemeEngine_RGB_Emerald_BaseSecondary)
_ColorHighlight = New ColorConverter().ConvertFromString(
mgrThemeEngine_RGB_Emerald_Highlight)
_ColorHighlightSecondary = New ColorConverter().ConvertFromString(
mgrThemeEngine_RGB_Emerald_HighlightSecondary)
_bThemeHasBeenDefined = True
Case eBaseTheme.GBM
_ColorBase = New ColorConverter().ConvertFromString(
mgrThemeEngine_RGB_GBM_Base)
_ColorBaseSecondary = New ColorConverter().ConvertFromString(
mgrThemeEngine_RGB_GBM_BaseSecondary)
_ColorHighlight = New ColorConverter().ConvertFromString(
mgrThemeEngine_RGB_GBM_Highlight)
_ColorHighlightSecondary = New ColorConverter().ConvertFromString(
mgrThemeEngine_RGB_GBM_HighlightSecondary)
_bThemeHasBeenDefined = True
End Select
End Sub
End Class
GBM/My Project/Resources.Designer.vb
Generated
+136 -1
View File
@@ -22,7 +22,7 @@ Namespace My.Resources
'''<summary>
''' A strongly-typed resource class, for looking up localized strings, etc.
'''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "15.0.0.0"), _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "16.0.0.0"), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
@@ -4731,6 +4731,15 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Looks up a localized string similar to Crimson.
'''</summary>
Friend ReadOnly Property frmSettings_cboThemeSelection_Crimson() As String
Get
Return ResourceManager.GetString("frmSettings_cboThemeSelection_Crimson", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to Dark.
'''</summary>
@@ -4740,6 +4749,24 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Looks up a localized string similar to Emerald.
'''</summary>
Friend ReadOnly Property frmSettings_cboThemeSelection_Emerald() As String
Get
Return ResourceManager.GetString("frmSettings_cboThemeSelection_Emerald", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to GBM.
'''</summary>
Friend ReadOnly Property frmSettings_cboThemeSelection_GBM() As String
Get
Return ResourceManager.GetString("frmSettings_cboThemeSelection_GBM", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to Light.
'''</summary>
@@ -6916,6 +6943,42 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Looks up a localized string similar to 209,10,10.
'''</summary>
Friend ReadOnly Property mgrThemeEngine_RGB_Crimson_Base() As String
Get
Return ResourceManager.GetString("mgrThemeEngine_RGB_Crimson_Base", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to 119,0,0.
'''</summary>
Friend ReadOnly Property mgrThemeEngine_RGB_Crimson_BaseSecondary() As String
Get
Return ResourceManager.GetString("mgrThemeEngine_RGB_Crimson_BaseSecondary", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to 255,255,255.
'''</summary>
Friend ReadOnly Property mgrThemeEngine_RGB_Crimson_Highlight() As String
Get
Return ResourceManager.GetString("mgrThemeEngine_RGB_Crimson_Highlight", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to 255,255,255.
'''</summary>
Friend ReadOnly Property mgrThemeEngine_RGB_Crimson_HighlightSecondary() As String
Get
Return ResourceManager.GetString("mgrThemeEngine_RGB_Crimson_HighlightSecondary", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to 25,25,25.
'''</summary>
@@ -6952,6 +7015,78 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Looks up a localized string similar to 80,200,120.
'''</summary>
Friend ReadOnly Property mgrThemeEngine_RGB_Emerald_Base() As String
Get
Return ResourceManager.GetString("mgrThemeEngine_RGB_Emerald_Base", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to 77,137,105.
'''</summary>
Friend ReadOnly Property mgrThemeEngine_RGB_Emerald_BaseSecondary() As String
Get
Return ResourceManager.GetString("mgrThemeEngine_RGB_Emerald_BaseSecondary", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to 255,255,255.
'''</summary>
Friend ReadOnly Property mgrThemeEngine_RGB_Emerald_Highlight() As String
Get
Return ResourceManager.GetString("mgrThemeEngine_RGB_Emerald_Highlight", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to 0,0,0.
'''</summary>
Friend ReadOnly Property mgrThemeEngine_RGB_Emerald_HighlightSecondary() As String
Get
Return ResourceManager.GetString("mgrThemeEngine_RGB_Emerald_HighlightSecondary", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to 48,179,219.
'''</summary>
Friend ReadOnly Property mgrThemeEngine_RGB_GBM_Base() As String
Get
Return ResourceManager.GetString("mgrThemeEngine_RGB_GBM_Base", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to 66,203,244.
'''</summary>
Friend ReadOnly Property mgrThemeEngine_RGB_GBM_BaseSecondary() As String
Get
Return ResourceManager.GetString("mgrThemeEngine_RGB_GBM_BaseSecondary", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to 0,0,0.
'''</summary>
Friend ReadOnly Property mgrThemeEngine_RGB_GBM_Highlight() As String
Get
Return ResourceManager.GetString("mgrThemeEngine_RGB_GBM_Highlight", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to 0,0,0.
'''</summary>
Friend ReadOnly Property mgrThemeEngine_RGB_GBM_HighlightSecondary() As String
Get
Return ResourceManager.GetString("mgrThemeEngine_RGB_GBM_HighlightSecondary", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to 240,240,240.
'''</summary>
GBM/My Project/Resources.resx
+45
View File
@@ -2428,4 +2428,49 @@
<data name="frmStartUpWizard_lblStep2Warning" xml:space="preserve">
<value>You cannot return to this step after clicking Next. The Backup Location can be changed any time once Setup is complete.</value>
</data>
<data name="frmSettings_cboThemeSelection_Crimson" xml:space="preserve">
<value>Crimson</value>
</data>
<data name="frmSettings_cboThemeSelection_Emerald" xml:space="preserve">
<value>Emerald</value>
</data>
<data name="frmSettings_cboThemeSelection_GBM" xml:space="preserve">
<value>GBM</value>
</data>
<data name="mgrThemeEngine_RGB_Crimson_Base" xml:space="preserve">
<value>209,10,10</value>
</data>
<data name="mgrThemeEngine_RGB_Crimson_BaseSecondary" xml:space="preserve">
<value>119,0,0</value>
</data>
<data name="mgrThemeEngine_RGB_Crimson_Highlight" xml:space="preserve">
<value>255,255,255</value>
</data>
<data name="mgrThemeEngine_RGB_Crimson_HighlightSecondary" xml:space="preserve">
<value>255,255,255</value>
</data>
<data name="mgrThemeEngine_RGB_Emerald_Base" xml:space="preserve">
<value>80,200,120</value>
</data>
<data name="mgrThemeEngine_RGB_Emerald_BaseSecondary" xml:space="preserve">
<value>77,137,105</value>
</data>
<data name="mgrThemeEngine_RGB_Emerald_Highlight" xml:space="preserve">
<value>255,255,255</value>
</data>
<data name="mgrThemeEngine_RGB_Emerald_HighlightSecondary" xml:space="preserve">
<value>0,0,0</value>
</data>
<data name="mgrThemeEngine_RGB_GBM_Base" xml:space="preserve">
<value>48,179,219</value>
</data>
<data name="mgrThemeEngine_RGB_GBM_BaseSecondary" xml:space="preserve">
<value>66,203,244</value>
</data>
<data name="mgrThemeEngine_RGB_GBM_Highlight" xml:space="preserve">
<value>0,0,0</value>
</data>
<data name="mgrThemeEngine_RGB_GBM_HighlightSecondary" xml:space="preserve">
<value>0,0,0</value>
</data>
</root>