More cosmetic changes

This commit is contained in:
Michael J. Seiferling
2016-03-13 20:24:30 -06:00
parent d1e292d4bf
commit 2eb6693275
6 changed files with 32 additions and 66 deletions
+9 -31
View File
@@ -22,17 +22,16 @@ Partial Class frmAddWizard
'Do not modify it using the code editor. 'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> _ <System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent() Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmAddWizard))
Me.tabWizard = New System.Windows.Forms.TabControl() Me.tabWizard = New System.Windows.Forms.TabControl()
Me.tbPage1 = New System.Windows.Forms.TabPage() Me.tbPage1 = New System.Windows.Forms.TabPage()
Me.lblStep1Title = New System.Windows.Forms.Label() Me.lblStep1Title = New System.Windows.Forms.Label()
Me.lblDrag1 = New System.Windows.Forms.Label()
Me.lblStep1Instructions = New System.Windows.Forms.Label() Me.lblStep1Instructions = New System.Windows.Forms.Label()
Me.txtName = New System.Windows.Forms.TextBox() Me.txtName = New System.Windows.Forms.TextBox()
Me.lblStep1Intro = New System.Windows.Forms.Label() Me.lblStep1Intro = New System.Windows.Forms.Label()
Me.tbPage2 = New System.Windows.Forms.TabPage() Me.tbPage2 = New System.Windows.Forms.TabPage()
Me.lblStep2Title = New System.Windows.Forms.Label() Me.lblStep2Title = New System.Windows.Forms.Label()
Me.lblStep2Instructions = New System.Windows.Forms.Label() Me.lblStep2Instructions = New System.Windows.Forms.Label()
Me.lblDrag2 = New System.Windows.Forms.Label()
Me.btnProcessBrowse = New System.Windows.Forms.Button() Me.btnProcessBrowse = New System.Windows.Forms.Button()
Me.txtProcessPath = New System.Windows.Forms.TextBox() Me.txtProcessPath = New System.Windows.Forms.TextBox()
Me.lblStep2Intro = New System.Windows.Forms.Label() Me.lblStep2Intro = New System.Windows.Forms.Label()
@@ -95,7 +94,6 @@ Partial Class frmAddWizard
' '
Me.tbPage1.BackColor = System.Drawing.SystemColors.Control Me.tbPage1.BackColor = System.Drawing.SystemColors.Control
Me.tbPage1.Controls.Add(Me.lblStep1Title) Me.tbPage1.Controls.Add(Me.lblStep1Title)
Me.tbPage1.Controls.Add(Me.lblDrag1)
Me.tbPage1.Controls.Add(Me.lblStep1Instructions) Me.tbPage1.Controls.Add(Me.lblStep1Instructions)
Me.tbPage1.Controls.Add(Me.txtName) Me.tbPage1.Controls.Add(Me.txtName)
Me.tbPage1.Controls.Add(Me.lblStep1Intro) Me.tbPage1.Controls.Add(Me.lblStep1Intro)
@@ -116,23 +114,16 @@ Partial Class frmAddWizard
Me.lblStep1Title.TabIndex = 8 Me.lblStep1Title.TabIndex = 8
Me.lblStep1Title.Text = "Game Name" Me.lblStep1Title.Text = "Game Name"
' '
'lblDrag1
'
Me.lblDrag1.AllowDrop = True
Me.lblDrag1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblDrag1.Location = New System.Drawing.Point(14, 135)
Me.lblDrag1.Name = "lblDrag1"
Me.lblDrag1.Size = New System.Drawing.Size(303, 49)
Me.lblDrag1.TabIndex = 7
Me.lblDrag1.Text = "Drag a shortcut here to complete this step."
'
'lblStep1Instructions 'lblStep1Instructions
' '
Me.lblStep1Instructions.AllowDrop = True
Me.lblStep1Instructions.Location = New System.Drawing.Point(14, 93) Me.lblStep1Instructions.Location = New System.Drawing.Point(14, 93)
Me.lblStep1Instructions.Name = "lblStep1Instructions" Me.lblStep1Instructions.Name = "lblStep1Instructions"
Me.lblStep1Instructions.Size = New System.Drawing.Size(303, 30) Me.lblStep1Instructions.Size = New System.Drawing.Size(303, 85)
Me.lblStep1Instructions.TabIndex = 6 Me.lblStep1Instructions.TabIndex = 6
Me.lblStep1Instructions.Text = "The name will be automatically filtered for length and invalid characters. " Me.lblStep1Instructions.Text = "The name will be automatically filtered for length and invalid characters. You m" & _
"ay drag and drop a shortcut here to complete this step, only Windows shortcuts a" & _
"re currently supported."
' '
'txtName 'txtName
' '
@@ -156,7 +147,6 @@ Partial Class frmAddWizard
Me.tbPage2.BackColor = System.Drawing.SystemColors.Control Me.tbPage2.BackColor = System.Drawing.SystemColors.Control
Me.tbPage2.Controls.Add(Me.lblStep2Title) Me.tbPage2.Controls.Add(Me.lblStep2Title)
Me.tbPage2.Controls.Add(Me.lblStep2Instructions) Me.tbPage2.Controls.Add(Me.lblStep2Instructions)
Me.tbPage2.Controls.Add(Me.lblDrag2)
Me.tbPage2.Controls.Add(Me.btnProcessBrowse) Me.tbPage2.Controls.Add(Me.btnProcessBrowse)
Me.tbPage2.Controls.Add(Me.txtProcessPath) Me.tbPage2.Controls.Add(Me.txtProcessPath)
Me.tbPage2.Controls.Add(Me.lblStep2Intro) Me.tbPage2.Controls.Add(Me.lblStep2Intro)
@@ -179,22 +169,12 @@ Partial Class frmAddWizard
' '
'lblStep2Instructions 'lblStep2Instructions
' '
Me.lblStep2Instructions.AllowDrop = True
Me.lblStep2Instructions.Location = New System.Drawing.Point(14, 93) Me.lblStep2Instructions.Location = New System.Drawing.Point(14, 93)
Me.lblStep2Instructions.Name = "lblStep2Instructions" Me.lblStep2Instructions.Name = "lblStep2Instructions"
Me.lblStep2Instructions.Size = New System.Drawing.Size(303, 29) Me.lblStep2Instructions.Size = New System.Drawing.Size(303, 85)
Me.lblStep2Instructions.TabIndex = 10 Me.lblStep2Instructions.TabIndex = 10
Me.lblStep2Instructions.Text = "Some games use launchers. Do not monitor launchers, be sure to choose the game'" & _ Me.lblStep2Instructions.Text = resources.GetString("lblStep2Instructions.Text")
"s actual exe file."
'
'lblDrag2
'
Me.lblDrag2.AllowDrop = True
Me.lblDrag2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblDrag2.Location = New System.Drawing.Point(14, 135)
Me.lblDrag2.Name = "lblDrag2"
Me.lblDrag2.Size = New System.Drawing.Size(336, 44)
Me.lblDrag2.TabIndex = 9
Me.lblDrag2.Text = "Drag a shortcut here to complete this step."
' '
'btnProcessBrowse 'btnProcessBrowse
' '
@@ -578,12 +558,10 @@ Partial Class frmAddWizard
Friend WithEvents tbPage3a As System.Windows.Forms.TabPage Friend WithEvents tbPage3a As System.Windows.Forms.TabPage
Friend WithEvents tbPage4 As System.Windows.Forms.TabPage Friend WithEvents tbPage4 As System.Windows.Forms.TabPage
Friend WithEvents tbPage5 As System.Windows.Forms.TabPage Friend WithEvents tbPage5 As System.Windows.Forms.TabPage
Friend WithEvents lblDrag1 As System.Windows.Forms.Label
Friend WithEvents lblStep1Instructions As System.Windows.Forms.Label Friend WithEvents lblStep1Instructions As System.Windows.Forms.Label
Friend WithEvents txtName As System.Windows.Forms.TextBox Friend WithEvents txtName As System.Windows.Forms.TextBox
Friend WithEvents lblStep1Intro As System.Windows.Forms.Label Friend WithEvents lblStep1Intro As System.Windows.Forms.Label
Friend WithEvents lblStep2Instructions As System.Windows.Forms.Label Friend WithEvents lblStep2Instructions As System.Windows.Forms.Label
Friend WithEvents lblDrag2 As System.Windows.Forms.Label
Friend WithEvents btnProcessBrowse As System.Windows.Forms.Button Friend WithEvents btnProcessBrowse As System.Windows.Forms.Button
Friend WithEvents txtProcessPath As System.Windows.Forms.TextBox Friend WithEvents txtProcessPath As System.Windows.Forms.TextBox
Friend WithEvents lblStep2Intro As System.Windows.Forms.Label Friend WithEvents lblStep2Intro As System.Windows.Forms.Label
+3
View File
@@ -117,4 +117,7 @@
<resheader name="writer"> <resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader> </resheader>
<data name="lblStep2Instructions.Text" xml:space="preserve">
<value>Some games use launchers. Do not monitor launchers, be sure to choose the game's actual exe file. You may drag and drop a shortcut here to complete this step, only Windows shortcuts are currently supported.</value>
</data>
</root> </root>
+2 -4
View File
@@ -36,12 +36,10 @@ Public Class frmAddWizard
btnNext.Text = frmAddWizard_btnNext btnNext.Text = frmAddWizard_btnNext
btnBack.Text = frmAddWizard_btnBack btnBack.Text = frmAddWizard_btnBack
lblStep1Title.Text = frmAddWizard_lblStep1Title lblStep1Title.Text = frmAddWizard_lblStep1Title
lblDrag1.Text = frmAddWizard_lblDrag1
lblStep1Instructions.Text = frmAddWizard_lblStep1Instructions lblStep1Instructions.Text = frmAddWizard_lblStep1Instructions
lblStep1Intro.Text = frmAddWizard_lblStep1Intro lblStep1Intro.Text = frmAddWizard_lblStep1Intro
lblStep2Title.Text = frmAddWizard_lblStep2Title lblStep2Title.Text = frmAddWizard_lblStep2Title
lblStep2Instructions.Text = frmAddWizard_lblStep2Instructions lblStep2Instructions.Text = frmAddWizard_lblStep2Instructions
lblDrag2.Text = frmAddWizard_lblDrag2
btnProcessBrowse.Text = frmAddWizard_btnProcessBrowse btnProcessBrowse.Text = frmAddWizard_btnProcessBrowse
lblStep2Intro.Text = frmAddWizard_lblStep2Intro lblStep2Intro.Text = frmAddWizard_lblStep2Intro
lblStep3Title.Text = frmAddWizard_lblStep3Title lblStep3Title.Text = frmAddWizard_lblStep3Title
@@ -459,13 +457,13 @@ Public Class frmAddWizard
SetForm() SetForm()
End Sub End Sub
Private Sub DropTarget_DragEnter(sender As Object, e As DragEventArgs) Handles lblDrag1.DragEnter, lblDrag2.DragEnter, txtName.DragEnter, txtProcessPath.DragEnter Private Sub DropTarget_DragEnter(sender As Object, e As DragEventArgs) Handles txtName.DragEnter, txtProcessPath.DragEnter, lblStep1Instructions.DragEnter, lblStep2Instructions.DragEnter
If e.Data.GetDataPresent(DataFormats.FileDrop) Then If e.Data.GetDataPresent(DataFormats.FileDrop) Then
e.Effect = DragDropEffects.Copy e.Effect = DragDropEffects.Copy
End If End If
End Sub End Sub
Private Sub DropTarget_DragDrop(sender As Object, e As DragEventArgs) Handles lblDrag1.DragDrop, lblDrag2.DragDrop, txtName.DragDrop, txtProcessPath.DragDrop Private Sub DropTarget_DragDrop(sender As Object, e As DragEventArgs) Handles txtName.DragDrop, txtProcessPath.DragDrop, lblStep1Instructions.DragDrop, lblStep2Instructions.DragDrop
Dim oFiles() As String = e.Data.GetData(DataFormats.FileDrop) Dim oFiles() As String = e.Data.GetData(DataFormats.FileDrop)
For Each sPath In oFiles For Each sPath In oFiles
ReadShortcut(sPath) ReadShortcut(sPath)
+1 -2
View File
@@ -65,8 +65,7 @@ Public Class frmMain
Else Else
Dim sPattern As String = "h:mm tt" Dim sPattern As String = "h:mm tt"
lblLastActionTitle.Visible = True lblLastActionTitle.Visible = True
lblLastActionTitle.Text = frmMain_lblLastActionTitle & " [" & TimeOfDay.ToString(sPattern) & "]" lblLastAction.Text = sMessage.TrimEnd(".") & " " & mgrCommon.FormatString(frmMain_AtTime, TimeOfDay.ToString(sPattern))
lblLastAction.Text = sMessage
End If End If
End Sub End Sub
+11 -20
View File
@@ -438,24 +438,6 @@ Namespace My.Resources
End Get End Get
End Property End Property
'''<summary>
''' Looks up a localized string similar to Drag a shortcut here to complete this step..
'''</summary>
Friend ReadOnly Property frmAddWizard_lblDrag1() As String
Get
Return ResourceManager.GetString("frmAddWizard_lblDrag1", resourceCulture)
End Get
End Property
'''<summary>
''' Looks up a localized string similar to Drag a shortcut here to complete this step..
'''</summary>
Friend ReadOnly Property frmAddWizard_lblDrag2() As String
Get
Return ResourceManager.GetString("frmAddWizard_lblDrag2", resourceCulture)
End Get
End Property
'''<summary> '''<summary>
''' Looks up a localized string similar to Save Path. ''' Looks up a localized string similar to Save Path.
'''</summary> '''</summary>
@@ -493,7 +475,7 @@ Namespace My.Resources
End Property End Property
'''<summary> '''<summary>
''' Looks up a localized string similar to The name will be automatically filtered for length and invalid characters. . ''' Looks up a localized string similar to The name will be automatically filtered for length and invalid characters. You may drag and drop a shortcut here to complete this step, only Windows shortcuts are currently supported..
'''</summary> '''</summary>
Friend ReadOnly Property frmAddWizard_lblStep1Instructions() As String Friend ReadOnly Property frmAddWizard_lblStep1Instructions() As String
Get Get
@@ -520,7 +502,7 @@ Namespace My.Resources
End Property End Property
'''<summary> '''<summary>
''' Looks up a localized string similar to Some games use launchers. Do not monitor launchers, be sure to choose the game&apos;s actual exe file.. ''' Looks up a localized string similar to Some games use launchers. Do not monitor launchers, be sure to choose the game&apos;s actual exe file. You may drag and drop a shortcut here to complete this step, only Windows shortcuts are currently supported..
'''</summary> '''</summary>
Friend ReadOnly Property frmAddWizard_lblStep2Instructions() As String Friend ReadOnly Property frmAddWizard_lblStep2Instructions() As String
Get Get
@@ -2121,6 +2103,15 @@ Namespace My.Resources
End Get End Get
End Property End Property
'''<summary>
''' Looks up a localized string similar to at [PARAM]..
'''</summary>
Friend ReadOnly Property frmMain_AtTime() As String
Get
Return ResourceManager.GetString("frmMain_AtTime", resourceCulture)
End Get
End Property
'''<summary> '''<summary>
''' Looks up a localized string similar to Backup in Progress.... ''' Looks up a localized string similar to Backup in Progress....
'''</summary> '''</summary>
+5 -8
View File
@@ -772,12 +772,6 @@
<data name="frmAddWizard_ItemsSelectedNone" xml:space="preserve"> <data name="frmAddWizard_ItemsSelectedNone" xml:space="preserve">
<value>0 item(s) selected</value> <value>0 item(s) selected</value>
</data> </data>
<data name="frmAddWizard_lblDrag1" xml:space="preserve">
<value>Drag a shortcut here to complete this step.</value>
</data>
<data name="frmAddWizard_lblDrag2" xml:space="preserve">
<value>Drag a shortcut here to complete this step.</value>
</data>
<data name="frmAddWizard_lblExcludePath" xml:space="preserve"> <data name="frmAddWizard_lblExcludePath" xml:space="preserve">
<value>Save Path</value> <value>Save Path</value>
</data> </data>
@@ -791,7 +785,7 @@
<value>Saved Game Folder:</value> <value>Saved Game Folder:</value>
</data> </data>
<data name="frmAddWizard_lblStep1Instructions" xml:space="preserve"> <data name="frmAddWizard_lblStep1Instructions" xml:space="preserve">
<value>The name will be automatically filtered for length and invalid characters. </value> <value>The name will be automatically filtered for length and invalid characters. You may drag and drop a shortcut here to complete this step, only Windows shortcuts are currently supported.</value>
</data> </data>
<data name="frmAddWizard_lblStep1Intro" xml:space="preserve"> <data name="frmAddWizard_lblStep1Intro" xml:space="preserve">
<value>Enter the name of the game to monitor:</value> <value>Enter the name of the game to monitor:</value>
@@ -800,7 +794,7 @@
<value>Game Name</value> <value>Game Name</value>
</data> </data>
<data name="frmAddWizard_lblStep2Instructions" xml:space="preserve"> <data name="frmAddWizard_lblStep2Instructions" xml:space="preserve">
<value>Some games use launchers. Do not monitor launchers, be sure to choose the game's actual exe file.</value> <value>Some games use launchers. Do not monitor launchers, be sure to choose the game's actual exe file. You may drag and drop a shortcut here to complete this step, only Windows shortcuts are currently supported.</value>
</data> </data>
<data name="frmAddWizard_lblStep2Intro" xml:space="preserve"> <data name="frmAddWizard_lblStep2Intro" xml:space="preserve">
<value>Choose the game's executable file or shortcut:</value> <value>Choose the game's executable file or shortcut:</value>
@@ -1588,4 +1582,7 @@
<data name="frmAdvancedImport_chkSelectAll" xml:space="preserve"> <data name="frmAdvancedImport_chkSelectAll" xml:space="preserve">
<value>Select All</value> <value>Select All</value>
</data> </data>
<data name="frmMain_AtTime" xml:space="preserve">
<value>at [PARAM].</value>
</data>
</root> </root>