aboutsummaryrefslogtreecommitdiff
path: root/ShiftOS
diff options
context:
space:
mode:
authorTheUltimateHacker <[email protected]>2015-03-09 16:44:14 -0400
committerTheUltimateHacker <[email protected]>2015-03-09 16:44:14 -0400
commitba170856e2aa2686196d55043e051812362f830e (patch)
tree1f15c259814fc0b3724add8ec7d70b420be6bacd /ShiftOS
parent696d91e75c8aee43c1263d7cb7fc1bc4bcbbb9a0 (diff)
downloadshiftos-ba170856e2aa2686196d55043e051812362f830e.tar.gz
shiftos-ba170856e2aa2686196d55043e051812362f830e.tar.bz2
shiftos-ba170856e2aa2686196d55043e051812362f830e.zip
Fixed a skinning bug with the Desktop Context Menu.
Diffstat (limited to 'ShiftOS')
-rw-r--r--ShiftOS/ShiftOSDesktop.vb12
1 files changed, 10 insertions, 2 deletions
diff --git a/ShiftOS/ShiftOSDesktop.vb b/ShiftOS/ShiftOSDesktop.vb
index efb3808..e080d0a 100644
--- a/ShiftOS/ShiftOSDesktop.vb
+++ b/ShiftOS/ShiftOSDesktop.vb
@@ -251,6 +251,7 @@
'new 0.0.9 features
Public boughtskinstates As Boolean = False
+ Public boughtdesktopicons As Boolean = False
'Colour Picker Memories
Public anymemory(15) As Color
@@ -1056,7 +1057,7 @@
SortOutBooleans(VideoPlayerCorrupted, 610, False)
SortOutBooleans(VirusScannerCorrupted, 612, False)
SortOutBooleans(WebBrowserCorrupted, 613, False)
-
+ If boughtdesktopicons = True Then savelines(614) = 11 Else savelines(614) = 10
IO.File.WriteAllLines(ShiftOSPath + "Shiftum42\Drivers\HDD.dri", savelines)
File_Crypt.EncryptFile(ShiftOSPath + "Shiftum42\Drivers\HDD.dri", "C:/ShiftOS/Shiftum42/SKernal.sft", sSecretKey)
Try
@@ -1572,7 +1573,7 @@
SortOutBooleans(VideoPlayerCorrupted, 610, True)
SortOutBooleans(VirusScannerCorrupted, 612, True)
SortOutBooleans(WebBrowserCorrupted, 613, True)
-
+ If loadlines(614) = 11 Then boughtdesktopicons = True Else boughtdesktopicons = False
Viruses.startactiveviruses()
If IO.File.Exists(ShiftOSPath + "Shiftum42\Skins\Current\skindata.dat") Then loadcurrentskin()
If My.Computer.FileSystem.DirectoryExists(ShiftOSPath + "Shiftum42\Icons") Then setupicons()
@@ -1969,6 +1970,13 @@
ApplicationsToolStripMenuItem.Visible = False
End If
+ ContextMenuStrip1.ForeColor = Skins.launcheritemcolour
+ ContextMenuStrip1.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle)
+ For Each Item In NewToolStripMenuItem.DropDownItems
+ Item.ForeColor = Skins.launcheritemcolour
+ Item.Font = New Font(Skins.launcheritemfont, Skins.launcheritemsize, Skins.launcheritemstyle)
+ Next
+
If boughtalclock = True Then
ClockToolStripMenuItem.Visible = True
If boughtclockicon = True Then