Merge branch 'v95'
This commit is contained in:
Generated
+90
-89
@@ -27,9 +27,9 @@ Partial Class frmGameManager
|
||||
Me.btnBackup = New System.Windows.Forms.Button()
|
||||
Me.btnClose = New System.Windows.Forms.Button()
|
||||
Me.grpConfig = New System.Windows.Forms.GroupBox()
|
||||
Me.btnExclude = New System.Windows.Forms.Button()
|
||||
Me.btnInclude = New System.Windows.Forms.Button()
|
||||
Me.txtID = New System.Windows.Forms.TextBox()
|
||||
Me.lblExclude = New System.Windows.Forms.Label()
|
||||
Me.lblFileType = New System.Windows.Forms.Label()
|
||||
Me.btnSavePathBrowse = New System.Windows.Forms.Button()
|
||||
Me.btnProcessBrowse = New System.Windows.Forms.Button()
|
||||
Me.lblSavePath = New System.Windows.Forms.Label()
|
||||
@@ -117,7 +117,7 @@ Partial Class frmGameManager
|
||||
Me.btnBackup.Location = New System.Drawing.Point(616, 526)
|
||||
Me.btnBackup.Name = "btnBackup"
|
||||
Me.btnBackup.Size = New System.Drawing.Size(75, 23)
|
||||
Me.btnBackup.TabIndex = 13
|
||||
Me.btnBackup.TabIndex = 14
|
||||
Me.btnBackup.Text = "&Backup"
|
||||
Me.btnBackup.UseVisualStyleBackColor = True
|
||||
'
|
||||
@@ -127,16 +127,16 @@ Partial Class frmGameManager
|
||||
Me.btnClose.Location = New System.Drawing.Point(697, 526)
|
||||
Me.btnClose.Name = "btnClose"
|
||||
Me.btnClose.Size = New System.Drawing.Size(75, 23)
|
||||
Me.btnClose.TabIndex = 14
|
||||
Me.btnClose.TabIndex = 15
|
||||
Me.btnClose.Text = "C&lose"
|
||||
Me.btnClose.UseVisualStyleBackColor = True
|
||||
'
|
||||
'grpConfig
|
||||
'
|
||||
Me.grpConfig.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.grpConfig.Controls.Add(Me.btnExclude)
|
||||
Me.grpConfig.Controls.Add(Me.btnInclude)
|
||||
Me.grpConfig.Controls.Add(Me.txtID)
|
||||
Me.grpConfig.Controls.Add(Me.lblExclude)
|
||||
Me.grpConfig.Controls.Add(Me.lblFileType)
|
||||
Me.grpConfig.Controls.Add(Me.btnSavePathBrowse)
|
||||
Me.grpConfig.Controls.Add(Me.btnProcessBrowse)
|
||||
Me.grpConfig.Controls.Add(Me.lblSavePath)
|
||||
@@ -152,45 +152,45 @@ Partial Class frmGameManager
|
||||
Me.grpConfig.Enabled = False
|
||||
Me.grpConfig.Location = New System.Drawing.Point(238, 12)
|
||||
Me.grpConfig.Name = "grpConfig"
|
||||
Me.grpConfig.Size = New System.Drawing.Size(534, 182)
|
||||
Me.grpConfig.Size = New System.Drawing.Size(534, 157)
|
||||
Me.grpConfig.TabIndex = 4
|
||||
Me.grpConfig.TabStop = False
|
||||
Me.grpConfig.Text = "Configuration"
|
||||
'
|
||||
'btnExclude
|
||||
'
|
||||
Me.btnExclude.Location = New System.Drawing.Point(9, 125)
|
||||
Me.btnExclude.Name = "btnExclude"
|
||||
Me.btnExclude.Size = New System.Drawing.Size(176, 23)
|
||||
Me.btnExclude.TabIndex = 13
|
||||
Me.btnExclude.Text = "E&xclude Items..."
|
||||
Me.btnExclude.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnInclude
|
||||
'
|
||||
Me.btnInclude.Location = New System.Drawing.Point(9, 97)
|
||||
Me.btnInclude.Name = "btnInclude"
|
||||
Me.btnInclude.Size = New System.Drawing.Size(176, 23)
|
||||
Me.btnInclude.TabIndex = 10
|
||||
Me.btnInclude.Text = "In&clude Items..."
|
||||
Me.btnInclude.UseVisualStyleBackColor = True
|
||||
'
|
||||
'txtID
|
||||
'
|
||||
Me.txtID.Enabled = False
|
||||
Me.txtID.Location = New System.Drawing.Point(495, 147)
|
||||
Me.txtID.Location = New System.Drawing.Point(495, 19)
|
||||
Me.txtID.Name = "txtID"
|
||||
Me.txtID.Size = New System.Drawing.Size(33, 20)
|
||||
Me.txtID.TabIndex = 0
|
||||
Me.txtID.TabIndex = 16
|
||||
Me.txtID.TabStop = False
|
||||
Me.txtID.Visible = False
|
||||
'
|
||||
'lblExclude
|
||||
'
|
||||
Me.lblExclude.AutoSize = True
|
||||
Me.lblExclude.Location = New System.Drawing.Point(6, 126)
|
||||
Me.lblExclude.Name = "lblExclude"
|
||||
Me.lblExclude.Size = New System.Drawing.Size(48, 13)
|
||||
Me.lblExclude.TabIndex = 13
|
||||
Me.lblExclude.Text = "Exclude:"
|
||||
'
|
||||
'lblFileType
|
||||
'
|
||||
Me.lblFileType.AutoSize = True
|
||||
Me.lblFileType.Location = New System.Drawing.Point(6, 100)
|
||||
Me.lblFileType.Name = "lblFileType"
|
||||
Me.lblFileType.Size = New System.Drawing.Size(45, 13)
|
||||
Me.lblFileType.TabIndex = 12
|
||||
Me.lblFileType.Text = "Include:"
|
||||
'
|
||||
'btnSavePathBrowse
|
||||
'
|
||||
Me.btnSavePathBrowse.Location = New System.Drawing.Point(498, 71)
|
||||
Me.btnSavePathBrowse.Name = "btnSavePathBrowse"
|
||||
Me.btnSavePathBrowse.Size = New System.Drawing.Size(30, 20)
|
||||
Me.btnSavePathBrowse.TabIndex = 10
|
||||
Me.btnSavePathBrowse.TabIndex = 9
|
||||
Me.btnSavePathBrowse.Text = "..."
|
||||
Me.btnSavePathBrowse.UseVisualStyleBackColor = True
|
||||
'
|
||||
@@ -199,7 +199,7 @@ Partial Class frmGameManager
|
||||
Me.btnProcessBrowse.Location = New System.Drawing.Point(498, 45)
|
||||
Me.btnProcessBrowse.Name = "btnProcessBrowse"
|
||||
Me.btnProcessBrowse.Size = New System.Drawing.Size(30, 20)
|
||||
Me.btnProcessBrowse.TabIndex = 8
|
||||
Me.btnProcessBrowse.TabIndex = 7
|
||||
Me.btnProcessBrowse.Text = "..."
|
||||
Me.btnProcessBrowse.UseVisualStyleBackColor = True
|
||||
'
|
||||
@@ -209,7 +209,7 @@ Partial Class frmGameManager
|
||||
Me.lblSavePath.Location = New System.Drawing.Point(6, 74)
|
||||
Me.lblSavePath.Name = "lblSavePath"
|
||||
Me.lblSavePath.Size = New System.Drawing.Size(60, 13)
|
||||
Me.lblSavePath.TabIndex = 9
|
||||
Me.lblSavePath.TabIndex = 2
|
||||
Me.lblSavePath.Text = "Save Path:"
|
||||
'
|
||||
'lblProcess
|
||||
@@ -218,7 +218,7 @@ Partial Class frmGameManager
|
||||
Me.lblProcess.Location = New System.Drawing.Point(6, 48)
|
||||
Me.lblProcess.Name = "lblProcess"
|
||||
Me.lblProcess.Size = New System.Drawing.Size(48, 13)
|
||||
Me.lblProcess.TabIndex = 8
|
||||
Me.lblProcess.TabIndex = 1
|
||||
Me.lblProcess.Text = "Process:"
|
||||
'
|
||||
'lblName
|
||||
@@ -227,27 +227,31 @@ Partial Class frmGameManager
|
||||
Me.lblName.Location = New System.Drawing.Point(6, 22)
|
||||
Me.lblName.Name = "lblName"
|
||||
Me.lblName.Size = New System.Drawing.Size(38, 13)
|
||||
Me.lblName.TabIndex = 7
|
||||
Me.lblName.TabIndex = 0
|
||||
Me.lblName.Text = "Name:"
|
||||
'
|
||||
'txtExclude
|
||||
'
|
||||
Me.txtExclude.Location = New System.Drawing.Point(69, 123)
|
||||
Me.txtExclude.Location = New System.Drawing.Point(354, 127)
|
||||
Me.txtExclude.Name = "txtExclude"
|
||||
Me.txtExclude.Size = New System.Drawing.Size(459, 20)
|
||||
Me.txtExclude.TabIndex = 12
|
||||
Me.txtExclude.Size = New System.Drawing.Size(174, 20)
|
||||
Me.txtExclude.TabIndex = 0
|
||||
Me.txtExclude.TabStop = False
|
||||
Me.txtExclude.Visible = False
|
||||
'
|
||||
'txtFileType
|
||||
'
|
||||
Me.txtFileType.Location = New System.Drawing.Point(69, 97)
|
||||
Me.txtFileType.Location = New System.Drawing.Point(354, 99)
|
||||
Me.txtFileType.Name = "txtFileType"
|
||||
Me.txtFileType.Size = New System.Drawing.Size(459, 20)
|
||||
Me.txtFileType.TabIndex = 11
|
||||
Me.txtFileType.Size = New System.Drawing.Size(174, 20)
|
||||
Me.txtFileType.TabIndex = 0
|
||||
Me.txtFileType.TabStop = False
|
||||
Me.txtFileType.Visible = False
|
||||
'
|
||||
'chkTimeStamp
|
||||
'
|
||||
Me.chkTimeStamp.AutoSize = True
|
||||
Me.chkTimeStamp.Location = New System.Drawing.Point(124, 149)
|
||||
Me.chkTimeStamp.Location = New System.Drawing.Point(191, 129)
|
||||
Me.chkTimeStamp.Name = "chkTimeStamp"
|
||||
Me.chkTimeStamp.Size = New System.Drawing.Size(146, 17)
|
||||
Me.chkTimeStamp.TabIndex = 14
|
||||
@@ -257,10 +261,10 @@ Partial Class frmGameManager
|
||||
'chkFolderSave
|
||||
'
|
||||
Me.chkFolderSave.AutoSize = True
|
||||
Me.chkFolderSave.Location = New System.Drawing.Point(9, 149)
|
||||
Me.chkFolderSave.Location = New System.Drawing.Point(191, 101)
|
||||
Me.chkFolderSave.Name = "chkFolderSave"
|
||||
Me.chkFolderSave.Size = New System.Drawing.Size(109, 17)
|
||||
Me.chkFolderSave.TabIndex = 13
|
||||
Me.chkFolderSave.TabIndex = 11
|
||||
Me.chkFolderSave.Text = "Save entire folder"
|
||||
Me.chkFolderSave.UseVisualStyleBackColor = True
|
||||
'
|
||||
@@ -269,26 +273,26 @@ Partial Class frmGameManager
|
||||
Me.txtSavePath.Location = New System.Drawing.Point(69, 71)
|
||||
Me.txtSavePath.Name = "txtSavePath"
|
||||
Me.txtSavePath.Size = New System.Drawing.Size(423, 20)
|
||||
Me.txtSavePath.TabIndex = 9
|
||||
Me.txtSavePath.TabIndex = 8
|
||||
'
|
||||
'txtProcess
|
||||
'
|
||||
Me.txtProcess.Location = New System.Drawing.Point(69, 45)
|
||||
Me.txtProcess.Name = "txtProcess"
|
||||
Me.txtProcess.Size = New System.Drawing.Size(423, 20)
|
||||
Me.txtProcess.TabIndex = 7
|
||||
Me.txtProcess.TabIndex = 6
|
||||
'
|
||||
'txtName
|
||||
'
|
||||
Me.txtName.Location = New System.Drawing.Point(69, 19)
|
||||
Me.txtName.Name = "txtName"
|
||||
Me.txtName.Size = New System.Drawing.Size(459, 20)
|
||||
Me.txtName.TabIndex = 6
|
||||
Me.txtName.Size = New System.Drawing.Size(423, 20)
|
||||
Me.txtName.TabIndex = 5
|
||||
'
|
||||
'chkMonitorOnly
|
||||
'
|
||||
Me.chkMonitorOnly.AutoSize = True
|
||||
Me.chkMonitorOnly.Location = New System.Drawing.Point(353, 365)
|
||||
Me.chkMonitorOnly.Location = New System.Drawing.Point(353, 340)
|
||||
Me.chkMonitorOnly.Name = "chkMonitorOnly"
|
||||
Me.chkMonitorOnly.Size = New System.Drawing.Size(145, 17)
|
||||
Me.chkMonitorOnly.TabIndex = 7
|
||||
@@ -312,7 +316,7 @@ Partial Class frmGameManager
|
||||
Me.grpExtra.Controls.Add(Me.txtAppPath)
|
||||
Me.grpExtra.Controls.Add(Me.nudHours)
|
||||
Me.grpExtra.Controls.Add(Me.lblHours)
|
||||
Me.grpExtra.Location = New System.Drawing.Point(238, 200)
|
||||
Me.grpExtra.Location = New System.Drawing.Point(238, 175)
|
||||
Me.grpExtra.Name = "grpExtra"
|
||||
Me.grpExtra.Size = New System.Drawing.Size(534, 155)
|
||||
Me.grpExtra.TabIndex = 5
|
||||
@@ -335,7 +339,7 @@ Partial Class frmGameManager
|
||||
Me.btnIconBrowse.Location = New System.Drawing.Point(444, 96)
|
||||
Me.btnIconBrowse.Name = "btnIconBrowse"
|
||||
Me.btnIconBrowse.Size = New System.Drawing.Size(30, 20)
|
||||
Me.btnIconBrowse.TabIndex = 20
|
||||
Me.btnIconBrowse.TabIndex = 10
|
||||
Me.btnIconBrowse.Text = "..."
|
||||
Me.btnIconBrowse.UseVisualStyleBackColor = True
|
||||
'
|
||||
@@ -344,7 +348,7 @@ Partial Class frmGameManager
|
||||
Me.txtIcon.Location = New System.Drawing.Point(69, 97)
|
||||
Me.txtIcon.Name = "txtIcon"
|
||||
Me.txtIcon.Size = New System.Drawing.Size(369, 20)
|
||||
Me.txtIcon.TabIndex = 19
|
||||
Me.txtIcon.TabIndex = 9
|
||||
'
|
||||
'lblVersion
|
||||
'
|
||||
@@ -352,7 +356,7 @@ Partial Class frmGameManager
|
||||
Me.lblVersion.Location = New System.Drawing.Point(6, 74)
|
||||
Me.lblVersion.Name = "lblVersion"
|
||||
Me.lblVersion.Size = New System.Drawing.Size(45, 13)
|
||||
Me.lblVersion.TabIndex = 20
|
||||
Me.lblVersion.TabIndex = 2
|
||||
Me.lblVersion.Text = "Version:"
|
||||
'
|
||||
'txtVersion
|
||||
@@ -360,14 +364,14 @@ Partial Class frmGameManager
|
||||
Me.txtVersion.Location = New System.Drawing.Point(69, 71)
|
||||
Me.txtVersion.Name = "txtVersion"
|
||||
Me.txtVersion.Size = New System.Drawing.Size(459, 20)
|
||||
Me.txtVersion.TabIndex = 18
|
||||
Me.txtVersion.TabIndex = 8
|
||||
'
|
||||
'txtCompany
|
||||
'
|
||||
Me.txtCompany.Location = New System.Drawing.Point(69, 45)
|
||||
Me.txtCompany.Name = "txtCompany"
|
||||
Me.txtCompany.Size = New System.Drawing.Size(459, 20)
|
||||
Me.txtCompany.TabIndex = 17
|
||||
Me.txtCompany.TabIndex = 7
|
||||
'
|
||||
'lblCompany
|
||||
'
|
||||
@@ -375,7 +379,7 @@ Partial Class frmGameManager
|
||||
Me.lblCompany.Location = New System.Drawing.Point(6, 48)
|
||||
Me.lblCompany.Name = "lblCompany"
|
||||
Me.lblCompany.Size = New System.Drawing.Size(54, 13)
|
||||
Me.lblCompany.TabIndex = 17
|
||||
Me.lblCompany.TabIndex = 1
|
||||
Me.lblCompany.Text = "Company:"
|
||||
'
|
||||
'pbIcon
|
||||
@@ -394,7 +398,7 @@ Partial Class frmGameManager
|
||||
Me.Label1.Location = New System.Drawing.Point(6, 100)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(31, 13)
|
||||
Me.Label1.TabIndex = 16
|
||||
Me.Label1.TabIndex = 3
|
||||
Me.Label1.Text = "Icon:"
|
||||
'
|
||||
'btnAppPathBrowse
|
||||
@@ -402,7 +406,7 @@ Partial Class frmGameManager
|
||||
Me.btnAppPathBrowse.Location = New System.Drawing.Point(498, 19)
|
||||
Me.btnAppPathBrowse.Name = "btnAppPathBrowse"
|
||||
Me.btnAppPathBrowse.Size = New System.Drawing.Size(30, 20)
|
||||
Me.btnAppPathBrowse.TabIndex = 16
|
||||
Me.btnAppPathBrowse.TabIndex = 6
|
||||
Me.btnAppPathBrowse.Text = "..."
|
||||
Me.btnAppPathBrowse.UseVisualStyleBackColor = True
|
||||
'
|
||||
@@ -412,7 +416,7 @@ Partial Class frmGameManager
|
||||
Me.lblGamePath.Location = New System.Drawing.Point(6, 23)
|
||||
Me.lblGamePath.Name = "lblGamePath"
|
||||
Me.lblGamePath.Size = New System.Drawing.Size(63, 13)
|
||||
Me.lblGamePath.TabIndex = 13
|
||||
Me.lblGamePath.TabIndex = 0
|
||||
Me.lblGamePath.Text = "Game Path:"
|
||||
'
|
||||
'txtAppPath
|
||||
@@ -420,7 +424,7 @@ Partial Class frmGameManager
|
||||
Me.txtAppPath.Location = New System.Drawing.Point(69, 19)
|
||||
Me.txtAppPath.Name = "txtAppPath"
|
||||
Me.txtAppPath.Size = New System.Drawing.Size(423, 20)
|
||||
Me.txtAppPath.TabIndex = 15
|
||||
Me.txtAppPath.TabIndex = 5
|
||||
'
|
||||
'nudHours
|
||||
'
|
||||
@@ -430,7 +434,7 @@ Partial Class frmGameManager
|
||||
Me.nudHours.Maximum = New Decimal(New Integer() {10000, 0, 0, 0})
|
||||
Me.nudHours.Name = "nudHours"
|
||||
Me.nudHours.Size = New System.Drawing.Size(88, 20)
|
||||
Me.nudHours.TabIndex = 21
|
||||
Me.nudHours.TabIndex = 12
|
||||
'
|
||||
'lblHours
|
||||
'
|
||||
@@ -438,15 +442,15 @@ Partial Class frmGameManager
|
||||
Me.lblHours.Location = New System.Drawing.Point(6, 126)
|
||||
Me.lblHours.Name = "lblHours"
|
||||
Me.lblHours.Size = New System.Drawing.Size(38, 13)
|
||||
Me.lblHours.TabIndex = 0
|
||||
Me.lblHours.TabIndex = 11
|
||||
Me.lblHours.Text = "Hours:"
|
||||
'
|
||||
'btnTags
|
||||
'
|
||||
Me.btnTags.Location = New System.Drawing.Point(535, 360)
|
||||
Me.btnTags.Location = New System.Drawing.Point(535, 336)
|
||||
Me.btnTags.Name = "btnTags"
|
||||
Me.btnTags.Size = New System.Drawing.Size(75, 23)
|
||||
Me.btnTags.TabIndex = 22
|
||||
Me.btnTags.TabIndex = 8
|
||||
Me.btnTags.Text = "Tags..."
|
||||
Me.btnTags.UseVisualStyleBackColor = True
|
||||
'
|
||||
@@ -463,30 +467,28 @@ Partial Class frmGameManager
|
||||
Me.grpStats.Controls.Add(Me.lblCurrentBackup)
|
||||
Me.grpStats.Controls.Add(Me.txtLocalBackup)
|
||||
Me.grpStats.Controls.Add(Me.lblLastBackup)
|
||||
Me.grpStats.Location = New System.Drawing.Point(238, 390)
|
||||
Me.grpStats.Location = New System.Drawing.Point(238, 365)
|
||||
Me.grpStats.Name = "grpStats"
|
||||
Me.grpStats.Size = New System.Drawing.Size(534, 129)
|
||||
Me.grpStats.TabIndex = 10
|
||||
Me.grpStats.Size = New System.Drawing.Size(534, 137)
|
||||
Me.grpStats.TabIndex = 11
|
||||
Me.grpStats.TabStop = False
|
||||
Me.grpStats.Text = "Backup Information"
|
||||
'
|
||||
'btnOpenRestorePath
|
||||
'
|
||||
Me.btnOpenRestorePath.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.btnOpenRestorePath.Location = New System.Drawing.Point(336, 100)
|
||||
Me.btnOpenRestorePath.Location = New System.Drawing.Point(339, 105)
|
||||
Me.btnOpenRestorePath.Name = "btnOpenRestorePath"
|
||||
Me.btnOpenRestorePath.Size = New System.Drawing.Size(114, 23)
|
||||
Me.btnOpenRestorePath.TabIndex = 28
|
||||
Me.btnOpenRestorePath.TabIndex = 9
|
||||
Me.btnOpenRestorePath.Text = "O&pen Restore Path"
|
||||
Me.btnOpenRestorePath.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnOpenBackupFile
|
||||
'
|
||||
Me.btnOpenBackupFile.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.btnOpenBackupFile.Location = New System.Drawing.Point(216, 100)
|
||||
Me.btnOpenBackupFile.Location = New System.Drawing.Point(216, 105)
|
||||
Me.btnOpenBackupFile.Name = "btnOpenBackupFile"
|
||||
Me.btnOpenBackupFile.Size = New System.Drawing.Size(114, 23)
|
||||
Me.btnOpenBackupFile.TabIndex = 27
|
||||
Me.btnOpenBackupFile.TabIndex = 8
|
||||
Me.btnOpenBackupFile.Text = "&Open Backup File"
|
||||
Me.btnOpenBackupFile.UseVisualStyleBackColor = True
|
||||
'
|
||||
@@ -496,16 +498,15 @@ Partial Class frmGameManager
|
||||
Me.txtFileSize.Name = "txtFileSize"
|
||||
Me.txtFileSize.ReadOnly = True
|
||||
Me.txtFileSize.Size = New System.Drawing.Size(275, 20)
|
||||
Me.txtFileSize.TabIndex = 0
|
||||
Me.txtFileSize.TabIndex = 6
|
||||
Me.txtFileSize.TabStop = False
|
||||
'
|
||||
'btnDeleteBackup
|
||||
'
|
||||
Me.btnDeleteBackup.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.btnDeleteBackup.Location = New System.Drawing.Point(96, 100)
|
||||
Me.btnDeleteBackup.Location = New System.Drawing.Point(96, 105)
|
||||
Me.btnDeleteBackup.Name = "btnDeleteBackup"
|
||||
Me.btnDeleteBackup.Size = New System.Drawing.Size(114, 23)
|
||||
Me.btnDeleteBackup.TabIndex = 26
|
||||
Me.btnDeleteBackup.TabIndex = 7
|
||||
Me.btnDeleteBackup.Text = "&Delete Backup"
|
||||
Me.btnDeleteBackup.UseVisualStyleBackColor = True
|
||||
'
|
||||
@@ -515,7 +516,7 @@ Partial Class frmGameManager
|
||||
Me.lblFileSize.Location = New System.Drawing.Point(6, 77)
|
||||
Me.lblFileSize.Name = "lblFileSize"
|
||||
Me.lblFileSize.Size = New System.Drawing.Size(70, 13)
|
||||
Me.lblFileSize.TabIndex = 108
|
||||
Me.lblFileSize.TabIndex = 2
|
||||
Me.lblFileSize.Text = "Backup Size:"
|
||||
'
|
||||
'lblSync
|
||||
@@ -524,7 +525,7 @@ Partial Class frmGameManager
|
||||
Me.lblSync.Location = New System.Drawing.Point(6, 105)
|
||||
Me.lblSync.Name = "lblSync"
|
||||
Me.lblSync.Size = New System.Drawing.Size(62, 13)
|
||||
Me.lblSync.TabIndex = 24
|
||||
Me.lblSync.TabIndex = 3
|
||||
Me.lblSync.Text = "Up to Date!"
|
||||
Me.lblSync.Visible = False
|
||||
'
|
||||
@@ -534,7 +535,7 @@ Partial Class frmGameManager
|
||||
Me.txtCurrentBackup.Name = "txtCurrentBackup"
|
||||
Me.txtCurrentBackup.ReadOnly = True
|
||||
Me.txtCurrentBackup.Size = New System.Drawing.Size(275, 20)
|
||||
Me.txtCurrentBackup.TabIndex = 0
|
||||
Me.txtCurrentBackup.TabIndex = 4
|
||||
Me.txtCurrentBackup.TabStop = False
|
||||
'
|
||||
'lblCurrentBackup
|
||||
@@ -543,7 +544,7 @@ Partial Class frmGameManager
|
||||
Me.lblCurrentBackup.Location = New System.Drawing.Point(6, 27)
|
||||
Me.lblCurrentBackup.Name = "lblCurrentBackup"
|
||||
Me.lblCurrentBackup.Size = New System.Drawing.Size(84, 13)
|
||||
Me.lblCurrentBackup.TabIndex = 22
|
||||
Me.lblCurrentBackup.TabIndex = 0
|
||||
Me.lblCurrentBackup.Text = "Current Backup:"
|
||||
'
|
||||
'txtLocalBackup
|
||||
@@ -552,7 +553,7 @@ Partial Class frmGameManager
|
||||
Me.txtLocalBackup.Name = "txtLocalBackup"
|
||||
Me.txtLocalBackup.ReadOnly = True
|
||||
Me.txtLocalBackup.Size = New System.Drawing.Size(275, 20)
|
||||
Me.txtLocalBackup.TabIndex = 0
|
||||
Me.txtLocalBackup.TabIndex = 5
|
||||
Me.txtLocalBackup.TabStop = False
|
||||
'
|
||||
'lblLastBackup
|
||||
@@ -561,7 +562,7 @@ Partial Class frmGameManager
|
||||
Me.lblLastBackup.Location = New System.Drawing.Point(6, 53)
|
||||
Me.lblLastBackup.Name = "lblLastBackup"
|
||||
Me.lblLastBackup.Size = New System.Drawing.Size(76, 13)
|
||||
Me.lblLastBackup.TabIndex = 20
|
||||
Me.lblLastBackup.TabIndex = 1
|
||||
Me.lblLastBackup.Text = "Local Backup:"
|
||||
'
|
||||
'btnMarkAsRestored
|
||||
@@ -570,7 +571,7 @@ Partial Class frmGameManager
|
||||
Me.btnMarkAsRestored.Location = New System.Drawing.Point(429, 526)
|
||||
Me.btnMarkAsRestored.Name = "btnMarkAsRestored"
|
||||
Me.btnMarkAsRestored.Size = New System.Drawing.Size(100, 23)
|
||||
Me.btnMarkAsRestored.TabIndex = 11
|
||||
Me.btnMarkAsRestored.TabIndex = 12
|
||||
Me.btnMarkAsRestored.Text = "&Mark as Restored"
|
||||
Me.btnMarkAsRestored.UseVisualStyleBackColor = True
|
||||
'
|
||||
@@ -580,17 +581,17 @@ Partial Class frmGameManager
|
||||
Me.btnRestore.Location = New System.Drawing.Point(535, 526)
|
||||
Me.btnRestore.Name = "btnRestore"
|
||||
Me.btnRestore.Size = New System.Drawing.Size(75, 23)
|
||||
Me.btnRestore.TabIndex = 12
|
||||
Me.btnRestore.TabIndex = 13
|
||||
Me.btnRestore.Text = "&Restore"
|
||||
Me.btnRestore.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnSave
|
||||
'
|
||||
Me.btnSave.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.btnSave.Location = New System.Drawing.Point(616, 360)
|
||||
Me.btnSave.Location = New System.Drawing.Point(616, 336)
|
||||
Me.btnSave.Name = "btnSave"
|
||||
Me.btnSave.Size = New System.Drawing.Size(75, 23)
|
||||
Me.btnSave.TabIndex = 8
|
||||
Me.btnSave.TabIndex = 9
|
||||
Me.btnSave.Text = "&Save"
|
||||
Me.btnSave.UseVisualStyleBackColor = True
|
||||
'
|
||||
@@ -607,17 +608,17 @@ Partial Class frmGameManager
|
||||
'btnCancel
|
||||
'
|
||||
Me.btnCancel.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.btnCancel.Location = New System.Drawing.Point(697, 360)
|
||||
Me.btnCancel.Location = New System.Drawing.Point(697, 336)
|
||||
Me.btnCancel.Name = "btnCancel"
|
||||
Me.btnCancel.Size = New System.Drawing.Size(75, 23)
|
||||
Me.btnCancel.TabIndex = 9
|
||||
Me.btnCancel.TabIndex = 10
|
||||
Me.btnCancel.Text = "&Cancel"
|
||||
Me.btnCancel.UseVisualStyleBackColor = True
|
||||
'
|
||||
'chkEnabled
|
||||
'
|
||||
Me.chkEnabled.AutoSize = True
|
||||
Me.chkEnabled.Location = New System.Drawing.Point(238, 365)
|
||||
Me.chkEnabled.Location = New System.Drawing.Point(238, 340)
|
||||
Me.chkEnabled.Name = "chkEnabled"
|
||||
Me.chkEnabled.Size = New System.Drawing.Size(109, 17)
|
||||
Me.chkEnabled.TabIndex = 6
|
||||
@@ -742,8 +743,6 @@ Partial Class frmGameManager
|
||||
Friend WithEvents txtFileType As System.Windows.Forms.TextBox
|
||||
Friend WithEvents btnSavePathBrowse As System.Windows.Forms.Button
|
||||
Friend WithEvents btnProcessBrowse As System.Windows.Forms.Button
|
||||
Friend WithEvents lblExclude As System.Windows.Forms.Label
|
||||
Friend WithEvents lblFileType As System.Windows.Forms.Label
|
||||
Friend WithEvents btnSave As System.Windows.Forms.Button
|
||||
Friend WithEvents btnAppPathBrowse As System.Windows.Forms.Button
|
||||
Friend WithEvents lblGamePath As System.Windows.Forms.Label
|
||||
@@ -782,4 +781,6 @@ Partial Class frmGameManager
|
||||
Friend WithEvents btnTags As System.Windows.Forms.Button
|
||||
Friend WithEvents lblTags As System.Windows.Forms.Label
|
||||
Friend WithEvents optTag As System.Windows.Forms.RadioButton
|
||||
Friend WithEvents btnInclude As System.Windows.Forms.Button
|
||||
Friend WithEvents btnExclude As System.Windows.Forms.Button
|
||||
End Class
|
||||
|
||||
@@ -365,12 +365,16 @@ Public Class frmGameManager
|
||||
lstGames.ValueMember = "Key"
|
||||
lstGames.DisplayMember = "Value"
|
||||
|
||||
lstGames.BeginUpdate()
|
||||
|
||||
For Each de As DictionaryEntry In AppData
|
||||
oApp = DirectCast(de.Value, clsGame)
|
||||
oData = New KeyValuePair(Of String, String)(oApp.ID, oApp.Name)
|
||||
lstGames.Items.Add(oData)
|
||||
Next
|
||||
|
||||
lstGames.EndUpdate()
|
||||
|
||||
IsLoading = False
|
||||
End Sub
|
||||
|
||||
@@ -386,6 +390,51 @@ Public Class frmGameManager
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub UpdateBuilderButtonLabel(ByVal sBuilderString As String, ByVal sLabel As String, ByVal btn As Button, ByVal bDirty As Boolean)
|
||||
Dim iCount As Integer = sBuilderString.Split(":").Length
|
||||
|
||||
If sBuilderString <> String.Empty And iCount > 0 Then
|
||||
btn.Text = sLabel & " Items... (" & iCount & ")"
|
||||
Else
|
||||
btn.Text = sLabel & " Items..."
|
||||
End If
|
||||
|
||||
If bDirty Then
|
||||
btn.Font = New Font(FontFamily.GenericSansSerif, 8.25, FontStyle.Bold)
|
||||
Else
|
||||
btn.Font = New Font(FontFamily.GenericSansSerif, 8.25, FontStyle.Regular)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Function GetBuilderRoot() As String
|
||||
Dim sRoot As String = String.Empty
|
||||
|
||||
If Path.IsPathRooted(txtSavePath.Text) Then
|
||||
If Directory.Exists(txtSavePath.Text) Then
|
||||
sRoot = txtSavePath.Text
|
||||
End If
|
||||
Else
|
||||
If txtAppPath.Text <> String.Empty Then
|
||||
If Directory.Exists(txtAppPath.Text & "\" & txtSavePath.Text) Then
|
||||
sRoot = txtAppPath.Text & "\" & txtSavePath.Text
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
|
||||
Return sRoot
|
||||
End Function
|
||||
|
||||
Private Sub OpenBuilder(ByVal sFormText As String, ByRef txtBox As TextBox)
|
||||
Dim frm As New frmIncludeExclude
|
||||
frm.FormName = sFormText
|
||||
frm.BuilderString = txtBox.Text
|
||||
frm.RootFolder = GetBuilderRoot()
|
||||
|
||||
frm.ShowDialog()
|
||||
|
||||
txtBox.Text = frm.BuilderString
|
||||
End Sub
|
||||
|
||||
Private Function FindRestorePath() As Boolean
|
||||
Dim sProcess As String
|
||||
Dim sRestorePath As String
|
||||
@@ -570,6 +619,10 @@ Public Class frmGameManager
|
||||
chkEnabled.Checked = oApp.Enabled
|
||||
chkMonitorOnly.Checked = oApp.MonitorOnly
|
||||
|
||||
'Update Buttons
|
||||
UpdateBuilderButtonLabel(oApp.FileType, "In&clude", btnInclude, False)
|
||||
UpdateBuilderButtonLabel(oApp.ExcludeList, "E&xclude", btnExclude, False)
|
||||
|
||||
'Extra
|
||||
txtAppPath.Text = oApp.ProcessPath
|
||||
txtCompany.Text = oApp.Company
|
||||
@@ -685,6 +738,8 @@ Public Class frmGameManager
|
||||
chkMonitorOnly.Checked = False
|
||||
btnTags.Enabled = False
|
||||
lblTags.Visible = False
|
||||
btnInclude.Text = "In&clude Items..."
|
||||
btnExclude.Text = "E&xclude Items..."
|
||||
Case eModes.Edit
|
||||
grpFilter.Enabled = False
|
||||
lstGames.Enabled = False
|
||||
@@ -735,6 +790,8 @@ Public Class frmGameManager
|
||||
btnBackup.Enabled = False
|
||||
btnTags.Enabled = False
|
||||
lblTags.Visible = False
|
||||
btnInclude.Text = "In&clude Items..."
|
||||
btnExclude.Text = "E&xclude Items..."
|
||||
Case eModes.Disabled
|
||||
grpFilter.Enabled = True
|
||||
lstGames.Enabled = True
|
||||
@@ -757,6 +814,8 @@ Public Class frmGameManager
|
||||
btnRestore.Enabled = False
|
||||
btnMarkAsRestored.Enabled = False
|
||||
btnTags.Enabled = False
|
||||
btnInclude.Text = "In&clude Items..."
|
||||
btnExclude.Text = "E&xclude Items..."
|
||||
Case eModes.MultiSelect
|
||||
lstGames.Enabled = True
|
||||
WipeControls(grpConfig.Controls)
|
||||
@@ -1199,5 +1258,23 @@ Public Class frmGameManager
|
||||
LoadData()
|
||||
End Sub
|
||||
|
||||
Private Sub btnInclude_Click(sender As Object, e As EventArgs) Handles btnInclude.Click
|
||||
Dim sInclude As String = txtFileType.Text
|
||||
OpenBuilder("Include", txtFileType)
|
||||
UpdateBuilderButtonLabel(txtFileType.Text, "In&clude", btnInclude, (sInclude <> txtFileType.Text))
|
||||
End Sub
|
||||
|
||||
Private Sub btnExclude_Click(sender As Object, e As EventArgs) Handles btnExclude.Click
|
||||
Dim sExclude As String = txtExclude.Text
|
||||
OpenBuilder("Exclude", txtExclude)
|
||||
UpdateBuilderButtonLabel(txtExclude.Text, "E&xclude", btnExclude, (sExclude <> txtExclude.Text))
|
||||
End Sub
|
||||
|
||||
Private Sub chkFolderSave_CheckedChanged(sender As Object, e As EventArgs) Handles chkFolderSave.CheckedChanged
|
||||
If chkFolderSave.Checked Then
|
||||
btnInclude.Enabled = False
|
||||
Else
|
||||
btnInclude.Enabled = True
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
||||
Generated
+275
@@ -0,0 +1,275 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frmIncludeExclude
|
||||
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(frmIncludeExclude))
|
||||
Me.treFiles = New System.Windows.Forms.TreeView()
|
||||
Me.imgIcons = New System.Windows.Forms.ImageList(Me.components)
|
||||
Me.btnSave = New System.Windows.Forms.Button()
|
||||
Me.btnCancel = New System.Windows.Forms.Button()
|
||||
Me.txtRootFolder = New System.Windows.Forms.TextBox()
|
||||
Me.btnBrowse = New System.Windows.Forms.Button()
|
||||
Me.lstBuilder = New System.Windows.Forms.ListView()
|
||||
Me.cmsItems = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.cmsEdit = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.cmsRemove = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.cmsAdd = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.btnRemove = New System.Windows.Forms.Button()
|
||||
Me.btnAdd = New System.Windows.Forms.Button()
|
||||
Me.grpFileOptions = New System.Windows.Forms.GroupBox()
|
||||
Me.optFileTypes = New System.Windows.Forms.RadioButton()
|
||||
Me.optIndividualFiles = New System.Windows.Forms.RadioButton()
|
||||
Me.lblItems = New System.Windows.Forms.Label()
|
||||
Me.btnRawEdit = New System.Windows.Forms.Button()
|
||||
Me.lblSaveFolder = New System.Windows.Forms.Label()
|
||||
Me.ttWarning = New System.Windows.Forms.ToolTip(Me.components)
|
||||
Me.cmsItems.SuspendLayout()
|
||||
Me.grpFileOptions.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'treFiles
|
||||
'
|
||||
Me.treFiles.CheckBoxes = True
|
||||
Me.treFiles.ImageIndex = 0
|
||||
Me.treFiles.ImageList = Me.imgIcons
|
||||
Me.treFiles.Location = New System.Drawing.Point(12, 64)
|
||||
Me.treFiles.Name = "treFiles"
|
||||
Me.treFiles.SelectedImageIndex = 0
|
||||
Me.treFiles.Size = New System.Drawing.Size(250, 333)
|
||||
Me.treFiles.TabIndex = 1
|
||||
'
|
||||
'imgIcons
|
||||
'
|
||||
Me.imgIcons.ImageStream = CType(resources.GetObject("imgIcons.ImageStream"), System.Windows.Forms.ImageListStreamer)
|
||||
Me.imgIcons.TransparentColor = System.Drawing.Color.Transparent
|
||||
Me.imgIcons.Images.SetKeyName(0, "folder.ico")
|
||||
Me.imgIcons.Images.SetKeyName(1, "file.ico")
|
||||
Me.imgIcons.Images.SetKeyName(2, "type.ico")
|
||||
'
|
||||
'btnSave
|
||||
'
|
||||
Me.btnSave.Location = New System.Drawing.Point(416, 426)
|
||||
Me.btnSave.Name = "btnSave"
|
||||
Me.btnSave.Size = New System.Drawing.Size(75, 23)
|
||||
Me.btnSave.TabIndex = 7
|
||||
Me.btnSave.Text = "&Save"
|
||||
Me.btnSave.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnCancel
|
||||
'
|
||||
Me.btnCancel.Location = New System.Drawing.Point(497, 426)
|
||||
Me.btnCancel.Name = "btnCancel"
|
||||
Me.btnCancel.Size = New System.Drawing.Size(75, 23)
|
||||
Me.btnCancel.TabIndex = 8
|
||||
Me.btnCancel.Text = "&Cancel"
|
||||
Me.btnCancel.UseVisualStyleBackColor = True
|
||||
'
|
||||
'txtRootFolder
|
||||
'
|
||||
Me.txtRootFolder.Location = New System.Drawing.Point(12, 38)
|
||||
Me.txtRootFolder.Name = "txtRootFolder"
|
||||
Me.txtRootFolder.ReadOnly = True
|
||||
Me.txtRootFolder.Size = New System.Drawing.Size(214, 20)
|
||||
Me.txtRootFolder.TabIndex = 0
|
||||
Me.txtRootFolder.TabStop = False
|
||||
'
|
||||
'btnBrowse
|
||||
'
|
||||
Me.btnBrowse.Location = New System.Drawing.Point(232, 37)
|
||||
Me.btnBrowse.Name = "btnBrowse"
|
||||
Me.btnBrowse.Size = New System.Drawing.Size(30, 20)
|
||||
Me.btnBrowse.TabIndex = 0
|
||||
Me.btnBrowse.Text = "..."
|
||||
Me.btnBrowse.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lstBuilder
|
||||
'
|
||||
Me.lstBuilder.ContextMenuStrip = Me.cmsItems
|
||||
Me.lstBuilder.LabelEdit = True
|
||||
Me.lstBuilder.Location = New System.Drawing.Point(322, 38)
|
||||
Me.lstBuilder.Name = "lstBuilder"
|
||||
Me.lstBuilder.Size = New System.Drawing.Size(250, 359)
|
||||
Me.lstBuilder.SmallImageList = Me.imgIcons
|
||||
Me.lstBuilder.TabIndex = 5
|
||||
Me.lstBuilder.UseCompatibleStateImageBehavior = False
|
||||
Me.lstBuilder.View = System.Windows.Forms.View.List
|
||||
'
|
||||
'cmsItems
|
||||
'
|
||||
Me.cmsItems.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.cmsEdit, Me.cmsRemove, Me.cmsAdd})
|
||||
Me.cmsItems.Name = "cmsItems"
|
||||
Me.cmsItems.Size = New System.Drawing.Size(169, 70)
|
||||
'
|
||||
'cmsEdit
|
||||
'
|
||||
Me.cmsEdit.Name = "cmsEdit"
|
||||
Me.cmsEdit.Size = New System.Drawing.Size(168, 22)
|
||||
Me.cmsEdit.Text = "Edit"
|
||||
'
|
||||
'cmsRemove
|
||||
'
|
||||
Me.cmsRemove.Name = "cmsRemove"
|
||||
Me.cmsRemove.Size = New System.Drawing.Size(168, 22)
|
||||
Me.cmsRemove.Text = "Remove"
|
||||
'
|
||||
'cmsAdd
|
||||
'
|
||||
Me.cmsAdd.Name = "cmsAdd"
|
||||
Me.cmsAdd.Size = New System.Drawing.Size(168, 22)
|
||||
Me.cmsAdd.Text = "Add Custom Item"
|
||||
'
|
||||
'btnRemove
|
||||
'
|
||||
Me.btnRemove.Location = New System.Drawing.Point(268, 201)
|
||||
Me.btnRemove.Name = "btnRemove"
|
||||
Me.btnRemove.Size = New System.Drawing.Size(48, 23)
|
||||
Me.btnRemove.TabIndex = 4
|
||||
Me.btnRemove.Text = "<"
|
||||
Me.btnRemove.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnAdd
|
||||
'
|
||||
Me.btnAdd.Location = New System.Drawing.Point(268, 172)
|
||||
Me.btnAdd.Name = "btnAdd"
|
||||
Me.btnAdd.Size = New System.Drawing.Size(48, 23)
|
||||
Me.btnAdd.TabIndex = 3
|
||||
Me.btnAdd.Text = ">"
|
||||
Me.btnAdd.UseVisualStyleBackColor = True
|
||||
'
|
||||
'grpFileOptions
|
||||
'
|
||||
Me.grpFileOptions.Controls.Add(Me.optFileTypes)
|
||||
Me.grpFileOptions.Controls.Add(Me.optIndividualFiles)
|
||||
Me.grpFileOptions.Location = New System.Drawing.Point(12, 403)
|
||||
Me.grpFileOptions.Name = "grpFileOptions"
|
||||
Me.grpFileOptions.Size = New System.Drawing.Size(194, 46)
|
||||
Me.grpFileOptions.TabIndex = 2
|
||||
Me.grpFileOptions.TabStop = False
|
||||
Me.grpFileOptions.Text = "File Options"
|
||||
'
|
||||
'optFileTypes
|
||||
'
|
||||
Me.optFileTypes.AutoSize = True
|
||||
Me.optFileTypes.Location = New System.Drawing.Point(6, 19)
|
||||
Me.optFileTypes.Name = "optFileTypes"
|
||||
Me.optFileTypes.Size = New System.Drawing.Size(73, 17)
|
||||
Me.optFileTypes.TabIndex = 0
|
||||
Me.optFileTypes.TabStop = True
|
||||
Me.optFileTypes.Text = "File Types"
|
||||
Me.optFileTypes.UseVisualStyleBackColor = True
|
||||
'
|
||||
'optIndividualFiles
|
||||
'
|
||||
Me.optIndividualFiles.AutoSize = True
|
||||
Me.optIndividualFiles.Location = New System.Drawing.Point(85, 19)
|
||||
Me.optIndividualFiles.Name = "optIndividualFiles"
|
||||
Me.optIndividualFiles.Size = New System.Drawing.Size(94, 17)
|
||||
Me.optIndividualFiles.TabIndex = 1
|
||||
Me.optIndividualFiles.TabStop = True
|
||||
Me.optIndividualFiles.Text = "Individual Files"
|
||||
Me.optIndividualFiles.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lblItems
|
||||
'
|
||||
Me.lblItems.Location = New System.Drawing.Point(322, 16)
|
||||
Me.lblItems.Name = "lblItems"
|
||||
Me.lblItems.Size = New System.Drawing.Size(250, 13)
|
||||
Me.lblItems.TabIndex = 14
|
||||
Me.lblItems.Text = "Items"
|
||||
Me.lblItems.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'btnRawEdit
|
||||
'
|
||||
Me.btnRawEdit.Location = New System.Drawing.Point(335, 426)
|
||||
Me.btnRawEdit.Name = "btnRawEdit"
|
||||
Me.btnRawEdit.Size = New System.Drawing.Size(75, 23)
|
||||
Me.btnRawEdit.TabIndex = 6
|
||||
Me.btnRawEdit.Text = "Raw &Edit"
|
||||
Me.btnRawEdit.UseVisualStyleBackColor = True
|
||||
'
|
||||
'lblSaveFolder
|
||||
'
|
||||
Me.lblSaveFolder.Location = New System.Drawing.Point(9, 16)
|
||||
Me.lblSaveFolder.Name = "lblSaveFolder"
|
||||
Me.lblSaveFolder.Size = New System.Drawing.Size(250, 13)
|
||||
Me.lblSaveFolder.TabIndex = 15
|
||||
Me.lblSaveFolder.Text = "Saved Game Explorer"
|
||||
Me.lblSaveFolder.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'ttWarning
|
||||
'
|
||||
Me.ttWarning.ToolTipIcon = System.Windows.Forms.ToolTipIcon.Warning
|
||||
'
|
||||
'frmIncludeExclude
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(584, 461)
|
||||
Me.Controls.Add(Me.lblSaveFolder)
|
||||
Me.Controls.Add(Me.btnRawEdit)
|
||||
Me.Controls.Add(Me.lblItems)
|
||||
Me.Controls.Add(Me.grpFileOptions)
|
||||
Me.Controls.Add(Me.btnRemove)
|
||||
Me.Controls.Add(Me.btnAdd)
|
||||
Me.Controls.Add(Me.lstBuilder)
|
||||
Me.Controls.Add(Me.btnBrowse)
|
||||
Me.Controls.Add(Me.txtRootFolder)
|
||||
Me.Controls.Add(Me.btnCancel)
|
||||
Me.Controls.Add(Me.btnSave)
|
||||
Me.Controls.Add(Me.treFiles)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
|
||||
Me.MaximizeBox = False
|
||||
Me.MinimizeBox = False
|
||||
Me.Name = "frmIncludeExclude"
|
||||
Me.ShowIcon = False
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Include / Exclude Builder"
|
||||
Me.cmsItems.ResumeLayout(False)
|
||||
Me.grpFileOptions.ResumeLayout(False)
|
||||
Me.grpFileOptions.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents treFiles As System.Windows.Forms.TreeView
|
||||
Friend WithEvents imgIcons As System.Windows.Forms.ImageList
|
||||
Friend WithEvents btnSave As System.Windows.Forms.Button
|
||||
Friend WithEvents btnCancel As System.Windows.Forms.Button
|
||||
Friend WithEvents txtRootFolder As System.Windows.Forms.TextBox
|
||||
Friend WithEvents btnBrowse As System.Windows.Forms.Button
|
||||
Friend WithEvents lstBuilder As System.Windows.Forms.ListView
|
||||
Friend WithEvents btnRemove As System.Windows.Forms.Button
|
||||
Friend WithEvents btnAdd As System.Windows.Forms.Button
|
||||
Friend WithEvents grpFileOptions As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents optFileTypes As System.Windows.Forms.RadioButton
|
||||
Friend WithEvents optIndividualFiles As System.Windows.Forms.RadioButton
|
||||
Friend WithEvents lblItems As System.Windows.Forms.Label
|
||||
Friend WithEvents cmsItems As System.Windows.Forms.ContextMenuStrip
|
||||
Friend WithEvents cmsEdit As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents cmsRemove As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents cmsAdd As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents btnRawEdit As Button
|
||||
Friend WithEvents lblSaveFolder As Label
|
||||
Friend WithEvents ttWarning As ToolTip
|
||||
End Class
|
||||
@@ -0,0 +1,177 @@
|
||||
<?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="imgIcons.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
<data name="imgIcons.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>
|
||||
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
|
||||
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
|
||||
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAB6
|
||||
CQAAAk1TRnQBSQFMAgEBAwEAAagBAAGoAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
|
||||
AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
|
||||
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/xMACf82AAH0CQcB/wsA
|
||||
Af8ZAAHyDLsB8gIAAfMJvAH0A/8IAAH/AbMBuwH/FgABuwyzAQkCAAHzAvIB8QkHAfQHAAH/A7MBugH/
|
||||
FQABCQyzAQkCAAHzAvIB8QnwAfMGAAH/ArQB8QG8AbQBCQH/FAABCQyzAQkCAAHzDPIB8wUAAf8CtALy
|
||||
AfEBvAG0AbsB/xMAAQkMugEJAgAC8wvyAfMEAAH/AbQBugHzA/IB8QG8AbQBuxMAAfAMugHwAgAD8wry
|
||||
AfMDAAH/AroD8wPyAfEBugG0EwAB8AzbAfACAATzAfIJ8wIAAf8CugbzAfICugL/EgABGQzcARkCAATz
|
||||
AfIJ8wIAAfQCugEJBfMCuwH/FAAB8QwJAfECAA7zAgAB9AG6AdsB3AEJA/MBCQG7Af8VAAHwB9wFugHw
|
||||
AgAB8wL0B/MB8gHvAbwB9AIAAfQB3AHzAf8B3AEJAfICCQH/FgABGQG7BO8BCQH/CAAB9AnzAe8B9wHx
|
||||
AwAB9AHcARkB8wPcAQkB/xcAAfMB8AQZAfIJAAP/AfQB8wT0AQcBvAH/BAAB9AIJAdwB4QIJAf8rAAH/
|
||||
BPMC8gYAAf8F9AH/LQAF/yYAAUIBTQE+BwABPgMAASgDAAFAAwABEAMAAQEBAAEBBQABgBcAA/8BAAL/
|
||||
AcABHwL/AgAC/wGAAQ8B/gH/AgABgAEBAYABAQH+AR8CAAGAAQEBgAEBAfwBDwIAAYABAQGAAQEB+AEH
|
||||
AgABgAEBAYABAQHwAQMCAAGAAQEBgAEBAeABAwIAAYABAQGAAQEBwAEDAgABgAEBAYABAQGAAQECAAGA
|
||||
AQEBgAEBAYABBwIAAYABAQGAAQEBgAEPAgABgAEBAYABAQGAAR8CAAGAAX8BgAEDAYABPwIAAYAB/wGA
|
||||
AQcBgAF/AgAC/wHwAR8BgAH/AgAC/wH4AT8C/wIACw==
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="cmsItems.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>118, 17</value>
|
||||
</metadata>
|
||||
<metadata name="ttWarning.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>221, 17</value>
|
||||
</metadata>
|
||||
</root>
|
||||
@@ -0,0 +1,322 @@
|
||||
Imports System.IO
|
||||
|
||||
Public Class frmIncludeExclude
|
||||
|
||||
Dim sFormName As String = "Builder"
|
||||
Dim sRootFolder As String = String.Empty
|
||||
Dim sBuilderString As String
|
||||
|
||||
Public Property BuilderString As String
|
||||
Get
|
||||
Return sBuilderString
|
||||
End Get
|
||||
Set(value As String)
|
||||
sBuilderString = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property FormName As String
|
||||
Get
|
||||
Return sFormName
|
||||
End Get
|
||||
Set(value As String)
|
||||
sFormName = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property RootFolder As String
|
||||
Get
|
||||
Return sRootFolder
|
||||
End Get
|
||||
Set(value As String)
|
||||
sRootFolder = value.TrimEnd("\")
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private Sub BuildBranch(ByVal sDirectory As String, ByVal oNode As TreeNode)
|
||||
Dim sFolders As String()
|
||||
Dim sFiles As String()
|
||||
Dim oChild As TreeNode
|
||||
Dim oPlaceHolder As TreeNode
|
||||
|
||||
If oNode.Nodes.ContainsKey("GBM_Tree_Placeholder") Then
|
||||
Try
|
||||
Cursor.Current = Cursors.WaitCursor
|
||||
treFiles.BeginUpdate()
|
||||
|
||||
oNode.Nodes.RemoveByKey("GBM_Tree_Placeholder")
|
||||
|
||||
sFolders = Directory.GetDirectories(sDirectory)
|
||||
sFiles = Directory.GetFiles(sDirectory)
|
||||
|
||||
If sFolders.Length <> 0 Then
|
||||
For Each sFolder As String In sFolders
|
||||
oChild = New TreeNode(sFolder.Replace(sDirectory, String.Empty).TrimStart("\"), 0, 0)
|
||||
oChild.Name = sFolder
|
||||
oChild.Tag = 0
|
||||
oNode.Nodes.Add(oChild)
|
||||
oPlaceHolder = New TreeNode("GBM_Tree_Placeholder")
|
||||
oPlaceHolder.Name = "GBM_Tree_Placeholder"
|
||||
oChild.Nodes.Add(oPlaceHolder)
|
||||
Next
|
||||
End If
|
||||
|
||||
If sFiles.Length <> 0 Then
|
||||
For Each sFile As String In sFiles
|
||||
oChild = New TreeNode(sFile.Replace(sDirectory, String.Empty).TrimStart("\"), 1, 1)
|
||||
oChild.Tag = 1
|
||||
oNode.Nodes.Add(oChild)
|
||||
Next
|
||||
End If
|
||||
|
||||
Catch uaex As UnauthorizedAccessException
|
||||
'Do Nothing
|
||||
Catch ex As Exception
|
||||
MsgBox("An unexpected error occured while reading the file system: " & vbCrLf & vbCrLf & ex.Message, MsgBoxStyle.Critical, "Game Backup Monitor")
|
||||
Finally
|
||||
treFiles.EndUpdate()
|
||||
Cursor.Current = Cursors.Default
|
||||
End Try
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub BuildTrunk()
|
||||
Dim oRootNode As TreeNode
|
||||
|
||||
If Path.GetPathRoot(txtRootFolder.Text) = txtRootFolder.Text Then
|
||||
oRootNode = New TreeNode(txtRootFolder.Text, 0, 0)
|
||||
Else
|
||||
oRootNode = New TreeNode(Path.GetFileName(txtRootFolder.Text), 0, 0)
|
||||
End If
|
||||
|
||||
treFiles.Nodes.Clear()
|
||||
oRootNode.Name = "Root"
|
||||
oRootNode.Nodes.Add("GBM_Tree_Placeholder", "GBM_Tree_Placeholder")
|
||||
treFiles.Nodes.Add(oRootNode)
|
||||
BuildBranch(txtRootFolder.Text, oRootNode)
|
||||
End Sub
|
||||
|
||||
Private Sub RootPathBrowse()
|
||||
Dim sDefaultFolder As String = Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments)
|
||||
Dim sCurrentPath As String = txtRootFolder.Text
|
||||
Dim sNewPath As String
|
||||
|
||||
If sCurrentPath <> String.Empty Then
|
||||
If Directory.Exists(sCurrentPath) Then
|
||||
sDefaultFolder = sCurrentPath
|
||||
End If
|
||||
End If
|
||||
|
||||
sNewPath = mgrCommon.OpenFolderBrowser("Choose the location of the saved game folder:", sDefaultFolder, False)
|
||||
|
||||
If sNewPath <> String.Empty Then txtRootFolder.Text = sNewPath
|
||||
End Sub
|
||||
|
||||
Private Sub GetAllCheckedNodes(ByVal oRootNode As TreeNodeCollection, ByRef oNodeList As List(Of TreeNode))
|
||||
For Each oNode As TreeNode In oRootNode
|
||||
If oNode.Checked Then
|
||||
oNode.Checked = False
|
||||
oNodeList.Add(oNode)
|
||||
End If
|
||||
If oNode.Nodes.Count > 0 Then
|
||||
GetAllCheckedNodes(oNode.Nodes, oNodeList)
|
||||
End If
|
||||
Next
|
||||
End Sub
|
||||
|
||||
Private Sub AddItem()
|
||||
Dim oCheckedNodes As New List(Of TreeNode)
|
||||
Dim oListViewItem As ListViewItem
|
||||
Dim sItem As String
|
||||
|
||||
GetAllCheckedNodes(treFiles.Nodes, oCheckedNodes)
|
||||
|
||||
lstBuilder.BeginUpdate()
|
||||
For Each oNode In oCheckedNodes
|
||||
sItem = oNode.Text
|
||||
If oNode.Tag = 1 And optFileTypes.Checked Then
|
||||
sItem = Path.GetExtension(oNode.Text)
|
||||
If sItem <> String.Empty Then
|
||||
sItem = "*" & sItem
|
||||
oListViewItem = New ListViewItem(sItem, 2)
|
||||
oListViewItem.Name = sItem
|
||||
Else
|
||||
sItem = oNode.Text
|
||||
oListViewItem = New ListViewItem(sItem, 1)
|
||||
oListViewItem.Name = sItem
|
||||
End If
|
||||
Else
|
||||
oListViewItem = New ListViewItem(sItem, CInt(oNode.Tag))
|
||||
oListViewItem.Name = sItem
|
||||
End If
|
||||
|
||||
If Not lstBuilder.Items.ContainsKey(sItem) Then
|
||||
lstBuilder.Items.Add(oListViewItem)
|
||||
End If
|
||||
Next
|
||||
lstBuilder.EndUpdate()
|
||||
End Sub
|
||||
|
||||
Private Sub RemoveItem()
|
||||
For Each oListViewItem As ListViewItem In lstBuilder.SelectedItems
|
||||
oListViewItem.Remove()
|
||||
Next
|
||||
End Sub
|
||||
|
||||
Private Sub ParseBuilderString(ByVal sString As String)
|
||||
Dim iType As Integer = 1
|
||||
Dim oListViewItem As ListViewItem
|
||||
Dim sItems As String() = sString.Split(":")
|
||||
|
||||
lstBuilder.BeginUpdate()
|
||||
lstBuilder.Clear()
|
||||
|
||||
For Each sItem As String In sItems
|
||||
oListViewItem = New ListViewItem(sItem)
|
||||
oListViewItem.Name = sItem
|
||||
IdentifyEntry(oListViewItem, sItem)
|
||||
If Not lstBuilder.Items.ContainsKey(sItem) Then
|
||||
lstBuilder.Items.Add(oListViewItem)
|
||||
End If
|
||||
Next
|
||||
|
||||
lstBuilder.EndUpdate()
|
||||
End Sub
|
||||
|
||||
Private Sub IdentifyEntry(ByRef oListItem As ListViewItem, ByVal sNewLabel As String)
|
||||
Dim iType As Integer = 1
|
||||
Dim sFolderCheck As String
|
||||
|
||||
If sNewLabel.Contains("*") Or sNewLabel.Contains("?") Then
|
||||
iType = 2
|
||||
Else
|
||||
If txtRootFolder.Text <> String.Empty Then
|
||||
If Path.GetFileName(txtRootFolder.Text) = sNewLabel Then
|
||||
sFolderCheck = txtRootFolder.Text
|
||||
Else
|
||||
sFolderCheck = txtRootFolder.Text & "\" & sNewLabel
|
||||
End If
|
||||
If Directory.Exists(sFolderCheck) Then
|
||||
iType = 0
|
||||
Else
|
||||
iType = 1
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
|
||||
oListItem.ImageIndex = iType
|
||||
End Sub
|
||||
|
||||
Private Function CreateNewBuilderString() As String
|
||||
Dim sTempString As String = String.Empty
|
||||
|
||||
For Each oListViewItem As ListViewItem In lstBuilder.Items
|
||||
sTempString &= oListViewItem.Text & ":"
|
||||
Next
|
||||
|
||||
sTempString = sTempString.TrimEnd(":")
|
||||
|
||||
Return sTempString
|
||||
End Function
|
||||
|
||||
Private Sub OpenRawEdit()
|
||||
Dim sCurrentString As String = CreateNewBuilderString()
|
||||
Dim sNewString As String
|
||||
sNewString = InputBox("Items are semi-colon delimited.", FormName & " Raw Edit", sCurrentString)
|
||||
If sNewString <> String.Empty Then
|
||||
ParseBuilderString(sNewString)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub frmIncludeExclude_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
Me.Text = FormName & " Builder"
|
||||
txtRootFolder.Text = RootFolder
|
||||
optFileTypes.Checked = True
|
||||
lblItems.Text = FormName & " Items"
|
||||
grpFileOptions.Text = FormName & " Options"
|
||||
If BuilderString <> String.Empty Then ParseBuilderString(BuilderString)
|
||||
If txtRootFolder.Text <> String.Empty Then BuildTrunk()
|
||||
End Sub
|
||||
|
||||
Private Sub frmIncludeExclude_Shown(sender As Object, e As EventArgs) Handles MyBase.Shown
|
||||
treFiles.Select()
|
||||
If Not treFiles.SelectedNode Is Nothing Then treFiles.SelectedNode.Expand()
|
||||
If txtRootFolder.Text = String.Empty Then
|
||||
ttWarning.ToolTipTitle = "Notice"
|
||||
ttWarning.Show("The saved game folder could not be determined or does not exist.", txtRootFolder, 6000)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub btnBrowse_Click(sender As Object, e As EventArgs) Handles btnBrowse.Click
|
||||
RootPathBrowse()
|
||||
If txtRootFolder.Text <> String.Empty Then BuildTrunk()
|
||||
treFiles.Select()
|
||||
If Not treFiles.SelectedNode Is Nothing Then treFiles.SelectedNode.Expand()
|
||||
End Sub
|
||||
|
||||
Private Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click
|
||||
BuilderString = CreateNewBuilderString()
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
Private Sub btnCancel_Click(sender As Object, e As EventArgs) Handles btnCancel.Click
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
Private Sub treFiles_BeforeExpand(sender As Object, e As TreeViewCancelEventArgs) Handles treFiles.BeforeExpand
|
||||
If Not e.Node.Name = "Root" Then
|
||||
BuildBranch(e.Node.Name, e.Node)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub btnAdd_Click(sender As Object, e As EventArgs) Handles btnAdd.Click
|
||||
AddItem()
|
||||
End Sub
|
||||
|
||||
Private Sub btnRemove_Click(sender As Object, e As EventArgs) Handles btnRemove.Click
|
||||
RemoveItem()
|
||||
End Sub
|
||||
|
||||
Private Sub cmsItems_Opening(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles cmsItems.Opening
|
||||
If lstBuilder.SelectedItems.Count = 0 Then
|
||||
cmsEdit.Visible = False
|
||||
cmsRemove.Visible = False
|
||||
cmsAdd.Visible = True
|
||||
Else
|
||||
cmsEdit.Visible = True
|
||||
cmsRemove.Visible = True
|
||||
cmsAdd.Visible = False
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub cmsEdit_Click(sender As Object, e As EventArgs) Handles cmsEdit.Click
|
||||
If lstBuilder.SelectedItems.Count > 0 Then
|
||||
lstBuilder.SelectedItems(0).BeginEdit()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub cmsRemove_Click(sender As Object, e As EventArgs) Handles cmsRemove.Click
|
||||
RemoveItem()
|
||||
End Sub
|
||||
|
||||
Private Sub cmsAdd_Click(sender As Object, e As EventArgs) Handles cmsAdd.Click
|
||||
Dim oNewItem As New ListViewItem("Custom Item", 1)
|
||||
oNewItem.Selected = True
|
||||
lstBuilder.Items.Add(oNewItem)
|
||||
lstBuilder.SelectedItems(0).BeginEdit()
|
||||
End Sub
|
||||
|
||||
Private Sub lstBuilder_AfterLabelEdit(sender As Object, e As LabelEditEventArgs) Handles lstBuilder.AfterLabelEdit
|
||||
If Not e.Label Is Nothing Then
|
||||
If lstBuilder.Items.ContainsKey(e.Label) Then
|
||||
e.CancelEdit = True
|
||||
Else
|
||||
IdentifyEntry(lstBuilder.Items(e.Item), e.Label)
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub btnRawEdit_Click(sender As Object, e As EventArgs) Handles btnRawEdit.Click
|
||||
OpenRawEdit()
|
||||
End Sub
|
||||
End Class
|
||||
Generated
+43
-26
@@ -34,6 +34,7 @@ Partial Class frmMain
|
||||
Me.gMonTraySetupAddWizard = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.gMonTraySetupGameManager = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.gMonTraySetupCustomVariables = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.gMonTraySetupTags = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.gMonTrayTools = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.gMonTrayToolsGameList = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.gMonTrayToolsGameImportOfficialList = New System.Windows.Forms.ToolStripMenuItem()
|
||||
@@ -60,6 +61,7 @@ Partial Class frmMain
|
||||
Me.gMonSetupGameManager = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.gMonSetupAddWizard = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.gMonSetupCustomVariables = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.gMonSetupTags = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.gMonTools = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.gMonToolsGameList = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.gMonToolsGameImportOfficialList = New System.Windows.Forms.ToolStripMenuItem()
|
||||
@@ -78,10 +80,10 @@ Partial Class frmMain
|
||||
Me.lblLastActionTitle = New System.Windows.Forms.Label()
|
||||
Me.lblTimeTitle = New System.Windows.Forms.Label()
|
||||
Me.lblTimeSpent = New System.Windows.Forms.Label()
|
||||
Me.txtGameInfo = New System.Windows.Forms.TextBox()
|
||||
Me.btnCancelOperation = New System.Windows.Forms.Button()
|
||||
Me.gMonSetupTags = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.gMonTraySetupTags = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.lblStatus1 = New System.Windows.Forms.Label()
|
||||
Me.lblStatus2 = New System.Windows.Forms.Label()
|
||||
Me.lblStatus3 = New System.Windows.Forms.Label()
|
||||
Me.gMonTrayMenu.SuspendLayout()
|
||||
Me.gMonStatusStrip.SuspendLayout()
|
||||
Me.gMonMainMenu.SuspendLayout()
|
||||
@@ -151,6 +153,12 @@ Partial Class frmMain
|
||||
Me.gMonTraySetupCustomVariables.Size = New System.Drawing.Size(201, 22)
|
||||
Me.gMonTraySetupCustomVariables.Text = "Custom &Path Variables..."
|
||||
'
|
||||
'gMonTraySetupTags
|
||||
'
|
||||
Me.gMonTraySetupTags.Name = "gMonTraySetupTags"
|
||||
Me.gMonTraySetupTags.Size = New System.Drawing.Size(201, 22)
|
||||
Me.gMonTraySetupTags.Text = "&Tags"
|
||||
'
|
||||
'gMonTrayTools
|
||||
'
|
||||
Me.gMonTrayTools.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.gMonTrayToolsGameList, Me.gMonTrayToolsSyncMan, Me.gMonTrayToolsCompact})
|
||||
@@ -334,6 +342,12 @@ Partial Class frmMain
|
||||
Me.gMonSetupCustomVariables.Size = New System.Drawing.Size(201, 22)
|
||||
Me.gMonSetupCustomVariables.Text = "Custom &Path Variables..."
|
||||
'
|
||||
'gMonSetupTags
|
||||
'
|
||||
Me.gMonSetupTags.Name = "gMonSetupTags"
|
||||
Me.gMonSetupTags.Size = New System.Drawing.Size(201, 22)
|
||||
Me.gMonSetupTags.Text = "&Tags..."
|
||||
'
|
||||
'gMonTools
|
||||
'
|
||||
Me.gMonTools.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.gMonToolsGameList, Me.gMonToolsSyncMan, Me.gMonToolsCompact})
|
||||
@@ -469,19 +483,6 @@ Partial Class frmMain
|
||||
Me.lblTimeSpent.TabIndex = 14
|
||||
Me.lblTimeSpent.Text = "0 Hours"
|
||||
'
|
||||
'txtGameInfo
|
||||
'
|
||||
Me.txtGameInfo.BorderStyle = System.Windows.Forms.BorderStyle.None
|
||||
Me.txtGameInfo.Cursor = System.Windows.Forms.Cursors.Default
|
||||
Me.txtGameInfo.Location = New System.Drawing.Point(69, 71)
|
||||
Me.txtGameInfo.Multiline = True
|
||||
Me.txtGameInfo.Name = "txtGameInfo"
|
||||
Me.txtGameInfo.ReadOnly = True
|
||||
Me.txtGameInfo.Size = New System.Drawing.Size(443, 52)
|
||||
Me.txtGameInfo.TabIndex = 0
|
||||
Me.txtGameInfo.TabStop = False
|
||||
Me.txtGameInfo.WordWrap = False
|
||||
'
|
||||
'btnCancelOperation
|
||||
'
|
||||
Me.btnCancelOperation.Location = New System.Drawing.Point(437, 103)
|
||||
@@ -491,25 +492,39 @@ Partial Class frmMain
|
||||
Me.btnCancelOperation.Text = "&Cancel"
|
||||
Me.btnCancelOperation.UseVisualStyleBackColor = True
|
||||
'
|
||||
'gMonSetupTags
|
||||
'lblStatus1
|
||||
'
|
||||
Me.gMonSetupTags.Name = "gMonSetupTags"
|
||||
Me.gMonSetupTags.Size = New System.Drawing.Size(201, 22)
|
||||
Me.gMonSetupTags.Text = "&Tags..."
|
||||
Me.lblStatus1.AutoEllipsis = True
|
||||
Me.lblStatus1.Location = New System.Drawing.Point(66, 71)
|
||||
Me.lblStatus1.Name = "lblStatus1"
|
||||
Me.lblStatus1.Size = New System.Drawing.Size(446, 13)
|
||||
Me.lblStatus1.TabIndex = 15
|
||||
'
|
||||
'gMonTraySetupTags
|
||||
'lblStatus2
|
||||
'
|
||||
Me.gMonTraySetupTags.Name = "gMonTraySetupTags"
|
||||
Me.gMonTraySetupTags.Size = New System.Drawing.Size(201, 22)
|
||||
Me.gMonTraySetupTags.Text = "&Tags"
|
||||
Me.lblStatus2.AutoEllipsis = True
|
||||
Me.lblStatus2.Location = New System.Drawing.Point(66, 87)
|
||||
Me.lblStatus2.Name = "lblStatus2"
|
||||
Me.lblStatus2.Size = New System.Drawing.Size(446, 13)
|
||||
Me.lblStatus2.TabIndex = 16
|
||||
'
|
||||
'lblStatus3
|
||||
'
|
||||
Me.lblStatus3.AutoEllipsis = True
|
||||
Me.lblStatus3.Location = New System.Drawing.Point(66, 103)
|
||||
Me.lblStatus3.Name = "lblStatus3"
|
||||
Me.lblStatus3.Size = New System.Drawing.Size(365, 13)
|
||||
Me.lblStatus3.TabIndex = 17
|
||||
'
|
||||
'frmMain
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(524, 372)
|
||||
Me.Controls.Add(Me.lblStatus3)
|
||||
Me.Controls.Add(Me.lblStatus2)
|
||||
Me.Controls.Add(Me.lblStatus1)
|
||||
Me.Controls.Add(Me.btnCancelOperation)
|
||||
Me.Controls.Add(Me.txtGameInfo)
|
||||
Me.Controls.Add(Me.lblTimeSpent)
|
||||
Me.Controls.Add(Me.lblTimeTitle)
|
||||
Me.Controls.Add(Me.lblLastActionTitle)
|
||||
@@ -579,7 +594,6 @@ Partial Class frmMain
|
||||
Friend WithEvents gMonTraySetupAddWizard As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents lblTimeTitle As System.Windows.Forms.Label
|
||||
Friend WithEvents lblTimeSpent As System.Windows.Forms.Label
|
||||
Friend WithEvents txtGameInfo As System.Windows.Forms.TextBox
|
||||
Friend WithEvents gMonToolsGameList As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents gMonToolsGameImportOfficialList As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents gMonToolsGameImportList As System.Windows.Forms.ToolStripMenuItem
|
||||
@@ -598,4 +612,7 @@ Partial Class frmMain
|
||||
Friend WithEvents gMonStripAdminButton As ToolStripSplitButton
|
||||
Friend WithEvents gMonTraySetupTags As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents gMonSetupTags As System.Windows.Forms.ToolStripMenuItem
|
||||
Friend WithEvents lblStatus1 As Label
|
||||
Friend WithEvents lblStatus2 As Label
|
||||
Friend WithEvents lblStatus3 As Label
|
||||
End Class
|
||||
|
||||
+50
-36
@@ -35,7 +35,9 @@ Public Class frmMain
|
||||
Private bAllowIcon As Boolean = False
|
||||
Private bAllowDetails As Boolean = False
|
||||
Private oPriorImage As Image
|
||||
Private sPriorDetails As String
|
||||
Private sPriorPath As String
|
||||
Private sPriorCompany As String
|
||||
Private sPriorVersion As String
|
||||
|
||||
WithEvents oFileWatcher As New System.IO.FileSystemWatcher
|
||||
WithEvents tmScanTimer As New Timer
|
||||
@@ -47,7 +49,7 @@ Public Class frmMain
|
||||
Public oSettings As New mgrSettings
|
||||
|
||||
Delegate Sub UpdateLogCallBack(ByVal sLogUpdate As String, ByVal bTrayUpdate As Boolean, ByVal objIcon As System.Windows.Forms.ToolTipIcon, ByVal bTimeStamp As Boolean)
|
||||
Delegate Sub WorkingGameInfoCallBack(ByVal sTitle As String, ByVal sInfo As String)
|
||||
Delegate Sub WorkingGameInfoCallBack(ByVal sTitle As String, ByVal sStatus1 As String, ByVal sStatus2 As String, ByVal sStatus3 As String)
|
||||
Delegate Sub UpdateStatusCallBack(ByVal sStatus As String)
|
||||
Delegate Sub SetLastActionCallBack(ByVal sString As String)
|
||||
Delegate Sub OperationEndedCallBack()
|
||||
@@ -67,37 +69,38 @@ Public Class frmMain
|
||||
End Sub
|
||||
|
||||
Private Sub SetRestoreInfo(ByVal oRestoreInfo As clsBackup) Handles oRestore.UpdateRestoreInfo
|
||||
Dim sInfo As String
|
||||
Dim sStatus1 As String
|
||||
Dim sStatus2 As String
|
||||
Dim sStatus3 As String
|
||||
|
||||
'Build Info
|
||||
sInfo = IO.Path.GetFileName(oRestoreInfo.FileName) & vbCrLf & "Updated by " & oRestoreInfo.UpdatedBy & " on " & oRestoreInfo.DateUpdated & vbCrLf
|
||||
sStatus1 = IO.Path.GetFileName(oRestoreInfo.FileName)
|
||||
sStatus2 = "Updated by " & oRestoreInfo.UpdatedBy & " on " & oRestoreInfo.DateUpdated
|
||||
If oRestoreInfo.AbsolutePath Then
|
||||
sInfo = sInfo & oRestoreInfo.RestorePath
|
||||
sStatus3 = oRestoreInfo.RestorePath
|
||||
Else
|
||||
sInfo = sInfo & oRestoreInfo.RelativeRestorePath
|
||||
sStatus3 = oRestoreInfo.RelativeRestorePath
|
||||
End If
|
||||
|
||||
WorkingGameInfo("Restore in progress...", sInfo)
|
||||
WorkingGameInfo("Restore in progress...", sStatus1, sStatus2, sStatus3)
|
||||
UpdateStatus("Restore in progress...")
|
||||
End Sub
|
||||
|
||||
Private Sub SetBackupInfo(ByVal oGame As clsGame) Handles oBackup.UpdateBackupInfo
|
||||
Dim sInfo As String
|
||||
Dim sStatus1 As String
|
||||
Dim sStatus2 As String
|
||||
Dim sStatus3 As String
|
||||
|
||||
'Build Info
|
||||
sInfo = oGame.CroppedName & vbCrLf
|
||||
If oGame.FolderSave Then
|
||||
sInfo = sInfo & "Full Folder Backup" & vbCrLf
|
||||
Else
|
||||
sInfo = sInfo & "File Type Backup: " & oGame.FileType & vbCrLf
|
||||
End If
|
||||
sStatus1 = oGame.CroppedName
|
||||
If oGame.AbsolutePath Then
|
||||
sInfo = sInfo & oGame.Path
|
||||
sStatus2 = oGame.Path
|
||||
Else
|
||||
sInfo = sInfo & oGame.ProcessPath & "\" & oGame.Path
|
||||
sStatus2 = oGame.ProcessPath & "\" & oGame.Path
|
||||
End If
|
||||
sStatus3 = String.Empty
|
||||
|
||||
WorkingGameInfo("Backup in Progress...", sInfo)
|
||||
WorkingGameInfo("Backup in Progress...", sStatus1, sStatus2, sStatus3)
|
||||
UpdateStatus("Backup in progress...")
|
||||
End Sub
|
||||
|
||||
@@ -366,7 +369,9 @@ Public Class frmMain
|
||||
If bKeepInfo And Not oProcess.GameInfo Is Nothing Then
|
||||
lblGameTitle.Text = "Last Game: " & oProcess.GameInfo.CroppedName
|
||||
pbIcon.Image = oPriorImage
|
||||
txtGameInfo.Text = sPriorDetails
|
||||
lblStatus1.Text = sPriorPath
|
||||
lblStatus2.Text = sPriorCompany
|
||||
lblStatus3.Text = sPriorVersion
|
||||
If oSettings.TimeTracking Then
|
||||
lblTimeTitle.Visible = True
|
||||
lblTimeSpent.Visible = True
|
||||
@@ -374,7 +379,9 @@ Public Class frmMain
|
||||
Else
|
||||
pbIcon.Image = My.Resources.Searching
|
||||
lblGameTitle.Text = "No Game Detected"
|
||||
txtGameInfo.Clear()
|
||||
lblStatus1.Text = String.Empty
|
||||
lblStatus2.Text = String.Empty
|
||||
lblStatus3.Text = String.Empty
|
||||
lblTimeTitle.Visible = False
|
||||
lblTimeSpent.Visible = False
|
||||
End If
|
||||
@@ -387,17 +394,19 @@ Public Class frmMain
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub WorkingGameInfo(ByVal sTitle As String, ByVal sInfo As String)
|
||||
Private Sub WorkingGameInfo(ByVal sTitle As String, ByVal sStatus1 As String, ByVal sStatus2 As String, ByVal sStatus3 As String)
|
||||
'Thread Safe (If one control requires an invoke assume they all do)
|
||||
If pbIcon.InvokeRequired = True Then
|
||||
Dim d As New WorkingGameInfoCallBack(AddressOf WorkingGameInfo)
|
||||
Me.Invoke(d, New Object() {sTitle, sInfo})
|
||||
Me.Invoke(d, New Object() {sTitle, sStatus1, sStatus2, sStatus3})
|
||||
Else
|
||||
lblTimeTitle.Visible = False
|
||||
lblTimeSpent.Visible = False
|
||||
pbIcon.Image = My.Resources.Working
|
||||
lblGameTitle.Text = sTitle
|
||||
txtGameInfo.Text = sInfo
|
||||
lblStatus1.Text = sStatus1
|
||||
lblStatus2.Text = sStatus2
|
||||
lblStatus3.Text = sStatus3
|
||||
End If
|
||||
End Sub
|
||||
|
||||
@@ -407,7 +416,9 @@ Public Class frmMain
|
||||
Dim sCompanyName As String = String.Empty
|
||||
|
||||
'Wipe Game Info
|
||||
txtGameInfo.Clear()
|
||||
lblStatus1.Text = String.Empty
|
||||
lblStatus2.Text = String.Empty
|
||||
lblStatus3.Text = String.Empty
|
||||
|
||||
'Get Game Details
|
||||
If bMulti Then
|
||||
@@ -417,7 +428,7 @@ Public Class frmMain
|
||||
lblTimeTitle.Visible = False
|
||||
lblTimeSpent.Visible = False
|
||||
pbIcon.Image = My.Resources.Unknown
|
||||
txtGameInfo.AppendText("Details are not available when multiple games are detected.")
|
||||
lblStatus1.Text = "Game details are unavailable."
|
||||
Else
|
||||
bAllowIcon = True
|
||||
bAllowDetails = True
|
||||
@@ -462,27 +473,30 @@ Public Class frmMain
|
||||
|
||||
'Set Details
|
||||
If sFileName = String.Empty Then
|
||||
txtGameInfo.AppendText("Path Not Available")
|
||||
lblStatus1.Text = "Path Not Available"
|
||||
Else
|
||||
txtGameInfo.AppendText(sFileName)
|
||||
End If
|
||||
|
||||
If sFileVersion = String.Empty Then
|
||||
txtGameInfo.AppendText(vbCrLf & "No Version Set")
|
||||
Else
|
||||
txtGameInfo.AppendText(vbCrLf & sFileVersion)
|
||||
lblStatus1.Text = sFileName
|
||||
End If
|
||||
|
||||
If sCompanyName = String.Empty Then
|
||||
txtGameInfo.AppendText(vbCrLf & "No Company Set")
|
||||
lblStatus2.Text = "No Company Set"
|
||||
Else
|
||||
txtGameInfo.AppendText(vbCrLf & sCompanyName)
|
||||
lblStatus2.Text = sCompanyName
|
||||
End If
|
||||
|
||||
If sFileVersion = String.Empty Then
|
||||
lblStatus3.Text = "No Version Set"
|
||||
Else
|
||||
lblStatus3.Text = sFileVersion
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
'Set Prior Info
|
||||
oPriorImage = pbIcon.Image
|
||||
sPriorDetails = txtGameInfo.Text
|
||||
sPriorPath = lblStatus1.Text
|
||||
sPriorCompany = lblStatus2.Text
|
||||
sPriorVersion = lblStatus3.Text
|
||||
End Sub
|
||||
|
||||
Private Sub UpdateTimeSpent(ByVal dTotalTime As Double, ByVal dSessionTime As Double)
|
||||
@@ -1421,7 +1435,7 @@ Public Class frmMain
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub txtGameInfo_Enter(sender As Object, e As EventArgs) Handles txtGameInfo.Enter
|
||||
Private Sub txtGameInfo_Enter(sender As Object, e As EventArgs)
|
||||
btnLogToggle.Focus()
|
||||
End Sub
|
||||
|
||||
|
||||
@@ -150,6 +150,12 @@
|
||||
<Compile Include="Forms\frmGameTags.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Forms\frmIncludeExclude.Designer.vb">
|
||||
<DependentUpon>frmIncludeExclude.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="Forms\frmIncludeExclude.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Forms\frmStartUpWizard.Designer.vb">
|
||||
<DependentUpon>frmStartUpWizard.vb</DependentUpon>
|
||||
</Compile>
|
||||
@@ -239,6 +245,9 @@
|
||||
<EmbeddedResource Include="Forms\frmGameTags.resx">
|
||||
<DependentUpon>frmGameTags.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="Forms\frmIncludeExclude.resx">
|
||||
<DependentUpon>frmIncludeExclude.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="Forms\frmStartUpWizard.resx">
|
||||
<DependentUpon>frmStartUpWizard.vb</DependentUpon>
|
||||
<SubType>Designer</SubType>
|
||||
@@ -312,9 +321,12 @@
|
||||
<Content Include="References\System.Data.SQLite.dll" />
|
||||
<None Include="Resources\gbm.ico" />
|
||||
<Content Include="Resources\Admin.png" />
|
||||
<Content Include="Resources\file.ico" />
|
||||
<Content Include="Resources\folder.ico" />
|
||||
<Content Include="Resources\GBM_Tray_Detected.ico" />
|
||||
<Content Include="Resources\GBM_Tray_Ready.ico" />
|
||||
<Content Include="Resources\GBM_Tray_Stopped.ico" />
|
||||
<Content Include="Resources\type.ico" />
|
||||
<Content Include="Resources\User.png" />
|
||||
<Content Include="Utilities\x64\7za.dll">
|
||||
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
|
||||
|
||||
@@ -108,12 +108,15 @@ Public Class mgrPath
|
||||
End Set
|
||||
End Property
|
||||
|
||||
|
||||
|
||||
Public Shared Function ValidateForFileSystem(ByVal sCheckString As String) As String
|
||||
Dim cInvalidCharacters As Char() = {"\", "/", ":", "*", "?", """", "<", ">", "|"}
|
||||
Dim cInvalidFileCharacters As Char() = Path.GetInvalidFileNameChars
|
||||
Dim cInvalidPathCharacters As Char() = Path.GetInvalidPathChars
|
||||
|
||||
For Each c As Char In cInvalidCharacters
|
||||
For Each c As Char In cInvalidFileCharacters
|
||||
sCheckString = sCheckString.Replace(c, "")
|
||||
Next
|
||||
|
||||
For Each c As Char In cInvalidPathCharacters
|
||||
sCheckString = sCheckString.Replace(c, "")
|
||||
Next
|
||||
|
||||
@@ -121,7 +124,7 @@ Public Class mgrPath
|
||||
sCheckString = sCheckString.Substring(0, 257)
|
||||
End If
|
||||
|
||||
Return sCheckString
|
||||
Return sCheckString.Trim
|
||||
End Function
|
||||
Public Shared Function DetermineRelativePath(ByVal sProcessPath As String, ByVal sSavePath As String) As String
|
||||
Dim sPath1Array As String()
|
||||
|
||||
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
|
||||
' by using the '*' as shown below:
|
||||
' <Assembly: AssemblyVersion("1.0.*")>
|
||||
|
||||
<Assembly: AssemblyVersion("0.94.*")>
|
||||
<Assembly: AssemblyFileVersion("0.94.0.0")>
|
||||
<Assembly: AssemblyVersion("0.95.*")>
|
||||
<Assembly: AssemblyFileVersion("0.95.0.0")>
|
||||
|
||||
Binary file not shown.
|
After Width: | Height: | Size: 1.1 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 1.1 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 1.1 KiB |
Reference in New Issue
Block a user