Compare commits
11 commits
Author | SHA1 | Date | |
---|---|---|---|
|
38e046cc49 | ||
|
365cc92f8a | ||
|
2cb19f4dd0 | ||
|
0e6eb6e76f | ||
|
16094d6b2f | ||
|
245fadfa72 | ||
|
22502171c2 | ||
|
23547b2d87 | ||
|
d7cdf48c58 | ||
|
d09d7c9472 | ||
|
c1206d8634 |
|
@ -11,13 +11,15 @@ Module TerminalAPI
|
|||
Strings.OnceInfo(4) = "!"
|
||||
If IsConsoleParent = True Then
|
||||
Console.TopMost = False
|
||||
Cursor.Hide()
|
||||
Strings.OnceInfo(7) = Console.Width
|
||||
Strings.OnceInfo(8) = Console.Height
|
||||
Console.TextBox1.Font = New Font("Consolas", 11)
|
||||
Console.ConsoleFontHandle.Stop()
|
||||
Cursor.Hide()
|
||||
If Strings.IsFree = True Then
|
||||
Strings.ComputerInfo(0) = "shiftos"
|
||||
Strings.ComputerInfo(1) = "user"
|
||||
Strings.ComputerInfo(7) = 1
|
||||
Strings.ComputerInfo(7) = 2
|
||||
Terminal_CheckFeature()
|
||||
Terminal_PrintPrompt()
|
||||
Terminal_AssignPrompt()
|
||||
|
@ -52,11 +54,17 @@ Module TerminalAPI
|
|||
End If
|
||||
End If
|
||||
Else
|
||||
Cursor.Show()
|
||||
Console_Windowed()
|
||||
Console.TopMost = True
|
||||
Try
|
||||
Console.TextBox1.Font = GUISCustomizations.GUIConsoleFont
|
||||
Catch ex As Exception
|
||||
Console.TextBox1.Font = New Font("Consolas", 11)
|
||||
End Try
|
||||
Terminal_PrintPrompt()
|
||||
Terminal_AssignPrompt()
|
||||
Cursor.Show()
|
||||
Console.ConsoleFontHandle.Start()
|
||||
End If
|
||||
Console.CurrentDirectory = Strings.OnceInfo(1)
|
||||
Console.Pseudodir = Console.CurrentDirectory.Replace(Strings.OnceInfo(1), "!\")
|
||||
|
@ -189,6 +197,8 @@ Module TerminalAPI
|
|||
Case "05tray"
|
||||
_05tray()
|
||||
NewLine("you cheater!")
|
||||
Case "anus"
|
||||
AnusWM_Menu.Show()
|
||||
Case "applist"
|
||||
If IsStartG = True Then
|
||||
AppList()
|
||||
|
|
|
@ -1,4 +1,6 @@
|
|||
Public Class GUISCustomizations
|
||||
'Desktop Stuff
|
||||
Public Shared DesktopColor As Color
|
||||
'Console Stuff
|
||||
Public Shared GUIConsoleFont As Font
|
||||
End Class
|
||||
|
|
|
@ -3,11 +3,11 @@
|
|||
Public Shared ComputerInfo(7) As String
|
||||
Public Shared IsFree As Boolean
|
||||
Public Shared OnceInfo(8) As String
|
||||
Public Shared AvailableFeature(41) As String
|
||||
Public Shared AvailableFeature(53) As String
|
||||
Public Shared CLIInterpreter As String
|
||||
Public Shared SaveFile As String
|
||||
Public Shared Achievement As String
|
||||
Public Shared ProcessID(1) As String
|
||||
Public Shared ProcessID(15) As String
|
||||
|
||||
'STRING CATEGORIZATION WRITING RULES!
|
||||
'THIS IS IN ORDER TO REMAIN COMPATIBLE WITH OLDER VERSIONS!
|
||||
|
@ -96,6 +96,18 @@
|
|||
'39 = KI Fruits [Adds fruit category into the Knowledge Input] (default : 0)
|
||||
'40 = DuWM RGB Support [Adds RGB and its other variant support to DuWM] (default : 0)
|
||||
'41 = DuWM 16 Colors Support [Adds mix of RGB color support into ShiftOS] (default : 0)
|
||||
'42 = KI US States [Adds United States States category into the Knowledge Input] (default : 0)
|
||||
'43 = DuWM Advanced Read and Write [Expands read and write support for DuWM] (default : 0)
|
||||
'44 = File Skimmer [A file manager for ShiftOS] (default : 0)
|
||||
'45 = File Skimmer Folder Support [Supports for reading and writing folder in File Skimmer] (default : 0)
|
||||
'46 = File Skimmer File Support [Supports for reading and writing file in File Skimmer] (default : 0)
|
||||
'47 = File Skimmer Delete Support [Adds file deletion function into ShiftOS] (default : 0)
|
||||
'48 = File Skimmer ZIP Support [Adds ZIP compression function into ShiftOS] (default : 0)
|
||||
'49 = File Skimmer Properties Pane [Adds a sidebar contains file/directory informations] (default : 0)
|
||||
'50 = File Skimmer JobBar [Adds a top bar for actions on File Skimmer] (default : 0)
|
||||
'51 = File Skimmer Small Icons [Adds small icons layout on File Skimmer] (default : 0)
|
||||
'52 = File Skimmer List [Adds small icons layout on File Skimmer] (default : 0)
|
||||
'53 = Shifter Console [Adds Console Customization on Shifter] (default : 0)
|
||||
'
|
||||
'Features bought hierarchy :
|
||||
'
|
||||
|
@ -142,7 +154,19 @@
|
|||
'>>DuWM RGB Support (DUWMRGB) (225 CP)
|
||||
'>>>DuWM 16 Colors Support (DUWMRGB2) (275 CP)
|
||||
'>>Shifter (SHIFTER) (250 CP)
|
||||
'>>>Shifter Console (SHR_CONSOLE) (275 CP)
|
||||
'>>Knowledge Input (KNOWLEDGE) (275 CP)
|
||||
'>>>KI Animals (KI_ANIMALS) (300 CP)
|
||||
'>>>KI Fruits (KI_FRUITS) (300 CP)
|
||||
'>>>KI US States (KI_US) (300 CP)
|
||||
'>>DuWM Advanced Read and Write support (DUWM_RW) (250 CP)
|
||||
'>>>File Skimmer (FILESKIMMER) (300 CP)
|
||||
'>>>>FS Folder Support (FS_FOLDER) (325 CP)
|
||||
'>>>>>FS File Support (FS_FILE) (350 CP)
|
||||
'>>>>>>FS Delete Support (FS_DELETE) (400 CP)
|
||||
'>>>>>>FS ZIP Support (FS_ZIP) (500 CP)
|
||||
'>>>>FS Properties Pane (FS_PPANE) (350 CP)
|
||||
'>>>>FS JobBar (FS_JOBBAR) (400 CP)
|
||||
'>>>>>FS Small Icons Layout (FS_SMALLICONS) (425 CP)
|
||||
'>>>>>FS List Layout (FS_LIST) (425 CP)
|
||||
End Class
|
||||
|
|
|
@ -142,15 +142,18 @@
|
|||
If Strings.AvailableFeature(36) = 0 Then
|
||||
NewLine("(shifter | 250 CP) Shifter")
|
||||
Else
|
||||
If Strings.AvailableFeature(53) = 0 Then
|
||||
NewLine("(shr_console | 275 CP) Shifter Console")
|
||||
End If
|
||||
If Strings.AvailableFeature(40) = 0 Then
|
||||
NewLine("(duwmrgb | 225 CP) DuWM RGB Support")
|
||||
Else
|
||||
If Strings.AvailableFeature(41) = 0 Then
|
||||
NewLine("(duwmrgb2 | 275 CP) DuWM 16 Color Support")
|
||||
NewLine("(duwmrgb | 225 CP) DuWM RGB Support")
|
||||
Else
|
||||
If Strings.AvailableFeature(41) = 0 Then
|
||||
NewLine("(duwmrgb2 | 275 CP) DuWM 16 Color Support")
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
If Strings.AvailableFeature(37) = 0 Then
|
||||
If Strings.AvailableFeature(37) = 0 Then
|
||||
NewLine("(knowledge | 275 CP) Knowledge Input")
|
||||
Else
|
||||
If Strings.AvailableFeature(38) = 0 Then
|
||||
|
@ -159,6 +162,44 @@
|
|||
If Strings.AvailableFeature(39) = 0 Then
|
||||
NewLine("(ki_fruits | 300 CP) KI Fruits")
|
||||
End If
|
||||
If Strings.AvailableFeature(42) = 0 Then
|
||||
NewLine("(ki_us | 300 CP) KI US States")
|
||||
End If
|
||||
End If
|
||||
If Strings.AvailableFeature(43) = 0 Then
|
||||
NewLine("(duwm_rw | 250 CP) DuWM Advanced Read and Write support")
|
||||
Else
|
||||
If Strings.AvailableFeature(44) = 0 Then
|
||||
NewLine("(fileskimmer | 300 CP) File Skimmer")
|
||||
Else
|
||||
If Strings.AvailableFeature(45) = 0 Then
|
||||
NewLine("(fs_folder | 325 CP) FS Folder Support")
|
||||
Else
|
||||
If Strings.AvailableFeature(46) = 0 Then
|
||||
NewLine("(fs_file | 350 CP) FS File Support")
|
||||
Else
|
||||
If Strings.AvailableFeature(47) = 0 Then
|
||||
NewLine("(fs_delete | 400 CP) FS Delete Support")
|
||||
End If
|
||||
If Strings.AvailableFeature(48) = 0 Then
|
||||
NewLine("(fs_zip | 500 CP) FS ZIP Support")
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
If Strings.AvailableFeature(49) = 0 Then
|
||||
NewLine("(fs_ppane | 350 CP) FS Property Pane")
|
||||
End If
|
||||
If Strings.AvailableFeature(50) = 0 Then
|
||||
NewLine("(fs_jobbar | 400 CP) FS JobBar")
|
||||
Else
|
||||
If Strings.AvailableFeature(51) = 0 Then
|
||||
NewLine("(fs_smallicons | 425 CP) FS Small Icons Layout")
|
||||
End If
|
||||
If Strings.AvailableFeature(52) = 0 Then
|
||||
NewLine("(fs_list | 425 CP) FS List Layout")
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
@ -495,6 +536,182 @@
|
|||
NewLine(ManHeader(1))
|
||||
NormalCommand()
|
||||
End If
|
||||
Case "ki_animals"
|
||||
If Strings.AvailableFeature(38) = 0 Then
|
||||
ManHeader(0) = "KI Animals"
|
||||
ManHeader(1) = "300 CP"
|
||||
NewLine(ManHeader(0))
|
||||
NewLine(Nothing)
|
||||
NewLine("Adds animals category into Knowledge Input")
|
||||
NewLine(Nothing)
|
||||
NewLine(ManHeader(1))
|
||||
NormalCommand()
|
||||
End If
|
||||
Case "ki_fruits"
|
||||
If Strings.AvailableFeature(39) = 0 Then
|
||||
ManHeader(0) = "KI Fruits"
|
||||
ManHeader(1) = "300 CP"
|
||||
NewLine(ManHeader(0))
|
||||
NewLine(Nothing)
|
||||
NewLine("Adds fruits category into Knowledge Input")
|
||||
NewLine(Nothing)
|
||||
NewLine(ManHeader(1))
|
||||
NormalCommand()
|
||||
End If
|
||||
Case "duwmrgb"
|
||||
If Strings.AvailableFeature(40) = 0 Then
|
||||
ManHeader(0) = "DuWM RGB support"
|
||||
ManHeader(1) = "225 CP"
|
||||
NewLine(ManHeader(0))
|
||||
NewLine(Nothing)
|
||||
NewLine("Adds Red, Green, and Blue and its darker/lighter color support for Dual Window Manager")
|
||||
NewLine(Nothing)
|
||||
NewLine(ManHeader(1))
|
||||
NormalCommand()
|
||||
End If
|
||||
Case "duwmrgb2"
|
||||
If Strings.AvailableFeature(41) = 0 Then
|
||||
ManHeader(0) = "DuWM 16 Colors support"
|
||||
ManHeader(1) = "275 CP"
|
||||
NewLine(ManHeader(0))
|
||||
NewLine(Nothing)
|
||||
NewLine("Adds 16 colors support for Dual Window Manager")
|
||||
NewLine(Nothing)
|
||||
NewLine(ManHeader(1))
|
||||
NormalCommand()
|
||||
End If
|
||||
Case "ki_us"
|
||||
If Strings.AvailableFeature(42) = 0 Then
|
||||
ManHeader(0) = "KI US States"
|
||||
ManHeader(1) = "300 CP"
|
||||
NewLine(ManHeader(0))
|
||||
NewLine(Nothing)
|
||||
NewLine("Adds US States category into Knowledge Input")
|
||||
NewLine(Nothing)
|
||||
NewLine(ManHeader(1))
|
||||
NormalCommand()
|
||||
End If
|
||||
Case "duwm_rw"
|
||||
If Strings.AvailableFeature(43) = 0 Then
|
||||
ManHeader(0) = "DuWM Advanced Read and Write support"
|
||||
ManHeader(1) = "250 CP"
|
||||
NewLine(ManHeader(0))
|
||||
NewLine(Nothing)
|
||||
NewLine("Expands read and write support for Dual Window Manager")
|
||||
NewLine(Nothing)
|
||||
NewLine(ManHeader(1))
|
||||
NormalCommand()
|
||||
End If
|
||||
Case "fileskimmer"
|
||||
If Strings.AvailableFeature(44) = 0 Then
|
||||
ManHeader(0) = "File Skimmer"
|
||||
ManHeader(1) = "300 CP"
|
||||
NewLine(ManHeader(0))
|
||||
NewLine(Nothing)
|
||||
NewLine("A file manager for ShiftOS")
|
||||
NewLine(Nothing)
|
||||
NewLine(ManHeader(1))
|
||||
NormalCommand()
|
||||
End If
|
||||
Case "fs_folder"
|
||||
If Strings.AvailableFeature(45) = 0 Then
|
||||
ManHeader(0) = "FS Folder support"
|
||||
ManHeader(1) = "325 CP"
|
||||
NewLine(ManHeader(0))
|
||||
NewLine(Nothing)
|
||||
NewLine("Adds folder read and write support for File Skimmer")
|
||||
NewLine(Nothing)
|
||||
NewLine(ManHeader(1))
|
||||
NormalCommand()
|
||||
End If
|
||||
Case "fs_file"
|
||||
If Strings.AvailableFeature(46) = 0 Then
|
||||
ManHeader(0) = "FS File support"
|
||||
ManHeader(1) = "350 CP"
|
||||
NewLine(ManHeader(0))
|
||||
NewLine(Nothing)
|
||||
NewLine("Adds file read and write support for File Skimmer")
|
||||
NewLine(Nothing)
|
||||
NewLine(ManHeader(1))
|
||||
NormalCommand()
|
||||
End If
|
||||
Case "fs_delete"
|
||||
If Strings.AvailableFeature(47) = 0 Then
|
||||
ManHeader(0) = "FS Delete support"
|
||||
ManHeader(1) = "400 CP"
|
||||
NewLine(ManHeader(0))
|
||||
NewLine(Nothing)
|
||||
NewLine("Supports file or directory deletion function in ShiftOS")
|
||||
NewLine(Nothing)
|
||||
NewLine(ManHeader(1))
|
||||
NormalCommand()
|
||||
End If
|
||||
Case "fs_zip"
|
||||
If Strings.AvailableFeature(48) = 0 Then
|
||||
ManHeader(0) = "FS Delete support"
|
||||
ManHeader(1) = "500 CP"
|
||||
NewLine(ManHeader(0))
|
||||
NewLine(Nothing)
|
||||
NewLine("Supports ZIP compression function in ShiftOS")
|
||||
NewLine(Nothing)
|
||||
NewLine(ManHeader(1))
|
||||
NormalCommand()
|
||||
End If
|
||||
Case "fs_ppane"
|
||||
If Strings.AvailableFeature(49) = 0 Then
|
||||
ManHeader(0) = "FS Property Pane"
|
||||
ManHeader(1) = "350 CP"
|
||||
NewLine(ManHeader(0))
|
||||
NewLine(Nothing)
|
||||
NewLine("A sidebar for displaying informations about the file / directory")
|
||||
NewLine(Nothing)
|
||||
NewLine(ManHeader(1))
|
||||
NormalCommand()
|
||||
End If
|
||||
Case "fs_jobbar"
|
||||
If Strings.AvailableFeature(50) = 0 Then
|
||||
ManHeader(0) = "FS JobBar"
|
||||
ManHeader(1) = "400 CP"
|
||||
NewLine(ManHeader(0))
|
||||
NewLine(Nothing)
|
||||
NewLine("A top panel contains certain actions for File Skimmer")
|
||||
NewLine(Nothing)
|
||||
NewLine(ManHeader(1))
|
||||
NormalCommand()
|
||||
End If
|
||||
Case "fs_smallicons"
|
||||
If Strings.AvailableFeature(51) = 0 Then
|
||||
ManHeader(0) = "FS Small Icons Layout"
|
||||
ManHeader(1) = "425 CP"
|
||||
NewLine(ManHeader(0))
|
||||
NewLine(Nothing)
|
||||
NewLine("Adds small icons as a display layout in File Skimmer")
|
||||
NewLine(Nothing)
|
||||
NewLine(ManHeader(1))
|
||||
NormalCommand()
|
||||
End If
|
||||
Case "fs_list"
|
||||
If Strings.AvailableFeature(52) = 0 Then
|
||||
ManHeader(0) = "FS List"
|
||||
ManHeader(1) = "425 CP"
|
||||
NewLine(ManHeader(0))
|
||||
NewLine(Nothing)
|
||||
NewLine("Adds list as a display layout in File Skimmer")
|
||||
NewLine(Nothing)
|
||||
NewLine(ManHeader(1))
|
||||
NormalCommand()
|
||||
End If
|
||||
Case "shr_console"
|
||||
If Strings.AvailableFeature(53) = 0 Then
|
||||
ManHeader(0) = "Shifter Console"
|
||||
ManHeader(1) = "275 CP"
|
||||
NewLine(ManHeader(0))
|
||||
NewLine(Nothing)
|
||||
NewLine("Adds Console customability on Shifter")
|
||||
NewLine(Nothing)
|
||||
NewLine(ManHeader(1))
|
||||
NormalCommand()
|
||||
End If
|
||||
Case Else
|
||||
NormalCommand()
|
||||
Console.TextBox1.Text = Console.TextBox1.Text & Environment.NewLine & "Shiftorium: Bad command or not available"
|
||||
|
@ -631,6 +848,42 @@
|
|||
Case "duwmrgb2"
|
||||
Shiftorium_InstallFeatures(True, "duwmrgb2", 41, 275)
|
||||
NormalCommand()
|
||||
Case "ki_us"
|
||||
Shiftorium_InstallFeatures(True, "ki_us", 42, 300)
|
||||
NormalCommand()
|
||||
Case "duwm_rw"
|
||||
Shiftorium_InstallFeatures(True, "duwm_rw", 43, 250)
|
||||
NormalCommand()
|
||||
Case "fileskimmer"
|
||||
Shiftorium_InstallFeatures(True, "fileskimmer", 44, 300)
|
||||
NormalCommand()
|
||||
Case "fs_folder"
|
||||
Shiftorium_InstallFeatures(True, "fs_folder", 45, 325)
|
||||
NormalCommand()
|
||||
Case "fs_file"
|
||||
Shiftorium_InstallFeatures(True, "fs_file", 46, 350)
|
||||
NormalCommand()
|
||||
Case "fs_delete"
|
||||
Shiftorium_InstallFeatures(True, "fs_delete", 47, 400)
|
||||
NormalCommand()
|
||||
Case "fs_zip"
|
||||
Shiftorium_InstallFeatures(True, "fs_zip", 48, 500)
|
||||
NormalCommand()
|
||||
Case "fs_ppane"
|
||||
Shiftorium_InstallFeatures(True, "fs_ppane", 49, 350)
|
||||
NormalCommand()
|
||||
Case "fs_jobbar"
|
||||
Shiftorium_InstallFeatures(True, "fs_jobbar", 50, 400)
|
||||
NormalCommand()
|
||||
Case "fs_smallicons"
|
||||
Shiftorium_InstallFeatures(True, "fs_smallicons", 51, 425)
|
||||
NormalCommand()
|
||||
Case "fs_list"
|
||||
Shiftorium_InstallFeatures(True, "fs_list", 52, 425)
|
||||
NormalCommand()
|
||||
Case "shr_console"
|
||||
Shiftorium_InstallFeatures(True, "shr_console", 53, 275)
|
||||
NormalCommand()
|
||||
Case Else
|
||||
NormalCommand()
|
||||
NewLine("Shiftorium: Bad command or not available")
|
||||
|
@ -799,18 +1052,22 @@
|
|||
Strings.AvailableFeature(35) = "1"
|
||||
Strings.ComputerInfo(7) = 1
|
||||
GUISCustomizations.DesktopColor = Color.Black
|
||||
GUISCustomizations.GUIConsoleFont = New Font("Consolas", 11)
|
||||
Strings.AvailableFeature(36) = "0"
|
||||
Strings.AvailableFeature(37) = "0"
|
||||
Strings.AvailableFeature(43) = "0"
|
||||
success = True
|
||||
Case "shifter"
|
||||
Strings.AvailableFeature(36) = "1"
|
||||
Strings.AvailableFeature(40) = "0"
|
||||
Strings.AvailableFeature(41) = "0"
|
||||
Strings.AvailableFeature(53) = "0"
|
||||
success = True
|
||||
Case "knowledge"
|
||||
Strings.AvailableFeature(37) = "1"
|
||||
Strings.AvailableFeature(38) = "0"
|
||||
Strings.AvailableFeature(39) = "0"
|
||||
Strings.AvailableFeature(42) = "0"
|
||||
success = True
|
||||
Case "ki_animals"
|
||||
Strings.AvailableFeature(38) = "1"
|
||||
|
@ -825,6 +1082,51 @@
|
|||
Strings.AvailableFeature(40) = "3"
|
||||
Strings.AvailableFeature(41) = "1"
|
||||
success = True
|
||||
Case "ki_us"
|
||||
Strings.AvailableFeature(42) = "1"
|
||||
success = True
|
||||
Case "duwm_rw"
|
||||
Strings.AvailableFeature(43) = "1"
|
||||
Strings.AvailableFeature(44) = "0"
|
||||
success = True
|
||||
Case "fileskimmer"
|
||||
Strings.AvailableFeature(44) = "1"
|
||||
Strings.AvailableFeature(45) = "0"
|
||||
Strings.AvailableFeature(49) = "0"
|
||||
Strings.AvailableFeature(50) = "0"
|
||||
success = True
|
||||
Case "fs_folder"
|
||||
Strings.AvailableFeature(45) = "1"
|
||||
Strings.AvailableFeature(46) = "0"
|
||||
success = True
|
||||
Case "fs_file"
|
||||
Strings.AvailableFeature(46) = "1"
|
||||
Strings.AvailableFeature(47) = "0"
|
||||
Strings.AvailableFeature(48) = "0"
|
||||
success = True
|
||||
Case "fs_delete"
|
||||
Strings.AvailableFeature(47) = "1"
|
||||
success = True
|
||||
Case "fs_zip"
|
||||
Strings.AvailableFeature(48) = "1"
|
||||
success = True
|
||||
Case "fs_ppane"
|
||||
Strings.AvailableFeature(49) = "1"
|
||||
success = True
|
||||
Case "fs_jobbar"
|
||||
Strings.AvailableFeature(50) = "1"
|
||||
Strings.AvailableFeature(51) = "0"
|
||||
Strings.AvailableFeature(52) = "0"
|
||||
success = True
|
||||
Case "fs_smallicons"
|
||||
Strings.AvailableFeature(51) = "1"
|
||||
success = True
|
||||
Case "fs_list"
|
||||
Strings.AvailableFeature(52) = "1"
|
||||
success = True
|
||||
Case "shr_console"
|
||||
Strings.AvailableFeature(53) = "1"
|
||||
success = True
|
||||
End Select
|
||||
If success = False Then
|
||||
If IsCLI = True Then
|
||||
|
|
|
@ -12,6 +12,7 @@
|
|||
Cursor.Show()
|
||||
NewLine("Shutting down...")
|
||||
ShiftOSMenu.Show()
|
||||
Cursor.Show()
|
||||
If IsStartG = False Then
|
||||
Console.Close()
|
||||
End If
|
||||
|
|
|
@ -2,7 +2,7 @@
|
|||
|
||||
Module SaveLoadSystem
|
||||
|
||||
Public Sub NewGameMode()
|
||||
Public Sub NewGameMode(Chapter As Integer)
|
||||
'Sets all features to 2 (Unavailable for Shiftorium) except ShiftOS Key (AvailableFeatures(11))
|
||||
Directory.Delete(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\ShiftFS", True)
|
||||
Directory.Delete(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS", True)
|
||||
|
@ -14,52 +14,128 @@ Module SaveLoadSystem
|
|||
Strings.ComputerInfo(1) = "user"
|
||||
Strings.ComputerInfo(2) = "0"
|
||||
Strings.ComputerInfo(4) = "0"
|
||||
Strings.AvailableFeature(0) = "2"
|
||||
Strings.AvailableFeature(1) = "2"
|
||||
Strings.AvailableFeature(2) = "2"
|
||||
Strings.AvailableFeature(3) = "2"
|
||||
Strings.AvailableFeature(4) = "2"
|
||||
Strings.AvailableFeature(5) = "2"
|
||||
Strings.AvailableFeature(6) = "2"
|
||||
Strings.AvailableFeature(7) = "2"
|
||||
Strings.AvailableFeature(8) = "2"
|
||||
Strings.AvailableFeature(9) = "2"
|
||||
Strings.AvailableFeature(10) = "2"
|
||||
Strings.AvailableFeature(11) = "0"
|
||||
Strings.AvailableFeature(12) = "2"
|
||||
Strings.AvailableFeature(13) = "2"
|
||||
Strings.AvailableFeature(14) = "2"
|
||||
Strings.AvailableFeature(15) = "2"
|
||||
'0.2.4 Features
|
||||
Strings.AvailableFeature(16) = "2"
|
||||
Strings.AvailableFeature(17) = "2"
|
||||
Strings.AvailableFeature(18) = "2"
|
||||
Strings.AvailableFeature(19) = "2"
|
||||
Strings.AvailableFeature(20) = "2"
|
||||
Strings.AvailableFeature(21) = "2"
|
||||
Strings.AvailableFeature(22) = "2"
|
||||
'0.2.5 Features
|
||||
Strings.AvailableFeature(23) = "2"
|
||||
Strings.AvailableFeature(24) = "2"
|
||||
Strings.AvailableFeature(25) = "2"
|
||||
Strings.AvailableFeature(26) = "2"
|
||||
Strings.AvailableFeature(27) = "2"
|
||||
Strings.AvailableFeature(28) = "2"
|
||||
Strings.AvailableFeature(29) = "2"
|
||||
Strings.AvailableFeature(30) = "2"
|
||||
'0.2.6 Features
|
||||
Strings.AvailableFeature(31) = "2"
|
||||
Strings.AvailableFeature(32) = "2"
|
||||
Strings.AvailableFeature(33) = "2"
|
||||
'0.2.7 Features
|
||||
Strings.AvailableFeature(34) = "2"
|
||||
Strings.AvailableFeature(35) = "2"
|
||||
Strings.AvailableFeature(36) = "2"
|
||||
Strings.AvailableFeature(37) = "2"
|
||||
Strings.AvailableFeature(38) = "2"
|
||||
Strings.AvailableFeature(39) = "2"
|
||||
Strings.AvailableFeature(40) = "2"
|
||||
Strings.AvailableFeature(41) = "2"
|
||||
Select Case Chapter
|
||||
Case 0
|
||||
Strings.AvailableFeature(0) = "2"
|
||||
Strings.AvailableFeature(1) = "2"
|
||||
Strings.AvailableFeature(2) = "2"
|
||||
Strings.AvailableFeature(3) = "2"
|
||||
Strings.AvailableFeature(4) = "2"
|
||||
Strings.AvailableFeature(5) = "2"
|
||||
Strings.AvailableFeature(6) = "2"
|
||||
Strings.AvailableFeature(7) = "2"
|
||||
Strings.AvailableFeature(8) = "2"
|
||||
Strings.AvailableFeature(9) = "2"
|
||||
Strings.AvailableFeature(10) = "2"
|
||||
Strings.AvailableFeature(11) = "0"
|
||||
Strings.AvailableFeature(12) = "2"
|
||||
Strings.AvailableFeature(13) = "2"
|
||||
Strings.AvailableFeature(14) = "2"
|
||||
Strings.AvailableFeature(15) = "2"
|
||||
'0.2.4 Features
|
||||
Strings.AvailableFeature(16) = "2"
|
||||
Strings.AvailableFeature(17) = "2"
|
||||
Strings.AvailableFeature(18) = "2"
|
||||
Strings.AvailableFeature(19) = "2"
|
||||
Strings.AvailableFeature(20) = "2"
|
||||
Strings.AvailableFeature(21) = "2"
|
||||
Strings.AvailableFeature(22) = "2"
|
||||
'0.2.5 Features
|
||||
Strings.AvailableFeature(23) = "2"
|
||||
Strings.AvailableFeature(24) = "2"
|
||||
Strings.AvailableFeature(25) = "2"
|
||||
Strings.AvailableFeature(26) = "2"
|
||||
Strings.AvailableFeature(27) = "2"
|
||||
Strings.AvailableFeature(28) = "2"
|
||||
Strings.AvailableFeature(29) = "2"
|
||||
Strings.AvailableFeature(30) = "2"
|
||||
'0.2.6 Features
|
||||
Strings.AvailableFeature(31) = "2"
|
||||
Strings.AvailableFeature(32) = "2"
|
||||
Strings.AvailableFeature(33) = "2"
|
||||
'0.2.7 Features
|
||||
Strings.AvailableFeature(34) = "2"
|
||||
Strings.AvailableFeature(35) = "2"
|
||||
Strings.AvailableFeature(36) = "2"
|
||||
Strings.AvailableFeature(37) = "2"
|
||||
Strings.AvailableFeature(38) = "2"
|
||||
Strings.AvailableFeature(39) = "2"
|
||||
Strings.AvailableFeature(40) = "2"
|
||||
Strings.AvailableFeature(41) = "2"
|
||||
'0.2.8 Features
|
||||
Strings.AvailableFeature(42) = "2"
|
||||
Strings.AvailableFeature(43) = "2"
|
||||
Strings.AvailableFeature(44) = "2"
|
||||
Strings.AvailableFeature(45) = "2"
|
||||
Strings.AvailableFeature(46) = "2"
|
||||
Strings.AvailableFeature(47) = "2"
|
||||
Strings.AvailableFeature(48) = "2"
|
||||
Strings.AvailableFeature(49) = "2"
|
||||
Strings.AvailableFeature(50) = "2"
|
||||
Strings.AvailableFeature(51) = "2"
|
||||
Strings.AvailableFeature(52) = "2"
|
||||
Strings.AvailableFeature(53) = "2"
|
||||
Case 1
|
||||
Strings.AvailableFeature(0) = "1"
|
||||
Strings.AvailableFeature(1) = "1"
|
||||
Strings.AvailableFeature(2) = "1"
|
||||
Strings.AvailableFeature(3) = "1"
|
||||
Strings.AvailableFeature(4) = "1"
|
||||
Strings.AvailableFeature(5) = "3"
|
||||
Strings.AvailableFeature(6) = "3"
|
||||
Strings.AvailableFeature(7) = "3"
|
||||
Strings.AvailableFeature(8) = "1"
|
||||
Strings.AvailableFeature(9) = "1"
|
||||
Strings.AvailableFeature(10) = "1"
|
||||
Strings.AvailableFeature(11) = "1"
|
||||
Strings.AvailableFeature(12) = "3"
|
||||
Strings.AvailableFeature(13) = "1"
|
||||
Strings.AvailableFeature(14) = "1"
|
||||
Strings.AvailableFeature(15) = "1"
|
||||
'0.2.4 Features
|
||||
Strings.AvailableFeature(16) = "1"
|
||||
Strings.AvailableFeature(17) = "1"
|
||||
Strings.AvailableFeature(18) = "1"
|
||||
Strings.AvailableFeature(19) = "1"
|
||||
Strings.AvailableFeature(20) = "1"
|
||||
Strings.AvailableFeature(21) = "1"
|
||||
Strings.AvailableFeature(22) = "1"
|
||||
'0.2.5 Features
|
||||
Strings.AvailableFeature(23) = "1"
|
||||
Strings.AvailableFeature(24) = "3"
|
||||
Strings.AvailableFeature(25) = "3"
|
||||
Strings.AvailableFeature(26) = "3"
|
||||
Strings.AvailableFeature(27) = "3"
|
||||
Strings.AvailableFeature(28) = "3"
|
||||
Strings.AvailableFeature(29) = "1"
|
||||
Strings.AvailableFeature(30) = "1"
|
||||
'0.2.6 Features
|
||||
Strings.AvailableFeature(31) = "1"
|
||||
Strings.AvailableFeature(32) = "1"
|
||||
Strings.AvailableFeature(33) = "1"
|
||||
'0.2.7 Features
|
||||
Strings.AvailableFeature(34) = "1"
|
||||
Strings.AvailableFeature(35) = "2"
|
||||
Strings.AvailableFeature(36) = "2"
|
||||
Strings.AvailableFeature(37) = "2"
|
||||
Strings.AvailableFeature(38) = "2"
|
||||
Strings.AvailableFeature(39) = "2"
|
||||
Strings.AvailableFeature(40) = "2"
|
||||
Strings.AvailableFeature(41) = "2"
|
||||
'0.2.8 Features
|
||||
Strings.AvailableFeature(42) = "2"
|
||||
Strings.AvailableFeature(43) = "2"
|
||||
Strings.AvailableFeature(44) = "2"
|
||||
Strings.AvailableFeature(45) = "2"
|
||||
Strings.AvailableFeature(46) = "2"
|
||||
Strings.AvailableFeature(47) = "2"
|
||||
Strings.AvailableFeature(48) = "2"
|
||||
Strings.AvailableFeature(49) = "2"
|
||||
Strings.AvailableFeature(50) = "2"
|
||||
Strings.AvailableFeature(51) = "2"
|
||||
Strings.AvailableFeature(52) = "2"
|
||||
Strings.AvailableFeature(53) = "2"
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
Public Sub FreeRoamMode()
|
||||
|
@ -68,7 +144,7 @@ Module SaveLoadSystem
|
|||
Strings.ComputerInfo(0) = "shiftos"
|
||||
Strings.ComputerInfo(1) = "user"
|
||||
Strings.ComputerInfo(2) = "0"
|
||||
Strings.ComputerInfo(4) = "42"
|
||||
Strings.ComputerInfo(4) = "53"
|
||||
Strings.AvailableFeature(0) = "1"
|
||||
Strings.AvailableFeature(1) = "1"
|
||||
Strings.AvailableFeature(2) = "1"
|
||||
|
@ -115,13 +191,29 @@ Module SaveLoadSystem
|
|||
Strings.AvailableFeature(39) = "1"
|
||||
Strings.AvailableFeature(40) = "3"
|
||||
Strings.AvailableFeature(41) = "1"
|
||||
'0.2.8 Features
|
||||
Strings.AvailableFeature(42) = "1"
|
||||
Strings.AvailableFeature(43) = "1"
|
||||
Strings.AvailableFeature(44) = "1"
|
||||
Strings.AvailableFeature(45) = "1"
|
||||
Strings.AvailableFeature(46) = "1"
|
||||
Strings.AvailableFeature(47) = "1"
|
||||
Strings.AvailableFeature(48) = "1"
|
||||
Strings.AvailableFeature(49) = "1"
|
||||
Strings.AvailableFeature(50) = "1"
|
||||
Strings.AvailableFeature(51) = "1"
|
||||
Strings.AvailableFeature(52) = "1"
|
||||
Strings.AvailableFeature(53) = "1"
|
||||
'GUI Customizations
|
||||
GUISCustomizations.DesktopColor = Color.Black
|
||||
GUISCustomizations.GUIConsoleFont = New Font("Consolas", 11)
|
||||
End Sub
|
||||
|
||||
Public Sub GodMode()
|
||||
'Same as new game but codepoints automatically assigned to 9999 and not saved into the FS
|
||||
Strings.ComputerInfo(0) = "shiftos"
|
||||
Strings.ComputerInfo(1) = "user"
|
||||
Strings.ComputerInfo(2) = 9999
|
||||
Strings.ComputerInfo(2) = 100000
|
||||
Strings.ComputerInfo(4) = "0"
|
||||
Strings.AvailableFeature(0) = "2"
|
||||
Strings.AvailableFeature(1) = "2"
|
||||
|
@ -168,6 +260,19 @@ Module SaveLoadSystem
|
|||
Strings.AvailableFeature(39) = "2"
|
||||
Strings.AvailableFeature(40) = "2"
|
||||
Strings.AvailableFeature(41) = "2"
|
||||
'0.2.8 Features
|
||||
Strings.AvailableFeature(42) = "2"
|
||||
Strings.AvailableFeature(43) = "2"
|
||||
Strings.AvailableFeature(44) = "2"
|
||||
Strings.AvailableFeature(45) = "2"
|
||||
Strings.AvailableFeature(46) = "2"
|
||||
Strings.AvailableFeature(47) = "2"
|
||||
Strings.AvailableFeature(48) = "2"
|
||||
Strings.AvailableFeature(49) = "2"
|
||||
Strings.AvailableFeature(50) = "2"
|
||||
Strings.AvailableFeature(51) = "2"
|
||||
Strings.AvailableFeature(52) = "2"
|
||||
Strings.AvailableFeature(53) = "2"
|
||||
End Sub
|
||||
|
||||
Public Sub SaveGame()
|
||||
|
@ -179,6 +284,10 @@ Module SaveLoadSystem
|
|||
Case 1
|
||||
Dim DesktopColor As Integer = GUISCustomizations.DesktopColor.ToArgb()
|
||||
File.WriteAllText(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\saved\Shifter_Desktop.sos", DesktopColor.ToString)
|
||||
Dim ConsoleFont(1) As String
|
||||
ConsoleFont(0) = GUISCustomizations.GUIConsoleFont.Name
|
||||
ConsoleFont(1) = GUISCustomizations.GUIConsoleFont.Size
|
||||
File.WriteAllLines(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\saved\Shifter_ConsoleFont.sos", ConsoleFont)
|
||||
End Select
|
||||
End If
|
||||
End If
|
||||
|
@ -198,6 +307,13 @@ Module SaveLoadSystem
|
|||
Else
|
||||
GUISCustomizations.DesktopColor = Color.Black
|
||||
End If
|
||||
If File.Exists(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\saved\Shifter_ConsoleFont.sos") = True Then
|
||||
Dim ConsoleFont(1) As String
|
||||
ConsoleFont = File.ReadAllLines(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\saved\Shifter_ConsoleFont.sos")
|
||||
GUISCustomizations.GUIConsoleFont = New Font(ConsoleFont(0), ConsoleFont(1))
|
||||
Else
|
||||
GUISCustomizations.GUIConsoleFont = New Font("Consolas", 11)
|
||||
End If
|
||||
End Select
|
||||
End If
|
||||
End If
|
||||
|
|
|
@ -187,6 +187,18 @@ Module TheUpdater
|
|||
Strings.AvailableFeature(39) = 2
|
||||
Strings.AvailableFeature(40) = 2
|
||||
Strings.AvailableFeature(41) = 2
|
||||
Strings.AvailableFeature(42) = 2
|
||||
Strings.AvailableFeature(43) = 2
|
||||
Strings.AvailableFeature(44) = 2
|
||||
Strings.AvailableFeature(45) = 2
|
||||
Strings.AvailableFeature(46) = 2
|
||||
Strings.AvailableFeature(47) = 2
|
||||
Strings.AvailableFeature(48) = 2
|
||||
Strings.AvailableFeature(49) = 2
|
||||
Strings.AvailableFeature(50) = 2
|
||||
Strings.AvailableFeature(51) = 2
|
||||
Strings.AvailableFeature(52) = 2
|
||||
Strings.AvailableFeature(53) = 2
|
||||
Strings.ComputerInfo(0) = ComputerInfoHere(0)
|
||||
Strings.ComputerInfo(1) = ComputerInfoHere(1)
|
||||
Strings.ComputerInfo(2) = ComputerInfoHere(2)
|
||||
|
@ -247,6 +259,98 @@ Module TheUpdater
|
|||
Strings.AvailableFeature(39) = 2
|
||||
Strings.AvailableFeature(40) = 2
|
||||
Strings.AvailableFeature(41) = 2
|
||||
Strings.AvailableFeature(42) = 2
|
||||
Strings.AvailableFeature(43) = 2
|
||||
Strings.AvailableFeature(44) = 2
|
||||
Strings.AvailableFeature(45) = 2
|
||||
Strings.AvailableFeature(46) = 2
|
||||
Strings.AvailableFeature(47) = 2
|
||||
Strings.AvailableFeature(48) = 2
|
||||
Strings.AvailableFeature(49) = 2
|
||||
Strings.AvailableFeature(50) = 2
|
||||
Strings.AvailableFeature(51) = 2
|
||||
Strings.AvailableFeature(52) = 2
|
||||
Strings.AvailableFeature(53) = 2
|
||||
Strings.ComputerInfo(0) = ComputerInfoHere(0)
|
||||
Strings.ComputerInfo(1) = ComputerInfoHere(1)
|
||||
Strings.ComputerInfo(2) = ComputerInfoHere(2)
|
||||
Strings.ComputerInfo(3) = ComputerInfoHere(3)
|
||||
Strings.ComputerInfo(4) = ComputerInfoHere(4)
|
||||
Strings.ComputerInfo(5) = "0F"
|
||||
Strings.ComputerInfo(6) = "F0"
|
||||
If Directory.Exists(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS") = True Then
|
||||
|
||||
Else
|
||||
Directory.CreateDirectory(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS")
|
||||
End If
|
||||
ShiftOSUpdater.Button2.Text = "Updated!"
|
||||
Case "0.2.7"
|
||||
Strings.AvailableFeature(0) = AvailableFeatureHere(0)
|
||||
Strings.AvailableFeature(1) = AvailableFeatureHere(1)
|
||||
Strings.AvailableFeature(2) = AvailableFeatureHere(2)
|
||||
Strings.AvailableFeature(3) = AvailableFeatureHere(3)
|
||||
Strings.AvailableFeature(4) = AvailableFeatureHere(4)
|
||||
Strings.AvailableFeature(5) = AvailableFeatureHere(5)
|
||||
Strings.AvailableFeature(6) = AvailableFeatureHere(6)
|
||||
Strings.AvailableFeature(7) = AvailableFeatureHere(7)
|
||||
Strings.AvailableFeature(8) = AvailableFeatureHere(8)
|
||||
Strings.AvailableFeature(9) = AvailableFeatureHere(9)
|
||||
Strings.AvailableFeature(10) = AvailableFeatureHere(10)
|
||||
Strings.AvailableFeature(11) = AvailableFeatureHere(11)
|
||||
Strings.AvailableFeature(12) = AvailableFeatureHere(12)
|
||||
Strings.AvailableFeature(13) = AvailableFeatureHere(13)
|
||||
Strings.AvailableFeature(14) = AvailableFeatureHere(14)
|
||||
Strings.AvailableFeature(15) = AvailableFeatureHere(15)
|
||||
Strings.AvailableFeature(16) = AvailableFeatureHere(16)
|
||||
Strings.AvailableFeature(17) = AvailableFeatureHere(17)
|
||||
Strings.AvailableFeature(18) = AvailableFeatureHere(18)
|
||||
Strings.AvailableFeature(19) = AvailableFeatureHere(19)
|
||||
Strings.AvailableFeature(20) = AvailableFeatureHere(20)
|
||||
Strings.AvailableFeature(21) = AvailableFeatureHere(21)
|
||||
Strings.AvailableFeature(22) = AvailableFeatureHere(22)
|
||||
Strings.AvailableFeature(23) = AvailableFeatureHere(23)
|
||||
Strings.AvailableFeature(24) = AvailableFeatureHere(24)
|
||||
Strings.AvailableFeature(25) = AvailableFeatureHere(25)
|
||||
Strings.AvailableFeature(26) = AvailableFeatureHere(26)
|
||||
Strings.AvailableFeature(27) = AvailableFeatureHere(27)
|
||||
Strings.AvailableFeature(28) = AvailableFeatureHere(28)
|
||||
Strings.AvailableFeature(29) = AvailableFeatureHere(29)
|
||||
Strings.AvailableFeature(30) = AvailableFeatureHere(30)
|
||||
Strings.AvailableFeature(31) = AvailableFeatureHere(31)
|
||||
Strings.AvailableFeature(32) = AvailableFeatureHere(32)
|
||||
Strings.AvailableFeature(33) = AvailableFeatureHere(33)
|
||||
Strings.AvailableFeature(34) = AvailableFeatureHere(34)
|
||||
Strings.AvailableFeature(35) = AvailableFeatureHere(35)
|
||||
Strings.AvailableFeature(36) = AvailableFeatureHere(36)
|
||||
Strings.AvailableFeature(37) = AvailableFeatureHere(37)
|
||||
Strings.AvailableFeature(38) = AvailableFeatureHere(38)
|
||||
Strings.AvailableFeature(39) = AvailableFeatureHere(39)
|
||||
Strings.AvailableFeature(40) = AvailableFeatureHere(40)
|
||||
Strings.AvailableFeature(41) = AvailableFeatureHere(41)
|
||||
If Strings.AvailableFeature(37) = 1 Then
|
||||
Strings.AvailableFeature(42) = 0
|
||||
Else
|
||||
Strings.AvailableFeature(42) = 2
|
||||
End If
|
||||
If Strings.AvailableFeature(35) = 1 Then
|
||||
Strings.AvailableFeature(43) = 0
|
||||
Else
|
||||
Strings.AvailableFeature(43) = 2
|
||||
End If
|
||||
Strings.AvailableFeature(44) = 2
|
||||
Strings.AvailableFeature(45) = 2
|
||||
Strings.AvailableFeature(46) = 2
|
||||
Strings.AvailableFeature(47) = 2
|
||||
Strings.AvailableFeature(48) = 2
|
||||
Strings.AvailableFeature(49) = 2
|
||||
Strings.AvailableFeature(50) = 2
|
||||
Strings.AvailableFeature(51) = 2
|
||||
Strings.AvailableFeature(52) = 2
|
||||
If Strings.AvailableFeature(36) = 1 Then
|
||||
Strings.AvailableFeature(53) = 0
|
||||
Else
|
||||
Strings.AvailableFeature(53) = 2
|
||||
End If
|
||||
Strings.ComputerInfo(0) = ComputerInfoHere(0)
|
||||
Strings.ComputerInfo(1) = ComputerInfoHere(1)
|
||||
Strings.ComputerInfo(2) = ComputerInfoHere(2)
|
||||
|
|
|
@ -29,7 +29,7 @@ Partial Class Console
|
|||
Me.InfoBarTimer = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.ToolBar = New System.Windows.Forms.TextBox()
|
||||
Me.ShortcutHandler = New System.ComponentModel.BackgroundWorker()
|
||||
Me.DuWMHandle = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.ConsoleFontHandle = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'TextBox1
|
||||
|
@ -81,7 +81,7 @@ Partial Class Console
|
|||
Me.ToolBar.TabIndex = 1
|
||||
Me.ToolBar.Visible = False
|
||||
'
|
||||
'DuWMHandle
|
||||
'ConsoleFontHandle
|
||||
'
|
||||
'
|
||||
'Console
|
||||
|
@ -109,5 +109,5 @@ Partial Class Console
|
|||
Friend WithEvents InfoBarTimer As Timer
|
||||
Friend WithEvents ToolBar As TextBox
|
||||
Public WithEvents ShortcutHandler As System.ComponentModel.BackgroundWorker
|
||||
Friend WithEvents DuWMHandle As Timer
|
||||
Friend WithEvents ConsoleFontHandle As Timer
|
||||
End Class
|
||||
|
|
|
@ -126,7 +126,7 @@
|
|||
<metadata name="ShortcutHandler.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>274, 17</value>
|
||||
</metadata>
|
||||
<metadata name="DuWMHandle.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<metadata name="ConsoleFontHandle.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>415, 17</value>
|
||||
</metadata>
|
||||
</root>
|
|
@ -22,9 +22,7 @@ Public Class Console
|
|||
With ShortcutHandler
|
||||
.WorkerSupportsCancellation = True
|
||||
End With
|
||||
'MsgBox("Full!")
|
||||
Console_Full()
|
||||
'MsgBox("Initialize!")
|
||||
InitializeTerminal()
|
||||
End Sub
|
||||
|
||||
|
@ -227,7 +225,7 @@ Public Class Console
|
|||
If Strings.OnceInfo(0) = "Yes" Then
|
||||
InfoBar.Text = InfoBar.Text & " root |"
|
||||
Else
|
||||
InfoBar.Text = InfoBar.Text & " user |"
|
||||
InfoBar.Text = InfoBar.Text & " " & Strings.ComputerInfo(1) & " |"
|
||||
End If
|
||||
InfoBar.Text = InfoBar.Text & " " & CurrentInterpreter & " |"
|
||||
InfoBar.Text = InfoBar.Text & " " & Strings.ComputerInfo(2) & " CP |"
|
||||
|
@ -238,7 +236,12 @@ Public Class Console
|
|||
|
||||
End Sub
|
||||
|
||||
Private Sub DuWMHandle_Tick(sender As Object, e As EventArgs) Handles DuWMHandle.Tick
|
||||
|
||||
Private Sub ConsoleFontHandle_Tick(sender As Object, e As EventArgs) Handles ConsoleFontHandle.Tick
|
||||
If InfoBar.Font IsNot GUISCustomizations.GUIConsoleFont Then
|
||||
InfoBar.Font = GUISCustomizations.GUIConsoleFont
|
||||
End If
|
||||
If ToolBar.Font IsNot GUISCustomizations.GUIConsoleFont Then
|
||||
ToolBar.Font = GUISCustomizations.GUIConsoleFont
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
157
ShiftOS-TheRevival/MainForms/Applications/DuWM/Shifter/Categories/DuWM_Shifter_Console.Designer.vb
generated
Normal file
|
@ -0,0 +1,157 @@
|
|||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class DuWM_Shifter_Console
|
||||
Inherits System.Windows.Forms.UserControl
|
||||
|
||||
'UserControl overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.lbl_Title = New System.Windows.Forms.Label()
|
||||
Me.lbl_DescConsole = New System.Windows.Forms.Label()
|
||||
Me.lbl_ConsoleFont = New System.Windows.Forms.Label()
|
||||
Me.cmb_ConsoleFont = New System.Windows.Forms.ComboBox()
|
||||
Me.lbl_ConsoleFontSize = New System.Windows.Forms.Label()
|
||||
Me.cmb_ConsoleFontSize = New System.Windows.Forms.ComboBox()
|
||||
Me.lbl_Example = New System.Windows.Forms.Label()
|
||||
Me.txt_ConsoleExample = New System.Windows.Forms.TextBox()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'lbl_Title
|
||||
'
|
||||
Me.lbl_Title.AutoSize = True
|
||||
Me.lbl_Title.Font = New System.Drawing.Font("Segoe UI", 24.0!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle))
|
||||
Me.lbl_Title.Location = New System.Drawing.Point(11, 10)
|
||||
Me.lbl_Title.Name = "lbl_Title"
|
||||
Me.lbl_Title.Size = New System.Drawing.Size(136, 45)
|
||||
Me.lbl_Title.TabIndex = 1
|
||||
Me.lbl_Title.Text = "Console"
|
||||
'
|
||||
'lbl_DescConsole
|
||||
'
|
||||
Me.lbl_DescConsole.AutoSize = True
|
||||
Me.lbl_DescConsole.Font = New System.Drawing.Font("Segoe UI", 12.0!)
|
||||
Me.lbl_DescConsole.ForeColor = System.Drawing.Color.Black
|
||||
Me.lbl_DescConsole.Location = New System.Drawing.Point(15, 71)
|
||||
Me.lbl_DescConsole.Name = "lbl_DescConsole"
|
||||
Me.lbl_DescConsole.Size = New System.Drawing.Size(266, 21)
|
||||
Me.lbl_DescConsole.TabIndex = 3
|
||||
Me.lbl_DescConsole.Text = "Choose Console font face and its size"
|
||||
'
|
||||
'lbl_ConsoleFont
|
||||
'
|
||||
Me.lbl_ConsoleFont.AutoSize = True
|
||||
Me.lbl_ConsoleFont.Font = New System.Drawing.Font("Segoe UI", 12.0!)
|
||||
Me.lbl_ConsoleFont.ForeColor = System.Drawing.Color.Black
|
||||
Me.lbl_ConsoleFont.Location = New System.Drawing.Point(15, 106)
|
||||
Me.lbl_ConsoleFont.Name = "lbl_ConsoleFont"
|
||||
Me.lbl_ConsoleFont.Size = New System.Drawing.Size(135, 21)
|
||||
Me.lbl_ConsoleFont.TabIndex = 4
|
||||
Me.lbl_ConsoleFont.Text = "Console Font Face"
|
||||
'
|
||||
'cmb_ConsoleFont
|
||||
'
|
||||
Me.cmb_ConsoleFont.DrawMode = System.Windows.Forms.DrawMode.OwnerDrawFixed
|
||||
Me.cmb_ConsoleFont.Font = New System.Drawing.Font("Segoe UI", 12.0!)
|
||||
Me.cmb_ConsoleFont.FormattingEnabled = True
|
||||
Me.cmb_ConsoleFont.Items.AddRange(New Object() {"Consolas", "Courier New", "Lucida Console"})
|
||||
Me.cmb_ConsoleFont.Location = New System.Drawing.Point(156, 103)
|
||||
Me.cmb_ConsoleFont.Name = "cmb_ConsoleFont"
|
||||
Me.cmb_ConsoleFont.Size = New System.Drawing.Size(250, 30)
|
||||
Me.cmb_ConsoleFont.TabIndex = 5
|
||||
'
|
||||
'lbl_ConsoleFontSize
|
||||
'
|
||||
Me.lbl_ConsoleFontSize.AutoSize = True
|
||||
Me.lbl_ConsoleFontSize.Font = New System.Drawing.Font("Segoe UI", 12.0!)
|
||||
Me.lbl_ConsoleFontSize.ForeColor = System.Drawing.Color.Black
|
||||
Me.lbl_ConsoleFontSize.Location = New System.Drawing.Point(15, 147)
|
||||
Me.lbl_ConsoleFontSize.Name = "lbl_ConsoleFontSize"
|
||||
Me.lbl_ConsoleFontSize.Size = New System.Drawing.Size(133, 21)
|
||||
Me.lbl_ConsoleFontSize.TabIndex = 6
|
||||
Me.lbl_ConsoleFontSize.Text = "Console Font Size"
|
||||
'
|
||||
'cmb_ConsoleFontSize
|
||||
'
|
||||
Me.cmb_ConsoleFontSize.DrawMode = System.Windows.Forms.DrawMode.OwnerDrawFixed
|
||||
Me.cmb_ConsoleFontSize.Font = New System.Drawing.Font("Segoe UI", 12.0!)
|
||||
Me.cmb_ConsoleFontSize.FormattingEnabled = True
|
||||
Me.cmb_ConsoleFontSize.Items.AddRange(New Object() {"6", "8", "9", "10", "11", "12", "14", "16"})
|
||||
Me.cmb_ConsoleFontSize.Location = New System.Drawing.Point(156, 144)
|
||||
Me.cmb_ConsoleFontSize.Name = "cmb_ConsoleFontSize"
|
||||
Me.cmb_ConsoleFontSize.Size = New System.Drawing.Size(70, 30)
|
||||
Me.cmb_ConsoleFontSize.TabIndex = 5
|
||||
'
|
||||
'lbl_Example
|
||||
'
|
||||
Me.lbl_Example.AutoSize = True
|
||||
Me.lbl_Example.Font = New System.Drawing.Font("Segoe UI", 12.0!)
|
||||
Me.lbl_Example.ForeColor = System.Drawing.Color.Black
|
||||
Me.lbl_Example.Location = New System.Drawing.Point(15, 189)
|
||||
Me.lbl_Example.Name = "lbl_Example"
|
||||
Me.lbl_Example.Size = New System.Drawing.Size(75, 21)
|
||||
Me.lbl_Example.TabIndex = 6
|
||||
Me.lbl_Example.Text = "Example :"
|
||||
'
|
||||
'txt_ConsoleExample
|
||||
'
|
||||
Me.txt_ConsoleExample.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.txt_ConsoleExample.BackColor = System.Drawing.Color.Black
|
||||
Me.txt_ConsoleExample.BorderStyle = System.Windows.Forms.BorderStyle.None
|
||||
Me.txt_ConsoleExample.Font = New System.Drawing.Font("Consolas", 11.0!)
|
||||
Me.txt_ConsoleExample.ForeColor = System.Drawing.Color.White
|
||||
Me.txt_ConsoleExample.Location = New System.Drawing.Point(19, 218)
|
||||
Me.txt_ConsoleExample.Multiline = True
|
||||
Me.txt_ConsoleExample.Name = "txt_ConsoleExample"
|
||||
Me.txt_ConsoleExample.ReadOnly = True
|
||||
Me.txt_ConsoleExample.Size = New System.Drawing.Size(600, 243)
|
||||
Me.txt_ConsoleExample.TabIndex = 7
|
||||
Me.txt_ConsoleExample.Text = "devx@shiftos $> ver" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "ShiftOS 11 build 11.0.9"
|
||||
'
|
||||
'DuWM_Shifter_Console
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.White
|
||||
Me.Controls.Add(Me.txt_ConsoleExample)
|
||||
Me.Controls.Add(Me.lbl_Example)
|
||||
Me.Controls.Add(Me.lbl_ConsoleFontSize)
|
||||
Me.Controls.Add(Me.cmb_ConsoleFontSize)
|
||||
Me.Controls.Add(Me.cmb_ConsoleFont)
|
||||
Me.Controls.Add(Me.lbl_ConsoleFont)
|
||||
Me.Controls.Add(Me.lbl_DescConsole)
|
||||
Me.Controls.Add(Me.lbl_Title)
|
||||
Me.ForeColor = System.Drawing.Color.Black
|
||||
Me.Name = "DuWM_Shifter_Console"
|
||||
Me.Size = New System.Drawing.Size(640, 480)
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents lbl_Title As Label
|
||||
Friend WithEvents lbl_DescConsole As Label
|
||||
Friend WithEvents lbl_ConsoleFont As Label
|
||||
Friend WithEvents cmb_ConsoleFont As ComboBox
|
||||
Friend WithEvents lbl_ConsoleFontSize As Label
|
||||
Friend WithEvents cmb_ConsoleFontSize As ComboBox
|
||||
Friend WithEvents lbl_Example As Label
|
||||
Friend WithEvents txt_ConsoleExample As TextBox
|
||||
End Class
|
|
@ -0,0 +1,120 @@
|
|||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
|
@ -0,0 +1,48 @@
|
|||
Public Class DuWM_Shifter_Console
|
||||
Private Sub DuWM_Shifter_Console_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
txt_ConsoleExample.Font = Console.TextBox1.Font
|
||||
cmb_ConsoleFont.Text = GUISCustomizations.GUIConsoleFont.Name
|
||||
cmb_ConsoleFontSize.Text = GUISCustomizations.GUIConsoleFont.Size
|
||||
End Sub
|
||||
|
||||
Private Sub cmb_ConsoleFont_DrawItem(ByVal sender As Object, ByVal e As System.Windows.Forms.DrawItemEventArgs) Handles cmb_ConsoleFont.DrawItem
|
||||
e.DrawBackground()
|
||||
If (e.State And DrawItemState.Selected) = DrawItemState.Selected Then
|
||||
e.Graphics.FillRectangle(Brushes.Black, e.Bounds)
|
||||
End If
|
||||
Dim sf As New StringFormat
|
||||
Using b As New SolidBrush(e.ForeColor)
|
||||
e.Graphics.DrawString(cmb_ConsoleFont.GetItemText(cmb_ConsoleFont.Items(e.Index)), e.Font, b, e.Bounds, sf)
|
||||
End Using
|
||||
e.DrawFocusRectangle()
|
||||
End Sub
|
||||
|
||||
Private Sub cmb_ConsoleFontSize_DrawItem(ByVal sender As Object, ByVal e As System.Windows.Forms.DrawItemEventArgs) Handles cmb_ConsoleFontSize.DrawItem
|
||||
e.DrawBackground()
|
||||
If (e.State And DrawItemState.Selected) = DrawItemState.Selected Then
|
||||
e.Graphics.FillRectangle(Brushes.Black, e.Bounds)
|
||||
End If
|
||||
Dim sf As New StringFormat
|
||||
Using b As New SolidBrush(e.ForeColor)
|
||||
e.Graphics.DrawString(cmb_ConsoleFontSize.GetItemText(cmb_ConsoleFontSize.Items(e.Index)), e.Font, b, e.Bounds, sf)
|
||||
End Using
|
||||
e.DrawFocusRectangle()
|
||||
End Sub
|
||||
|
||||
Private Sub cmb_ConsoleFont_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmb_ConsoleFont.SelectedIndexChanged
|
||||
Select Case cmb_ConsoleFont.SelectedItem
|
||||
Case "Consolas"
|
||||
txt_ConsoleExample.Font = New Font("Consolas", txt_ConsoleExample.Font.Size)
|
||||
Case "Courier New"
|
||||
txt_ConsoleExample.Font = New Font("Courier New", txt_ConsoleExample.Font.Size)
|
||||
Case "Lucida Console"
|
||||
txt_ConsoleExample.Font = New Font("Lucida Console", txt_ConsoleExample.Font.Size)
|
||||
End Select
|
||||
DuWM_Shifter_Configs.ConsoleFont = txt_ConsoleExample.Font
|
||||
End Sub
|
||||
|
||||
Private Sub cmb_ConsoleFontSize_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmb_ConsoleFontSize.SelectedIndexChanged
|
||||
txt_ConsoleExample.Font = New Font(txt_ConsoleExample.Font.Name, cmb_ConsoleFontSize.SelectedItem)
|
||||
DuWM_Shifter_Configs.ConsoleFont = txt_ConsoleExample.Font
|
||||
End Sub
|
||||
End Class
|
|
@ -53,7 +53,7 @@ Partial Class DuWM_Shifter
|
|||
Me.lst_Features.Font = New System.Drawing.Font("Segoe UI", 12.0!)
|
||||
Me.lst_Features.FormattingEnabled = True
|
||||
Me.lst_Features.ItemHeight = 21
|
||||
Me.lst_Features.Items.AddRange(New Object() {"Desktop", "About"})
|
||||
Me.lst_Features.Items.AddRange(New Object() {"Console", "Desktop", "About"})
|
||||
Me.lst_Features.Location = New System.Drawing.Point(0, 51)
|
||||
Me.lst_Features.Name = "lst_Features"
|
||||
Me.lst_Features.Size = New System.Drawing.Size(200, 399)
|
||||
|
|
|
@ -5,7 +5,7 @@
|
|||
Private ChildFeature As String
|
||||
|
||||
Private Sub Shifter_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
|
||||
CheckAvailability()
|
||||
End Sub
|
||||
|
||||
Private Sub lst_Features_DrawItem(ByVal sender As Object, ByVal e As System.Windows.Forms.DrawItemEventArgs) Handles lst_Features.DrawItem
|
||||
|
@ -37,6 +37,12 @@
|
|||
|
||||
Else
|
||||
Select Case lst_Features.SelectedItem
|
||||
Case "Console"
|
||||
Dim Shifter_Console As New DuWM_Shifter_Console
|
||||
Shifter_Console.Size = pnl_Content.Size
|
||||
ChildFeature = "Console"
|
||||
pnl_Content.Controls.Clear()
|
||||
pnl_Content.Controls.Add(Shifter_Console)
|
||||
Case "Desktop"
|
||||
Dim Shifter_Desktop As New DuWM_Shifter_Desktop
|
||||
Shifter_Desktop.Size = pnl_Content.Size
|
||||
|
@ -59,6 +65,9 @@
|
|||
|
||||
Private Sub Apply()
|
||||
Select Case lst_Features.SelectedItem
|
||||
Case "Console"
|
||||
Console.TextBox1.Font = DuWM_Shifter_Configs.ConsoleFont
|
||||
GUISCustomizations.GUIConsoleFont = Console.TextBox1.Font
|
||||
Case "Desktop"
|
||||
Desktop.BackColor = DuWM_Shifter_Configs.DesktopBackColor
|
||||
GUISCustomizations.DesktopColor = Desktop.BackColor
|
||||
|
@ -69,4 +78,10 @@
|
|||
Apply()
|
||||
Close()
|
||||
End Sub
|
||||
|
||||
Private Sub CheckAvailability()
|
||||
If Strings.AvailableFeature(53) = 0 Then
|
||||
lst_Features.Items.Remove("Console")
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
|
@ -1,3 +1,4 @@
|
|||
Public Class DuWM_Shifter_Configs
|
||||
Public Shared DesktopBackColor As Color
|
||||
Public Shared ConsoleFont As Font
|
||||
End Class
|
||||
|
|
315
ShiftOS-TheRevival/MainForms/Applications/Universal/Calculator/Uni_Calculator.Designer.vb
generated
Normal file
|
@ -0,0 +1,315 @@
|
|||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class Uni_Calculator
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.Button2 = New System.Windows.Forms.Button()
|
||||
Me.Button3 = New System.Windows.Forms.Button()
|
||||
Me.Button4 = New System.Windows.Forms.Button()
|
||||
Me.Button5 = New System.Windows.Forms.Button()
|
||||
Me.Button6 = New System.Windows.Forms.Button()
|
||||
Me.Button7 = New System.Windows.Forms.Button()
|
||||
Me.Button8 = New System.Windows.Forms.Button()
|
||||
Me.Button9 = New System.Windows.Forms.Button()
|
||||
Me.Button10 = New System.Windows.Forms.Button()
|
||||
Me.Button11 = New System.Windows.Forms.Button()
|
||||
Me.Button12 = New System.Windows.Forms.Button()
|
||||
Me.Button13 = New System.Windows.Forms.Button()
|
||||
Me.Button14 = New System.Windows.Forms.Button()
|
||||
Me.Button15 = New System.Windows.Forms.Button()
|
||||
Me.Button16 = New System.Windows.Forms.Button()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button1.Font = New System.Drawing.Font("Segoe UI", 15.0!)
|
||||
Me.Button1.Location = New System.Drawing.Point(12, 122)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(150, 80)
|
||||
Me.Button1.TabIndex = 0
|
||||
Me.Button1.Text = "1"
|
||||
Me.Button1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Label1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.Label1.Font = New System.Drawing.Font("Tahoma", 20.0!, System.Drawing.FontStyle.Italic)
|
||||
Me.Label1.Location = New System.Drawing.Point(12, 32)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(618, 77)
|
||||
Me.Label1.TabIndex = 1
|
||||
Me.Label1.Text = "Fuck you, Calculator!"
|
||||
Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleRight
|
||||
'
|
||||
'Button2
|
||||
'
|
||||
Me.Button2.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button2.Font = New System.Drawing.Font("Segoe UI", 15.0!)
|
||||
Me.Button2.Location = New System.Drawing.Point(168, 122)
|
||||
Me.Button2.Name = "Button2"
|
||||
Me.Button2.Size = New System.Drawing.Size(150, 80)
|
||||
Me.Button2.TabIndex = 0
|
||||
Me.Button2.Text = "2"
|
||||
Me.Button2.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button3
|
||||
'
|
||||
Me.Button3.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button3.Font = New System.Drawing.Font("Segoe UI", 15.0!)
|
||||
Me.Button3.Location = New System.Drawing.Point(324, 122)
|
||||
Me.Button3.Name = "Button3"
|
||||
Me.Button3.Size = New System.Drawing.Size(150, 80)
|
||||
Me.Button3.TabIndex = 0
|
||||
Me.Button3.Text = "3"
|
||||
Me.Button3.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button4
|
||||
'
|
||||
Me.Button4.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button4.Font = New System.Drawing.Font("Segoe UI", 15.0!)
|
||||
Me.Button4.Location = New System.Drawing.Point(480, 122)
|
||||
Me.Button4.Name = "Button4"
|
||||
Me.Button4.Size = New System.Drawing.Size(150, 80)
|
||||
Me.Button4.TabIndex = 0
|
||||
Me.Button4.Text = "+"
|
||||
Me.Button4.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button5
|
||||
'
|
||||
Me.Button5.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button5.Font = New System.Drawing.Font("Segoe UI", 15.0!)
|
||||
Me.Button5.Location = New System.Drawing.Point(12, 208)
|
||||
Me.Button5.Name = "Button5"
|
||||
Me.Button5.Size = New System.Drawing.Size(150, 80)
|
||||
Me.Button5.TabIndex = 0
|
||||
Me.Button5.Text = "4"
|
||||
Me.Button5.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button6
|
||||
'
|
||||
Me.Button6.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button6.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button6.Font = New System.Drawing.Font("Segoe UI", 15.0!)
|
||||
Me.Button6.Location = New System.Drawing.Point(168, 208)
|
||||
Me.Button6.Name = "Button6"
|
||||
Me.Button6.Size = New System.Drawing.Size(150, 80)
|
||||
Me.Button6.TabIndex = 0
|
||||
Me.Button6.Text = "5"
|
||||
Me.Button6.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button7
|
||||
'
|
||||
Me.Button7.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button7.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button7.Font = New System.Drawing.Font("Segoe UI", 15.0!)
|
||||
Me.Button7.Location = New System.Drawing.Point(324, 208)
|
||||
Me.Button7.Name = "Button7"
|
||||
Me.Button7.Size = New System.Drawing.Size(150, 80)
|
||||
Me.Button7.TabIndex = 0
|
||||
Me.Button7.Text = "6"
|
||||
Me.Button7.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button8
|
||||
'
|
||||
Me.Button8.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button8.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button8.Font = New System.Drawing.Font("Segoe UI", 15.0!)
|
||||
Me.Button8.Location = New System.Drawing.Point(480, 208)
|
||||
Me.Button8.Name = "Button8"
|
||||
Me.Button8.Size = New System.Drawing.Size(150, 80)
|
||||
Me.Button8.TabIndex = 0
|
||||
Me.Button8.Text = "-"
|
||||
Me.Button8.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button9
|
||||
'
|
||||
Me.Button9.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button9.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button9.Font = New System.Drawing.Font("Segoe UI", 15.0!)
|
||||
Me.Button9.Location = New System.Drawing.Point(12, 294)
|
||||
Me.Button9.Name = "Button9"
|
||||
Me.Button9.Size = New System.Drawing.Size(150, 80)
|
||||
Me.Button9.TabIndex = 0
|
||||
Me.Button9.Text = "7"
|
||||
Me.Button9.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button10
|
||||
'
|
||||
Me.Button10.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button10.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button10.Font = New System.Drawing.Font("Segoe UI", 15.0!)
|
||||
Me.Button10.Location = New System.Drawing.Point(12, 380)
|
||||
Me.Button10.Name = "Button10"
|
||||
Me.Button10.Size = New System.Drawing.Size(150, 80)
|
||||
Me.Button10.TabIndex = 0
|
||||
Me.Button10.Text = "C"
|
||||
Me.Button10.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button11
|
||||
'
|
||||
Me.Button11.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button11.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button11.Font = New System.Drawing.Font("Segoe UI", 15.0!)
|
||||
Me.Button11.Location = New System.Drawing.Point(168, 294)
|
||||
Me.Button11.Name = "Button11"
|
||||
Me.Button11.Size = New System.Drawing.Size(150, 80)
|
||||
Me.Button11.TabIndex = 0
|
||||
Me.Button11.Text = "8"
|
||||
Me.Button11.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button12
|
||||
'
|
||||
Me.Button12.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button12.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button12.Font = New System.Drawing.Font("Segoe UI", 15.0!)
|
||||
Me.Button12.Location = New System.Drawing.Point(168, 380)
|
||||
Me.Button12.Name = "Button12"
|
||||
Me.Button12.Size = New System.Drawing.Size(150, 80)
|
||||
Me.Button12.TabIndex = 0
|
||||
Me.Button12.Text = "0"
|
||||
Me.Button12.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button13
|
||||
'
|
||||
Me.Button13.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button13.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button13.Font = New System.Drawing.Font("Segoe UI", 15.0!)
|
||||
Me.Button13.Location = New System.Drawing.Point(324, 294)
|
||||
Me.Button13.Name = "Button13"
|
||||
Me.Button13.Size = New System.Drawing.Size(150, 80)
|
||||
Me.Button13.TabIndex = 0
|
||||
Me.Button13.Text = "9"
|
||||
Me.Button13.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button14
|
||||
'
|
||||
Me.Button14.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button14.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button14.Font = New System.Drawing.Font("Segoe UI", 15.0!)
|
||||
Me.Button14.Location = New System.Drawing.Point(324, 380)
|
||||
Me.Button14.Name = "Button14"
|
||||
Me.Button14.Size = New System.Drawing.Size(150, 80)
|
||||
Me.Button14.TabIndex = 0
|
||||
Me.Button14.Text = "="
|
||||
Me.Button14.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button15
|
||||
'
|
||||
Me.Button15.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button15.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button15.Font = New System.Drawing.Font("Segoe UI", 15.0!)
|
||||
Me.Button15.Location = New System.Drawing.Point(480, 294)
|
||||
Me.Button15.Name = "Button15"
|
||||
Me.Button15.Size = New System.Drawing.Size(150, 80)
|
||||
Me.Button15.TabIndex = 0
|
||||
Me.Button15.Text = "*"
|
||||
Me.Button15.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Button16
|
||||
'
|
||||
Me.Button16.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Button16.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button16.Font = New System.Drawing.Font("Segoe UI", 15.0!)
|
||||
Me.Button16.Location = New System.Drawing.Point(480, 380)
|
||||
Me.Button16.Name = "Button16"
|
||||
Me.Button16.Size = New System.Drawing.Size(150, 80)
|
||||
Me.Button16.TabIndex = 0
|
||||
Me.Button16.Text = "/"
|
||||
Me.Button16.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Uni_Calculator
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.White
|
||||
Me.ClientSize = New System.Drawing.Size(640, 480)
|
||||
Me.Controls.Add(Me.Label1)
|
||||
Me.Controls.Add(Me.Button16)
|
||||
Me.Controls.Add(Me.Button8)
|
||||
Me.Controls.Add(Me.Button15)
|
||||
Me.Controls.Add(Me.Button4)
|
||||
Me.Controls.Add(Me.Button14)
|
||||
Me.Controls.Add(Me.Button7)
|
||||
Me.Controls.Add(Me.Button13)
|
||||
Me.Controls.Add(Me.Button3)
|
||||
Me.Controls.Add(Me.Button12)
|
||||
Me.Controls.Add(Me.Button6)
|
||||
Me.Controls.Add(Me.Button11)
|
||||
Me.Controls.Add(Me.Button2)
|
||||
Me.Controls.Add(Me.Button10)
|
||||
Me.Controls.Add(Me.Button5)
|
||||
Me.Controls.Add(Me.Button9)
|
||||
Me.Controls.Add(Me.Button1)
|
||||
Me.ForeColor = System.Drawing.Color.Black
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
|
||||
Me.Name = "Uni_Calculator"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Uni_Calculator"
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents Button1 As Button
|
||||
Friend WithEvents Label1 As Label
|
||||
Friend WithEvents Button2 As Button
|
||||
Friend WithEvents Button3 As Button
|
||||
Friend WithEvents Button4 As Button
|
||||
Friend WithEvents Button5 As Button
|
||||
Friend WithEvents Button6 As Button
|
||||
Friend WithEvents Button7 As Button
|
||||
Friend WithEvents Button8 As Button
|
||||
Friend WithEvents Button9 As Button
|
||||
Friend WithEvents Button10 As Button
|
||||
Friend WithEvents Button11 As Button
|
||||
Friend WithEvents Button12 As Button
|
||||
Friend WithEvents Button13 As Button
|
||||
Friend WithEvents Button14 As Button
|
||||
Friend WithEvents Button15 As Button
|
||||
Friend WithEvents Button16 As Button
|
||||
End Class
|
|
@ -0,0 +1,120 @@
|
|||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
|
@ -0,0 +1,3 @@
|
|||
Public Class Uni_Calculator
|
||||
|
||||
End Class
|
167
ShiftOS-TheRevival/MainForms/Applications/Universal/File Skimmer/Icons/FileSkimmerFileIcons.Designer.vb
generated
Normal file
|
@ -0,0 +1,167 @@
|
|||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' This code was generated by a tool.
|
||||
' Runtime Version:4.0.30319.42000
|
||||
'
|
||||
' Changes to this file may cause incorrect behavior and will be lost if
|
||||
' the code is regenerated.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
Imports System
|
||||
|
||||
Namespace My.Resources
|
||||
|
||||
'This class was auto-generated by the StronglyTypedResourceBuilder
|
||||
'class via a tool like ResGen or Visual Studio.
|
||||
'To add or remove a member, edit your .ResX file then rerun ResGen
|
||||
'with the /str option, or rebuild your VS project.
|
||||
'''<summary>
|
||||
''' A strongly-typed resource class, for looking up localized strings, etc.
|
||||
'''</summary>
|
||||
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "16.0.0.0"), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
|
||||
Friend Class FileSkimmerFileIcons
|
||||
|
||||
Private Shared resourceMan As Global.System.Resources.ResourceManager
|
||||
|
||||
Private Shared resourceCulture As Global.System.Globalization.CultureInfo
|
||||
|
||||
<Global.System.Diagnostics.CodeAnalysis.SuppressMessageAttribute("Microsoft.Performance", "CA1811:AvoidUncalledPrivateCode")> _
|
||||
Friend Sub New()
|
||||
MyBase.New
|
||||
End Sub
|
||||
|
||||
'''<summary>
|
||||
''' Returns the cached ResourceManager instance used by this class.
|
||||
'''</summary>
|
||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Friend Shared ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
|
||||
Get
|
||||
If Object.ReferenceEquals(resourceMan, Nothing) Then
|
||||
Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("ShiftOS_TheRevival.FileSkimmerFileIcons", GetType(FileSkimmerFileIcons).Assembly)
|
||||
resourceMan = temp
|
||||
End If
|
||||
Return resourceMan
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Overrides the current thread's CurrentUICulture property for all
|
||||
''' resource lookups using this strongly typed resource class.
|
||||
'''</summary>
|
||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Friend Shared Property Culture() As Global.System.Globalization.CultureInfo
|
||||
Get
|
||||
Return resourceCulture
|
||||
End Get
|
||||
Set
|
||||
resourceCulture = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property ico_exe() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("ico_exe", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property ico_folder() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("ico_folder", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property ico_picture() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("ico_picture", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property ico_sfp() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("ico_sfp", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property ico_textfile() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("ico_textfile", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property ico_unknown() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("ico_unknown", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property ico_up() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("ico_up", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property ico_url() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("ico_url", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property ico_video() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("ico_video", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property ico_zip() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("ico_zip", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
End Class
|
||||
End Namespace
|
|
@ -0,0 +1,151 @@
|
|||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
<data name="ico_exe" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>ico_exe.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="ico_folder" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>ico_folder.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="ico_picture" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>ico_picture.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="ico_sfp" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>ico_sfp.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="ico_textfile" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>ico_textfile.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="ico_unknown" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>ico_unknown.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="ico_up" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>ico_up.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="ico_url" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>ico_url.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="ico_video" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>ico_video.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="ico_zip" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>ico_zip.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
</root>
|
|
@ -0,0 +1,137 @@
|
|||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' This code was generated by a tool.
|
||||
' Runtime Version:4.0.30319.42000
|
||||
'
|
||||
' Changes to this file may cause incorrect behavior and will be lost if
|
||||
' the code is regenerated.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
Imports System
|
||||
|
||||
Namespace My.Resources
|
||||
|
||||
'This class was auto-generated by the StronglyTypedResourceBuilder
|
||||
'class via a tool like ResGen or Visual Studio.
|
||||
'To add or remove a member, edit your .ResX file then rerun ResGen
|
||||
'with the /str option, or rebuild your VS project.
|
||||
'''<summary>
|
||||
''' A strongly-typed resource class, for looking up localized strings, etc.
|
||||
'''</summary>
|
||||
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "16.0.0.0"), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
|
||||
Friend Class FileSkimmerFunctionIcons
|
||||
|
||||
Private Shared resourceMan As Global.System.Resources.ResourceManager
|
||||
|
||||
Private Shared resourceCulture As Global.System.Globalization.CultureInfo
|
||||
|
||||
<Global.System.Diagnostics.CodeAnalysis.SuppressMessageAttribute("Microsoft.Performance", "CA1811:AvoidUncalledPrivateCode")> _
|
||||
Friend Sub New()
|
||||
MyBase.New
|
||||
End Sub
|
||||
|
||||
'''<summary>
|
||||
''' Returns the cached ResourceManager instance used by this class.
|
||||
'''</summary>
|
||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Friend Shared ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
|
||||
Get
|
||||
If Object.ReferenceEquals(resourceMan, Nothing) Then
|
||||
Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("ShiftOS_TheRevival.FileSkimmerFunctionIcons", GetType(FileSkimmerFunctionIcons).Assembly)
|
||||
resourceMan = temp
|
||||
End If
|
||||
Return resourceMan
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Overrides the current thread's CurrentUICulture property for all
|
||||
''' resource lookups using this strongly typed resource class.
|
||||
'''</summary>
|
||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Friend Shared Property Culture() As Global.System.Globalization.CultureInfo
|
||||
Get
|
||||
Return resourceCulture
|
||||
End Get
|
||||
Set
|
||||
resourceCulture = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property ico_refresh() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("ico_refresh", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property ico_up1() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("ico_up1", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property largeico_compress() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("largeico_compress", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property largeico_deletefile() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("largeico_deletefile", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property largeico_rename() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("largeico_rename", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property largeico_uncompress() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("largeico_uncompress", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property largeico_unknown() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("largeico_unknown", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
End Class
|
||||
End Namespace
|
|
@ -0,0 +1,142 @@
|
|||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
<data name="ico_refresh" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\..\..\..\..\Resources\ico_refresh.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="ico_up1" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\..\..\..\..\Resources\ico_up1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="largeico_compress" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\..\..\..\..\Resources\largeico_compress.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="largeico_deletefile" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\..\..\..\..\Resources\ico_deletefile.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="largeico_rename" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\..\..\..\..\Resources\largeico_rename.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="largeico_uncompress" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\..\..\..\..\Resources\largeico_uncompress.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="largeico_unknown" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>ico_unknown.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
</root>
|
After Width: | Height: | Size: 288 B |
After Width: | Height: | Size: 208 B |
After Width: | Height: | Size: 345 B |
After Width: | Height: | Size: 272 B |
After Width: | Height: | Size: 429 B |
After Width: | Height: | Size: 594 B |
After Width: | Height: | Size: 295 B |
After Width: | Height: | Size: 471 B |
After Width: | Height: | Size: 251 B |
After Width: | Height: | Size: 7.1 KiB |
486
ShiftOS-TheRevival/MainForms/Applications/Universal/File Skimmer/Uni_FileSkimmer.Designer.vb
generated
Normal file
|
@ -0,0 +1,486 @@
|
|||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class Uni_FileSkimmer
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Uni_FileSkimmer))
|
||||
Dim ListViewItem1 As System.Windows.Forms.ListViewItem = New System.Windows.Forms.ListViewItem("test", 0)
|
||||
Me.msn_Options = New System.Windows.Forms.MenuStrip()
|
||||
Me.FileToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.CompressToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.DeleteToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.CloseToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.OptionsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.JobBarToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.PropertyPaneToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.AboutToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.pnl_JobBar = New System.Windows.Forms.Panel()
|
||||
Me.cmb_Layout = New System.Windows.Forms.ComboBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.btn_CopyPath = New System.Windows.Forms.Button()
|
||||
Me.btn_Rename = New System.Windows.Forms.Button()
|
||||
Me.btn_Delete = New System.Windows.Forms.Button()
|
||||
Me.btn_Compress = New System.Windows.Forms.Button()
|
||||
Me.btn_NewFolder = New System.Windows.Forms.Button()
|
||||
Me.pnl_Properties = New System.Windows.Forms.Panel()
|
||||
Me.pic_Icon = New System.Windows.Forms.PictureBox()
|
||||
Me.lbl_filesize = New System.Windows.Forms.Label()
|
||||
Me.lbl_filetype = New System.Windows.Forms.Label()
|
||||
Me.lbl_filename = New System.Windows.Forms.Label()
|
||||
Me.lbl_Properties = New System.Windows.Forms.Label()
|
||||
Me.iml_icons = New System.Windows.Forms.ImageList(Me.components)
|
||||
Me.pnl_AddressBar = New System.Windows.Forms.Panel()
|
||||
Me.btn_Refresh = New System.Windows.Forms.Button()
|
||||
Me.btn_Up = New System.Windows.Forms.Button()
|
||||
Me.txt_AddressBar = New System.Windows.Forms.TextBox()
|
||||
Me.lbl_Address = New System.Windows.Forms.Label()
|
||||
Me.lsv_Content = New System.Windows.Forms.ListView()
|
||||
Me.iml_smallicons = New System.Windows.Forms.ImageList(Me.components)
|
||||
Me.msn_Options.SuspendLayout()
|
||||
Me.pnl_JobBar.SuspendLayout()
|
||||
Me.pnl_Properties.SuspendLayout()
|
||||
CType(Me.pic_Icon, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.pnl_AddressBar.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'msn_Options
|
||||
'
|
||||
Me.msn_Options.BackColor = System.Drawing.Color.White
|
||||
Me.msn_Options.Font = New System.Drawing.Font("Segoe UI", 10.0!)
|
||||
Me.msn_Options.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.FileToolStripMenuItem, Me.OptionsToolStripMenuItem, Me.AboutToolStripMenuItem})
|
||||
Me.msn_Options.Location = New System.Drawing.Point(0, 0)
|
||||
Me.msn_Options.Name = "msn_Options"
|
||||
Me.msn_Options.RenderMode = System.Windows.Forms.ToolStripRenderMode.System
|
||||
Me.msn_Options.Size = New System.Drawing.Size(800, 27)
|
||||
Me.msn_Options.TabIndex = 0
|
||||
Me.msn_Options.Text = "mns_Options"
|
||||
'
|
||||
'FileToolStripMenuItem
|
||||
'
|
||||
Me.FileToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.CompressToolStripMenuItem, Me.DeleteToolStripMenuItem, Me.ToolStripSeparator1, Me.CloseToolStripMenuItem})
|
||||
Me.FileToolStripMenuItem.Name = "FileToolStripMenuItem"
|
||||
Me.FileToolStripMenuItem.Size = New System.Drawing.Size(41, 23)
|
||||
Me.FileToolStripMenuItem.Text = "File"
|
||||
'
|
||||
'CompressToolStripMenuItem
|
||||
'
|
||||
Me.CompressToolStripMenuItem.Name = "CompressToolStripMenuItem"
|
||||
Me.CompressToolStripMenuItem.Size = New System.Drawing.Size(180, 24)
|
||||
Me.CompressToolStripMenuItem.Text = "Compress"
|
||||
'
|
||||
'DeleteToolStripMenuItem
|
||||
'
|
||||
Me.DeleteToolStripMenuItem.Name = "DeleteToolStripMenuItem"
|
||||
Me.DeleteToolStripMenuItem.Size = New System.Drawing.Size(180, 24)
|
||||
Me.DeleteToolStripMenuItem.Text = "Delete"
|
||||
'
|
||||
'ToolStripSeparator1
|
||||
'
|
||||
Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
|
||||
Me.ToolStripSeparator1.Size = New System.Drawing.Size(177, 6)
|
||||
'
|
||||
'CloseToolStripMenuItem
|
||||
'
|
||||
Me.CloseToolStripMenuItem.Name = "CloseToolStripMenuItem"
|
||||
Me.CloseToolStripMenuItem.Size = New System.Drawing.Size(180, 24)
|
||||
Me.CloseToolStripMenuItem.Text = "Close"
|
||||
'
|
||||
'OptionsToolStripMenuItem
|
||||
'
|
||||
Me.OptionsToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.JobBarToolStripMenuItem, Me.PropertyPaneToolStripMenuItem})
|
||||
Me.OptionsToolStripMenuItem.Name = "OptionsToolStripMenuItem"
|
||||
Me.OptionsToolStripMenuItem.Size = New System.Drawing.Size(70, 23)
|
||||
Me.OptionsToolStripMenuItem.Text = "Options"
|
||||
'
|
||||
'JobBarToolStripMenuItem
|
||||
'
|
||||
Me.JobBarToolStripMenuItem.CheckOnClick = True
|
||||
Me.JobBarToolStripMenuItem.Name = "JobBarToolStripMenuItem"
|
||||
Me.JobBarToolStripMenuItem.Size = New System.Drawing.Size(180, 24)
|
||||
Me.JobBarToolStripMenuItem.Text = "JobBar"
|
||||
'
|
||||
'PropertyPaneToolStripMenuItem
|
||||
'
|
||||
Me.PropertyPaneToolStripMenuItem.CheckOnClick = True
|
||||
Me.PropertyPaneToolStripMenuItem.Name = "PropertyPaneToolStripMenuItem"
|
||||
Me.PropertyPaneToolStripMenuItem.Size = New System.Drawing.Size(180, 24)
|
||||
Me.PropertyPaneToolStripMenuItem.Text = "Property Pane"
|
||||
'
|
||||
'AboutToolStripMenuItem
|
||||
'
|
||||
Me.AboutToolStripMenuItem.Name = "AboutToolStripMenuItem"
|
||||
Me.AboutToolStripMenuItem.Size = New System.Drawing.Size(59, 23)
|
||||
Me.AboutToolStripMenuItem.Text = "About"
|
||||
'
|
||||
'pnl_JobBar
|
||||
'
|
||||
Me.pnl_JobBar.BackColor = System.Drawing.Color.Silver
|
||||
Me.pnl_JobBar.Controls.Add(Me.cmb_Layout)
|
||||
Me.pnl_JobBar.Controls.Add(Me.Label1)
|
||||
Me.pnl_JobBar.Controls.Add(Me.Label2)
|
||||
Me.pnl_JobBar.Controls.Add(Me.btn_CopyPath)
|
||||
Me.pnl_JobBar.Controls.Add(Me.btn_Rename)
|
||||
Me.pnl_JobBar.Controls.Add(Me.btn_Delete)
|
||||
Me.pnl_JobBar.Controls.Add(Me.btn_Compress)
|
||||
Me.pnl_JobBar.Controls.Add(Me.btn_NewFolder)
|
||||
Me.pnl_JobBar.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.pnl_JobBar.Location = New System.Drawing.Point(0, 27)
|
||||
Me.pnl_JobBar.Name = "pnl_JobBar"
|
||||
Me.pnl_JobBar.Size = New System.Drawing.Size(800, 70)
|
||||
Me.pnl_JobBar.TabIndex = 1
|
||||
'
|
||||
'cmb_Layout
|
||||
'
|
||||
Me.cmb_Layout.DrawMode = System.Windows.Forms.DrawMode.OwnerDrawFixed
|
||||
Me.cmb_Layout.Font = New System.Drawing.Font("Segoe UI", 10.0!)
|
||||
Me.cmb_Layout.FormattingEnabled = True
|
||||
Me.cmb_Layout.Items.AddRange(New Object() {"Large Icons", "Small Icons", "List"})
|
||||
Me.cmb_Layout.Location = New System.Drawing.Point(369, 36)
|
||||
Me.cmb_Layout.Name = "cmb_Layout"
|
||||
Me.cmb_Layout.Size = New System.Drawing.Size(121, 26)
|
||||
Me.cmb_Layout.TabIndex = 1
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Font = New System.Drawing.Font("Segoe UI", 10.0!)
|
||||
Me.Label1.Location = New System.Drawing.Point(365, 10)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(51, 19)
|
||||
Me.Label1.TabIndex = 0
|
||||
Me.Label1.Text = "Layout"
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Font = New System.Drawing.Font("Tahoma", 30.0!)
|
||||
Me.Label2.ForeColor = System.Drawing.Color.Gray
|
||||
Me.Label2.Location = New System.Drawing.Point(567, 35)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(247, 48)
|
||||
Me.Label2.TabIndex = 2
|
||||
Me.Label2.Text = "File Skimmer"
|
||||
'
|
||||
'btn_CopyPath
|
||||
'
|
||||
Me.btn_CopyPath.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_CopyPath.Font = New System.Drawing.Font("Segoe UI", 7.0!)
|
||||
Me.btn_CopyPath.Image = Global.ShiftOS_TheRevival.My.Resources.Resources.ico_folder
|
||||
Me.btn_CopyPath.Location = New System.Drawing.Point(213, 0)
|
||||
Me.btn_CopyPath.Name = "btn_CopyPath"
|
||||
Me.btn_CopyPath.Size = New System.Drawing.Size(72, 70)
|
||||
Me.btn_CopyPath.TabIndex = 0
|
||||
Me.btn_CopyPath.Text = "Copy path"
|
||||
Me.btn_CopyPath.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
|
||||
Me.btn_CopyPath.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_Rename
|
||||
'
|
||||
Me.btn_Rename.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_Rename.Font = New System.Drawing.Font("Segoe UI", 7.0!)
|
||||
Me.btn_Rename.Image = Global.ShiftOS_TheRevival.My.Resources.Resources.ico_folder
|
||||
Me.btn_Rename.Location = New System.Drawing.Point(142, 0)
|
||||
Me.btn_Rename.Name = "btn_Rename"
|
||||
Me.btn_Rename.Size = New System.Drawing.Size(72, 70)
|
||||
Me.btn_Rename.TabIndex = 0
|
||||
Me.btn_Rename.Text = "Rename"
|
||||
Me.btn_Rename.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
|
||||
Me.btn_Rename.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_Delete
|
||||
'
|
||||
Me.btn_Delete.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_Delete.Font = New System.Drawing.Font("Segoe UI", 7.0!)
|
||||
Me.btn_Delete.Image = Global.ShiftOS_TheRevival.My.Resources.Resources.ico_folder
|
||||
Me.btn_Delete.ImageAlign = System.Drawing.ContentAlignment.TopCenter
|
||||
Me.btn_Delete.Location = New System.Drawing.Point(71, 0)
|
||||
Me.btn_Delete.Name = "btn_Delete"
|
||||
Me.btn_Delete.Size = New System.Drawing.Size(72, 70)
|
||||
Me.btn_Delete.TabIndex = 0
|
||||
Me.btn_Delete.Text = "Delete"
|
||||
Me.btn_Delete.TextAlign = System.Drawing.ContentAlignment.BottomCenter
|
||||
Me.btn_Delete.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
|
||||
Me.btn_Delete.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_Compress
|
||||
'
|
||||
Me.btn_Compress.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_Compress.Font = New System.Drawing.Font("Segoe UI", 7.0!)
|
||||
Me.btn_Compress.Image = Global.ShiftOS_TheRevival.My.Resources.Resources.ico_folder
|
||||
Me.btn_Compress.ImageAlign = System.Drawing.ContentAlignment.TopCenter
|
||||
Me.btn_Compress.Location = New System.Drawing.Point(284, 0)
|
||||
Me.btn_Compress.Name = "btn_Compress"
|
||||
Me.btn_Compress.Size = New System.Drawing.Size(72, 70)
|
||||
Me.btn_Compress.TabIndex = 0
|
||||
Me.btn_Compress.Text = "Compress"
|
||||
Me.btn_Compress.TextAlign = System.Drawing.ContentAlignment.BottomCenter
|
||||
Me.btn_Compress.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
|
||||
Me.btn_Compress.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_NewFolder
|
||||
'
|
||||
Me.btn_NewFolder.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_NewFolder.Font = New System.Drawing.Font("Segoe UI", 7.0!)
|
||||
Me.btn_NewFolder.Image = Global.ShiftOS_TheRevival.My.Resources.Resources.ico_folder
|
||||
Me.btn_NewFolder.ImageAlign = System.Drawing.ContentAlignment.TopCenter
|
||||
Me.btn_NewFolder.Location = New System.Drawing.Point(0, 0)
|
||||
Me.btn_NewFolder.Name = "btn_NewFolder"
|
||||
Me.btn_NewFolder.Size = New System.Drawing.Size(72, 70)
|
||||
Me.btn_NewFolder.TabIndex = 0
|
||||
Me.btn_NewFolder.Text = "New Folder"
|
||||
Me.btn_NewFolder.TextAlign = System.Drawing.ContentAlignment.BottomCenter
|
||||
Me.btn_NewFolder.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
|
||||
Me.btn_NewFolder.UseVisualStyleBackColor = True
|
||||
'
|
||||
'pnl_Properties
|
||||
'
|
||||
Me.pnl_Properties.BackColor = System.Drawing.Color.Gray
|
||||
Me.pnl_Properties.Controls.Add(Me.pic_Icon)
|
||||
Me.pnl_Properties.Controls.Add(Me.lbl_filesize)
|
||||
Me.pnl_Properties.Controls.Add(Me.lbl_filetype)
|
||||
Me.pnl_Properties.Controls.Add(Me.lbl_filename)
|
||||
Me.pnl_Properties.Controls.Add(Me.lbl_Properties)
|
||||
Me.pnl_Properties.Dock = System.Windows.Forms.DockStyle.Right
|
||||
Me.pnl_Properties.Location = New System.Drawing.Point(600, 133)
|
||||
Me.pnl_Properties.Name = "pnl_Properties"
|
||||
Me.pnl_Properties.Size = New System.Drawing.Size(200, 317)
|
||||
Me.pnl_Properties.TabIndex = 2
|
||||
Me.pnl_Properties.Visible = False
|
||||
'
|
||||
'pic_Icon
|
||||
'
|
||||
Me.pic_Icon.Location = New System.Drawing.Point(10, 42)
|
||||
Me.pic_Icon.Name = "pic_Icon"
|
||||
Me.pic_Icon.Size = New System.Drawing.Size(64, 64)
|
||||
Me.pic_Icon.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.pic_Icon.TabIndex = 2
|
||||
Me.pic_Icon.TabStop = False
|
||||
'
|
||||
'lbl_filesize
|
||||
'
|
||||
Me.lbl_filesize.AutoSize = True
|
||||
Me.lbl_filesize.Font = New System.Drawing.Font("Segoe UI", 8.25!)
|
||||
Me.lbl_filesize.Location = New System.Drawing.Point(8, 181)
|
||||
Me.lbl_filesize.Name = "lbl_filesize"
|
||||
Me.lbl_filesize.Size = New System.Drawing.Size(26, 13)
|
||||
Me.lbl_filesize.TabIndex = 1
|
||||
Me.lbl_filesize.Text = "size"
|
||||
'
|
||||
'lbl_filetype
|
||||
'
|
||||
Me.lbl_filetype.AutoSize = True
|
||||
Me.lbl_filetype.Font = New System.Drawing.Font("Segoe UI", 8.25!)
|
||||
Me.lbl_filetype.Location = New System.Drawing.Point(9, 165)
|
||||
Me.lbl_filetype.Name = "lbl_filetype"
|
||||
Me.lbl_filetype.Size = New System.Drawing.Size(45, 13)
|
||||
Me.lbl_filetype.TabIndex = 1
|
||||
Me.lbl_filetype.Text = "filetype"
|
||||
'
|
||||
'lbl_filename
|
||||
'
|
||||
Me.lbl_filename.Font = New System.Drawing.Font("Segoe UI", 11.0!)
|
||||
Me.lbl_filename.Location = New System.Drawing.Point(7, 117)
|
||||
Me.lbl_filename.Name = "lbl_filename"
|
||||
Me.lbl_filename.Size = New System.Drawing.Size(181, 44)
|
||||
Me.lbl_filename.TabIndex = 1
|
||||
Me.lbl_filename.Text = "filename"
|
||||
Me.lbl_filename.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
'
|
||||
'lbl_Properties
|
||||
'
|
||||
Me.lbl_Properties.AutoSize = True
|
||||
Me.lbl_Properties.Font = New System.Drawing.Font("Segoe UI", 14.0!, System.Drawing.FontStyle.Bold)
|
||||
Me.lbl_Properties.Location = New System.Drawing.Point(7, 7)
|
||||
Me.lbl_Properties.Name = "lbl_Properties"
|
||||
Me.lbl_Properties.Size = New System.Drawing.Size(105, 25)
|
||||
Me.lbl_Properties.TabIndex = 0
|
||||
Me.lbl_Properties.Text = "Properties"
|
||||
'
|
||||
'iml_icons
|
||||
'
|
||||
Me.iml_icons.ImageStream = CType(resources.GetObject("iml_icons.ImageStream"), System.Windows.Forms.ImageListStreamer)
|
||||
Me.iml_icons.TransparentColor = System.Drawing.Color.Transparent
|
||||
Me.iml_icons.Images.SetKeyName(0, "ico_folder.bmp")
|
||||
Me.iml_icons.Images.SetKeyName(1, "ico_unknown.bmp")
|
||||
Me.iml_icons.Images.SetKeyName(2, "ico_textfile.bmp")
|
||||
Me.iml_icons.Images.SetKeyName(3, "ico_zip.png")
|
||||
Me.iml_icons.Images.SetKeyName(4, "ico_picture.bmp")
|
||||
Me.iml_icons.Images.SetKeyName(5, "ico_up.bmp")
|
||||
Me.iml_icons.Images.SetKeyName(6, "ico_url.bmp")
|
||||
Me.iml_icons.Images.SetKeyName(7, "ico_video.bmp")
|
||||
Me.iml_icons.Images.SetKeyName(8, "ico_sfp.png")
|
||||
Me.iml_icons.Images.SetKeyName(9, "ico_exe.png")
|
||||
'
|
||||
'pnl_AddressBar
|
||||
'
|
||||
Me.pnl_AddressBar.Controls.Add(Me.btn_Refresh)
|
||||
Me.pnl_AddressBar.Controls.Add(Me.btn_Up)
|
||||
Me.pnl_AddressBar.Controls.Add(Me.txt_AddressBar)
|
||||
Me.pnl_AddressBar.Controls.Add(Me.lbl_Address)
|
||||
Me.pnl_AddressBar.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.pnl_AddressBar.Location = New System.Drawing.Point(0, 97)
|
||||
Me.pnl_AddressBar.Name = "pnl_AddressBar"
|
||||
Me.pnl_AddressBar.Size = New System.Drawing.Size(800, 36)
|
||||
Me.pnl_AddressBar.TabIndex = 4
|
||||
'
|
||||
'btn_Refresh
|
||||
'
|
||||
Me.btn_Refresh.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
|
||||
Me.btn_Refresh.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_Refresh.Location = New System.Drawing.Point(5, 5)
|
||||
Me.btn_Refresh.Name = "btn_Refresh"
|
||||
Me.btn_Refresh.Size = New System.Drawing.Size(24, 24)
|
||||
Me.btn_Refresh.TabIndex = 2
|
||||
Me.btn_Refresh.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btn_Up
|
||||
'
|
||||
Me.btn_Up.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
|
||||
Me.btn_Up.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn_Up.Location = New System.Drawing.Point(28, 5)
|
||||
Me.btn_Up.Name = "btn_Up"
|
||||
Me.btn_Up.Size = New System.Drawing.Size(24, 24)
|
||||
Me.btn_Up.TabIndex = 2
|
||||
Me.btn_Up.UseVisualStyleBackColor = True
|
||||
'
|
||||
'txt_AddressBar
|
||||
'
|
||||
Me.txt_AddressBar.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.txt_AddressBar.Font = New System.Drawing.Font("Segoe UI", 10.0!)
|
||||
Me.txt_AddressBar.Location = New System.Drawing.Point(129, 5)
|
||||
Me.txt_AddressBar.Name = "txt_AddressBar"
|
||||
Me.txt_AddressBar.Size = New System.Drawing.Size(659, 25)
|
||||
Me.txt_AddressBar.TabIndex = 1
|
||||
'
|
||||
'lbl_Address
|
||||
'
|
||||
Me.lbl_Address.AutoSize = True
|
||||
Me.lbl_Address.Font = New System.Drawing.Font("Segoe UI", 10.0!)
|
||||
Me.lbl_Address.Location = New System.Drawing.Point(58, 8)
|
||||
Me.lbl_Address.Name = "lbl_Address"
|
||||
Me.lbl_Address.Size = New System.Drawing.Size(65, 19)
|
||||
Me.lbl_Address.TabIndex = 0
|
||||
Me.lbl_Address.Text = "Address :"
|
||||
'
|
||||
'lsv_Content
|
||||
'
|
||||
Me.lsv_Content.BackColor = System.Drawing.Color.White
|
||||
Me.lsv_Content.BorderStyle = System.Windows.Forms.BorderStyle.None
|
||||
Me.lsv_Content.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.lsv_Content.Font = New System.Drawing.Font("Segoe UI", 8.0!)
|
||||
Me.lsv_Content.HideSelection = False
|
||||
Me.lsv_Content.Items.AddRange(New System.Windows.Forms.ListViewItem() {ListViewItem1})
|
||||
Me.lsv_Content.LargeImageList = Me.iml_icons
|
||||
Me.lsv_Content.Location = New System.Drawing.Point(0, 133)
|
||||
Me.lsv_Content.MultiSelect = False
|
||||
Me.lsv_Content.Name = "lsv_Content"
|
||||
Me.lsv_Content.Size = New System.Drawing.Size(600, 317)
|
||||
Me.lsv_Content.SmallImageList = Me.iml_smallicons
|
||||
Me.lsv_Content.Sorting = System.Windows.Forms.SortOrder.Ascending
|
||||
Me.lsv_Content.TabIndex = 5
|
||||
Me.lsv_Content.UseCompatibleStateImageBehavior = False
|
||||
'
|
||||
'iml_smallicons
|
||||
'
|
||||
Me.iml_smallicons.ImageStream = CType(resources.GetObject("iml_smallicons.ImageStream"), System.Windows.Forms.ImageListStreamer)
|
||||
Me.iml_smallicons.TransparentColor = System.Drawing.Color.Transparent
|
||||
Me.iml_smallicons.Images.SetKeyName(0, "ico_folder.bmp")
|
||||
Me.iml_smallicons.Images.SetKeyName(1, "ico_unknown.bmp")
|
||||
Me.iml_smallicons.Images.SetKeyName(2, "ico_textfile.bmp")
|
||||
Me.iml_smallicons.Images.SetKeyName(3, "ico_zip.png")
|
||||
Me.iml_smallicons.Images.SetKeyName(4, "ico_picture.bmp")
|
||||
Me.iml_smallicons.Images.SetKeyName(5, "ico_up.bmp")
|
||||
Me.iml_smallicons.Images.SetKeyName(6, "ico_url.bmp")
|
||||
Me.iml_smallicons.Images.SetKeyName(7, "ico_video.bmp")
|
||||
Me.iml_smallicons.Images.SetKeyName(8, "ico_sfp.png")
|
||||
Me.iml_smallicons.Images.SetKeyName(9, "ico_exe.png")
|
||||
'
|
||||
'Uni_FileSkimmer
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.White
|
||||
Me.ClientSize = New System.Drawing.Size(800, 450)
|
||||
Me.Controls.Add(Me.lsv_Content)
|
||||
Me.Controls.Add(Me.pnl_Properties)
|
||||
Me.Controls.Add(Me.pnl_AddressBar)
|
||||
Me.Controls.Add(Me.pnl_JobBar)
|
||||
Me.Controls.Add(Me.msn_Options)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
|
||||
Me.MainMenuStrip = Me.msn_Options
|
||||
Me.Name = "Uni_FileSkimmer"
|
||||
Me.ShowIcon = False
|
||||
Me.ShowInTaskbar = False
|
||||
Me.Text = "Uni_FileSkimmer"
|
||||
Me.msn_Options.ResumeLayout(False)
|
||||
Me.msn_Options.PerformLayout()
|
||||
Me.pnl_JobBar.ResumeLayout(False)
|
||||
Me.pnl_JobBar.PerformLayout()
|
||||
Me.pnl_Properties.ResumeLayout(False)
|
||||
Me.pnl_Properties.PerformLayout()
|
||||
CType(Me.pic_Icon, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.pnl_AddressBar.ResumeLayout(False)
|
||||
Me.pnl_AddressBar.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents msn_Options As MenuStrip
|
||||
Friend WithEvents FileToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents AboutToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents pnl_JobBar As Panel
|
||||
Friend WithEvents pnl_Properties As Panel
|
||||
Friend WithEvents pnl_AddressBar As Panel
|
||||
Friend WithEvents lbl_Address As Label
|
||||
Friend WithEvents txt_AddressBar As TextBox
|
||||
Friend WithEvents lbl_Properties As Label
|
||||
Friend WithEvents lbl_filename As Label
|
||||
Friend WithEvents lbl_filetype As Label
|
||||
Friend WithEvents lbl_filesize As Label
|
||||
Friend WithEvents pic_Icon As PictureBox
|
||||
Friend WithEvents CloseToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents iml_icons As ImageList
|
||||
Friend WithEvents lsv_Content As ListView
|
||||
Friend WithEvents OptionsToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents PropertyPaneToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents btn_NewFolder As Button
|
||||
Friend WithEvents btn_Up As Button
|
||||
Friend WithEvents btn_Refresh As Button
|
||||
Friend WithEvents btn_Delete As Button
|
||||
Friend WithEvents btn_Rename As Button
|
||||
Friend WithEvents btn_CopyPath As Button
|
||||
Friend WithEvents btn_Compress As Button
|
||||
Friend WithEvents cmb_Layout As ComboBox
|
||||
Friend WithEvents Label1 As Label
|
||||
Friend WithEvents iml_smallicons As ImageList
|
||||
Friend WithEvents JobBarToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents Label2 As Label
|
||||
Friend WithEvents CompressToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents DeleteToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents ToolStripSeparator1 As ToolStripSeparator
|
||||
End Class
|
|
@ -0,0 +1,331 @@
|
|||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<metadata name="msn_Options.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
<metadata name="iml_icons.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>140, 17</value>
|
||||
</metadata>
|
||||
<data name="iml_icons.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>
|
||||
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
|
||||
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
|
||||
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAA+
|
||||
GAAAAk1TRnQBSQFMAgEBCgEAAbgBAAG4AQABKgEAASoBAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
|
||||
AwABqAMAAX4DAAEBAQABCAUAAbABUhgAAYACAAGAAwACgAEAAYADAAGAAQABgAEAAoACAAPAAQABwAHc
|
||||
AcABAAHwAcoBpgEAATMFAAEzAQABMwEAATMBAAIzAgADFgEAAxwBAAMiAQADKQEAA1UBAANNAQADQgEA
|
||||
AzkBAAGAAXwB/wEAAlAB/wEAAZMBAAHWAQAB/wHsAcwBAAHGAdYB7wEAAdYC5wEAAZABqQGtAgAB/wEz
|
||||
AwABZgMAAZkDAAHMAgABMwMAAjMCAAEzAWYCAAEzAZkCAAEzAcwCAAEzAf8CAAFmAwABZgEzAgACZgIA
|
||||
AWYBmQIAAWYBzAIAAWYB/wIAAZkDAAGZATMCAAGZAWYCAAKZAgABmQHMAgABmQH/AgABzAMAAcwBMwIA
|
||||
AcwBZgIAAcwBmQIAAswCAAHMAf8CAAH/AWYCAAH/AZkCAAH/AcwBAAEzAf8CAAH/AQABMwEAATMBAAFm
|
||||
AQABMwEAAZkBAAEzAQABzAEAATMBAAH/AQAB/wEzAgADMwEAAjMBZgEAAjMBmQEAAjMBzAEAAjMB/wEA
|
||||
ATMBZgIAATMBZgEzAQABMwJmAQABMwFmAZkBAAEzAWYBzAEAATMBZgH/AQABMwGZAgABMwGZATMBAAEz
|
||||
AZkBZgEAATMCmQEAATMBmQHMAQABMwGZAf8BAAEzAcwCAAEzAcwBMwEAATMBzAFmAQABMwHMAZkBAAEz
|
||||
AswBAAEzAcwB/wEAATMB/wEzAQABMwH/AWYBAAEzAf8BmQEAATMB/wHMAQABMwL/AQABZgMAAWYBAAEz
|
||||
AQABZgEAAWYBAAFmAQABmQEAAWYBAAHMAQABZgEAAf8BAAFmATMCAAFmAjMBAAFmATMBZgEAAWYBMwGZ
|
||||
AQABZgEzAcwBAAFmATMB/wEAAmYCAAJmATMBAANmAQACZgGZAQACZgHMAQABZgGZAgABZgGZATMBAAFm
|
||||
AZkBZgEAAWYCmQEAAWYBmQHMAQABZgGZAf8BAAFmAcwCAAFmAcwBMwEAAWYBzAGZAQABZgLMAQABZgHM
|
||||
Af8BAAFmAf8CAAFmAf8BMwEAAWYB/wGZAQABZgH/AcwBAAHMAQAB/wEAAf8BAAHMAQACmQIAAZkBMwGZ
|
||||
AQABmQEAAZkBAAGZAQABzAEAAZkDAAGZAjMBAAGZAQABZgEAAZkBMwHMAQABmQEAAf8BAAGZAWYCAAGZ
|
||||
AWYBMwEAAZkBMwFmAQABmQFmAZkBAAGZAWYBzAEAAZkBMwH/AQACmQEzAQACmQFmAQADmQEAApkBzAEA
|
||||
ApkB/wEAAZkBzAIAAZkBzAEzAQABZgHMAWYBAAGZAcwBmQEAAZkCzAEAAZkBzAH/AQABmQH/AgABmQH/
|
||||
ATMBAAGZAcwBZgEAAZkB/wGZAQABmQH/AcwBAAGZAv8BAAHMAwABmQEAATMBAAHMAQABZgEAAcwBAAGZ
|
||||
AQABzAEAAcwBAAGZATMCAAHMAjMBAAHMATMBZgEAAcwBMwGZAQABzAEzAcwBAAHMATMB/wEAAcwBZgIA
|
||||
AcwBZgEzAQABmQJmAQABzAFmAZkBAAHMAWYBzAEAAZkBZgH/AQABzAGZAgABzAGZATMBAAHMAZkBZgEA
|
||||
AcwCmQEAAcwBmQHMAQABzAGZAf8BAALMAgACzAEzAQACzAFmAQACzAGZAQADzAEAAswB/wEAAcwB/wIA
|
||||
AcwB/wEzAQABmQH/AWYBAAHMAf8BmQEAAcwB/wHMAQABzAL/AQABzAEAATMBAAH/AQABZgEAAf8BAAGZ
|
||||
AQABzAEzAgAB/wIzAQAB/wEzAWYBAAH/ATMBmQEAAf8BMwHMAQAB/wEzAf8BAAH/AWYCAAH/AWYBMwEA
|
||||
AcwCZgEAAf8BZgGZAQAB/wFmAcwBAAHMAWYB/wEAAf8BmQIAAf8BmQEzAQAB/wGZAWYBAAH/ApkBAAH/
|
||||
AZkBzAEAAf8BmQH/AQAB/wHMAgAB/wHMATMBAAH/AcwBZgEAAf8BzAGZAQAB/wLMAQAB/wHMAf8BAAL/
|
||||
ATMBAAHMAf8BZgEAAv8BmQEAAv8BzAEAAmYB/wEAAWYB/wFmAQABZgL/AQAB/wJmAQAB/wFmAf8BAAL/
|
||||
AWYBAAEhAQABpQEAA18BAAN3AQADhgEAA5YBAAPLAQADsgEAA9cBAAPdAQAD4wEAA+oBAAPxAQAD+AEA
|
||||
AfAB+wH/AQABpAKgAQADgAMAAf8CAAH/AwAC/wEAAf8DAAH/AQAB/wEAAv8CAAP//wD/AP8AeAAm7F0A
|
||||
HP8JAAHsJP8B7F0AHP8JAAHsJP8B7F0AHP8JAAHsJP8B7F0AHP8JAAHsJP8B7F0AHP8JAAHsJP8B7F0A
|
||||
HP8JAAHsJP8B7F0AHP8JAAHsJP8B7F0AHP8JAAHsJP8B7F0AHP8JAAHsJP8B7F0AHP8JAAHsJP8B7F0A
|
||||
HP8JAAHsJP8B7F0AHP8JAAHsJP8B7F0AHP8JAAHsJP8B7F0AHP8JAAHsJP8B7F0AHP8JAAHsJP8B7F0A
|
||||
HP8JAAHsJP8B7F0AHP8JAAHsJP8B7F0AHP8JAAHsJP8D7IAAAewk/wHsAf8B7IAAAewk/wHsAf8B7IAA
|
||||
Aewk/wHsAf8B7IAAAewk/wHsAf8B7F8AFP8NAAHsJP8B7AH/AexfAA7/BAAC/w0AAewk/wHsAf8B7F8A
|
||||
Dv8EAAL/DQAm7AH/AexfAA7/BAAC/w0AHewCAAHsAgAB7AIAAewB/wHsXwAO/wQAAv8NAB3sAgAB7AIA
|
||||
AewCAAHsAf8B7F8ADv8EAAL/DQAm7AH/AexfAA7/BAAC/xEAAewi/wHsXwAU/xEAAewi/wHsXwAU/xEA
|
||||
Aewi/wHshAAk7IQAG+wCAAHsAgAB7AIAAeyEABvsAgAB7AIAAewCAAHshAAk7P8AZAAK/5MACv8BAAr/
|
||||
AQAB7AP/jgAJ/wEADP8BAAHsAv+OAAn/AQAM/wEAAewC/zMAKOwCACjsCQAI/wEADf8BAAHsAv8zACjs
|
||||
AgAP7AoAD+wJAAf/AQAD/wEACv8BAAHsAv8zACjsAgAP7AEACP8BAA/sCQAH/wEAAv8CAAL/AQAC/wEA
|
||||
Av8BAAH/AQAB7AL/MwAo7AIAD+wBAAj/AQAP7AkACP8CAAHsAQAC/wEAAv8BAAL/AQAB/wEAAewC/wkA
|
||||
KP8CACjsAgAP7AEACP8BAA/sCQAL/wEAAv8BAAL/AQAC/wIAAewD/wkAKP8CACjsAgAP7AEACP8BAA/s
|
||||
CQAL/wEAAv8BAAL/AwAB7AX/CQAo/wIAJOwE/wIAD+wBAAj/AQAP7AkAC/8BAAL/AwAB7Aj/CQAo/wIA
|
||||
IewH/wIAD+wBAAj/AQAP7AkAC/8BAAL/AQAB7Ar/CQAP/wEAGP8CAAX/GuwJ/wIAD+wBAAj/AQAP7AkA
|
||||
C/8BAAL/AQAB7Ar/CQAP/wIAF/8CAAj/FuwF/wHsBP8CAA/sAQAI/wEAD+wJAAv/AQAC/wEAAewK/wkA
|
||||
D/8DABb/AgAP/wvsCf8C7AP/AgAP7AEACP8BAA/sCQAL/wEAAv8BAAHsCv8JAA//BAAV/wIAHv8B7AX/
|
||||
AewD/wIAD+wBAAj/AQAP7AkAAv8J/AEAAv8BAAHsCv8JAA//BQAU/wIAHv8C7AT/AuwC/wIAD+wBAAj/
|
||||
AQAP7AkADP8CAAHsC/8JAA//BgAT/wIAF/8D7AX/AuwE/wHsAv8CAA/sAQAI/wEAD+wJAAP/BPwC/wH8
|
||||
BP8B/Av/CQAP/wcAEv8CABn/AuwF/wHsBP8B7AL/AgAP7AEACP8BAA/sCQAC/wH8BP8B/AH/AfwE/wH8
|
||||
C/8JAA//CAAR/wIAGv8B7AX/AewE/wHsAv8CAA/sAQAI/wEAD+wJAAL/AfwE/wH8Af8B/AT/AfwL/wkA
|
||||
D/8JABD/AgAa/wLsBP8B7AT/AuwB/wIAD+wBAAj/AQAP7AkAAv8B/AT/AfwB/wL8A/8B/Av/CQAP/woA
|
||||
D/8CABP/BOwE/wLsCf8B7AH/AgAK7AYACP8HAAnsCQAC/wH8BP8B/AH/AfwB/wL8Af8B/Av/CQAP/woA
|
||||
D/8CABb/AuwF/wHsCv8CAArsAQAT/wEACewJAAL/AfwE/wH8Bv8B/Av/CQAP/wkAEP8CABf/AewJ/wbs
|
||||
Af8CAAvsAQAR/wEACuwJAAL/AfwE/wH8Bv8B/Av/CQAP/wgAEf8CABf/AuwG/wnsAgAM7AEAD/8BAAvs
|
||||
CQAC/wH8BP8B/Ab/AfwL/wkAD/8HABL/AgAQ/wHsB/8C7AT/CuwCAA3sAQAN/wEADOwJAAL/AfwE/wH8
|
||||
Bv8B/Av/CQAP/wYAE/8CABD/A+wG/wLsAv8L7AIADuwBAAv/AQAN7AkAGv8JAA//BQAU/wIAEv8D7Af/
|
||||
DOwCAA/sAQAJ/wEADuwJABr/CQAP/wQAFf8CABT/AuwG/wzsAgAQ7AEAB/8BAA/sCQAa/wkAD/8DABb/
|
||||
AgAV/wLsBP8N7AIAEewBAAX/AQAQ7AkAGv8JAA//AgAX/wIADf8E7AX/A+wC/w3sAgAS7AEAA/8BABHs
|
||||
CQAa/wkAD/8BABj/AgAQ/wLsCf8N7AIAE+wBAAH/AQAS7AkAGv8JACj/AgAR/wHsCf8N7AIAFOwBABPs
|
||||
CQAa/wkAKP8CABH/COwC/w3sAgAo7AkAGv8JACj/AgAb/w3sAgAo7AkAGv8JACj/AgAc/wzsMwAU/zkA
|
||||
HP8M7AIAD+wiABT/AQAC/wLsXgAO7CMAFP8BAAH/AuyQABT/AQAC7JEAFP8BAAHskgAU//8AuAAh/wkA
|
||||
If9dACH/CQAh/10AIf8JACH/LwAo7AYAIf8JAAT/GuwD/wUAKOwCACjsBgAh/wkAIf8FACjsAgAo7AYA
|
||||
Dv8E7A//CQAh/wUAKOwCACjsBgAO/wTsD/8JAAP/GuwE/wUAKOwCACjsBgAO/wTsD/8JACH/BQAo7AIA
|
||||
KOwGAA7/BOwP/wkAIf8FACjsAgAo7AYAIf8JAAT/GuwD/wUAKOwCACjsBgAh/wkAIf8FACjsAgAo7AYA
|
||||
If8JACH/BQAo7AIAKOwGAA7/AZID7A//CQAD/xrsBP8FACjsAgAo7AYADv8BkgPsD/8JACH/BQAo7AIA
|
||||
KOwGAA7/AZID7AHyDv8JACH/BQAo7AIAKOwGAA7/AQcD7AG8Dv8JAAT/GuwD/wUAKOwCACjsBgAO/wHx
|
||||
BOwO/wkAIf8FACjsAgAo7AYAD/8E7AHvDf8JACH/BQAo7AIAKOwGAA//AfEE7AHvDP8JAAP/GuwE/wYA
|
||||
A+wBAAPsAQAD7AEAA+wBAAPsAQAD7AEAA+wBAAPsAQAD7AEAA+wCACjsBgAQ/wG8BOwB7wH0Cv8JACH/
|
||||
BQAB7AEAAewBAAHsAQAB7AEAAewBAAHsAQAB7AEAAewBAAHsAQAB7AEAAewBAAHsAQAB7AEAAewBAAHs
|
||||
AQAB7AEAAewBAAHsAQAB7AEAAewDACjsBgAR/wG8BOwB7QH0Cf8JACH/BQAC7AEAA+wBAAPsAQAD7AEA
|
||||
A+wBAAPsAQAD7AEAA+wBAAPsAQAD7AEAAewCACjsBgAS/wHwBOwBkgn/CQAE/xrsA/8FACjsAgAo7AYA
|
||||
E/8B8gTsAe8I/wkAIf8FACjsAgAo7AYAFP8B8gTsAfIH/wkAIf8FACjsAgAo7AYAFf8BvAPsAe8H/wkA
|
||||
A/8a7AT/BQAo7AIAKOwGABb/BOwH/wkAIf8FACjsAgAo7AYABv8B8wHvAZIB7AHvC/8BkgPsB/8JACH/
|
||||
BQAo7AIAKOwGAAb/AfQD7AHtC/8B7QPsB/8JAAT/GuwD/wUAKOwCACjsBgAH/wTsAfIJ/wHzA+wB7Qf/
|
||||
CQAh/wUAKOwCACjsBgAH/wEHA+wB9wn/AfcD7AHvB/8JACH/BQAo7AIAKOwGAAf/AfQE7AHvB/8B7wTs
|
||||
AfMH/wkAA/8a7AT/BQAo7AIAKOwGAAj/AQcE7AGSAfAB9AH/AfQB8AGSBOwBBwj/CQAh/wUAKOwCACjs
|
||||
BgAJ/wHvDewB7wn/CQAh/wUAKOwCACjsBgAK/wHwC+wB8Ar/CQAE/xrsA/8FACjsMAAL/wH0AbwB9wTs
|
||||
Ae0B7wG8DP8JACH/LwAP7B8AIf8JACH/BQAP7BsADuwgACH/CQAD/xrsBP8FAA7sSgAh/wkAIf9dACH/
|
||||
CQAh/10AIf8JACH/1gABQgFNAT4HAAE+AwABKAMAAagDAAF+AwABAQEAAQEFAAHQAQsWAAP/AQAK/wHw
|
||||
DQAK/wHwDQAB8AMAAQMF/wHwDQAB8AMAAQMF/wHwDQAB8AMAAQMF/wHwDQAB8AMAAQMB8AQAATANAAHw
|
||||
AwABAwHwBAABMA0AAfADAAEDAfAEAAEwDQAB8AMAAQMB8AQAATANAAHwAwABAwHwBAABMA0AAfADAAED
|
||||
AfAEAAEwDQAB8AMAAQMB8AQAATANAAHwAwABAwHwBAABMA0AAfADAAEDAfAEAAEwDQAB8AMAAQMB8AQA
|
||||
ATANAAHwAwABAwHwBAABMA0AAfADAAEDAfAEAAEwDQAB8AMAAQMB8AQAATANAAHwAwABAwHwBAABMA0A
|
||||
AfADAAEDAfAEAAEwDQAB8AMAAQMB8AQAATANAAHwAwABAwHwBAABMA0AAfADAAEDAfAEAAEwDQAB8AMA
|
||||
AQMB8BIAAfADAAEDAfASAAHwAwABAwHwEgAB8AMAAQMB8BIAAfADAAEDAfASAAHwAwABAwHwEgAB8AMA
|
||||
AQMB8BIAAfADAAEDAfASAAHwAwABAwHwEgAB8AMAAQMB8BIAAfADAAEHAfASAAHwAwABDwH/EgAB8AMA
|
||||
AR8B/xIAAfADAAEfAf8SAAb/EgAG/xIABv8SAAb/EgAK/wHwDQAL/wHgAgABAQb/AwAL/wHgAgABAQb/
|
||||
AwAL/wHgAgABAQb/DQABDwHgAgABAQb/DQABDwHgAgABAQb/DQABDwHgAgABAQb/DQABDwHgAgABAQH8
|
||||
EgABDwHgAgABAQH8EgABDwHgAgABAQH8EgABDwHgAgABAQH8EgABDwHgAgABAQH8EgABDwHgAgABAQH8
|
||||
EgABDwHgAgABAQH8EgABDwHgAgABAQH8EgABDwHgAgABAQH8EgABDwHgAgABAQH8EgABDwHgAgABAQH8
|
||||
EgABDwHgAgABAQH8EgABDwHgAgABAQH8EgABDwHgAgABAQH8EgABDwHgAgABAQH8EgABDwHgAgABAQH8
|
||||
EgABDwHgAgABAQH8EgABDwHgAgABAQH8EgABDwHgAgABAQH8EgABDwHgAgABAQH8EgABDwHgAgABAQH8
|
||||
EgABDwHgAgABAQH8EgABDwHgAgABAQH8EgABDwHgAgABAQH8EgABDwHgAgABAQH8EgABDwHgAgABAQH8
|
||||
EgABDwHgAgABAQH8EgABDwHgAgABAQH8EgABDwHgAgABAQH8EgABDwHgAgABAQH8DwABHwP/AeACAAED
|
||||
Bv8KAAE/A/8B4AIAAQcG/wMABf8BwAEAAX8D/wHgAgABDwb/AwAL/wHgAgABHwb/AwAL/wHgAgABPwb/
|
||||
AwAL/wHgAgABfwb/AwAF/wH8BAABfwQAAR8F/wMABf8B/AQAAX8EAAEfBf8DAAX/AfwEAAF/BAABHwX/
|
||||
CAABPAQAAX8EAAEcDQABPAQAAX8EAAEcDQABPAQAAX8EAAEcDQABPAQAAX8EAAEcDQABPAQAAX8EAAEc
|
||||
DQABPAQAAX8EAAEcDQABPAQAAX8EAAEcDQABPAQAAX8EAAEcDQABPAQAAX8EAAEcDQABPAQAAX8EAAEc
|
||||
DQABPAQAAX8EAAEcDQABPAQAAX8EAAEcDQABPAQAAX8EAAEcDQABPAQAAX8EAAEcDQABPAQAAX8EAAEc
|
||||
DQABPAQAAX8EAAEcDQABPAQAAX8EAAEcDQABPAQAAX8EAAEcDQABPAQAAX8EAAEcDQABPAQAAX8EAAEc
|
||||
DQABPAQAAX8EAAEcDQABPAQAAX8EAAEcDQABPAQAAX8EAAEcDQABPAQAAX8EAAEcDQABPAQAAX8EAAEc
|
||||
DQABPAQAAX8EAAEcDQABPAQAAX8EAAEcDQABPAQAAX8EAAEcDQABPAQAAX8EAAEcDQABPAQAAX8EAAEc
|
||||
DQABPAQAAX8EAAEcDQABPAQAAX8EAAEcDQABPAQAAX8EAAEcCgABfwL/AfwEAAF/BAABHAEAAQED/wUA
|
||||
A/8B/AQAAX8EAAEcAQABAwP/BAABAQP/AfwEAAF/BAABHAEAAQcD/wMABf8B/AQAAX8EAAEfBf8DAAX/
|
||||
AfwEAAF/BAABHwX/AwAF/wH8BAABfwQAAR8F/wMACw==
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="iml_smallicons.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>250, 17</value>
|
||||
</metadata>
|
||||
<data name="iml_smallicons.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>
|
||||
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
|
||||
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
|
||||
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAB2
|
||||
EwAAAk1TRnQBSQFMAgEBCgEAAXABAAFwAQABGAEAARgBAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
|
||||
AwABYAMAAUgDAAEBAQABCAYAARsYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
|
||||
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
|
||||
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
|
||||
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
|
||||
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
|
||||
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
|
||||
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
|
||||
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
|
||||
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
|
||||
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
|
||||
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
|
||||
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
|
||||
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
|
||||
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
|
||||
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
|
||||
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
|
||||
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
|
||||
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
|
||||
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
|
||||
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
|
||||
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
|
||||
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
|
||||
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
|
||||
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
|
||||
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
|
||||
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
|
||||
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
|
||||
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD/2MAAe9fAAHvFgAB9BXz
|
||||
MwAB7wEAEP8FAAHvFP8BBzMAAe8BABD/BQAB7xT/AQczAAHvAQAQ/wUAAe8U/wEHMwAB7wEAEP8FAAHv
|
||||
FP8BBzMAAe8BABD/BQAB7xT/AQczAAHvAQAQ/wUAAe8U/wEHMwAB7wEAEP8FAAHvFP8BBzMAAe8BABD/
|
||||
BQAB7xT/AQczAAHvAQAQ/wUAAe8U/wEHMwAB7wEAEP8FAAHvFP8BBzMAAe8BABDsBQAB7xT/AQcB7zIA
|
||||
Ae8WAAHvFP8BBwHyMgAB7xYAAe8U/wEHAfIyAAHvAwAB7Af/AfcCFAH/BwAB7xT/AQcB8jIAAe8DAAHs
|
||||
B/8B7AIAAf8HAAHvEOwBFAHrARQBEgFtAfIyAAHvAwAB7Af/AewCAAH/AwABEgMAAe8Q7AEQAW0BEAEV
|
||||
ARIB8jIAAe8DAAHsB/8B7AIAAf8JAAHzE/8B8jIAAe8DAAHsC/8JAAHzE/8B8ksAAfMP7AEUAewBFAFt
|
||||
ARJLAAHzD+wBEAHsARABEgEVxQAFBwFtBv8BEwEHAewcADDvBQAF/wHsBv8BFAIHHQAW7AFtAQAI7AZt
|
||||
COwBbQUABP8BbQH/AbwF/wEUAgcdABbsAW0BAAjsARAE/wnsAW0FAAT/AQcB7AEUAf8BBwHsAf8BAAEU
|
||||
AgcdABbsAW0BAAjsARAE/wnsAW0FAAT/AbwB8AEUAf8BBwHsAf8BAAHqAfQBBwUAFv8BBwEAFOwB7wEH
|
||||
Ae0BAAjsARAE/wnsAW0FAAb/ARQB/wJtAewBBwL/AQcFABb/AQcBAAL3AZIO7AHtAQcD/wEHAQAI7AEQ
|
||||
BP8J7AFtBQAG/wEUAf8BbQX/AQcFAAj/ARQB8Qz/AQcBAAT/AfcM7AP/AfIB/wEHAQAI7AEQBP8J7AFt
|
||||
BQAG/wEUAf8BbQX/AQcFAAj/ARQBAAz/AQcBAAj/AfMF8gHzAv8B8AL/AZIB/wEHAQAI7AEQBP8J7AFt
|
||||
BQAB/wXIARQB/wFtBf8BBwUACP8BFAEAAQ4L/wEHAQAN/wEHAfAC/wH3AfAB/wHwAgcBAAjsARAE/wns
|
||||
AW0FAAH/Ad0C1gH/Ad0B8QHsAd0F/wEHBQAI/wEUAwAB8Qn/AQcBAA7/AZID/wH3Av8CBwEACOwBEAT/
|
||||
CewBbQUAAf8B1gL/Ad0B1gL/Ad0F/wEHBQAI/wEUBAAB8Qj/AQcBAA7/AfIB7AL/AfcC/wHsAQcBAAjs
|
||||
ARAE/wnsAW0FAAH/AdYC/wHdAfwC/wHdBf8BBwUACP8BFAUACP8BBwEAC/8B8gGSAfAB/wHyAe8E/wH0
|
||||
AQcBAAXsARQDBwT/AfEDBwEUBOwBbQUAAf8B1gL/Ad0BGQHdAf8B3QX/AQcFAAj/ARQEAAFtCP8BBwEA
|
||||
Df8B9wP/AfIB7wPsAe0BAAbsARIJ/wESBewBbQUAAf8B1gL/Ad0D/wHdBf8BBwUACP8BFAMAAW0J/wEH
|
||||
AQAJ/wHvAfMC/wHwAZIB/wHzBewBbQEAB+wBEAHzBf8B8wEQBuwBbQUAAf8B1gL/Ad0D/wHdBf8BBwUA
|
||||
CP8BFAIAARQK/wEHAQAK/wLsBP8G7AFtAQAI7AEQBf8BEAfsAW0FAA7/AQcFAAj/ARQBAAEUC/8BBwEA
|
||||
C/8B8gGSAv8B9wbsAW0BAAnsARID/wESCOwBbQUADv8BBwUACP8BFAFtDP8BBwEAB/8CBwH3Av8B8AEH
|
||||
Af8H7AFtAQAK7AESAf8BEgnsAW0FAA7/AQcFAAj/AfcN/wEHAQAJ/wEHBPIB/wfsAW0BAAvsARAK7AFt
|
||||
BQAO/wEHBQAW/wEHAQAP/wfsAW0BABbsAW0FAA7/AQcFABb/AQcBABD/BuwBbQEACG0BDw7yBQAL/wEA
|
||||
AQcBbQESBAAY8hjvAQAIFAH0EwAL/wEAAe0B7FIAC/8BAAFtmAAB7xMHAe8DAAHvEwcB7xkAGO8CAAHv
|
||||
E/8B7wMAAe8T/wHvAQAY7wEAFuwBbQIAAe8T/wHvAwAB7wL/AQcO9wL/Ae8CABbsAW0BABbsAW0CAAHv
|
||||
CP8C7AHyCP8B7wMAAe8T/wHvAgAW7AFtAQAW7AFtAgAB7wj/AuwB8gj/Ae8DAAHvAv8O8gHzAv8B7wIA
|
||||
FuwBbQEAFuwBbQIAAe8I/wIHAfQI/wHvAwAB7wL/AfAOBwL/Ae8CABbsAW0BABbsAW0CAAHvE/8B7wMA
|
||||
Ae8T/wHvAgAW7AFtAQAW7AFtAgAB7wj/Ae0B7AHyCP8B7wMAAe8C/w7sAfcC/wHvAgAW7AFtAQAW7AFt
|
||||
AgAB7wj/Ae0B7AHwCP8B7wMAAe8T/wHvAgAW7AFtAQAW7AFtAgAB7wj/AQcB7AH3CP8B7wMAAe8C/wHw
|
||||
DgcC/wHvAgAW7AFtAQAW7AFtAgAB7wj/AfIC7AG8B/8B7wMAAe8C/w7yAfMC/wHvAgAC7AFtAewBbQTs
|
||||
AesB7AFtAewB6wTsAW0B7AFtAewBbQEAFuwBbQIAAe8J/wG8AuwBBwb/Ae8DAAHvE/8B7wIAARABFAFt
|
||||
AewBbQEUARABAAEQARQBbQHsAW0BFAEQAQABEAEUAW0B7AFtARQCABbsAW0CAAHvCv8BvALsAe8F/wHv
|
||||
AwAB7wL/AQcO9wL/Ae8CAAHsAesB7AFtAewB6wTsAW0B7AFtBOwB6wHsAW0B7AHrAW0BABbsAW0CAAHv
|
||||
C/8B8ALsAfEE/wHvAwAB7xP/Ae8CABbsAW0BABbsAW0CAAHvDP8BBwHsAZIE/wHvAwAB7wL/DvcBBwL/
|
||||
Ae8CABbsAW0BABbsAW0CAAHvA/8B9AHvAewB8wX/AfIC7AT/Ae8DAAHvE/8B7wIAFuwBbQEAFuwBbQIA
|
||||
Ae8E/wLsAfAF/wHwAuwE/wHvAwAB7wL/AfMO8gL/Ae8CABbsAW0BABbsAW0CAAHvBP8BBwHsAe0B8wP/
|
||||
AfMB7QHsAQcE/wHvAwAB7wL/DgcB8AL/Ae8CABbsAW0BABbsAW0CAAHvBP8B9AHtAuwBvAHyAbwC7AHt
|
||||
AfQE/wHvAwAB7xP/Ae8CABbsAW0BABbsAW0CAAHvBv8BkgXsAZIG/wHvAwAB7wL/AfcO7AL/Ae8CABbs
|
||||
AW0BAAhtAQ8O8gIAAe8H/wHzA/IB8wf/Ae8DAAHvE/8B7wIACG0BDw7yAQAIFAH0EAAB7xP/Ae8DAAHv
|
||||
Av8OBwHwAv8B7wIACBQB9CgAAe8T/wHvAwAB7xP/Ae8zAAHvEwAB7wMAAe8TAAHvGQABQgFNAT4HAAE+
|
||||
AwABKAMAAWADAAFIAwABAQEAAQEFAAFgAQMWAAP/AQAG/wYAAcABAAEDA/8GAAHAAQABAwGAAQABAQYA
|
||||
AcABAAEDAYABAAEBBgABwAEAAQMBgAEAAQEGAAHAAQABAwGAAQABAQYAAcABAAEDAYABAAEBBgABwAEA
|
||||
AQMBgAEAAQEGAAHAAQABAwGAAQABAQYAAcABAAEDAYABAAEBBgABwAEAAQMBgAEAAQEGAAHAAQABAwGA
|
||||
AQABAQYAAcABAAEDAYABAAEBBgABwAEAAQMBgAgAAcABAAEDAYAIAAHAAQABAwGACAABwAEAAQMBgAgA
|
||||
AcABAAEDAYAIAAHAAQABAwGACAABwAEAAQcB4AgAAcABAAEPAeAIAAP/AeAIAAP/AeAIAAb/BgAG/wHw
|
||||
AQABDwP/BgAB8AEAAQ8D/wYAAfABAAEPA/8GAAHwAQABDwkAAfABAAEPCQAB8AEAAQ8JAAHwAQABDwkA
|
||||
AfABAAEPCQAB8AEAAQ8JAAHwAQABDwkAAfABAAEPCQAB8AEAAQ8JAAHwAQABDwkAAfABAAEPCQAB8AEA
|
||||
AQ8JAAHwAQABDwkAAfABAAEPCQAB8AEAAQ8JAAHwAQABDwkAAfABAAEPCQAB8AEAAQ8HAAE/Af8B8AEA
|
||||
AR8J/wHwAQABPwn/AfABAAF/Bv8BwAEAAQEBwAEAAQED/wMAAcABAAEBAcABAAEBBgABwAEAAQEBwAEA
|
||||
AQEGAAHAAQABAQHAAQABAQYAAcABAAEBAcABAAEBBgABwAEAAQEBwAEAAQEGAAHAAQABAQHAAQABAQYA
|
||||
AcABAAEBAcABAAEBBgABwAEAAQEBwAEAAQEGAAHAAQABAQHAAQABAQYAAcABAAEBAcABAAEBBgABwAEA
|
||||
AQEBwAEAAQEGAAHAAQABAQHAAQABAQYAAcABAAEBAcABAAEBBgABwAEAAQEBwAEAAQEGAAHAAQABAQHA
|
||||
AQABAQYAAcABAAEBAcABAAEBBgABwAEAAQEBwAEAAQEGAAHAAQABAQHAAQABAQYAAcABAAEBAcABAAEB
|
||||
BgABwAEAAQEBwAEAAQEEAAE/Af8BwAEAAQEBwAEAAQEBAAE/BP8BwAEAAQEBwAEAAQEG/wHAAQABAQHA
|
||||
AQABAQP/Cw==
|
||||
</value>
|
||||
</data>
|
||||
</root>
|
|
@ -0,0 +1,466 @@
|
|||
Imports System.IO
|
||||
Imports System.IO.Compression
|
||||
|
||||
Public Class Uni_FileSkimmer
|
||||
Public CurrentDir As String
|
||||
Dim FileType As Integer
|
||||
Dim ItemsDeleted As Integer
|
||||
|
||||
Private Sub Uni_FileSkimmer_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
CheckAvailable()
|
||||
'End thingy
|
||||
CurrentDir = Strings.OnceInfo(1)
|
||||
txt_AddressBar.Text = CurrentDir.Replace(Strings.OnceInfo(1), "!\")
|
||||
ShowContent()
|
||||
End Sub
|
||||
|
||||
Private Sub CheckAvailable()
|
||||
If Strings.AvailableFeature(47) = 1 Then
|
||||
btn_Delete.Image = My.Resources.FileSkimmerFunctionIcons.largeico_deletefile
|
||||
DeleteToolStripMenuItem.Visible = True
|
||||
Else
|
||||
btn_Delete.Image = My.Resources.FileSkimmerFunctionIcons.largeico_unknown
|
||||
btn_Delete.Text = "???"
|
||||
DeleteToolStripMenuItem.Visible = False
|
||||
End If
|
||||
If Strings.AvailableFeature(48) = 1 Then
|
||||
btn_Compress.Image = My.Resources.FileSkimmerFunctionIcons.largeico_compress
|
||||
CompressToolStripMenuItem.Visible = True
|
||||
Else
|
||||
btn_Compress.Image = My.Resources.FileSkimmerFunctionIcons.largeico_unknown
|
||||
btn_Compress.Text = "???"
|
||||
CompressToolStripMenuItem.Visible = False
|
||||
End If
|
||||
If Strings.AvailableFeature(49) = 1 Then
|
||||
PropertyPaneToolStripMenuItem.Checked = True
|
||||
pnl_Properties.Visible = True
|
||||
Else
|
||||
PropertyPaneToolStripMenuItem.Checked = False
|
||||
PropertyPaneToolStripMenuItem.Visible = False
|
||||
pnl_Properties.Visible = False
|
||||
End If
|
||||
If Strings.AvailableFeature(50) = 1 Then
|
||||
JobBarToolStripMenuItem.Checked = True
|
||||
pnl_JobBar.Visible = True
|
||||
Else
|
||||
JobBarToolStripMenuItem.Checked = False
|
||||
JobBarToolStripMenuItem.Visible = False
|
||||
pnl_JobBar.Visible = False
|
||||
End If
|
||||
'Sets icons for buttons in here, for some reason
|
||||
btn_NewFolder.Image = My.Resources.FileSkimmerFunctionIcons.largeico_unknown
|
||||
btn_NewFolder.Text = "???"
|
||||
btn_Rename.Image = My.Resources.FileSkimmerFunctionIcons.largeico_unknown
|
||||
btn_Rename.Text = "???"
|
||||
btn_CopyPath.Image = My.Resources.FileSkimmerFunctionIcons.largeico_unknown
|
||||
btn_CopyPath.Text = "???"
|
||||
If Strings.AvailableFeature(51) = 1 Then
|
||||
Else
|
||||
cmb_Layout.Items.Remove("Small Icons")
|
||||
End If
|
||||
If Strings.AvailableFeature(52) = 1 Then
|
||||
Else
|
||||
cmb_Layout.Items.Remove("List")
|
||||
End If
|
||||
btn_Up.BackgroundImage = My.Resources.FileSkimmerFunctionIcons.ico_up1
|
||||
btn_Refresh.BackgroundImage = My.Resources.FileSkimmerFunctionIcons.ico_refresh
|
||||
End Sub
|
||||
|
||||
Private Sub PropertyPaneToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles PropertyPaneToolStripMenuItem.Click
|
||||
If PropertyPaneToolStripMenuItem.CheckState = False Then
|
||||
pnl_Properties.Visible = False
|
||||
Else
|
||||
pnl_Properties.Visible = True
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub JobBarToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles JobBarToolStripMenuItem.Click
|
||||
If JobBarToolStripMenuItem.CheckState = False Then
|
||||
pnl_JobBar.Visible = False
|
||||
Else
|
||||
pnl_JobBar.Visible = True
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub CompressToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles CompressToolStripMenuItem.Click
|
||||
If Strings.AvailableFeature(48) = 1 Then
|
||||
FS_Compression()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub DeleteToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DeleteToolStripMenuItem.Click
|
||||
FS_Delete()
|
||||
End Sub
|
||||
|
||||
Private Sub CloseToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles CloseToolStripMenuItem.Click
|
||||
Dispose()
|
||||
End Sub
|
||||
|
||||
Private Sub btn_Delete_Click(sender As Object, e As EventArgs) Handles btn_Delete.Click
|
||||
FS_Delete()
|
||||
End Sub
|
||||
|
||||
Private Sub btn_Compress_Click(sender As Object, e As EventArgs) Handles btn_Compress.Click
|
||||
If Strings.AvailableFeature(48) = 1 Then
|
||||
FS_Compression()
|
||||
Else
|
||||
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub cmb_Layout_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmb_Layout.SelectedIndexChanged
|
||||
Select Case cmb_Layout.SelectedItem.ToString
|
||||
Case "Large Icons"
|
||||
lsv_Content.View = View.LargeIcon
|
||||
Case "Small Icons"
|
||||
lsv_Content.View = View.SmallIcon
|
||||
Case "List"
|
||||
lsv_Content.View = View.List
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
Private Sub cmb_Layout_DrawItem(ByVal sender As Object, ByVal e As System.Windows.Forms.DrawItemEventArgs) Handles cmb_Layout.DrawItem
|
||||
e.DrawBackground()
|
||||
If (e.State And DrawItemState.Selected) = DrawItemState.Selected Then
|
||||
e.Graphics.FillRectangle(Brushes.Black, e.Bounds)
|
||||
End If
|
||||
Dim sf As New StringFormat
|
||||
Using b As New SolidBrush(e.ForeColor)
|
||||
e.Graphics.DrawString(cmb_Layout.GetItemText(cmb_Layout.Items(e.Index)), e.Font, b, e.Bounds, sf)
|
||||
End Using
|
||||
e.DrawFocusRectangle()
|
||||
End Sub
|
||||
|
||||
Private Sub btn_Up_Click(sender As Object, e As EventArgs) Handles btn_Up.Click
|
||||
Try
|
||||
If txt_AddressBar.Text = "!\" Or txt_AddressBar.Text = "!" Then
|
||||
|
||||
Else
|
||||
Dim directoryInfo As System.IO.DirectoryInfo
|
||||
directoryInfo = System.IO.Directory.GetParent(CurrentDir.Replace("!\", Strings.OnceInfo(1) & "\"))
|
||||
|
||||
'Dim endloop As Boolean = False
|
||||
'lbllocation.Text = lbllocation.Text.Substring(0, lbllocation.Text.Length - 1)
|
||||
|
||||
'While endloop = False
|
||||
' Try
|
||||
' If lbllocation.Text.Substring(lbllocation.Text.Length - 1) = "/" Then
|
||||
' endloop = True
|
||||
' Else
|
||||
' lbllocation.Text = lbllocation.Text.Substring(0, lbllocation.Text.Length - 1)
|
||||
' End If
|
||||
' Catch
|
||||
' infobox.title = "File Skimmer - Error!"
|
||||
' infobox.textinfo = "Unable to move into a higher directory due to error reading the requested folder on the drive." & Environment.NewLine & Environment.NewLine & "An error occured going up"
|
||||
' infobox.Show()
|
||||
' End Try
|
||||
'End While
|
||||
Dim DirFullName As String = directoryInfo.FullName
|
||||
txt_AddressBar.Text = DirFullName.Replace(Strings.OnceInfo(1), "!")
|
||||
CurrentDir = DirFullName
|
||||
If txt_AddressBar.Text = "!" Then
|
||||
txt_AddressBar.Text = txt_AddressBar.Text & "\"
|
||||
End If
|
||||
ShowContent()
|
||||
End If
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub btn_Refresh_Click(sender As Object, e As EventArgs) Handles btn_Refresh.Click
|
||||
ShowContent()
|
||||
End Sub
|
||||
|
||||
Private Sub txt_AddressBar_TextChanged(sender As Object, e As KeyEventArgs) Handles txt_AddressBar.KeyDown
|
||||
If e.KeyCode = Keys.Enter Then
|
||||
If txt_AddressBar.Text Like "!*" Then
|
||||
Dim BackupCurrentDir As String = txt_AddressBar.Text
|
||||
BackupCurrentDir = BackupCurrentDir.Replace("!", Strings.OnceInfo(1))
|
||||
If BackupCurrentDir Like "*.*" Then
|
||||
|
||||
Else
|
||||
If Directory.Exists(BackupCurrentDir) = True Then
|
||||
txt_AddressBar.Text = BackupCurrentDir.Replace(Strings.OnceInfo(1), "!")
|
||||
CurrentDir = BackupCurrentDir
|
||||
ShowContent()
|
||||
End If
|
||||
End If
|
||||
Else
|
||||
txt_AddressBar.Text = "!\"
|
||||
CurrentDir = Strings.OnceInfo(1)
|
||||
ShowContent()
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub lsv_Content_MouseDoubleClick(sender As Object, e As MouseEventArgs) Handles lsv_Content.MouseDoubleClick
|
||||
If txt_AddressBar.Text Like "*\" Then
|
||||
Else
|
||||
txt_AddressBar.Text = txt_AddressBar.Text + "\"
|
||||
End If
|
||||
ExecuteFile(txt_AddressBar.Text + lsv_Content.SelectedItems(0).Text)
|
||||
End Sub
|
||||
|
||||
Private Sub lsv_Content_MouseClick(sender As Object, e As MouseEventArgs) Handles lsv_Content.MouseClick
|
||||
Select Case e.Button
|
||||
Case MouseButtons.Left
|
||||
Dim IsCompressed As Boolean = False
|
||||
If lsv_Content.SelectedItems(0).Text Like "*.zip" Then
|
||||
IsCompressed = True
|
||||
End If
|
||||
If pnl_Properties.Visible = True Then
|
||||
Dim IsFile As Boolean = False
|
||||
If lsv_Content.SelectedItems(0).Text = Nothing Then
|
||||
pic_Icon.Image = Nothing
|
||||
lbl_filename.Visible = False
|
||||
lbl_filetype.Visible = False
|
||||
lbl_filesize.Visible = False
|
||||
Else
|
||||
lbl_filename.Visible = True
|
||||
lbl_filetype.Visible = True
|
||||
If lsv_Content.SelectedItems(0).Text Like "*.txt" Then
|
||||
pic_Icon.Image = My.Resources.FileSkimmerFileIcons.ico_textfile
|
||||
lbl_filetype.Text = "Text File"
|
||||
IsFile = True
|
||||
ElseIf lsv_Content.SelectedItems(0).Text Like "*.zip" Then
|
||||
pic_Icon.Image = My.Resources.FileSkimmerFileIcons.ico_zip
|
||||
lbl_filetype.Text = "Compressed ZIP File"
|
||||
IsFile = True
|
||||
ElseIf lsv_Content.SelectedItems(0).Text Like "*.*" Then
|
||||
pic_Icon.Image = My.Resources.FileSkimmerFileIcons.ico_unknown
|
||||
lbl_filetype.Text = "Unknown File Type"
|
||||
IsFile = True
|
||||
ElseIf lsv_Content.SelectedItems(0).Text = "???" Then
|
||||
pic_Icon.Image = My.Resources.FileSkimmerFileIcons.ico_unknown
|
||||
lbl_filetype.Text = "Unknown Type"
|
||||
End If
|
||||
If IsFile = True Then
|
||||
lbl_filesize.Visible = True
|
||||
Dim filinf As New IO.FileInfo(CurrentDir & "\" & lsv_Content.SelectedItems(0).Text)
|
||||
Dim filsize As Long = filinf.Length / 1024
|
||||
Dim thesize As Integer = 1
|
||||
Do
|
||||
If filsize >= 1024 Then
|
||||
filsize = filsize / 1024
|
||||
thesize = thesize + 1
|
||||
Else
|
||||
Exit Do
|
||||
End If
|
||||
Loop
|
||||
Select Case thesize
|
||||
Case 1
|
||||
lbl_filesize.Text = filsize & " KB"
|
||||
Case 2
|
||||
lbl_filesize.Text = filsize & " MB"
|
||||
Case 3
|
||||
lbl_filesize.Text = filsize & " GB"
|
||||
End Select
|
||||
Else
|
||||
pic_Icon.Image = My.Resources.FileSkimmerFileIcons.ico_folder
|
||||
lbl_filetype.Text = "Folder"
|
||||
lbl_filesize.Visible = False
|
||||
End If
|
||||
lbl_filename.Text = lsv_Content.SelectedItems(0).Text
|
||||
End If
|
||||
End If
|
||||
If Strings.AvailableFeature(48) = 1 Then
|
||||
If IsCompressed = True Then
|
||||
btn_Compress.Image = My.Resources.FileSkimmerFunctionIcons.largeico_uncompress
|
||||
btn_Compress.Text = "Extract"
|
||||
CompressToolStripMenuItem.Text = "Extract"
|
||||
Else
|
||||
btn_Compress.Image = My.Resources.FileSkimmerFunctionIcons.largeico_compress
|
||||
btn_Compress.Text = "Compress"
|
||||
CompressToolStripMenuItem.Text = "Compress"
|
||||
End If
|
||||
End If
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
Public Sub ExecuteFile(path As String)
|
||||
If path Like "*.*" Then
|
||||
If path Like "*.txt" Then
|
||||
|
||||
ElseIf path Like "*.zip" Then
|
||||
|
||||
End If
|
||||
Else
|
||||
path = path.Replace("!\", Strings.OnceInfo(1) & "\")
|
||||
If My.Computer.FileSystem.DirectoryExists(path) Then
|
||||
CurrentDir = path
|
||||
txt_AddressBar.Text = CurrentDir.Replace(Strings.OnceInfo(1), "!")
|
||||
ShowContent()
|
||||
Else
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Sub ShowContent()
|
||||
Show()
|
||||
|
||||
lsv_Content.Items.Clear()
|
||||
|
||||
Dim Dir As New DirectoryInfo(CurrentDir)
|
||||
Dim Files As FileInfo() = Dir.GetFiles()
|
||||
Dim File As FileInfo
|
||||
Dim Folders As DirectoryInfo() = Dir.GetDirectories()
|
||||
Dim Folder As DirectoryInfo
|
||||
|
||||
For Each Folder In Folders
|
||||
Dim FolderName As String = Folder.Name
|
||||
If Strings.AvailableFeature(45) = 1 Then
|
||||
lsv_Content.Items.Add(FolderName, 0)
|
||||
Else
|
||||
lsv_Content.Items.Add("???", 1)
|
||||
End If
|
||||
Next
|
||||
|
||||
For Each File In Files
|
||||
Dim filename As String = File.Name
|
||||
Dim fileex As String = File.Extension
|
||||
FileType = GetFileType(fileex)(0)
|
||||
If Strings.AvailableFeature(46) = 1 Then
|
||||
lsv_Content.Items.Add(filename, FileType)
|
||||
Else
|
||||
lsv_Content.Items.Add("???", 1)
|
||||
End If
|
||||
Next
|
||||
End Sub
|
||||
|
||||
Public Function GetFileType(fileex As String)
|
||||
|
||||
Dim FileType As Integer
|
||||
Dim Program As String
|
||||
|
||||
Select Case fileex
|
||||
Case ".txt"
|
||||
FileType = 2
|
||||
Program = "Text Document"
|
||||
Case ".zip"
|
||||
FileType = 3
|
||||
Program = "Compressed ZIP file"
|
||||
'Case ".doc"
|
||||
' filetype = 5
|
||||
' program = "Word Document"
|
||||
'Case ".docx"
|
||||
' filetype = 5
|
||||
' program = "Word Document"
|
||||
Case ".png"
|
||||
FileType = 3
|
||||
Program = "Picture"
|
||||
Case ".jpg"
|
||||
FileType = 3
|
||||
Program = "Picture"
|
||||
Case ".jpeg"
|
||||
FileType = 3
|
||||
Program = "Picture"
|
||||
Case ".bmp"
|
||||
FileType = 3
|
||||
Program = "Bitmap"
|
||||
Case ".gif"
|
||||
FileType = 3
|
||||
Program = "Animated Picture"
|
||||
'Case ".avi"
|
||||
' filetype = 10
|
||||
' program = "Video Clip"
|
||||
'Case ".m4v"
|
||||
' filetype = 10
|
||||
' program = "MPEG-4 Video"
|
||||
'Case ".mp4"
|
||||
' filetype = 10
|
||||
' program = "MPEG-4 Video"
|
||||
'Case ".wmv"
|
||||
' filetype = 10
|
||||
' program = "Windows Media Video"
|
||||
'Case ".mp3"
|
||||
' filetype = 9
|
||||
' program = "MPEG-3 Song"
|
||||
'Case ".zip"
|
||||
' filetype = 11
|
||||
' program = "Compressed Files"
|
||||
'Case ".dll"
|
||||
' filetype = 8
|
||||
' program = "System File"
|
||||
'Case ".exe"
|
||||
' filetype = 6
|
||||
' program = "MS-DOS Executable"
|
||||
'Case ".sh"
|
||||
' filetype = 7
|
||||
' program = "BASH Script"
|
||||
'Case ".bat"
|
||||
' filetype = 6
|
||||
' program = "MS-DOS Batch File"
|
||||
'Case ".url"
|
||||
' filetype = 5
|
||||
' program = "Shortcut"
|
||||
'Case ".htm", ".html"
|
||||
' filetype = 5
|
||||
' program = "Web Page"
|
||||
Case Else
|
||||
FileType = 1
|
||||
Program = "Unknown File Type"
|
||||
End Select
|
||||
|
||||
Dim array() As String = {CStr(FileType), Program}
|
||||
|
||||
Return (array)
|
||||
If txt_AddressBar.Text = "!\" Then
|
||||
'WARNING TO GET BACK BUTTON DISABLED
|
||||
End If
|
||||
End Function
|
||||
|
||||
Private Sub FS_Compression()
|
||||
Dim NothingIn As Boolean = True
|
||||
Dim ZipRandomInt As Integer
|
||||
Dim ZipRandom As New Random
|
||||
Dim UnzipRandomInt As Integer
|
||||
Dim UnzipRandom As New Random
|
||||
Try
|
||||
If lsv_Content.SelectedItems(0).Text Like "*.zip" Then
|
||||
UnzipRandomInt = UnzipRandom.Next(1, 1000000)
|
||||
Directory.CreateDirectory(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\UNZIP" & UnzipRandomInt)
|
||||
ZipFile.ExtractToDirectory(CurrentDir & "\" & lsv_Content.SelectedItems(0).Text, Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\UNZIP" & UnzipRandomInt)
|
||||
Directory.CreateDirectory(CurrentDir & "\" & lsv_Content.SelectedItems(0).Text.Replace(".zip", ""))
|
||||
CopyDirectory(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\UNZIP" & UnzipRandomInt, CurrentDir & "\" & lsv_Content.SelectedItems(0).Text.Replace("zip", ""))
|
||||
Directory.Delete(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\UNZIP" & UnzipRandomInt, True)
|
||||
ElseIf lsv_Content.SelectedItems(0).Text Like "*.*" Then
|
||||
ZipRandomInt = ZipRandom.Next(1, 1000000)
|
||||
Directory.CreateDirectory(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\ZIP" & ZipRandomInt)
|
||||
File.Copy(CurrentDir & "\" & lsv_Content.SelectedItems(0).Text, Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\ZIP" & ZipRandomInt & "\" & lsv_Content.SelectedItems(0).Text)
|
||||
Dim Numbering As String = lsv_Content.SelectedItems(0).Text.Length
|
||||
Dim TheNaming As String = lsv_Content.SelectedItems(0).Text.Substring(0, Numbering - 3) & "zip"
|
||||
ZipFile.CreateFromDirectory(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\ZIP" & ZipRandomInt, CurrentDir & "\" & TheNaming)
|
||||
Directory.Delete(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\ZIP" & ZipRandomInt, True)
|
||||
NothingIn = False
|
||||
ElseIf lsv_Content.SelectedItems(0).Text Like "*" Then
|
||||
If Directory.Exists(CurrentDir & "\" & lsv_Content.SelectedItems(0).Text) = True Then
|
||||
ZipFile.CreateFromDirectory(CurrentDir & "\" & lsv_Content.SelectedItems(0).Text, CurrentDir & "\" & lsv_Content.SelectedItems(0).Text & ".zip")
|
||||
NothingIn = False
|
||||
Else
|
||||
|
||||
End If
|
||||
End If
|
||||
ShowContent()
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub FS_Delete()
|
||||
If Strings.AvailableFeature(47) = 0 Then
|
||||
|
||||
Else
|
||||
Try
|
||||
If lsv_Content.SelectedItems(0).Text Like "*.*" Then
|
||||
File.Delete(CurrentDir & "\" & lsv_Content.SelectedItems(0).Text)
|
||||
ElseIf lsv_Content.SelectedItems(0).Text Like "*" Then
|
||||
Directory.Delete(CurrentDir & "\" & lsv_Content.SelectedItems(0).Text)
|
||||
End If
|
||||
ShowContent()
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
|
@ -7,7 +7,7 @@ antigua and barbuda
|
|||
argentina
|
||||
armenia
|
||||
australia
|
||||
austia
|
||||
austria
|
||||
azerbaijan
|
||||
bahamas
|
||||
bahrain
|
||||
|
@ -23,7 +23,7 @@ bosnia and herzegovina
|
|||
botswana
|
||||
brazil
|
||||
brunei
|
||||
bulgraia
|
||||
bulgaria
|
||||
burkina faso
|
||||
burundi
|
||||
cambodia
|
||||
|
@ -37,7 +37,8 @@ china
|
|||
colombia
|
||||
comoros
|
||||
democratic republic of the congo
|
||||
republic of the congocosta rica
|
||||
republic of the congo
|
||||
costa rica
|
||||
croatia
|
||||
cuba
|
||||
cyprus
|
||||
|
|
|
@ -145,7 +145,7 @@ Namespace My.Resources
|
|||
'''argentina
|
||||
'''armenia
|
||||
'''australia
|
||||
'''austia
|
||||
'''austria
|
||||
'''azerbaijan
|
||||
'''bahamas
|
||||
'''bahrain
|
||||
|
@ -161,7 +161,7 @@ Namespace My.Resources
|
|||
'''botswana
|
||||
'''brazil
|
||||
'''brunei
|
||||
'''bulgraia
|
||||
'''bulgaria
|
||||
'''burkina faso
|
||||
'''burundi
|
||||
'''cambodia
|
||||
|
@ -175,13 +175,14 @@ Namespace My.Resources
|
|||
'''colombia
|
||||
'''comoros
|
||||
'''democratic republic of the congo
|
||||
'''republic of the congocosta rica
|
||||
'''republic of the congo
|
||||
'''costa rica
|
||||
'''croatia
|
||||
'''cuba
|
||||
'''cyprus
|
||||
'''czechia
|
||||
'''denmark
|
||||
'''djibou [rest of string was truncated]";.
|
||||
'''dji [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property Countries() As String
|
||||
Get
|
||||
|
@ -250,5 +251,62 @@ Namespace My.Resources
|
|||
Return ResourceManager.GetString("Fruits", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to alabama
|
||||
'''alaska
|
||||
'''arizona
|
||||
'''arkansas
|
||||
'''california
|
||||
'''colorado
|
||||
'''connecticut
|
||||
'''delaware
|
||||
'''florida
|
||||
'''georgia
|
||||
'''hawaii
|
||||
'''idaho
|
||||
'''illinois
|
||||
'''indiana
|
||||
'''iowa
|
||||
'''kansas
|
||||
'''kentucky
|
||||
'''louisiana
|
||||
'''maine
|
||||
'''maryland
|
||||
'''massachusetts
|
||||
'''michigan
|
||||
'''minnesota
|
||||
'''mississippi
|
||||
'''missouri
|
||||
'''montana
|
||||
'''nebraska
|
||||
'''nevada
|
||||
'''new hampshire
|
||||
'''new jersey
|
||||
'''new mexico
|
||||
'''new york
|
||||
'''north carolina
|
||||
'''north dakota
|
||||
'''ohio
|
||||
'''oklahoma
|
||||
'''oregon
|
||||
'''pennsylvania
|
||||
'''rhode island
|
||||
'''south carolina
|
||||
'''south dakota
|
||||
'''tennessee
|
||||
'''texas
|
||||
'''utah
|
||||
'''vermont
|
||||
'''virginia
|
||||
'''washington
|
||||
'''washington dc
|
||||
'''west virgi [rest of string was truncated]";.
|
||||
'''</summary>
|
||||
Friend Shared ReadOnly Property US_States() As String
|
||||
Get
|
||||
Return ResourceManager.GetString("US_States", resourceCulture)
|
||||
End Get
|
||||
End Property
|
||||
End Class
|
||||
End Namespace
|
||||
|
|
|
@ -127,4 +127,7 @@
|
|||
<data name="Fruits" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>fruits.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="US_States" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>us_states.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
</root>
|
|
@ -0,0 +1,51 @@
|
|||
alabama
|
||||
alaska
|
||||
arizona
|
||||
arkansas
|
||||
california
|
||||
colorado
|
||||
connecticut
|
||||
delaware
|
||||
florida
|
||||
georgia
|
||||
hawaii
|
||||
idaho
|
||||
illinois
|
||||
indiana
|
||||
iowa
|
||||
kansas
|
||||
kentucky
|
||||
louisiana
|
||||
maine
|
||||
maryland
|
||||
massachusetts
|
||||
michigan
|
||||
minnesota
|
||||
mississippi
|
||||
missouri
|
||||
montana
|
||||
nebraska
|
||||
nevada
|
||||
new hampshire
|
||||
new jersey
|
||||
new mexico
|
||||
new york
|
||||
north carolina
|
||||
north dakota
|
||||
ohio
|
||||
oklahoma
|
||||
oregon
|
||||
pennsylvania
|
||||
rhode island
|
||||
south carolina
|
||||
south dakota
|
||||
tennessee
|
||||
texas
|
||||
utah
|
||||
vermont
|
||||
virginia
|
||||
washington
|
||||
washington dc
|
||||
west virginia
|
||||
wisconsin
|
||||
wyoming
|
|
@ -51,7 +51,7 @@ Partial Class Uni_KnowledgeInput
|
|||
Me.cmb_Category.Font = New System.Drawing.Font("Comic Sans MS", 12.0!)
|
||||
Me.cmb_Category.ForeColor = System.Drawing.Color.Black
|
||||
Me.cmb_Category.FormattingEnabled = True
|
||||
Me.cmb_Category.Items.AddRange(New Object() {"Animals", "Countries", "Fruits"})
|
||||
Me.cmb_Category.Items.AddRange(New Object() {"Animals", "Countries", "Fruits", "US States"})
|
||||
Me.cmb_Category.Location = New System.Drawing.Point(20, 96)
|
||||
Me.cmb_Category.Name = "cmb_Category"
|
||||
Me.cmb_Category.Size = New System.Drawing.Size(266, 31)
|
||||
|
|
|
@ -1,9 +1,10 @@
|
|||
Imports System.IO
|
||||
|
||||
Public Class Uni_KnowledgeInput
|
||||
Public Countries(193) As String
|
||||
Public Countries(194) As String
|
||||
Public Animals(226) As String
|
||||
Public Fruits(75) As String
|
||||
Public US_States(50) As String
|
||||
Public TotalGuessed As Integer
|
||||
Public CurrentCategory As String
|
||||
Public Level As Integer
|
||||
|
@ -26,6 +27,13 @@ Public Class Uni_KnowledgeInput
|
|||
File.WriteAllText(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\KnowledgeInput\Fruits.kin", My.Resources.KnowledgeInputContent.Fruits)
|
||||
End If
|
||||
End If
|
||||
If File.Exists(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\KnowledgeInput\US_States.kin") = True Then
|
||||
|
||||
Else
|
||||
If Strings.AvailableFeature(42) = 1 Then
|
||||
File.WriteAllText(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\KnowledgeInput\US_States.kin", My.Resources.KnowledgeInputContent.US_States)
|
||||
End If
|
||||
End If
|
||||
Else
|
||||
Directory.CreateDirectory(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\KnowledgeInput")
|
||||
File.WriteAllText(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\KnowledgeInput\Countries.kin", My.Resources.KnowledgeInputContent.Countries)
|
||||
|
@ -91,6 +99,12 @@ Public Class Uni_KnowledgeInput
|
|||
End If
|
||||
Available = True
|
||||
Fruits = File.ReadAllLines(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\KnowledgeInput\Fruits.kin")
|
||||
Case "US States"
|
||||
If File.Exists(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\KnowledgeInput\CurrentUS_States.kin") = True Then
|
||||
lst_Guessed.Items.AddRange(File.ReadAllLines(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\KnowledgeInput\CurrentUS_States.kin"))
|
||||
End If
|
||||
Available = True
|
||||
US_States = File.ReadAllLines(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\KnowledgeInput\US_States.kin")
|
||||
End Select
|
||||
If Available = True Then
|
||||
TotalGuessed = lst_Guessed.Items.Count
|
||||
|
@ -102,6 +116,8 @@ Public Class Uni_KnowledgeInput
|
|||
lbl_TotalGuess.Text = lbl_TotalGuess.Text & Animals.Length
|
||||
Case "Fruits"
|
||||
lbl_TotalGuess.Text = lbl_TotalGuess.Text & Fruits.Length
|
||||
Case "US States"
|
||||
lbl_TotalGuess.Text = lbl_TotalGuess.Text & US_States.Length
|
||||
End Select
|
||||
Level = Math.Ceiling((TotalGuessed / 10))
|
||||
CheckLevel()
|
||||
|
@ -116,6 +132,9 @@ Public Class Uni_KnowledgeInput
|
|||
If Strings.AvailableFeature(39) = 0 Then
|
||||
cmb_Category.Items.Remove("Fruits")
|
||||
End If
|
||||
If Strings.AvailableFeature(42) = 0 Then
|
||||
cmb_Category.Items.Remove("US States")
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub CheckLevel()
|
||||
|
@ -177,6 +196,20 @@ Public Class Uni_KnowledgeInput
|
|||
Lines = Lines + 1
|
||||
End If
|
||||
Loop
|
||||
Case "US States"
|
||||
Dim Lines As Integer = 0
|
||||
Do
|
||||
If Lines = US_States.Length Then
|
||||
Exit Do
|
||||
End If
|
||||
If US_States(Lines) = Input Then
|
||||
US_States(Lines) = "null"
|
||||
Correct = True
|
||||
Exit Do
|
||||
Else
|
||||
Lines = Lines + 1
|
||||
End If
|
||||
Loop
|
||||
End Select
|
||||
If Correct = True Then
|
||||
lst_Guessed.Items.Add(Input)
|
||||
|
@ -189,6 +222,8 @@ Public Class Uni_KnowledgeInput
|
|||
lbl_TotalGuess.Text = lbl_TotalGuess.Text & Animals.Length
|
||||
Case "Fruits"
|
||||
lbl_TotalGuess.Text = lbl_TotalGuess.Text & Fruits.Length
|
||||
Case "US States"
|
||||
lbl_TotalGuess.Text = lbl_TotalGuess.Text & US_States.Length
|
||||
End Select
|
||||
CheckLevel()
|
||||
SaveCategory()
|
||||
|
@ -206,6 +241,9 @@ Public Class Uni_KnowledgeInput
|
|||
Case "Fruits"
|
||||
File.WriteAllLines(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\KnowledgeInput\Fruits.kin", Fruits)
|
||||
File.WriteAllLines(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\KnowledgeInput\CurrentFruits.kin", lst_Guessed.Items.Cast(Of String).ToArray)
|
||||
Case "US States"
|
||||
File.WriteAllLines(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\KnowledgeInput\US_States.kin", US_States)
|
||||
File.WriteAllLines(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\ShiftOS\SysShiftFS\KnowledgeInput\CurrentUS_States.kin", lst_Guessed.Items.Cast(Of String).ToArray)
|
||||
End Select
|
||||
End Sub
|
||||
End Class
|
|
@ -23,7 +23,9 @@ Module DesktopManager
|
|||
If Strings.OnceInfo(6) = "story" Then
|
||||
SaveGame()
|
||||
End If
|
||||
MsgBox("this is not a bug, this is a feature") 'Use this messagebox to hold Console to stay open, because removing this line closes Console all together for some reason
|
||||
If Strings.ComputerInfo(7) = 1 Then
|
||||
MsgBox("this is not a bug, this is a feature") 'Use this messagebox to hold Console to stay open, because removing this line closes Console all together for some reason
|
||||
End If
|
||||
Console.Show()
|
||||
Desktop.Hide()
|
||||
End Sub
|
||||
|
@ -44,6 +46,8 @@ Module DesktopManager
|
|||
Select Case Strings.ComputerInfo(7)
|
||||
Case 1
|
||||
DuWM_Initiate()
|
||||
Case 2
|
||||
AnusWM_Initiate()
|
||||
End Select
|
||||
End Sub
|
||||
End Module
|
||||
|
|
|
@ -17,7 +17,7 @@
|
|||
Strings.OnceInfo(6) = "story"
|
||||
IntroStory.Show()
|
||||
ShiftOSMenu.Close()
|
||||
NewGameMode()
|
||||
NewGameMode(0)
|
||||
Close()
|
||||
End Select
|
||||
End Sub
|
||||
|
|
|
@ -31,6 +31,7 @@
|
|||
If Opacity = 1 Then
|
||||
Strings.ComputerInfo(3) = "0"
|
||||
Strings.IsFree = False
|
||||
IsConsoleParent = True
|
||||
Console.Show()
|
||||
Close()
|
||||
Else
|
||||
|
|
|
@ -52,6 +52,14 @@ Public Class ShiftOSMenu
|
|||
btn_Aboot.Text = "About"
|
||||
btn_Aboot.Visible = True
|
||||
btn_Exit.Visible = True
|
||||
Case "Chapter 2" & Environment.NewLine & "Exploration"
|
||||
Strings.ComputerInfo(3) = "1"
|
||||
IsConsoleParent = True
|
||||
Strings.IsFree = False
|
||||
Strings.OnceInfo(6) = "story"
|
||||
NewGameMode(1)
|
||||
Console.Show()
|
||||
Close()
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
|
|
|
@ -26,7 +26,8 @@ Public Class ShiftOSUpdater
|
|||
If Not FilePut.FileName = "" Then
|
||||
Button1.Enabled = False
|
||||
Button2.Enabled = False
|
||||
Dim PutTo As String = "http://148.251.124.62:8080/ShiftOS/versions/ShiftOS-TheRevival.v" & NewVersion & ".exe"
|
||||
Dim PutTo As String = "http://github.com/EverythingWindows/ShiftOS-TheRevival/releases/download/" & NewVersion & "/ShiftOS-TheRevival.v" & NewVersion & ".exe"
|
||||
'Dim PutTo As String = "http://148.251.124.62:8080/ShiftOS/versions/ShiftOS-TheRevival.v" & NewVersion & ".exe" <= Legacy Updater
|
||||
'Dim GetTo As New Uri(PutTo)
|
||||
My.Computer.Network.DownloadFile(PutTo, FilePut.FileName)
|
||||
'Revisit this later
|
||||
|
|
|
@ -0,0 +1,6 @@
|
|||
Module AnusWM_Main
|
||||
Public Sub AnusWM_Initiate()
|
||||
AnusWM_Menu.Show()
|
||||
AnusWM_Menu.Location = New Point(25, 25)
|
||||
End Sub
|
||||
End Module
|
142
ShiftOS-TheRevival/MainForms/WindowManager/codename AnusWM/AnusWM_Menu.Designer.vb
generated
Normal file
|
@ -0,0 +1,142 @@
|
|||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class AnusWM_Menu
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.mnu_Main = New System.Windows.Forms.MenuStrip()
|
||||
Me.ToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ApplicationsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ShifterToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.AboutToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ExitToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.StopAnusWMToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.RestartToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ShutdownToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.lbl_Title = New System.Windows.Forms.Label()
|
||||
Me.mnu_Main.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'mnu_Main
|
||||
'
|
||||
Me.mnu_Main.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.mnu_Main.Font = New System.Drawing.Font("Segoe UI", 12.0!)
|
||||
Me.mnu_Main.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem1, Me.ApplicationsToolStripMenuItem, Me.ShifterToolStripMenuItem, Me.AboutToolStripMenuItem, Me.ExitToolStripMenuItem})
|
||||
Me.mnu_Main.LayoutStyle = System.Windows.Forms.ToolStripLayoutStyle.VerticalStackWithOverflow
|
||||
Me.mnu_Main.Location = New System.Drawing.Point(0, 25)
|
||||
Me.mnu_Main.Name = "mnu_Main"
|
||||
Me.mnu_Main.RenderMode = System.Windows.Forms.ToolStripRenderMode.System
|
||||
Me.mnu_Main.Size = New System.Drawing.Size(139, 112)
|
||||
Me.mnu_Main.TabIndex = 0
|
||||
Me.mnu_Main.Text = "MenuStrip1"
|
||||
'
|
||||
'ToolStripMenuItem1
|
||||
'
|
||||
Me.ToolStripMenuItem1.Name = "ToolStripMenuItem1"
|
||||
Me.ToolStripMenuItem1.Size = New System.Drawing.Size(132, 4)
|
||||
'
|
||||
'ApplicationsToolStripMenuItem
|
||||
'
|
||||
Me.ApplicationsToolStripMenuItem.Name = "ApplicationsToolStripMenuItem"
|
||||
Me.ApplicationsToolStripMenuItem.Size = New System.Drawing.Size(132, 25)
|
||||
Me.ApplicationsToolStripMenuItem.Text = "Applications"
|
||||
'
|
||||
'ShifterToolStripMenuItem
|
||||
'
|
||||
Me.ShifterToolStripMenuItem.Name = "ShifterToolStripMenuItem"
|
||||
Me.ShifterToolStripMenuItem.Size = New System.Drawing.Size(132, 25)
|
||||
Me.ShifterToolStripMenuItem.Text = "Shifter"
|
||||
'
|
||||
'AboutToolStripMenuItem
|
||||
'
|
||||
Me.AboutToolStripMenuItem.Name = "AboutToolStripMenuItem"
|
||||
Me.AboutToolStripMenuItem.Size = New System.Drawing.Size(132, 25)
|
||||
Me.AboutToolStripMenuItem.Text = "About"
|
||||
'
|
||||
'ExitToolStripMenuItem
|
||||
'
|
||||
Me.ExitToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.StopAnusWMToolStripMenuItem, Me.RestartToolStripMenuItem, Me.ShutdownToolStripMenuItem})
|
||||
Me.ExitToolStripMenuItem.Name = "ExitToolStripMenuItem"
|
||||
Me.ExitToolStripMenuItem.Size = New System.Drawing.Size(132, 25)
|
||||
Me.ExitToolStripMenuItem.Text = "Exit"
|
||||
'
|
||||
'StopAnusWMToolStripMenuItem
|
||||
'
|
||||
Me.StopAnusWMToolStripMenuItem.Name = "StopAnusWMToolStripMenuItem"
|
||||
Me.StopAnusWMToolStripMenuItem.Size = New System.Drawing.Size(179, 26)
|
||||
Me.StopAnusWMToolStripMenuItem.Text = "Stop AnusWM"
|
||||
'
|
||||
'RestartToolStripMenuItem
|
||||
'
|
||||
Me.RestartToolStripMenuItem.Name = "RestartToolStripMenuItem"
|
||||
Me.RestartToolStripMenuItem.Size = New System.Drawing.Size(179, 26)
|
||||
Me.RestartToolStripMenuItem.Text = "Restart"
|
||||
'
|
||||
'ShutdownToolStripMenuItem
|
||||
'
|
||||
Me.ShutdownToolStripMenuItem.Name = "ShutdownToolStripMenuItem"
|
||||
Me.ShutdownToolStripMenuItem.Size = New System.Drawing.Size(179, 26)
|
||||
Me.ShutdownToolStripMenuItem.Text = "Shutdown"
|
||||
'
|
||||
'lbl_Title
|
||||
'
|
||||
Me.lbl_Title.BackColor = System.Drawing.Color.Gray
|
||||
Me.lbl_Title.Dock = System.Windows.Forms.DockStyle.Top
|
||||
Me.lbl_Title.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Italic)
|
||||
Me.lbl_Title.ForeColor = System.Drawing.Color.Black
|
||||
Me.lbl_Title.Location = New System.Drawing.Point(0, 0)
|
||||
Me.lbl_Title.Name = "lbl_Title"
|
||||
Me.lbl_Title.Size = New System.Drawing.Size(139, 25)
|
||||
Me.lbl_Title.TabIndex = 1
|
||||
Me.lbl_Title.Text = "Toolchest"
|
||||
Me.lbl_Title.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'AnusWM_Menu
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.Color.White
|
||||
Me.ClientSize = New System.Drawing.Size(139, 137)
|
||||
Me.Controls.Add(Me.mnu_Main)
|
||||
Me.Controls.Add(Me.lbl_Title)
|
||||
Me.ForeColor = System.Drawing.Color.Gray
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
|
||||
Me.MainMenuStrip = Me.mnu_Main
|
||||
Me.Name = "AnusWM_Menu"
|
||||
Me.Text = "AnusWM_Menu"
|
||||
Me.mnu_Main.ResumeLayout(False)
|
||||
Me.mnu_Main.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents mnu_Main As MenuStrip
|
||||
Friend WithEvents ToolStripMenuItem1 As ToolStripMenuItem
|
||||
Friend WithEvents ApplicationsToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents ShifterToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents AboutToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents ExitToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents StopAnusWMToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents RestartToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents ShutdownToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents lbl_Title As Label
|
||||
End Class
|
|
@ -0,0 +1,123 @@
|
|||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<metadata name="mnu_Main.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
</root>
|
|
@ -0,0 +1,17 @@
|
|||
Public Class AnusWM_Menu
|
||||
Private Sub StopAnusWMToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles StopAnusWMToolStripMenuItem.Click
|
||||
StopG()
|
||||
End Sub
|
||||
|
||||
Private Sub RestartToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles RestartToolStripMenuItem.Click
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub ShutdownToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ShutdownToolStripMenuItem.Click
|
||||
TerminateShiftOS()
|
||||
End Sub
|
||||
|
||||
Private Sub ApplicationToolStripMenuSubItem_Click(sender As Object, e As ToolStripItemClickedEventArgs) Handles ApplicationsToolStripMenuItem.DropDownItemClicked
|
||||
MsgBox(e.ClickedItem.Text.ToString)
|
||||
End Sub
|
||||
End Class
|
12
ShiftOS-TheRevival/My Project/Resources.Designer.vb
generated
|
@ -61,7 +61,7 @@ Namespace My.Resources
|
|||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to 0.2.6.
|
||||
''' Looks up a localized string similar to 0.2.7.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property CurrentVersion() As String
|
||||
Get
|
||||
|
@ -81,6 +81,16 @@ Namespace My.Resources
|
|||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property ico_folder() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("ico_folder", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Looks up a localized string similar to A basic command-line tool for simple calculation.
|
||||
'''
|
||||
|
|
|
@ -121,94 +121,97 @@
|
|||
<data name="CurrentVersion" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\CurrentVersion.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;Windows-1252</value>
|
||||
</data>
|
||||
<data name="Fortunes" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\fortunes.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_bc" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\bc.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_cd" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\cd.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_clear" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\clear.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_codepoint" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\codepoint.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_color" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\color.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_colors" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\colors.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_cowsay" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\cowsay.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_del" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\del.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_dir" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\dir.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_guess" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\guess.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_help" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\help.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_hostname" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\hostname.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_infobar" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\infobar.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_man" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\man.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_mkdir" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\mkdir.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_print" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\print.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_pwd" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\pwd.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_reboot" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\reboot.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_rmdir" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\rmdir.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_shiftfetch" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\shiftfetch.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_shiftorium" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\shiftorium.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_shutdown" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\shutdown.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_textpad" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\textpad.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_time" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\time.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_username" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\username.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_ver" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\ver.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_guess" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\guess.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_codepoint" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\codepoint.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_cd" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\cd.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_color" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\color.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_del" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\del.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_mkdir" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\mkdir.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_zip" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\zip.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="MenuBanner1" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Menu Picture\ShiftOS_MenuBanner1.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="man_dir" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\dir.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_shutdown" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\shutdown.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="MenuBanner2" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Menu Picture\ShiftOS_MenuBanner2.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="man_hostname" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\hostname.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_colors" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\colors.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_bc" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\bc.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_pwd" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\pwd.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_man" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\man.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_print" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\print.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_textpad" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\textpad.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_cowsay" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\cowsay.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_clear" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\clear.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_infobar" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\infobar.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_help" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\help.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_rmdir" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\rmdir.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_reboot" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\reboot.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_shiftorium" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\shiftorium.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_shiftfetch" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\shiftfetch.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="man_time" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\man manuals\time.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="Fortunes" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\resources\fortunes.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
|
||||
</data>
|
||||
<data name="ico_folder" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\MainForms\Applications\Universal\File Skimmer\Icons\ico_folder.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
</root>
|
48
ShiftOS-TheRevival/My Project/Settings.Designer.vb
generated
|
@ -14,26 +14,26 @@ Option Explicit On
|
|||
|
||||
Namespace My
|
||||
|
||||
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "11.0.0.0"), _
|
||||
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "16.10.0.0"), _
|
||||
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Partial Friend NotInheritable Class MySettings
|
||||
Inherits Global.System.Configuration.ApplicationSettingsBase
|
||||
|
||||
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings), MySettings)
|
||||
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
|
||||
|
||||
#Region "My.Settings Auto-Save Functionality"
|
||||
#If _MyType = "WindowsForms" Then
|
||||
Private Shared addedHandler As Boolean
|
||||
Private Shared addedHandler As Boolean
|
||||
|
||||
Private Shared addedHandlerLockObject As New Object
|
||||
Private Shared addedHandlerLockObject As New Object
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
|
||||
If My.Application.SaveMySettingsOnExit Then
|
||||
My.Settings.Save()
|
||||
End If
|
||||
End Sub
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
|
||||
If My.Application.SaveMySettingsOnExit Then
|
||||
My.Settings.Save()
|
||||
End If
|
||||
End Sub
|
||||
#End If
|
||||
#End Region
|
||||
|
||||
|
@ -41,14 +41,14 @@ Namespace My
|
|||
Get
|
||||
|
||||
#If _MyType = "WindowsForms" Then
|
||||
If Not addedHandler Then
|
||||
SyncLock addedHandlerLockObject
|
||||
If Not addedHandler Then
|
||||
AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
|
||||
addedHandler = True
|
||||
End If
|
||||
End SyncLock
|
||||
End If
|
||||
If Not addedHandler Then
|
||||
SyncLock addedHandlerLockObject
|
||||
If Not addedHandler Then
|
||||
AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
|
||||
addedHandler = True
|
||||
End If
|
||||
End SyncLock
|
||||
End If
|
||||
#End If
|
||||
Return defaultInstance
|
||||
End Get
|
||||
|
@ -58,12 +58,12 @@ End Namespace
|
|||
|
||||
Namespace My
|
||||
|
||||
<Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
|
||||
<Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
|
||||
Friend Module MySettingsProperty
|
||||
|
||||
<Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
|
||||
<Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
|
||||
Friend ReadOnly Property Settings() As Global.ShiftOS_TheRevival.My.MySettings
|
||||
Get
|
||||
Return Global.ShiftOS_TheRevival.My.MySettings.Default
|
||||
|
|
|
@ -1 +1 @@
|
|||
0.2.7
|
||||
0.2.8
|
BIN
ShiftOS-TheRevival/Resources/ico_deletefile.png
Normal file
After Width: | Height: | Size: 7.1 KiB |
BIN
ShiftOS-TheRevival/Resources/ico_refresh.png
Normal file
After Width: | Height: | Size: 2.4 KiB |
BIN
ShiftOS-TheRevival/Resources/ico_up1.png
Normal file
After Width: | Height: | Size: 2.4 KiB |
BIN
ShiftOS-TheRevival/Resources/largeico_compress.png
Normal file
After Width: | Height: | Size: 676 B |
BIN
ShiftOS-TheRevival/Resources/largeico_rename.png
Normal file
After Width: | Height: | Size: 7.1 KiB |
BIN
ShiftOS-TheRevival/Resources/largeico_uncompress.png
Normal file
After Width: | Height: | Size: 7.1 KiB |
|
@ -105,6 +105,12 @@
|
|||
<Compile Include="MainForms\Applications\DuWM\Shifter\Categories\DuWM_Shifter_About.vb">
|
||||
<SubType>UserControl</SubType>
|
||||
</Compile>
|
||||
<Compile Include="MainForms\Applications\DuWM\Shifter\Categories\DuWM_Shifter_Console.Designer.vb">
|
||||
<DependentUpon>DuWM_Shifter_Console.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="MainForms\Applications\DuWM\Shifter\Categories\DuWM_Shifter_Console.vb">
|
||||
<SubType>UserControl</SubType>
|
||||
</Compile>
|
||||
<Compile Include="MainForms\Applications\DuWM\Shifter\Categories\DuWM_Shifter_Desktop.Designer.vb">
|
||||
<DependentUpon>DuWM_Shifter_Desktop.vb</DependentUpon>
|
||||
</Compile>
|
||||
|
@ -118,6 +124,28 @@
|
|||
<Compile Include="MainForms\Applications\DuWM\Shifter\DuWM_Shifter.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="MainForms\Applications\Universal\Calculator\Uni_Calculator.Designer.vb">
|
||||
<DependentUpon>Uni_Calculator.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="MainForms\Applications\Universal\Calculator\Uni_Calculator.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="MainForms\Applications\Universal\File Skimmer\Icons\FileSkimmerFileIcons.Designer.vb">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DesignTime>True</DesignTime>
|
||||
<DependentUpon>FileSkimmerFileIcons.resx</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="MainForms\Applications\Universal\File Skimmer\Icons\FileSkimmerFunctionIcons.Designer.vb">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DesignTime>True</DesignTime>
|
||||
<DependentUpon>FileSkimmerFunctionIcons.resx</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="MainForms\Applications\Universal\File Skimmer\Uni_FileSkimmer.Designer.vb">
|
||||
<DependentUpon>Uni_FileSkimmer.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="MainForms\Applications\Universal\File Skimmer\Uni_FileSkimmer.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="MainForms\Applications\Universal\Knowledge Input\Contents\KnowledgeInputContent.Designer.vb">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DesignTime>True</DesignTime>
|
||||
|
@ -205,6 +233,13 @@
|
|||
</Compile>
|
||||
<Compile Include="API\ConsoleAPI.vb" />
|
||||
<Compile Include="API\TerminalAPI.vb" />
|
||||
<Compile Include="MainForms\WindowManager\codename AnusWM\AnusWM_Main.vb" />
|
||||
<Compile Include="MainForms\WindowManager\codename AnusWM\AnusWM_Menu.Designer.vb">
|
||||
<DependentUpon>AnusWM_Menu.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="MainForms\WindowManager\codename AnusWM\AnusWM_Menu.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="MainForms\WindowManager\DualWindowManager\DuWM_Main.vb" />
|
||||
<Compile Include="MainForms\WindowManager\DualWindowManager\DuWM_WindowContainer.Designer.vb">
|
||||
<DependentUpon>DuWM_WindowContainer.vb</DependentUpon>
|
||||
|
@ -270,12 +305,31 @@
|
|||
<EmbeddedResource Include="MainForms\Applications\DuWM\Shifter\Categories\DuWM_Shifter_About.resx">
|
||||
<DependentUpon>DuWM_Shifter_About.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="MainForms\Applications\DuWM\Shifter\Categories\DuWM_Shifter_Console.resx">
|
||||
<DependentUpon>DuWM_Shifter_Console.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="MainForms\Applications\DuWM\Shifter\Categories\DuWM_Shifter_Desktop.resx">
|
||||
<DependentUpon>DuWM_Shifter_Desktop.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="MainForms\Applications\DuWM\Shifter\DuWM_Shifter.resx">
|
||||
<DependentUpon>DuWM_Shifter.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="MainForms\Applications\Universal\Calculator\Uni_Calculator.resx">
|
||||
<DependentUpon>Uni_Calculator.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="MainForms\Applications\Universal\File Skimmer\Icons\FileSkimmerFileIcons.resx">
|
||||
<CustomToolNamespace>My.Resources</CustomToolNamespace>
|
||||
<Generator>ResXFileCodeGenerator</Generator>
|
||||
<LastGenOutput>FileSkimmerFileIcons.Designer.vb</LastGenOutput>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="MainForms\Applications\Universal\File Skimmer\Icons\FileSkimmerFunctionIcons.resx">
|
||||
<CustomToolNamespace>My.Resources</CustomToolNamespace>
|
||||
<Generator>ResXFileCodeGenerator</Generator>
|
||||
<LastGenOutput>FileSkimmerFunctionIcons.Designer.vb</LastGenOutput>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="MainForms\Applications\Universal\File Skimmer\Uni_FileSkimmer.resx">
|
||||
<DependentUpon>Uni_FileSkimmer.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="MainForms\Applications\Universal\Knowledge Input\Contents\KnowledgeInputContent.resx">
|
||||
<CustomToolNamespace>My.Resources</CustomToolNamespace>
|
||||
<Generator>ResXFileCodeGenerator</Generator>
|
||||
|
@ -311,6 +365,9 @@
|
|||
<EmbeddedResource Include="MainForms\Applications\Console.resx">
|
||||
<DependentUpon>Console.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="MainForms\WindowManager\codename AnusWM\AnusWM_Menu.resx">
|
||||
<DependentUpon>AnusWM_Menu.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="MainForms\WindowManager\DualWindowManager\DuWM_WindowContainer.resx">
|
||||
<DependentUpon>DuWM_WindowContainer.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
|
@ -352,10 +409,27 @@
|
|||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Resources\CurrentVersion.txt" />
|
||||
<None Include="MainForms\Applications\Universal\File Skimmer\Icons\ico_exe.png" />
|
||||
<None Include="MainForms\Applications\Universal\File Skimmer\Icons\ico_folder.bmp" />
|
||||
<None Include="MainForms\Applications\Universal\File Skimmer\Icons\ico_picture.bmp" />
|
||||
<None Include="MainForms\Applications\Universal\File Skimmer\Icons\ico_sfp.png" />
|
||||
<None Include="MainForms\Applications\Universal\File Skimmer\Icons\ico_textfile.bmp" />
|
||||
<None Include="MainForms\Applications\Universal\File Skimmer\Icons\ico_unknown.bmp" />
|
||||
<None Include="MainForms\Applications\Universal\File Skimmer\Icons\ico_up.bmp" />
|
||||
<None Include="MainForms\Applications\Universal\File Skimmer\Icons\ico_url.bmp" />
|
||||
<None Include="MainForms\Applications\Universal\File Skimmer\Icons\ico_video.bmp" />
|
||||
<None Include="MainForms\Applications\Universal\File Skimmer\Icons\ico_zip.png" />
|
||||
<Content Include="MainForms\Applications\Universal\Knowledge Input\Contents\Animals.txt" />
|
||||
<Content Include="MainForms\Applications\Universal\Knowledge Input\Contents\Countries.txt" />
|
||||
<Content Include="MainForms\Applications\Universal\Knowledge Input\Contents\Fruits.txt" />
|
||||
<Content Include="MainForms\Applications\Universal\Knowledge Input\Contents\US_States.txt" />
|
||||
<Content Include="MainForms\rev.txt" />
|
||||
<None Include="Resources\ico_up1.png" />
|
||||
<None Include="Resources\ico_refresh.png" />
|
||||
<None Include="Resources\ico_deletefile.png" />
|
||||
<None Include="Resources\largeico_compress.png" />
|
||||
<None Include="Resources\largeico_uncompress.png" />
|
||||
<None Include="Resources\largeico_rename.png" />
|
||||
<Content Include="Resources\man Manuals\zip.txt" />
|
||||
<Content Include="Resources\man Manuals\textpad.txt" />
|
||||
<Content Include="Resources\Fortunes.txt" />
|
||||
|
|
|
@ -68,6 +68,9 @@
|
|||
BC_Counting(BC_Numbers1, BC_Numbers2, BC_Operation2)
|
||||
BC_ThriceMoreValue = Nothing
|
||||
NewLine(BC_Result)
|
||||
If BC_Result = 69 Then
|
||||
NewLine("Nice!")
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Sub BC_Counting(FirstNum As Integer, SecondNum As Integer, Operation As String)
|
||||
|
|
|
@ -17,45 +17,51 @@
|
|||
End Sub
|
||||
|
||||
Public Sub MQ_GiveQuestion()
|
||||
Dim RandomNum As New Random
|
||||
MQ_1stNum = RandomNum.Next(1, 10)
|
||||
MQ_2ndNum = RandomNum.Next(1, 10)
|
||||
OperationChooser = RandomNum.Next(1, 5)
|
||||
Select Case OperationChooser
|
||||
Case 1
|
||||
MQ_Operation = " + "
|
||||
MQ_ShouldResult = MQ_1stNum + MQ_2ndNum
|
||||
Case 2
|
||||
While MQ_2ndNum >= MQ_1stNum
|
||||
MQ_2ndNum = RandomNum.Next(1, 10)
|
||||
End While
|
||||
MQ_Operation = " - "
|
||||
MQ_ShouldResult = MQ_1stNum - MQ_2ndNum
|
||||
Case 3
|
||||
MQ_Operation = " * "
|
||||
MQ_ShouldResult = MQ_1stNum * MQ_2ndNum
|
||||
Case 4
|
||||
While MQ_2ndNum > MQ_1stNum
|
||||
Try
|
||||
Dim RandomNum As New Random
|
||||
MQ_1stNum = RandomNum.Next(1, 10)
|
||||
MQ_2ndNum = RandomNum.Next(1, 10)
|
||||
OperationChooser = RandomNum.Next(1, 5)
|
||||
Select Case OperationChooser
|
||||
Case 1
|
||||
MQ_Operation = " + "
|
||||
MQ_ShouldResult = MQ_1stNum + MQ_2ndNum
|
||||
Case 2
|
||||
While MQ_2ndNum >= MQ_1stNum
|
||||
MQ_2ndNum = RandomNum.Next(1, 10)
|
||||
End While
|
||||
MQ_Operation = " / "
|
||||
MQ_ShouldResult = MQ_1stNum / MQ_2ndNum
|
||||
Case Else
|
||||
MQ_Operation = " + "
|
||||
MQ_ShouldResult = MQ_1stNum + MQ_2ndNum
|
||||
End Select
|
||||
NewLine("What is " & MQ_1stNum & MQ_Operation & MQ_2ndNum & " ?")
|
||||
MQ_Operation = " - "
|
||||
MQ_ShouldResult = MQ_1stNum - MQ_2ndNum
|
||||
Case 3
|
||||
MQ_Operation = " * "
|
||||
MQ_ShouldResult = MQ_1stNum * MQ_2ndNum
|
||||
Case 4
|
||||
While MQ_2ndNum > MQ_1stNum
|
||||
MQ_2ndNum = RandomNum.Next(1, 10)
|
||||
End While
|
||||
MQ_Operation = " / "
|
||||
MQ_ShouldResult = MQ_1stNum / MQ_2ndNum
|
||||
End Select
|
||||
NewLine("What is " & MQ_1stNum & MQ_Operation & MQ_2ndNum & " ?")
|
||||
Catch ex As Exception
|
||||
NewLine(ex.Message)
|
||||
TerminateApp(Nothing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Sub MQ_CheckAnswer()
|
||||
Dim TheAnswer As Integer = command
|
||||
If TheAnswer = MQ_ShouldResult Then
|
||||
NewLine("You got the right answer! You got " & MQ_ShouldResult & " Codepoint(s)")
|
||||
ChangeCP(True, MQ_ShouldResult)
|
||||
MQ_GiveQuestion()
|
||||
Else
|
||||
NewLine("You got the wrong answer! Try again")
|
||||
MQ_GiveQuestion()
|
||||
End If
|
||||
Try
|
||||
Dim TheAnswer As Integer = command
|
||||
If TheAnswer = MQ_ShouldResult Then
|
||||
NewLine("You got the right answer! You got " & MQ_ShouldResult & " Codepoint(s)")
|
||||
ChangeCP(True, MQ_ShouldResult)
|
||||
MQ_GiveQuestion()
|
||||
Else
|
||||
NewLine("You got the wrong answer! Try again")
|
||||
MQ_GiveQuestion()
|
||||
End If
|
||||
Catch ex As Exception
|
||||
NewLine("Invalid number or command")
|
||||
End Try
|
||||
End Sub
|
||||
End Module
|
||||
|
|
|
@ -10,7 +10,7 @@ Module TerminalExternalApps
|
|||
' Terminal.TextBox1.ReadOnly = True
|
||||
' Terminal.DefaultPrompt = "Press any key to continue..."
|
||||
' Terminal.CurrentInterpreter = "pause"
|
||||
' FreezeText = Terminal.TextBox1.Text
|
||||
' FreezeText = Terminal.TextBox1 x .Text
|
||||
' ShouldChange = True
|
||||
Case "shiftoriumfx" 'ShiftoriumFX : Advanced Shiftorium
|
||||
Console.DefaultPrompt = "Navigate> "
|
||||
|
@ -100,6 +100,8 @@ Module TerminalExternalApps
|
|||
Case "ojas"
|
||||
NewLine("dis calculator is very gud")
|
||||
NewLine("it counts from another universe")
|
||||
Case "cameron"
|
||||
NewLine("quiet frankly it's ShiftOS")
|
||||
Case "exit"
|
||||
TerminateApp(Nothing)
|
||||
Case Else
|
||||
|
|
|
@ -14,6 +14,10 @@
|
|||
If Strings.AvailableFeature(36) = 1 Then
|
||||
DuWM_NewProcess(DuWM_Shifter)
|
||||
End If
|
||||
Case "file_skimmer"
|
||||
If Strings.AvailableFeature(44) = 1 Then
|
||||
DuWM_NewProcess(Uni_FileSkimmer)
|
||||
End If
|
||||
End Select
|
||||
End Select
|
||||
End Sub
|
||||
|
|
|
@ -3,6 +3,9 @@
|
|||
NewLine("ShiftOS Graphical Application List")
|
||||
NewLine("To run a program, you can type 'app ' and the name of the program listed below (along with its underscore or any symbols included)")
|
||||
NewLine(Nothing)
|
||||
If Strings.AvailableFeature(44) = 1 Then
|
||||
NewLine("FILE_SKIMMER A file manager for ShiftOS")
|
||||
End If
|
||||
If Strings.AvailableFeature(37) = 1 Then
|
||||
NewLine("KNOWLEDGE_INPUT Simple puzzle game where you guess as many things as you can")
|
||||
End If
|
||||
|
|
|
@ -19,11 +19,18 @@
|
|||
Select Case Strings.ComputerInfo(7)
|
||||
Case 1
|
||||
AddLine("Dual Window Manager")
|
||||
Case 2
|
||||
AddLine("Anus Window Manager")
|
||||
End Select
|
||||
End If
|
||||
NewLine(" ^@@! : @Y .:::^~:. 7# Y@^ Window Manager Theme: -")
|
||||
NewLine(" ^@@! : @Y .:::^~:. 7# Y@^ Desktop Environment: -")
|
||||
NewLine(" 7@@: ! B@&BBBBGPPB@#Y. :&^ ^@? Terminal: shiftos-terminal")
|
||||
NewLine(" ?@@: 7 :??7~:. 5@@5 :&^ .&? Terminal Font: Consolas, 11pt")
|
||||
NewLine(" ?@@: 7 :??7~:. 5@@5 :&^ .&? Terminal Font: ")
|
||||
If IsStartG = True Then
|
||||
AddLine(GUISCustomizations.GUIConsoleFont.Name & ", " & GUISCustomizations.GUIConsoleFont.Size & "pt")
|
||||
Else
|
||||
AddLine("Consolas, 11pt (default)")
|
||||
End If
|
||||
NewLine(" ~@@! !@ G#&B!. Y@@B 7#. Y~ CPU: " & My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0", "ProcessorNameString", Nothing))
|
||||
NewLine(" B@G B@J ...~&G. 7@@@? .#? 7 GPU: N/A")
|
||||
Dim TripleDigitRAM As String
|
||||
|
|