diff --git a/ToolCollection/My Project/Settings.Designer.vb b/ToolCollection/My Project/Settings.Designer.vb index 78c0e71..e1a7777 100644 --- a/ToolCollection/My Project/Settings.Designer.vb +++ b/ToolCollection/My Project/Settings.Designer.vb @@ -733,6 +733,18 @@ Namespace My Me("vDefaultDeleteLogsTime") = value End Set End Property + + _ + Public Property vNIStatusFinished() As Boolean + Get + Return CType(Me("vNIStatusFinished"),Boolean) + End Get + Set + Me("vNIStatusFinished") = value + End Set + End Property End Class End Namespace diff --git a/ToolCollection/My Project/Settings.settings b/ToolCollection/My Project/Settings.settings index b402bd0..e0a5519 100644 --- a/ToolCollection/My Project/Settings.settings +++ b/ToolCollection/My Project/Settings.settings @@ -181,5 +181,8 @@ 01/01/0001 03:00:00 + + False + \ No newline at end of file diff --git a/ToolCollection/My Project/licenses.licx b/ToolCollection/My Project/licenses.licx new file mode 100644 index 0000000..53ac073 --- /dev/null +++ b/ToolCollection/My Project/licenses.licx @@ -0,0 +1 @@ +DevExpress.XtraEditors.GridLookUpEdit, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a diff --git a/ToolCollection/app.config b/ToolCollection/app.config index f350c26..8ac8d9d 100644 --- a/ToolCollection/app.config +++ b/ToolCollection/app.config @@ -159,6 +159,9 @@ 01/01/0001 03:00:00 + + False + diff --git a/ToolCollection/frmNIVerknuepfungen.vb b/ToolCollection/frmNIVerknuepfungen.vb index ad03c52..1876203 100644 --- a/ToolCollection/frmNIVerknuepfungen.vb +++ b/ToolCollection/frmNIVerknuepfungen.vb @@ -362,13 +362,13 @@ Public Class frmNIVerknuepfungen Me.txtSelectAnweisung.Text = "" 'Finaler Index ja nein? If Me._selectedProfil.finalerIndex <> "" Then - Me.chbxStatusfertig.CheckState = CheckState.Checked + Me.chbxStatusfertig.Checked = My.Settings.vNIStatusFinished Me.cmbIndex_Statusfertig.Items.Clear() Me.cmbIndex_Statusfertig.ForeColor = Color.Black Me.cmbIndex_Statusfertig.Items.Add(Me._selectedProfil.finalerIndex) ' den index eintragen Me.cmbIndex_Statusfertig.SelectedIndex = 0 ' und direkt auswählen Else - Me.chbxStatusfertig.CheckState = CheckState.Unchecked + Me.chbxStatusfertig.Checked = My.Settings.vNIStatusFinished End If '#### VOLLTEXTINDEXER ##### ElseIf Me._selectedProfil.Ni_Art = "fulltext" Then @@ -2383,6 +2383,8 @@ Public Class frmNIVerknuepfungen Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles chbxStatusfertig.CheckedChanged If Me.chbxStatusfertig.Checked Then Me.cmbIndex_Statusfertig.Enabled = True + My.Settings.vNIStatusFinished = chbxStatusfertig.Checked + My.Settings.Save() Try Me.cmbIndex_Statusfertig.Items.Clear() Dim indexe = _windream.GetIndicesByObjecttype(Me._selectedProfil.Dokumenttyp.aName, True, "NI") @@ -2395,12 +2397,13 @@ Public Class frmNIVerknuepfungen cmbIndex_Statusfertig.SelectedIndex = cmbIndex_Statusfertig.FindStringExact(Me._selectedProfil.finalerIndex) End If - Catch ex As Exception MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Laden der windream-Indexe in die Auswahlliste 'cmbIndex_Statusfertig'") End Try Else Me.cmbIndex_Statusfertig.Enabled = False + My.Settings.vNIStatusFinished = chbxStatusfertig.Checked + My.Settings.Save() If Me._selectedProfil IsNot Nothing Then Me._selectedProfil.finalerIndex = "" Me._selectedProfil.setChanged() @@ -2713,10 +2716,10 @@ Public Class frmNIVerknuepfungen Me._selectedProfil.checkIndexsql = txtCheckIndexSQL.Text - If Not Me._selectedProfil.checkIndexsql = Me._selectedProfil.OriginalcheckIndexsql Then - btnSaveAll.Enabled = True - Me._selectedProfil.setChanged() - End If + If Not Me._selectedProfil.checkIndexsql = Me._selectedProfil.OriginalcheckIndexsql Then + btnSaveAll.Enabled = True + Me._selectedProfil.setChanged() + End If End If @@ -3592,7 +3595,7 @@ Public Class frmNIVerknuepfungen End If Case 2 If Me._selectedProfil IsNot Nothing Then - chbxStatusfertig.Checked = True + chbxStatusfertig.Checked = My.Settings.vNIStatusFinished End If End Select