From c38e20170b5059847d5bfad37bb3cd54f6b360fd Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Thu, 21 Jun 2018 15:26:17 +0200 Subject: [PATCH 01/29] jj: first pass of final index redesign --- app/DD_PM_WINDREAM/ClassFinalIndex.vb | 70 + app/DD_PM_WINDREAM/ClassIndexListConverter.vb | 24 + .../DD_DMSLiteDataSet.Designer.vb | 81 +- app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsd | 74 +- app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xss | 2 +- app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj | 4 + app/DD_PM_WINDREAM/ModuleControlProperties.vb | 25 - .../ModuleFinalIndexProperties.vb | 118 +- .../frmAdministration.Designer.vb | 116 +- app/DD_PM_WINDREAM/frmAdministration.resx | 2512 +++++++++-------- app/DD_PM_WINDREAM/frmAdministration.vb | 92 +- app/DD_PM_WINDREAM/frmMain.vb | 1 - 12 files changed, 1843 insertions(+), 1276 deletions(-) create mode 100644 app/DD_PM_WINDREAM/ClassIndexListConverter.vb diff --git a/app/DD_PM_WINDREAM/ClassFinalIndex.vb b/app/DD_PM_WINDREAM/ClassFinalIndex.vb index 9beac2d..81900ff 100644 --- a/app/DD_PM_WINDREAM/ClassFinalIndex.vb +++ b/app/DD_PM_WINDREAM/ClassFinalIndex.vb @@ -1,3 +1,73 @@ Public Class ClassFinalIndex + Public Shared PREFIX_VECTOR = "[%VKT" + Public Shared Function GetValue(obj As Object, indexName As String, indcies As List(Of String), types As List(Of Integer), isVector As Boolean) + Try + Dim props As FinalIndexProperties = obj + Dim i As Integer = indcies.IndexOf(indexName) + Dim type As Integer = types.Item(i) + Dim value As String = "" + + If type = INDEX_TYPE_STRING Or type = INDEX_TYPE_VECTOR_STRING Then + value = props.StringValue + ElseIf type = INDEX_TYPE_INTEGER Or type = INDEX_TYPE_VECTOR_INTEGER Then + value = props.IntegerValue.ToString + ElseIf type = INDEX_TYPE_FLOAT Then + value = props.FloatValue.ToString + ElseIf type = INDEX_TYPE_BOOLEAN Or type = INDEX_TYPE_VECTOR_BOOLEAN Then + value = IIf(props.BoolValue, "1", "0") + End If + + If isVector Then + Return $"{PREFIX_VECTOR}{value}" + Else + Return value + End If + Catch ex As Exception + MsgBox($"Error in GetValue: {ex.Message}", MsgBoxStyle.Critical) + End Try + End Function + + Public Shared Function SetValue(value As String, obj As Object, indexName As String, indcies As List(Of String), types As List(Of Integer)) + Try + Dim props As FinalIndexProperties = obj + Dim i As Integer = indcies.IndexOf(indexName) + Dim type As Integer = types.Item(i) + Dim isVector = value.StartsWith(PREFIX_VECTOR) + + If type = INDEX_TYPE_STRING Or type = INDEX_TYPE_VECTOR_STRING Then + value = NotNull(value, "") + + props.StringValue = value + ElseIf type = INDEX_TYPE_INTEGER Or type = INDEX_TYPE_VECTOR_INTEGER Then + value = NotNull(Of Integer)(value, 0) + + If value = String.Empty Then + props.IntegerValue = 0 + Else + props.IntegerValue = Integer.Parse(value) + End If + ElseIf type = INDEX_TYPE_FLOAT Then + value = NotNull(Of Double)(value, 0) + + If value = String.Empty Then + props.FloatValue = 0 + Else + props.FloatValue = Double.Parse(value) + End If + ElseIf type = INDEX_TYPE_BOOLEAN Or type = INDEX_TYPE_VECTOR_BOOLEAN Then + value = NotNull(value, "False") + + If value = "1" Or value.ToLower = "true" Then + props.BoolValue = True + Else + props.BoolValue = False + End If + End If + + Return props + Catch ex As Exception + MsgBox($"Error in SetValue: {ex.Message}", MsgBoxStyle.Critical) + End Try + End Function End Class diff --git a/app/DD_PM_WINDREAM/ClassIndexListConverter.vb b/app/DD_PM_WINDREAM/ClassIndexListConverter.vb new file mode 100644 index 0000000..1a73736 --- /dev/null +++ b/app/DD_PM_WINDREAM/ClassIndexListConverter.vb @@ -0,0 +1,24 @@ +Imports System.ComponentModel +Imports System.Globalization + +Public Class IndexListConverter + Inherits TypeConverter + + Public Overrides Function GetStandardValuesSupported(context As ITypeDescriptorContext) As Boolean + Return True + End Function + + Public Overrides Function GetStandardValues(context As ITypeDescriptorContext) As StandardValuesCollection + Dim indexList = DirectCast(context.Instance, FinalIndexProperties).Indicies + Dim values As New StandardValuesCollection(indexList) + Return values + End Function + + Public Overrides Function ConvertTo(context As ITypeDescriptorContext, culture As CultureInfo, value As Object, destinationType As Type) As Object + If IsNothing(value) Then + Return "" + Else + Return value.ToString() + End If + End Function +End Class diff --git a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.Designer.vb b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.Designer.vb index 57d22ff..c75be0a 100644 --- a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.Designer.vb +++ b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.Designer.vb @@ -886,6 +886,10 @@ Partial Public Class DD_DMSLiteDataSet Private columnSQL_COMMAND As Global.System.Data.DataColumn + Private columnDESCRIPTION As Global.System.Data.DataColumn + + Private columnACTIVE As Global.System.Data.DataColumn + _ Public Sub New() @@ -993,6 +997,22 @@ Partial Public Class DD_DMSLiteDataSet End Get End Property + _ + Public ReadOnly Property DESCRIPTIONColumn() As Global.System.Data.DataColumn + Get + Return Me.columnDESCRIPTION + End Get + End Property + + _ + Public ReadOnly Property ACTIVEColumn() As Global.System.Data.DataColumn + Get + Return Me.columnACTIVE + End Get + End Property + _ @@ -1030,9 +1050,9 @@ Partial Public Class DD_DMSLiteDataSet _ - Public Overloads Function AddTBPM_PROFILE_FINAL_INDEXINGRow(ByVal INDEXNAME As String, ByVal VALUE As String, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal CONNECTION_ID As Short, ByVal SQL_COMMAND As String) As TBPM_PROFILE_FINAL_INDEXINGRow + Public Overloads Function AddTBPM_PROFILE_FINAL_INDEXINGRow(ByVal INDEXNAME As String, ByVal VALUE As String, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal CONNECTION_ID As Short, ByVal SQL_COMMAND As String, ByVal DESCRIPTION As String, ByVal ACTIVE As Boolean) As TBPM_PROFILE_FINAL_INDEXINGRow Dim rowTBPM_PROFILE_FINAL_INDEXINGRow As TBPM_PROFILE_FINAL_INDEXINGRow = CType(Me.NewRow,TBPM_PROFILE_FINAL_INDEXINGRow) - Dim columnValuesArray() As Object = New Object() {INDEXNAME, VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, Nothing, CONNECTION_ID, SQL_COMMAND} + Dim columnValuesArray() As Object = New Object() {INDEXNAME, VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, Nothing, CONNECTION_ID, SQL_COMMAND, DESCRIPTION, ACTIVE} rowTBPM_PROFILE_FINAL_INDEXINGRow.ItemArray = columnValuesArray Me.Rows.Add(rowTBPM_PROFILE_FINAL_INDEXINGRow) Return rowTBPM_PROFILE_FINAL_INDEXINGRow @@ -1070,6 +1090,8 @@ Partial Public Class DD_DMSLiteDataSet Me.columnGUID = MyBase.Columns("GUID") Me.columnCONNECTION_ID = MyBase.Columns("CONNECTION_ID") Me.columnSQL_COMMAND = MyBase.Columns("SQL_COMMAND") + Me.columnDESCRIPTION = MyBase.Columns("DESCRIPTION") + Me.columnACTIVE = MyBase.Columns("ACTIVE") End Sub _ + Public Property DESCRIPTION() As String + Get + Return CType(Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.DESCRIPTIONColumn),String) + End Get + Set + Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.DESCRIPTIONColumn) = value + End Set + End Property + + _ + Public Property ACTIVE() As Boolean + Get + Try + Return CType(Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.ACTIVEColumn),Boolean) + Catch e As Global.System.InvalidCastException + Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte ACTIVE in Tabelle TBPM_PROFILE_FINAL_INDEXING ist DBNull.", e) + End Try + End Get + Set + Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.ACTIVEColumn) = value + End Set + End Property + _ Public Function IsCHANGED_WHONull() As Boolean @@ -8243,6 +8299,18 @@ Partial Public Class DD_DMSLiteDataSet Public Sub SetCHANGED_WHENNull() Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.CHANGED_WHENColumn) = Global.System.Convert.DBNull End Sub + + _ + Public Function IsACTIVENull() As Boolean + Return Me.IsNull(Me.tableTBPM_PROFILE_FINAL_INDEXING.ACTIVEColumn) + End Function + + _ + Public Sub SetACTIVENull() + Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.ACTIVEColumn) = Global.System.Convert.DBNull + End Sub End Class ''' @@ -13104,6 +13172,8 @@ Namespace DD_DMSLiteDataSetTableAdapters tableMapping.ColumnMappings.Add("GUID", "GUID") tableMapping.ColumnMappings.Add("CONNECTION_ID", "CONNECTION_ID") tableMapping.ColumnMappings.Add("SQL_COMMAND", "SQL_COMMAND") + tableMapping.ColumnMappings.Add("DESCRIPTION", "DESCRIPTION") + tableMapping.ColumnMappings.Add("ACTIVE", "ACTIVE") Me._adapter.TableMappings.Add(tableMapping) Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand() Me._adapter.DeleteCommand.Connection = Me.Connection @@ -13142,9 +13212,10 @@ Namespace DD_DMSLiteDataSetTableAdapters "WHEN, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" TBPM_PROFILE_FINAL_INDEXING.CHANGED_WHO, TBPM_P"& _ "ROFILE_FINAL_INDEXING.CHANGED_WHEN, TBPM_PROFILE_FINAL_INDEXING.GUID, TBPM_PROFI"& _ "LE_FINAL_INDEXING.CONNECTION_ID, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" TBPM_PROFILE_FINAL_I"& _ - "NDEXING.SQL_COMMAND"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_PROFILE_FINAL_INDEXING INNER JOIN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _ - " TBPM_PROFILE ON TBPM_PROFILE_FINAL_INDEXING.PROFIL_ID = TB"& _ - "PM_PROFILE.GUID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (TBPM_PROFILE.NAME = @name)" + "NDEXING.SQL_COMMAND, TBPM_PROFILE_FINAL_INDEXING.DESCRIPTION, TBPM_PROFILE_FINAL"& _ + "_INDEXING.ACTIVE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_PROFILE_FINAL_INDEXING INNER JOIN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _ + " TBPM_PROFILE ON TBPM_PROFILE_FINAL_INDEXING.PROFIL_ID = TBPM_"& _ + "PROFILE.GUID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (TBPM_PROFILE.NAME = @name)" Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@name", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand() diff --git a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsd b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsd index 401ec24..b0ef405 100644 --- a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsd +++ b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsd @@ -9,7 +9,7 @@ - + DELETE FROM TBPM_PROFILE_FINAL_INDEXING @@ -20,17 +20,17 @@ WHERE (GUID = @guid) - + INSERT INTO TBPM_PROFILE_FINAL_INDEXING (PROFIL_ID, INDEXNAME, VALUE, ADDED_WHO, CONNECTION_ID, SQL_COMMAND) VALUES (@PROFIL_ID,@INDEXNAME,@VALUE,@ADDED_WHO,@CONNECTION_ID,@SQL_COMMAND) - - - - - - + + + + + + @@ -38,12 +38,12 @@ VALUES (@PROFIL_ID,@INDEXNAME,@VALUE,@ADDED_WHO,@CONNECTION_ID,@SQL_COMMA SELECT TBPM_PROFILE_FINAL_INDEXING.INDEXNAME, TBPM_PROFILE_FINAL_INDEXING.VALUE, TBPM_PROFILE_FINAL_INDEXING.ADDED_WHO, TBPM_PROFILE_FINAL_INDEXING.ADDED_WHEN, TBPM_PROFILE_FINAL_INDEXING.CHANGED_WHO, TBPM_PROFILE_FINAL_INDEXING.CHANGED_WHEN, TBPM_PROFILE_FINAL_INDEXING.GUID, TBPM_PROFILE_FINAL_INDEXING.CONNECTION_ID, - TBPM_PROFILE_FINAL_INDEXING.SQL_COMMAND + TBPM_PROFILE_FINAL_INDEXING.SQL_COMMAND, TBPM_PROFILE_FINAL_INDEXING.DESCRIPTION, TBPM_PROFILE_FINAL_INDEXING.ACTIVE FROM TBPM_PROFILE_FINAL_INDEXING INNER JOIN TBPM_PROFILE ON TBPM_PROFILE_FINAL_INDEXING.PROFIL_ID = TBPM_PROFILE.GUID WHERE (TBPM_PROFILE.NAME = @name) - + @@ -59,6 +59,8 @@ WHERE (TBPM_PROFILE.NAME = @name) + + @@ -2024,7 +2026,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2066,10 +2068,18 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) + + + + + + + + - + @@ -2165,7 +2175,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2230,7 +2240,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2260,7 +2270,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2283,7 +2293,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2373,7 +2383,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2446,7 +2456,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2495,7 +2505,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2510,7 +2520,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2531,7 +2541,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2639,7 +2649,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2712,7 +2722,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2763,7 +2773,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2855,7 +2865,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2912,7 +2922,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -2953,7 +2963,7 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - + @@ -3069,11 +3079,11 @@ VALUES (@PROFIL_ID,@GROUP_ID,@WHO) - - - - - + + + + + \ No newline at end of file diff --git a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xss b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xss index cfb210b..3e417d5 100644 --- a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xss +++ b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xss @@ -6,7 +6,7 @@ --> - + diff --git a/app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj b/app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj index 7e79161..8ad9ca2 100644 --- a/app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj +++ b/app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj @@ -116,6 +116,9 @@ P:\Visual Studio Projekte\Bibliotheken\DLLLicenseManager.dll + + P:\Visual Studio Projekte\Bibliotheken\FormsUtils.dll + False P:\Visual Studio Projekte\Bibliotheken\MSG .NET\Bin\Independentsoft.Msg.dll @@ -158,6 +161,7 @@ + diff --git a/app/DD_PM_WINDREAM/ModuleControlProperties.vb b/app/DD_PM_WINDREAM/ModuleControlProperties.vb index eb92ca5..a11211e 100644 --- a/app/DD_PM_WINDREAM/ModuleControlProperties.vb +++ b/app/DD_PM_WINDREAM/ModuleControlProperties.vb @@ -206,31 +206,6 @@ Public Module ModuleControlProperties _default_value = value End Set End Property - - ''' - ''' Sorgt dafür, dass die Liste von Indicies aus dem gleichnamigen Feld ausgelesen wird - ''' - Public Class IndexListConverter - Inherits TypeConverter - - Public Overrides Function GetStandardValuesSupported(context As ITypeDescriptorContext) As Boolean - Return True - End Function - - Public Overrides Function GetStandardValues(context As ITypeDescriptorContext) As StandardValuesCollection - Dim indexList = DirectCast(context.Instance, InputProperties).Indicies - Dim values As New StandardValuesCollection(indexList) - Return values - End Function - - Public Overrides Function ConvertTo(context As ITypeDescriptorContext, culture As CultureInfo, value As Object, destinationType As Type) As Object - If IsNothing(value) Then - Return "" - Else - Return value.ToString() - End If - End Function - End Class End Class Public Class TextboxProperties diff --git a/app/DD_PM_WINDREAM/ModuleFinalIndexProperties.vb b/app/DD_PM_WINDREAM/ModuleFinalIndexProperties.vb index 56cbb0e..f75b51c 100644 --- a/app/DD_PM_WINDREAM/ModuleFinalIndexProperties.vb +++ b/app/DD_PM_WINDREAM/ModuleFinalIndexProperties.vb @@ -1,14 +1,25 @@ Imports System.ComponentModel Imports System.Drawing.Design Imports System.Globalization +Imports FormsUtils Module ModuleFinalIndexProperties + Public Const INDEX_TYPE_STRING = 1 + Public Const INDEX_TYPE_INTEGER = 2 + Public Const INDEX_TYPE_FLOAT = 3 + Public Const INDEX_TYPE_BOOLEAN = 4 + Public Const INDEX_TYPE_DATE = 5 + Public Const INDEX_TYPE_VECTOR_INTEGER = 4107 + Public Const INDEX_TYPE_VECTOR_STRING = 4097 + Public Const INDEX_TYPE_VECTOR_BOOLEAN = 4100 + Public Const INDEX_TYPE_VECTOR_DATE = 4101 + Public Class FinalIndexProperties - + <[ReadOnly](True)> Public Property GUID As Integer - + <[ReadOnly](True)> Public Property ConnectionId As Integer @@ -20,51 +31,98 @@ Module ModuleFinalIndexProperties ''' ''' Eigenschaft, die den SQL Editor anzeigt ''' - + Public Property SQLCommand As SQLValue - - Public Property StaticValue As String - ''' - ''' Eigenschaft, die eine Liste von Indicies anzeigt - ''' + ' Eigenschaften für die verschiedenen Index-Typen + + + + Public Property StringValue As String + + + + + Public Property BoolValue As Boolean + + + + + Public Property FloatValue As Double + + + + + Public Property DateValue As Date + + + + + Public Property IntegerValue As Integer + Public Property IndexName As String Public Property VectorIndex As Boolean - ''' - ''' Diese Eigenschaft enthält die auswählbaren Indicies, die für das Control verfügbar sind. Wird nicht direkt angezeigt. - ''' + ' Eigenschaften für die Liste der Indicies Public Property Indicies As List(Of String) + + Public Property IndiciesType As List(Of Integer) + Public Sub MaybeSetReadOnly(attrs As PropertyAttributes) + Dim hasSQLValue As Boolean = (SQLCommand.Value <> String.Empty) + If hasSQLValue Then + attrs.IsReadOnly = True + Else + attrs.IsReadOnly = False + End If + End Sub - Public Class IndexListConverter - Inherits TypeConverter + Public Sub MaybeSetBrowsable(attrs As PropertyAttributes, indexType As Integer()) + Dim i As Integer = Indicies.IndexOf(IndexName) - Public Overrides Function GetStandardValuesSupported(context As ITypeDescriptorContext) As Boolean - Return True - End Function + ' IndexName wurde nicth gefunden oder ist leerer/ungültiger String + If i < 0 Then + attrs.IsBrowsable = False + Exit Sub + End If - Public Overrides Function GetStandardValues(context As ITypeDescriptorContext) As StandardValuesCollection - Dim indexList = DirectCast(context.Instance, FinalIndexProperties).Indicies - Dim values As New StandardValuesCollection(indexList) - Return values - End Function + Dim type As Integer = IndiciesType.Item(i) - Public Overrides Function ConvertTo(context As ITypeDescriptorContext, culture As CultureInfo, value As Object, destinationType As Type) As Object - If IsNothing(value) Then - Return "" - Else - Return value.ToString() - End If - End Function - End Class + If indexType.Contains(type) Then + attrs.IsBrowsable = True + Else + attrs.IsBrowsable = False + End If + End Sub - End Class + Public Sub IndexTypeBooleanProvider(attrs As PropertyAttributes) + MaybeSetBrowsable(attrs, {INDEX_TYPE_BOOLEAN, INDEX_TYPE_VECTOR_BOOLEAN}) + MaybeSetReadOnly(attrs) + End Sub + Public Sub IndexTypeStringProvider(attrs As PropertyAttributes) + MaybeSetBrowsable(attrs, {INDEX_TYPE_STRING, INDEX_TYPE_VECTOR_STRING}) + MaybeSetReadOnly(attrs) + End Sub + Public Sub IndexTypeFloatProvider(attrs As PropertyAttributes) + MaybeSetBrowsable(attrs, {INDEX_TYPE_FLOAT}) + MaybeSetReadOnly(attrs) + End Sub + + Public Sub IndexTypeIntegerProvider(attrs As PropertyAttributes) + MaybeSetBrowsable(attrs, {INDEX_TYPE_INTEGER, INDEX_TYPE_VECTOR_INTEGER}) + MaybeSetReadOnly(attrs) + End Sub + + Public Sub IndexTypeDateProvider(attrs As PropertyAttributes) + MaybeSetBrowsable(attrs, {INDEX_TYPE_DATE, INDEX_TYPE_VECTOR_DATE}) + MaybeSetReadOnly(attrs) + End Sub + End Class End Module diff --git a/app/DD_PM_WINDREAM/frmAdministration.Designer.vb b/app/DD_PM_WINDREAM/frmAdministration.Designer.vb index 1b8f19a..7ff5beb 100644 --- a/app/DD_PM_WINDREAM/frmAdministration.Designer.vb +++ b/app/DD_PM_WINDREAM/frmAdministration.Designer.vb @@ -49,7 +49,7 @@ Partial Class frmAdministration Dim VEKTOR_DELIMITERLabel As System.Windows.Forms.Label Dim WORK_HISTORY_ENTRYLabel As System.Windows.Forms.Label Dim SQL_VIEWLabel As System.Windows.Forms.Label - Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.SplitContainer_Profilzuordnung2 = New System.Windows.Forms.SplitContainer() Me.gridAssignedUsers = New DevExpress.XtraGrid.GridControl() Me.TBPROFILE_USERBindingSource = New System.Windows.Forms.BindingSource(Me.components) @@ -155,19 +155,23 @@ Partial Class frmAdministration Me.TabPage6 = New System.Windows.Forms.TabPage() Me.TabControl2 = New System.Windows.Forms.TabControl() Me.TabPage11 = New System.Windows.Forms.TabPage() + Me.Panel5 = New System.Windows.Forms.Panel() Me.gridFinalIndex = New DevExpress.XtraGrid.GridControl() Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.viewFinalIndex = New DevExpress.XtraGrid.Views.Grid.GridView() - Me.colGUID = New DevExpress.XtraGrid.Columns.GridColumn() Me.colINDEXNAME = New DevExpress.XtraGrid.Columns.GridColumn() + Me.colVALUE = New DevExpress.XtraGrid.Columns.GridColumn() Me.colADDED_WHO = New DevExpress.XtraGrid.Columns.GridColumn() Me.colADDED_WHEN = New DevExpress.XtraGrid.Columns.GridColumn() Me.colCHANGED_WHO = New DevExpress.XtraGrid.Columns.GridColumn() Me.colCHANGED_WHEN = New DevExpress.XtraGrid.Columns.GridColumn() + Me.colGUID = New DevExpress.XtraGrid.Columns.GridColumn() + Me.colCONNECTION_ID = New DevExpress.XtraGrid.Columns.GridColumn() + Me.colSQL_COMMAND = New DevExpress.XtraGrid.Columns.GridColumn() + Me.PropertyGrid1 = New System.Windows.Forms.PropertyGrid() Me.BindingNavigator1 = New System.Windows.Forms.BindingNavigator(Me.components) Me.BindingNavigatorAddNewItem = New System.Windows.Forms.ToolStripButton() Me.BindingNavigatorCountItem1 = New System.Windows.Forms.ToolStripLabel() - Me.BindingNavigatorDeleteItem = New System.Windows.Forms.ToolStripButton() Me.BindingNavigatorMoveFirstItem1 = New System.Windows.Forms.ToolStripButton() Me.BindingNavigatorMovePreviousItem1 = New System.Windows.Forms.ToolStripButton() Me.BindingNavigatorSeparator3 = New System.Windows.Forms.ToolStripSeparator() @@ -176,8 +180,8 @@ Partial Class frmAdministration Me.BindingNavigatorMoveNextItem1 = New System.Windows.Forms.ToolStripButton() Me.BindingNavigatorMoveLastItem1 = New System.Windows.Forms.ToolStripButton() Me.BindingNavigatorSeparator5 = New System.Windows.Forms.ToolStripSeparator() + Me.BindingNavigatorDeleteItem = New System.Windows.Forms.ToolStripButton() Me.ToolStripButton4 = New System.Windows.Forms.ToolStripButton() - Me.PropertyGrid1 = New System.Windows.Forms.PropertyGrid() Me.Label13 = New System.Windows.Forms.Label() Me.TabControlFinalIndices = New System.Windows.Forms.TabControl() Me.TabPage9 = New System.Windows.Forms.TabPage() @@ -304,6 +308,7 @@ Partial Class frmAdministration Me.TBDD_GROUPSTableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBDD_GROUPSTableAdapter() Me.TBPROFILE_GROUPTableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPROFILE_GROUPTableAdapter() Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog() + Me.ToolStripButton5 = New System.Windows.Forms.ToolStripButton() GUIDLabel = New System.Windows.Forms.Label() NAMELabel = New System.Windows.Forms.Label() DESCRIPTIONLabel = New System.Windows.Forms.Label() @@ -371,6 +376,7 @@ Partial Class frmAdministration Me.TabPage6.SuspendLayout() Me.TabControl2.SuspendLayout() Me.TabPage11.SuspendLayout() + Me.Panel5.SuspendLayout() CType(Me.gridFinalIndex, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.viewFinalIndex, System.ComponentModel.ISupportInitialize).BeginInit() @@ -824,7 +830,6 @@ Partial Class frmAdministration Me.TableAdapterManager.TBPM_KONFIGURATIONTableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILE_CONTROLSTableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILE_FILESTableAdapter = Nothing - Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing Me.TableAdapterManager.UpdateOrder = DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete @@ -1294,9 +1299,8 @@ Partial Class frmAdministration ' 'TabPage11 ' - Me.TabPage11.Controls.Add(Me.gridFinalIndex) + Me.TabPage11.Controls.Add(Me.Panel5) Me.TabPage11.Controls.Add(Me.BindingNavigator1) - Me.TabPage11.Controls.Add(Me.PropertyGrid1) Me.TabPage11.Controls.Add(Me.Label13) Me.TabPage11.Controls.Add(Me.GroupBox3) Me.TabPage11.Controls.Add(Me.TabControlFinalIndices) @@ -1308,6 +1312,13 @@ Partial Class frmAdministration Me.TabPage11.Name = "TabPage11" Me.TabPage11.UseVisualStyleBackColor = True ' + 'Panel5 + ' + Me.Panel5.Controls.Add(Me.gridFinalIndex) + Me.Panel5.Controls.Add(Me.PropertyGrid1) + resources.ApplyResources(Me.Panel5, "Panel5") + Me.Panel5.Name = "Panel5" + ' 'gridFinalIndex ' Me.gridFinalIndex.DataSource = Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource @@ -1323,25 +1334,25 @@ Partial Class frmAdministration ' 'viewFinalIndex ' - Me.viewFinalIndex.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colGUID, Me.colINDEXNAME, Me.colADDED_WHO, Me.colADDED_WHEN, Me.colCHANGED_WHO, Me.colCHANGED_WHEN}) + Me.viewFinalIndex.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colINDEXNAME, Me.colVALUE, Me.colADDED_WHO, Me.colADDED_WHEN, Me.colCHANGED_WHO, Me.colCHANGED_WHEN, Me.colGUID, Me.colCONNECTION_ID, Me.colSQL_COMMAND}) Me.viewFinalIndex.GridControl = Me.gridFinalIndex Me.viewFinalIndex.Name = "viewFinalIndex" Me.viewFinalIndex.OptionsBehavior.Editable = False Me.viewFinalIndex.OptionsBehavior.ReadOnly = True Me.viewFinalIndex.OptionsView.ShowGroupPanel = False ' - 'colGUID - ' - Me.colGUID.FieldName = "GUID" - Me.colGUID.Name = "colGUID" - resources.ApplyResources(Me.colGUID, "colGUID") - ' 'colINDEXNAME ' Me.colINDEXNAME.FieldName = "INDEXNAME" Me.colINDEXNAME.Name = "colINDEXNAME" resources.ApplyResources(Me.colINDEXNAME, "colINDEXNAME") ' + 'colVALUE + ' + Me.colVALUE.FieldName = "VALUE" + Me.colVALUE.Name = "colVALUE" + resources.ApplyResources(Me.colVALUE, "colVALUE") + ' 'colADDED_WHO ' Me.colADDED_WHO.FieldName = "ADDED_WHO" @@ -1366,14 +1377,38 @@ Partial Class frmAdministration Me.colCHANGED_WHEN.Name = "colCHANGED_WHEN" resources.ApplyResources(Me.colCHANGED_WHEN, "colCHANGED_WHEN") ' + 'colGUID + ' + Me.colGUID.FieldName = "GUID" + Me.colGUID.Name = "colGUID" + resources.ApplyResources(Me.colGUID, "colGUID") + ' + 'colCONNECTION_ID + ' + Me.colCONNECTION_ID.FieldName = "CONNECTION_ID" + Me.colCONNECTION_ID.Name = "colCONNECTION_ID" + resources.ApplyResources(Me.colCONNECTION_ID, "colCONNECTION_ID") + ' + 'colSQL_COMMAND + ' + Me.colSQL_COMMAND.FieldName = "SQL_COMMAND" + Me.colSQL_COMMAND.Name = "colSQL_COMMAND" + resources.ApplyResources(Me.colSQL_COMMAND, "colSQL_COMMAND") + ' + 'PropertyGrid1 + ' + resources.ApplyResources(Me.PropertyGrid1, "PropertyGrid1") + Me.PropertyGrid1.Name = "PropertyGrid1" + ' 'BindingNavigator1 ' Me.BindingNavigator1.AddNewItem = Me.BindingNavigatorAddNewItem Me.BindingNavigator1.BindingSource = Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource Me.BindingNavigator1.CountItem = Me.BindingNavigatorCountItem1 - Me.BindingNavigator1.DeleteItem = Me.BindingNavigatorDeleteItem + Me.BindingNavigator1.CountItemFormat = "von {0} finalen Indexen" + Me.BindingNavigator1.DeleteItem = Nothing resources.ApplyResources(Me.BindingNavigator1, "BindingNavigator1") - Me.BindingNavigator1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem1, Me.BindingNavigatorMovePreviousItem1, Me.BindingNavigatorSeparator3, Me.BindingNavigatorPositionItem1, Me.BindingNavigatorCountItem1, Me.BindingNavigatorSeparator4, Me.BindingNavigatorMoveNextItem1, Me.BindingNavigatorMoveLastItem1, Me.BindingNavigatorSeparator5, Me.BindingNavigatorAddNewItem, Me.BindingNavigatorDeleteItem, Me.ToolStripButton4}) + Me.BindingNavigator1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem1, Me.BindingNavigatorMovePreviousItem1, Me.BindingNavigatorSeparator3, Me.BindingNavigatorPositionItem1, Me.BindingNavigatorCountItem1, Me.BindingNavigatorSeparator4, Me.BindingNavigatorMoveNextItem1, Me.BindingNavigatorMoveLastItem1, Me.BindingNavigatorSeparator5, Me.BindingNavigatorAddNewItem, Me.BindingNavigatorDeleteItem, Me.ToolStripButton4, Me.ToolStripButton5}) Me.BindingNavigator1.MoveFirstItem = Me.BindingNavigatorMoveFirstItem1 Me.BindingNavigator1.MoveLastItem = Me.BindingNavigatorMoveLastItem1 Me.BindingNavigator1.MoveNextItem = Me.BindingNavigatorMoveNextItem1 @@ -1383,21 +1418,15 @@ Partial Class frmAdministration ' 'BindingNavigatorAddNewItem ' - Me.BindingNavigatorAddNewItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image - resources.ApplyResources(Me.BindingNavigatorAddNewItem, "BindingNavigatorAddNewItem") + Me.BindingNavigatorAddNewItem.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.add Me.BindingNavigatorAddNewItem.Name = "BindingNavigatorAddNewItem" + resources.ApplyResources(Me.BindingNavigatorAddNewItem, "BindingNavigatorAddNewItem") ' 'BindingNavigatorCountItem1 ' Me.BindingNavigatorCountItem1.Name = "BindingNavigatorCountItem1" resources.ApplyResources(Me.BindingNavigatorCountItem1, "BindingNavigatorCountItem1") ' - 'BindingNavigatorDeleteItem - ' - Me.BindingNavigatorDeleteItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image - resources.ApplyResources(Me.BindingNavigatorDeleteItem, "BindingNavigatorDeleteItem") - Me.BindingNavigatorDeleteItem.Name = "BindingNavigatorDeleteItem" - ' 'BindingNavigatorMoveFirstItem1 ' Me.BindingNavigatorMoveFirstItem1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image @@ -1442,18 +1471,17 @@ Partial Class frmAdministration Me.BindingNavigatorSeparator5.Name = "BindingNavigatorSeparator5" resources.ApplyResources(Me.BindingNavigatorSeparator5, "BindingNavigatorSeparator5") ' + 'BindingNavigatorDeleteItem + ' + resources.ApplyResources(Me.BindingNavigatorDeleteItem, "BindingNavigatorDeleteItem") + Me.BindingNavigatorDeleteItem.Name = "BindingNavigatorDeleteItem" + ' 'ToolStripButton4 ' - Me.ToolStripButton4.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.ToolStripButton4.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.save resources.ApplyResources(Me.ToolStripButton4, "ToolStripButton4") Me.ToolStripButton4.Name = "ToolStripButton4" ' - 'PropertyGrid1 - ' - resources.ApplyResources(Me.PropertyGrid1, "PropertyGrid1") - Me.PropertyGrid1.Name = "PropertyGrid1" - ' 'Label13 ' resources.ApplyResources(Me.Label13, "Label13") @@ -2116,8 +2144,8 @@ Partial Class frmAdministration 'TBPM_ERROR_LOGDataGridView ' Me.TBPM_ERROR_LOGDataGridView.AllowUserToAddRows = False - DataGridViewCellStyle3.BackColor = System.Drawing.Color.Cyan - Me.TBPM_ERROR_LOGDataGridView.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle3 + DataGridViewCellStyle2.BackColor = System.Drawing.Color.Cyan + Me.TBPM_ERROR_LOGDataGridView.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle2 Me.TBPM_ERROR_LOGDataGridView.AutoGenerateColumns = False Me.TBPM_ERROR_LOGDataGridView.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.TBPM_ERROR_LOGDataGridView.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.DataGridViewTextBoxColumn17, Me.DataGridViewTextBoxColumn22, Me.DataGridViewTextBoxColumn23, Me.DataGridViewTextBoxColumn24, Me.DataGridViewTextBoxColumn25}) @@ -2308,6 +2336,12 @@ Partial Class frmAdministration ' Me.OpenFileDialog1.FileName = "OpenFileDialog1" ' + 'ToolStripButton5 + ' + Me.ToolStripButton5.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.refresh_16xMD + resources.ApplyResources(Me.ToolStripButton5, "ToolStripButton5") + Me.ToolStripButton5.Name = "ToolStripButton5" + ' 'frmAdministration ' resources.ApplyResources(Me, "$this") @@ -2364,6 +2398,7 @@ Partial Class frmAdministration Me.TabControl2.ResumeLayout(False) Me.TabPage11.ResumeLayout(False) Me.TabPage11.PerformLayout() + Me.Panel5.ResumeLayout(False) CType(Me.gridFinalIndex, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.viewFinalIndex, System.ComponentModel.ISupportInitialize).EndInit() @@ -2652,12 +2687,6 @@ Partial Class frmAdministration Friend WithEvents OpenFileDialog1 As OpenFileDialog Friend WithEvents gridFinalIndex As DevExpress.XtraGrid.GridControl Friend WithEvents viewFinalIndex As DevExpress.XtraGrid.Views.Grid.GridView - Friend WithEvents colINDEXNAME As DevExpress.XtraGrid.Columns.GridColumn - Friend WithEvents colADDED_WHO As DevExpress.XtraGrid.Columns.GridColumn - Friend WithEvents colADDED_WHEN As DevExpress.XtraGrid.Columns.GridColumn - Friend WithEvents colCHANGED_WHO As DevExpress.XtraGrid.Columns.GridColumn - Friend WithEvents colCHANGED_WHEN As DevExpress.XtraGrid.Columns.GridColumn - Friend WithEvents colGUID As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents BindingNavigator1 As BindingNavigator Friend WithEvents BindingNavigatorAddNewItem As ToolStripButton Friend WithEvents BindingNavigatorCountItem1 As ToolStripLabel @@ -2672,4 +2701,15 @@ Partial Class frmAdministration Friend WithEvents BindingNavigatorSeparator5 As ToolStripSeparator Friend WithEvents PropertyGrid1 As PropertyGrid Friend WithEvents ToolStripButton4 As ToolStripButton + Friend WithEvents Panel5 As Panel + Friend WithEvents colINDEXNAME As DevExpress.XtraGrid.Columns.GridColumn + Friend WithEvents colVALUE As DevExpress.XtraGrid.Columns.GridColumn + Friend WithEvents colADDED_WHO As DevExpress.XtraGrid.Columns.GridColumn + Friend WithEvents colADDED_WHEN As DevExpress.XtraGrid.Columns.GridColumn + Friend WithEvents colCHANGED_WHO As DevExpress.XtraGrid.Columns.GridColumn + Friend WithEvents colCHANGED_WHEN As DevExpress.XtraGrid.Columns.GridColumn + Friend WithEvents colGUID As DevExpress.XtraGrid.Columns.GridColumn + Friend WithEvents colCONNECTION_ID As DevExpress.XtraGrid.Columns.GridColumn + Friend WithEvents colSQL_COMMAND As DevExpress.XtraGrid.Columns.GridColumn + Friend WithEvents ToolStripButton5 As ToolStripButton End Class diff --git a/app/DD_PM_WINDREAM/frmAdministration.resx b/app/DD_PM_WINDREAM/frmAdministration.resx index 685f26c..8930f3d 100644 --- a/app/DD_PM_WINDREAM/frmAdministration.resx +++ b/app/DD_PM_WINDREAM/frmAdministration.resx @@ -2107,7 +2107,7 @@ der Wertänderungen nutzen wollen: TabPage11 - 4 + 3 Segoe UI, 9pt @@ -2592,120 +2592,78 @@ der Wertänderungen nutzen wollen: True - - 245, 134 - - - 18, 169 - - - True - - - 0 - - - True + + gridFinalIndex - - 1 + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - True + + Panel5 - - 2 + + 0 - - True + + PropertyGrid1 - - 3 + + System.Windows.Forms.PropertyGrid, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - True + + Panel5 - - 4 + + 1 - - True + + Bottom - - 5 + + 3, 173 - - 632, 270 + + 1229, 269 - - 93 + + 94 - - gridFinalIndex + + Panel5 - - DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + System.Windows.Forms.Panel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - + TabPage11 - + 0 831, 212 - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - wwAADsMBx2+oZAAAAUpJREFUOE9jGLzg7gL2/7fmcf6/Oofr/8UZvP+hwsSD60CNfx41/v/zsOH/yckC - pBtwfjov3ICDPSKkG3B8kiBQc93/Pw+q/u9oFydswKWZPP/PTuX7fxKo8Ui/0P993SJAzeX//94r+r++ - Qeb/qhq5/0srFf/PL1X+P6tIFdPAU0B//nlYD9RUC8SV///cKwHivP9/72b+/3sn+f/f23H//92MAOKQ - /5NyNDENONQrDHbu3/ulQI0FQI3ZQI2pQI0J///digZqDPv/70bQ/3/X/f53peliGrCzXeL/lmap/+vA - zpX/v6RC8f/fWzFAjeH/p+Zp/J+QpfW/O0P3f3uq/v/mREPCYTIb6E+Qc//dCPjfk6FDWAM6APnz3w1/ - IPb735qsT7oB3em6YP+CcH2cEekGtCQZ/G+IN/xfE2v8vzLahHQD6AQYGAAkI9iedfyIaQAAAABJRU5E - rkJggg== - - True - 23, 22 + 112, 22 Neu hinzufügen + + 245, 134 + - 44, 22 + 127, 22 - von {0} + von {0} finalen Indexen Die Gesamtanzahl der Elemente. - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - wwAADsMBx2+oZAAAAW9JREFUOE+1kE0ow2Ecx3dV3krt4oJaOSCTvIRkMqSxyITIzCQHDouEdnFwIOVC - DrhIDiQl5UTiNG/z2ppafy1S2gX/uDwfY6i1v7Hie3nqeb7fz+/7/FR/Ilwn0G0Exw4fV5GJlXlEZxXC - rIet9bAQvB5Ymgn2sLYAvSZEux7RUQFzE4qQt4bCXAYjPaHvnDoCkLpsRGMB2JqCTGLIijDlwqQ9bEMV - i9OIytR3EMNWcJ/BWH8A6j8/bOGFxwXNxYEvGbMQ9XnQ1/K78KfY3/VXzkMY0qFGG2H4RoLGQshJQNbG - 86CNhdrsX9a/uQZTPhQl4rMY4OLofbl3aX7I8uwPC7y/g1YdjyVJuEvT8e1tfwUYteHUxCCfHChDeHmG - QQvokjlOU+PbWA0x3pZnILVVI3uvQyHsbiLnqnGmRCF1NYD8pDhpRxOH7HQoAKZGkFKjceszQbpSrumX - bO+G80MFwKUTxgfgcO/b8D9IpXoFiiMDHIQm0skAAAAASUVORK5CYII= - - - - True - - - 23, 22 - - - Löschen - None @@ -2809,20 +2767,50 @@ der Wertänderungen nutzen wollen: 6, 25 + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wwAADsMBx2+oZAAAAW9JREFUOE+1kE0ow2Ecx3dV3krt4oJaOSCTvIRkMqSxyITIzCQHDouEdnFwIOVC + DrhIDiQl5UTiNG/z2ppafy1S2gX/uDwfY6i1v7Hie3nqeb7fz+/7/FR/Ilwn0G0Exw4fV5GJlXlEZxXC + rIet9bAQvB5Ymgn2sLYAvSZEux7RUQFzE4qQt4bCXAYjPaHvnDoCkLpsRGMB2JqCTGLIijDlwqQ9bEMV + i9OIytR3EMNWcJ/BWH8A6j8/bOGFxwXNxYEvGbMQ9XnQ1/K78KfY3/VXzkMY0qFGG2H4RoLGQshJQNbG + 86CNhdrsX9a/uQZTPhQl4rMY4OLofbl3aX7I8uwPC7y/g1YdjyVJuEvT8e1tfwUYteHUxCCfHChDeHmG + QQvokjlOU+PbWA0x3pZnILVVI3uvQyHsbiLnqnGmRCF1NYD8pDhpRxOH7HQoAKZGkFKjceszQbpSrumX + bO+G80MFwKUTxgfgcO/b8D9IpXoFiiMDHIQm0skAAAAASUVORK5CYII= + + + + True + + + 71, 22 + + + Löschen + Magenta - 23, 22 + 79, 22 - ToolStripButton4 + Speichern + + + Magenta + + + 95, 22 + + + Aktualisieren - 682, 133 + 9, 133 - 287, 25 + 689, 25 92 @@ -2842,27 +2830,6 @@ der Wertänderungen nutzen wollen: 1 - - 1003, 5 - - - 226, 150 - - - 91 - - - PropertyGrid1 - - - System.Windows.Forms.PropertyGrid, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage11 - - - 2 - True @@ -2891,1502 +2858,1568 @@ der Wertänderungen nutzen wollen: TabPage11 - 3 + 2 Top, Bottom, Left, Right - - True - - - 193, 27 - - - 199, 20 - - - 87 + + TabPage9 - - Wert in Vektorindex schreiben + + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - CheckBoxPMVEKTOR + + TabControlFinalIndices - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 0 - - TabPage9 + + TabPage10 - - 0 + + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - True + + TabControlFinalIndices - - 24, 135 + + 1 - - 45, 16 + + False - - 89 + + 1104, 13 - - Label4 + + 113, 70 - - False + + 90 - - lblSaveFinalIndex + + TabControlFinalIndices - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.TabControl, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage9 + + TabPage11 - - 1 + + 4 - + True - - 24, 3 + + Tahoma, 12pt, style=Bold - - 89, 16 + + 5, 83 - - 78 + + 120, 19 - - Index wählen: + + 74 - - lblIndexPMVektor + + Finale Indexe - + + Label5 + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage9 + + TabPage11 - - 2 + + 5 - + True - - 7, 108 + + Segoe UI, 9.75pt, style=Italic - - 19, 16 + + 6, 108 - - 86 + + 583, 17 - - 3. + + 75 - - Label11 + + Diese Indexe werden nach erfolgreicher Indexierung automatisch bei dem indexierten Dokument gesetzt. - + + Label6 + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage9 + + TabPage11 - - 3 + + 6 - - 32, 50 + + 765, 56 + + + 44, 22 - - 160, 23 + + von {0} - - 88 + + Die Gesamtanzahl der Elemente. - + + None + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + vAAADrwBlbxySQAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77 + wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0 + v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg + UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA + Iu/O/9T+11gVGSSd+C+b9vW/bvA83AYYZt3+H9byEqci/dTL/zV8p+E2QCftxn+/6od4Fal4TMBtgFPu + lf8gBXgVDULAwAAA8HbAq6XlmnAAAAAASUVORK5CYII= + + + + True + + + 23, 22 + + + Erste verschieben + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + vAAADrwBlbxySQAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w + 5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f + Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+ + 08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC + + + + True + + + 23, 22 + + + Vorherige verschieben + + + 6, 25 + + + Position + + False - - txtBezeichner + + 50, 23 - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 0 - - TabPage9 + + Aktuelle Position - - 4 + + 6, 25 - + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + vAAADrwBlbxySQAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78 + n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI + N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f + oAc0QjgAAAAASUVORK5CYII= + + + True - - 7, 52 + + 23, 22 - - 19, 16 + + Nächste verschieben - - 85 + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + vAAADrwBlbxySQAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+// + h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B + twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA + kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG + WOTd+W9TcAVDMwiA5FL7X8O9hBUYZt3GqhkEQHJhLS//6wbPw22ATtoNnJIgOb/qh/81fKfhNgAfcMq9 + 8l/FYwIYQ4UGBWBgAAC+0b+zuQxOnAAAAABJRU5ErkJggg== + - - 2. + + True - - Label10 + + 23, 22 - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + Letzte verschieben - - TabPage9 + + 6, 25 - - 5 + + MiddleLeft - - 27, 27 + + Magenta - - 160, 24 + + 156, 22 - - 77 + + Neuen Index hinzufügen - - cmbIndexe + + MiddleLeft - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + Magenta - - TabPage9 + + 99, 22 - - 6 + + Index löschen - - True + + MiddleLeft - - 7, 3 + + Magenta - - 19, 16 + + 95, 22 - - 84 + + Aktualisieren - - 1. + + MiddleRight - - Label9 + + Magenta - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 73, 22 - - TabPage9 + + Abbruch - + + False + + + 699, 100 + + + 568, 25 + + + 76 + + + BindingNavigator1 + + + TBPM_PROFILE_FINAL_INDEXINGBindingNavigator + + + System.Windows.Forms.BindingNavigator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage11 + + 7 - + True + + + Top, Bottom, Left - - 24, 52 + + 1031, 23 - - 21, 16 + + 67, 43 - - 79 + + 75 - - sd + + TBPM_PROFILE_FINAL_INDEXINGDataGridView - - False + + System.Windows.Forms.DataGridView, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - lblIndex + + TabPage11 - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 8 - - TabPage9 + + 4, 25 - - 8 + + 3, 3, 3, 3 - - btnStampDate + + 1235, 445 - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 0 - - grbxSystemStamps + + Move und finale Indexe - + + TabPage11 + + + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabControl2 + + 0 - - btnStampUser + + True - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + ANNOTATE_WORK_HISTORY_ENTRYCheckBox - - grbxSystemStamps + + System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - + + TabPage12 + + + 0 + + + ANNOTATE_ALL_WORK_HISTORY_ENTRIESCheckBox + + + System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage12 + + 1 - - 298, 52 + + SQL_VIEWTextBox - - 153, 80 + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 83 + + TabPage12 - - System-Stamps + + 3 - - False + + WORK_HISTORY_ENTRYTextBox - - grbxSystemStamps + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + TabPage12 - - TabPage9 + + 5 - - 9 + + 4, 25 - - 60, 72 + + 3, 3, 3, 3 + + + 1235, 448 + + + 1 + + + Nachbearbeitungsfunktionen 2 + + + TabPage12 + + + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 100, 23 + + TabControl2 - - 80 + + 1 - - False + + Fill - - txtindexwert_final + + 3, 3 - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 1243, 474 - - TabPage9 + + 92 - - 10 + + TabControl2 - - MiddleLeft + + System.Windows.Forms.TabControl, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 27, 101 + + TabPage6 - - 136, 31 + + 0 - - 82 + + 4, 25 - - Index einfügen + + 3, 3, 3, 3 - - MiddleRight + + 1249, 480 - - btnInsert_FinalIndex + + 1 - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + Aktionen nach erfolgreicher Indexierung: - - TabPage9 + + TabPage6 - - 11 + + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - True + + tabctrl_Profilkonfig - - 27, 79 + + 1 - - 15, 14 + + 9, 77 - - 81 + + 1257, 509 - - False + + 79 - - chkbxfinalIndex + + tabctrl_Profilkonfig - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.TabControl, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage9 + + TabPage1 - - 12 + + 0 - + 4, 25 - + 3, 3, 3, 3 - - 1601, 708 + + 1272, 592 - + 0 - - Fester Wert + + Profil-Verwaltung - - TabPage9 + + TabPage1 - + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabControlFinalIndices + + TabControl1 - + 0 - - True - - - btnEditor + + SplitContainerProfilzuordnung - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.SplitContainer, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage10 + + TabPage2 - + 0 - - Label15 + + 4, 25 - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 3, 3, 3, 3 - - TabPage10 + + 1272, 592 - + 1 - - cmbIndexe2 - - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 2 - - - btnSaveSQLCommand - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 3 + + Profilzuordnung - - SQL_COMMANDTextBox + + TabPage2 - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage10 + + TabControl1 - - 4 + + 1 - - btnShowConnections + + btnUserManager - + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage10 - - - 5 - - - Label14 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + TabPage3 - - TabPage10 + + 0 - - 6 + + Button2 - - cmbConnection + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + TabPage3 - - TabPage10 + + 1 - - 7 + + VEKTOR_DELIMITERTextBox - - Label4 + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + TabPage3 - - TabPage10 + + 3 - - 8 + + btnConnections - - 4, 25 + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 3, 3, 3, 3 + + TabPage3 - - 1601, 708 + + 4 - - 1 + + btnopen_SQLAdmin - - Dynamisches SQL + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage10 + + TabPage3 - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 5 - - TabControlFinalIndices + + EMAIL_ACTIVECheckBox - - 1 + + System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - False + + TabPage3 - - 668, 161 + + 6 - - 1609, 737 + + grpbxEmail - - 90 + + System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabControlFinalIndices + + TabPage3 - - System.Windows.Forms.TabControl, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 7 - - TabPage11 + + btnlicensemanager_open - - 5 + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - True + + TabPage3 - - Tahoma, 12pt, style=Bold + + 8 - - 5, 83 + + INTERVALL_CKECK_NO_OF_FILESNumericUpDown - - 120, 19 + + System.Windows.Forms.NumericUpDown, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 74 + + TabPage3 - - Finale Indexe + + 10 - - Label5 + + Label3 - + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage11 + + TabPage3 - - 6 + + 11 - - True + + GEAENDERTWERTextBox - - Segoe UI, 9.75pt, style=Italic + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 6, 108 + + TabPage3 - - 583, 17 + + 13 - - 75 + + GEAENDERTWANNTextBox - - Diese Indexe werden nach erfolgreicher Indexierung automatisch bei dem indexierten Dokument gesetzt. + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - Label6 + + TabPage3 - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 15 - - TabPage11 + + btnSaveKonfig - - 7 + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 765, 56 - - - 44, 22 + + TabPage3 - - von {0} + + 16 - - Die Gesamtanzahl der Elemente. + + 4, 25 - - None + + 3, 3, 3, 3 - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - vAAADrwBlbxySQAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77 - wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0 - v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg - UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA - Iu/O/9T+11gVGSSd+C+b9vW/bvA83AYYZt3+H9byEqci/dTL/zV8p+E2QCftxn+/6od4Fal4TMBtgFPu - lf8gBXgVDULAwAAA8HbAq6XlmnAAAAAASUVORK5CYII= - + + 1272, 592 - - True + + 2 - - 23, 22 + + Grundeinstellungen - - Erste verschieben + + TabPage3 - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - vAAADrwBlbxySQAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w - 5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f - Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+ - 08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC - + + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - True + + TabControl1 - - 23, 22 + + 2 - - Vorherige verschieben + + 1092, 56 + + + TBPM_ERROR_LOGDataGridView - - 6, 25 + + System.Windows.Forms.DataGridView, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - Position + + TabPage4 - - False + + 0 - - 50, 23 + + TBPM_ERROR_LOGBindingNavigator - - 0 + + System.Windows.Forms.BindingNavigator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - Aktuelle Position + + TabPage4 - - 6, 25 + + 1 - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - vAAADrwBlbxySQAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78 - n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI - N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f - oAc0QjgAAAAASUVORK5CYII= - + + 4, 25 + + + 3, 3, 3, 3 - - True + + 1272, 592 - - 23, 22 + + 3 - - Nächste verschieben + + Log - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - vAAADrwBlbxySQAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+// - h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B - twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA - kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG - WOTd+W9TcAVDMwiA5FL7X8O9hBUYZt3GqhkEQHJhLS//6wbPw22ATtoNnJIgOb/qh/81fKfhNgAfcMq9 - 8l/FYwIYQ4UGBWBgAAC+0b+zuQxOnAAAAABJRU5ErkJggg== - + + TabPage4 - - True + + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 23, 22 + + TabControl1 - - Letzte verschieben + + 3 - - 6, 25 + + Fill - - MiddleLeft + + 0, 0 - - Magenta + + 1280, 621 - - 156, 22 + + 3 - - Neuen Index hinzufügen + + TabControl1 - - MiddleLeft + + System.Windows.Forms.TabControl, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - Magenta + + pnlMain - - 99, 22 + + 0 - - Index löschen + + 6, 12 - - MiddleLeft + + Cyan - - Magenta + + Fuchsia - - 95, 22 + + Profil-Name - - Aktualisieren + + True - - MiddleRight + + 0 - - Magenta + + 166 - - 73, 22 + + Titel - - Abbruch + + True - - False + + 1 - - 7, 133 + + 268, 367 - - 568, 25 + + 84 - - 76 + + GridControl1 - - BindingNavigator1 + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - TBPM_PROFILE_FINAL_INDEXINGBindingNavigator + + TabPage5 - - System.Windows.Forms.BindingNavigator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 0 - - TabPage11 + + Tahoma, 8.25pt, style=Bold - - 8 + + MiddleLeft - - True - - - Top, Bottom, Left + + 1069, 25 - - 9, 161 + + 139, 34 - - 653, 755 + + 81 - - 75 + + Daten zu Profil entfernen - - TBPM_PROFILE_FINAL_INDEXINGDataGridView + + MiddleRight - - System.Windows.Forms.DataGridView, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + Button3 - - TabPage11 + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 9 + + TabPage5 - - 4, 25 + + 1 - - 3, 3, 3, 3 + + 715, 248 - - 1235, 445 + + 230, 24 - - 0 + + 83 - - Move und finale Indexe + + cmbLOGIndex - - TabPage11 + + System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + TabPage5 - - TabControl2 + + 2 - - 0 + + 715, 186 - - True + + 230, 24 - - ANNOTATE_WORK_HISTORY_ENTRYCheckBox + + 81 - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + PM_VEKTOR_INDEXComboBox - - TabPage12 + + System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 0 + + TabPage5 - - ANNOTATE_ALL_WORK_HISTORY_ENTRIESCheckBox + + 4 - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + Tahoma, 9.75pt - - TabPage12 + + 715, 31 - - 1 + + 238, 24 - - SQL_VIEWTextBox + + 78 - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + Neueste Dokumente zuerst anzeigen - - TabPage12 + + SORT_BY_LATESTCheckBox - - 3 + + System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - WORK_HISTORY_ENTRYTextBox + + TabPage5 - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 7 - - TabPage12 + + Fill - - 5 + + 0, 0 - - 4, 25 + + True - - 3, 3, 3, 3 + + 0 - - 1235, 448 + + True - + 1 - - Nachbearbeitungsfunktionen 2 + + True - - TabPage12 + + 2 - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + True - - TabControl2 + + 3 - - 1 + + True - - Fill + + 4 - - 3, 3 + + True - - 1243, 474 + + 5 - - 92 + + True - - TabControl2 + + 6 - - System.Windows.Forms.TabControl, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + True - - TabPage6 + + 7 - - 0 + + True - - 4, 25 + + 8 - - 3, 3, 3, 3 + + 906, 269 - - 1249, 480 + + 93 - - 1 + + gridFinalIndex - - Aktionen nach erfolgreicher Indexierung: + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - TabPage6 + + Panel5 - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 0 - - tabctrl_Profilkonfig + + Right - - 1 + + False - - 9, 77 + + 906, 0 - - 1257, 509 + + 323, 269 - - 79 + + 91 - - tabctrl_Profilkonfig + + PropertyGrid1 - - System.Windows.Forms.TabControl, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.PropertyGrid, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage1 + + Panel5 - - 0 + + 1 - - 4, 25 + + CheckBoxPMVEKTOR - - 3, 3, 3, 3 + + System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 1272, 592 + + TabPage9 - + 0 - - Profil-Verwaltung - - - TabPage1 - - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + lblSaveFinalIndex - - TabControl1 + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 0 + + TabPage9 - - SplitContainerProfilzuordnung + + 1 - - System.Windows.Forms.SplitContainer, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + lblIndexPMVektor - - TabPage2 + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 0 + + TabPage9 - - 4, 25 + + 2 - - 3, 3, 3, 3 + + Label11 - - 1272, 592 + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 1 + + TabPage9 - - Profilzuordnung + + 3 - - TabPage2 + + txtBezeichner - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabControl1 + + TabPage9 - - 1 + + 4 - - btnUserManager + + Label10 - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage3 + + TabPage9 - - 0 + + 5 - - Button2 + + cmbIndexe - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage3 + + TabPage9 - - 1 + + 6 - - VEKTOR_DELIMITERTextBox + + Label9 - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage3 + + TabPage9 - - 3 + + 7 - - btnConnections + + lblIndex - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage3 + + TabPage9 - - 4 + + 8 - - btnopen_SQLAdmin + + grbxSystemStamps - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage3 + + TabPage9 - - 5 + + 9 - - EMAIL_ACTIVECheckBox + + txtindexwert_final - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage3 + + TabPage9 - - 6 + + 10 - - grpbxEmail + + btnInsert_FinalIndex - - System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage3 + + TabPage9 - - 7 + + 11 - - btnlicensemanager_open + + chkbxfinalIndex - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage3 + + TabPage9 - - 8 + + 12 - - INTERVALL_CKECK_NO_OF_FILESNumericUpDown + + 4, 25 - - System.Windows.Forms.NumericUpDown, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 3, 3, 3, 3 - - TabPage3 + + 105, 41 - - 10 + + 0 - - Label3 + + Fester Wert - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + TabPage9 - - TabPage3 + + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 11 + + TabControlFinalIndices - - GEAENDERTWERTextBox + + 0 - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + True - - TabPage3 + + 193, 27 - - 13 + + 199, 20 - - GEAENDERTWANNTextBox + + 87 - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + Wert in Vektorindex schreiben - - TabPage3 + + CheckBoxPMVEKTOR - - 15 + + System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - btnSaveKonfig + + TabPage9 - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 0 - - TabPage3 + + True - - 16 + + 24, 135 - - 4, 25 + + 45, 16 - - 3, 3, 3, 3 + + 89 - - 1272, 592 + + Label4 - - 2 + + False - - Grundeinstellungen + + lblSaveFinalIndex - - TabPage3 + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + TabPage9 - - TabControl1 + + 1 - - 2 + + True - - 1092, 56 - - - TBPM_ERROR_LOGDataGridView + + 24, 3 - - System.Windows.Forms.DataGridView, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 89, 16 - - TabPage4 + + 78 - - 0 + + Index wählen: - - TBPM_ERROR_LOGBindingNavigator + + lblIndexPMVektor - - System.Windows.Forms.BindingNavigator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage4 + + TabPage9 - - 1 + + 2 - - 4, 25 + + True - - 3, 3, 3, 3 + + 7, 108 - - 1272, 592 + + 19, 16 - - 3 + + 86 - - Log + + 3. - - TabPage4 + + Label11 - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabControl1 + + TabPage9 - + 3 - - Fill + + 32, 50 - - 0, 0 + + 160, 23 - - 1280, 621 + + 88 - - 3 + + False - - TabControl1 + + txtBezeichner - - System.Windows.Forms.TabControl, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - pnlMain + + TabPage9 - - 0 + + 4 - - 6, 12 + + True - - Cyan + + 7, 52 - - Fuchsia + + 19, 16 - - Profil-Name + + 85 - - True + + 2. - - 0 + + Label10 - - 166 + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - Titel + + TabPage9 - - True + + 5 - - 1 + + 27, 27 - - 268, 367 + + 160, 24 - - 84 + + 77 - - GridControl1 + + cmbIndexe - - DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage5 + + TabPage9 - - 0 + + 6 - - Tahoma, 8.25pt, style=Bold + + True - - MiddleLeft + + 7, 3 - - 1069, 25 + + 19, 16 - - 139, 34 + + 84 - - 81 + + 1. - - Daten zu Profil entfernen + + Label9 - - MiddleRight + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - Button3 + + TabPage9 - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 7 - - TabPage5 + + True - - 1 + + 24, 52 - - 715, 248 + + 21, 16 - - 230, 24 + + 79 - - 83 + + sd - - cmbLOGIndex + + False - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + lblIndex - - TabPage5 + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 2 + + TabPage9 - - 715, 186 + + 8 - - 230, 24 + + btnStampDate - - 81 + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - PM_VEKTOR_INDEXComboBox + + grbxSystemStamps - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 0 - - TabPage5 + + btnStampUser - - 4 + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - Tahoma, 9.75pt + + grbxSystemStamps - - 715, 31 + + 1 - - 238, 24 + + 298, 52 - - 78 + + 153, 80 - - Neueste Dokumente zuerst anzeigen + + 83 - - SORT_BY_LATESTCheckBox + + System-Stamps - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + False - - TabPage5 + + grbxSystemStamps - - 7 + + System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage9 + + + 9 MiddleLeft @@ -4448,6 +4481,225 @@ der Wertänderungen nutzen wollen: 1 + + 60, 72 + + + 100, 23 + + + 80 + + + False + + + txtindexwert_final + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage9 + + + 10 + + + MiddleLeft + + + 27, 101 + + + 136, 31 + + + 82 + + + Index einfügen + + + MiddleRight + + + btnInsert_FinalIndex + + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage9 + + + 11 + + + True + + + 27, 79 + + + 15, 14 + + + 81 + + + False + + + chkbxfinalIndex + + + System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage9 + + + 12 + + + True + + + btnEditor + + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage10 + + + 0 + + + Label15 + + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage10 + + + 1 + + + cmbIndexe2 + + + System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage10 + + + 2 + + + btnSaveSQLCommand + + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage10 + + + 3 + + + SQL_COMMANDTextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage10 + + + 4 + + + btnShowConnections + + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage10 + + + 5 + + + Label14 + + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage10 + + + 6 + + + cmbConnection + + + System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage10 + + + 7 + + + Label4 + + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage10 + + + 8 + + + 4, 25 + + + 3, 3, 3, 3 + + + 105, 44 + + + 1 + + + Dynamisches SQL + + + TabPage10 + + + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabControlFinalIndices + + + 1 + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO @@ -6505,18 +6757,18 @@ der Wertänderungen nutzen wollen: DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - colGUID - - - DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - colINDEXNAME DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + colVALUE + + + DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + colADDED_WHO @@ -6541,6 +6793,24 @@ der Wertänderungen nutzen wollen: DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + colGUID + + + DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + colCONNECTION_ID + + + DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + colSQL_COMMAND + + + DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + BindingNavigatorAddNewItem @@ -6553,12 +6823,6 @@ der Wertänderungen nutzen wollen: System.Windows.Forms.ToolStripLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - BindingNavigatorDeleteItem - - - System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - BindingNavigatorMoveFirstItem1 @@ -6607,6 +6871,12 @@ der Wertänderungen nutzen wollen: System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + BindingNavigatorDeleteItem + + + System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + ToolStripButton4 @@ -6931,6 +7201,12 @@ der Wertänderungen nutzen wollen: System.Windows.Forms.OpenFileDialog, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + ToolStripButton5 + + + System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + frmAdministration diff --git a/app/DD_PM_WINDREAM/frmAdministration.vb b/app/DD_PM_WINDREAM/frmAdministration.vb index 5d21dd7..95ba555 100644 --- a/app/DD_PM_WINDREAM/frmAdministration.vb +++ b/app/DD_PM_WINDREAM/frmAdministration.vb @@ -13,7 +13,7 @@ Public Class frmAdministration Private INSERT_ACTIVE As Boolean = False Dim Windream_Indicies As List(Of String) - + Dim Windream_Indicies_Types As List(Of Integer) Private Sub frmFormDesigner_Load(sender As Object, e As System.EventArgs) Handles Me.Load formloaded = False @@ -68,7 +68,15 @@ Public Class frmAdministration Indexe_eintragen() Try - Windream_Indicies = _windreamPM.GetIndicesByObjecttype(cmbObjekttypen.Text).ToList() + If cmbObjekttypen.Text <> String.Empty Then + Windream_Indicies = _windreamPM.GetIndicesByObjecttype(cmbObjekttypen.Text).ToList() + Windream_Indicies_Types = New List(Of Integer) + + For Each i In Windream_Indicies + Dim type = _windreamPM.GetTypeOfIndex(i) + Windream_Indicies_Types.Add(type) + Next + End If Catch ex As Exception MsgBox("Fehler bei Indexe_eintragen: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Achtung:") End Try @@ -985,11 +993,17 @@ Public Class frmAdministration Dim view As GridView = sender Dim focusedRow As DataRow = view.GetFocusedDataRow() + If IsNothing(focusedRow) Then + Exit Sub + End If + Dim guid As Integer = focusedRow.Item("GUID") - Dim index As String = focusedRow.Item("INDEXNAME") - Dim sqlCommand As String = focusedRow.Item("SQL_COMMAND") - Dim connectionId As Integer = focusedRow.Item("CONNECTION_ID") - Dim value As String = focusedRow.Item("VALUE") + Dim index As String = NotNull(focusedRow.Item("INDEXNAME"), Nothing) + Dim sqlCommand As String = NotNull(focusedRow.Item("SQL_COMMAND"), "") + Dim connectionId As Integer = NotNull(focusedRow.Item("CONNECTION_ID"), 0) + Dim value As String = NotNull(focusedRow.Item("VALUE"), "") + Dim active As Boolean = NotNull(focusedRow.Item("ACTIVE"), True) + Dim description As String = NotNull(focusedRow.Item("DESCRIPTION"), "") CURRENT_INDEX_ID = guid CURRENT_SQL_CON = connectionId @@ -997,12 +1011,22 @@ Public Class frmAdministration Dim obj As New FinalIndexProperties() obj.GUID = guid obj.IndexName = index - obj.StaticValue = value obj.SQLCommand = New SQLValue(sqlCommand) obj.ConnectionId = connectionId + obj.Description = description + obj.Active = active + obj.Indicies = Windream_Indicies + obj.IndiciesType = Windream_Indicies_Types + obj.IndexName = index + + ' Wenn eine neue Zeile hinzugefügt wird, auf StringValue setzen + If e.FocusedRowHandle <> GridControl.NewItemRowHandle Then + obj = ClassFinalIndex.SetValue(value, obj, index, Windream_Indicies, Windream_Indicies_Types) + End If PropertyGrid1.SelectedObject = obj + PropertyGrid1.Refresh() Catch ex As Exception MsgBox($"Error while loading Final Index properties: {ex.Message}") ClassLogger.Add($"Error while loading Final Index properties: {ex.Message}") @@ -1010,12 +1034,6 @@ Public Class frmAdministration End Sub Private Sub BindingNavigatorAddNewItem_Click(sender As Object, e As EventArgs) Handles BindingNavigatorAddNewItem.Click - Dim obj As New FinalIndexProperties() - obj.Indicies = Windream_Indicies - obj.SQLCommand = New SQLValue() - - PropertyGrid1.SelectedObject = obj - INSERT_ACTIVE = True End Sub @@ -1024,36 +1042,39 @@ Public Class frmAdministration Dim obj As FinalIndexProperties = PropertyGrid1.SelectedObject If Not IsNothing(obj) Then + + Dim value = ClassFinalIndex.GetValue(obj, obj.IndexName, Windream_Indicies, Windream_Indicies_Types, obj.VectorIndex) Dim guid = obj.GUID Dim profileId As Integer = PROFILGUIDTextBox.Text Dim connectionId As Integer = obj.ConnectionId Dim sqlCommand As String = obj.SQLCommand.Value.Replace("'", "''") Dim indexName As String = obj.IndexName - Dim value As String = obj.StaticValue + Dim isVectorIndex As Boolean = obj.VectorIndex Dim addedWho As String = Environment.UserName + Dim description As String = obj.Description + Dim active As Integer = IIf(obj.Active, 1, 0) If NotNull(indexName, "") = String.Empty Then - MsgBox("Das Feld Index muss ausgefüllt sein!", MsgBoxStyle.Exclamation) + MsgBox("Das Feld IndexName muss ausgefüllt sein!", MsgBoxStyle.Exclamation) Exit Sub End If If NotNull(sqlCommand, "") = String.Empty And NotNull(value, "") = String.Empty Then - MsgBox("Entweder SQL Command oder StaticValue müssen ausgefüllt sein!", MsgBoxStyle.Exclamation) + MsgBox("Entweder SQLCommand oder StaticValue müssen ausgefüllt sein!", MsgBoxStyle.Exclamation) Exit Sub End If - - If INSERT_ACTIVE = True Then - Dim sql As String = $"INSERT INTO TBPM_PROFILE_FINAL_INDEXING (PROFIL_ID, CONNECTION_ID, SQL_COMMAND, INDEXNAME, VALUE, ADDED_WHO) - VALUES ({profileId}, {connectionId}, '{sqlCommand}', '{indexName}', '{value}', '{addedWho}')" + Dim sql As String = $"INSERT INTO TBPM_PROFILE_FINAL_INDEXING (PROFIL_ID, CONNECTION_ID, SQL_COMMAND, INDEXNAME, VALUE, ACTIVE, ADDED_WHO) + VALUES ({profileId}, {connectionId}, '{sqlCommand}', '{indexName}', '{value}', {active}, '{addedWho}')" If ClassDatabase.Execute_non_Query(sql, True) Then INSERT_ACTIVE = False End If Else Dim sql As String = $"UPDATE TBPM_PROFILE_FINAL_INDEXING - SET CONNECTION_ID = {connectionId}, SQL_COMMAND = '{sqlCommand}', INDEXNAME = '{indexName}', CHANGED_WHO = '{addedWho}' + SET CONNECTION_ID = {connectionId}, SQL_COMMAND = '{sqlCommand}', INDEXNAME = '{indexName}', CHANGED_WHO = '{addedWho}', + VALUE = '{value}', ACTIVE = {active} WHERE GUID = {guid}" If ClassDatabase.Execute_non_Query(sql, True) Then @@ -1062,7 +1083,6 @@ Public Class frmAdministration End If Refresh_Final_indexe() - End If Catch ex As Exception MsgBox("Error while Saving Final Index: " & ex.Message, MsgBoxStyle.Critical) @@ -1075,12 +1095,32 @@ Public Class frmAdministration Dim obj As FinalIndexProperties = propertyGrid.SelectedObject If TypeOf (e.ChangedItem.Value) Is SQLValue Then + Dim value As SQLValue = e.ChangedItem.Value + + If value.Value <> String.Empty Then + obj.ConnectionId = CURRENT_SQL_CON + obj = ClassFinalIndex.SetValue("", obj, obj.IndexName, Windream_Indicies, Windream_Indicies_Types) + End If + + propertyGrid.Refresh() + ElseIf e.ChangedItem.Label = "IndexName" Then + propertyGrid.Refresh() + End If + End Sub + + Private Sub BindingNavigatorDeleteItem_Click(sender As Object, e As EventArgs) Handles BindingNavigatorDeleteItem.Click + Dim selectedRowHandle = viewFinalIndex.GetSelectedRows().First() + Dim row As DataRow = viewFinalIndex.GetDataRow(selectedRowHandle) - obj.ConnectionId = CURRENT_SQL_CON - obj.StaticValue = "SQL-Command" - ElseIf e.ChangedItem.Label = "StaticValue" Then + If Not IsNothing(row) Then + TBPM_PROFILE_FINAL_INDEXINGTableAdapter.CmdDelete(row.Item("GUID")) + Refresh_Final_indexe() - obj.SQLCommand.Value = String.Empty + MsgBox("Index erfolgreich gelöscht!", MsgBoxStyle.Information, "Hinweis:") End If End Sub + + Private Sub ToolStripButton5_Click(sender As Object, e As EventArgs) Handles ToolStripButton5.Click + Refresh_Final_indexe() + End Sub End Class \ No newline at end of file diff --git a/app/DD_PM_WINDREAM/frmMain.vb b/app/DD_PM_WINDREAM/frmMain.vb index 70eaede..236c653 100644 --- a/app/DD_PM_WINDREAM/frmMain.vb +++ b/app/DD_PM_WINDREAM/frmMain.vb @@ -801,7 +801,6 @@ Public Class frmMain Else CMFileStart.Enabled = True End If - End Select End Sub From e709611a953b701923b32af00387824d694e11fd Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Mon, 25 Jun 2018 10:52:25 +0200 Subject: [PATCH 02/29] jj: add deselect for choicelists --- app/DD_PM_WINDREAM/frmFormDesigner.vb | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/app/DD_PM_WINDREAM/frmFormDesigner.vb b/app/DD_PM_WINDREAM/frmFormDesigner.vb index 9ab8225..a9c7a8a 100644 --- a/app/DD_PM_WINDREAM/frmFormDesigner.vb +++ b/app/DD_PM_WINDREAM/frmFormDesigner.vb @@ -40,9 +40,12 @@ Public Class frmFormDesigner Dim sortedIndicies = unsortedIndicies.OrderBy(Function(index As String) index).ToList() Windream_AllIndicies = sortedIndicies - Windream_ChoiceLists = clsWD_GET.GetChoiceLists() Windream_VectorIndicies = Windream_AllIndicies.FindAll(AddressOf IsVectorIndex) Windream_SimpleIndicies = Windream_AllIndicies.Except(Windream_VectorIndicies).ToList() + + Windream_ChoiceLists = New List(Of String) + Windream_ChoiceLists.Add(String.Empty) + Windream_ChoiceLists.AddRange(clsWD_GET.GetChoiceLists()) Catch ex As Exception MsgBox("Fehler bei Initialisieren von windream: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Achtung:") End Try From 6708998fee02dec2ee8148f992a1dd9fb6d2f89e Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Mon, 25 Jun 2018 11:14:05 +0200 Subject: [PATCH 03/29] jj: work on final indicies --- app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj | 1 + .../My Project/Resources.Designer.vb | 10 + app/DD_PM_WINDREAM/My Project/Resources.resx | 17 +- app/DD_PM_WINDREAM/Resources/cancel.png | Bin 0 -> 587 bytes .../frmAdministration.Designer.vb | 57 +- app/DD_PM_WINDREAM/frmAdministration.resx | 3792 +++++++---------- app/DD_PM_WINDREAM/frmAdministration.vb | 27 +- 7 files changed, 1523 insertions(+), 2381 deletions(-) create mode 100644 app/DD_PM_WINDREAM/Resources/cancel.png diff --git a/app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj b/app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj index 8ad9ca2..d6651ed 100644 --- a/app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj +++ b/app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj @@ -632,6 +632,7 @@ + diff --git a/app/DD_PM_WINDREAM/My Project/Resources.Designer.vb b/app/DD_PM_WINDREAM/My Project/Resources.Designer.vb index be57b54..6adca99 100644 --- a/app/DD_PM_WINDREAM/My Project/Resources.Designer.vb +++ b/app/DD_PM_WINDREAM/My Project/Resources.Designer.vb @@ -190,6 +190,16 @@ Namespace My.Resources End Get End Property + ''' + ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. + ''' + Friend ReadOnly Property cancel() As System.Drawing.Bitmap + Get + Dim obj As Object = ResourceManager.GetObject("cancel", resourceCulture) + Return CType(obj,System.Drawing.Bitmap) + End Get + End Property + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' diff --git a/app/DD_PM_WINDREAM/My Project/Resources.resx b/app/DD_PM_WINDREAM/My Project/Resources.resx index b2664aa..f966100 100644 --- a/app/DD_PM_WINDREAM/My Project/Resources.resx +++ b/app/DD_PM_WINDREAM/My Project/Resources.resx @@ -202,9 +202,6 @@ ..\Resources\flag_pink.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - - ..\Resources\magifier_zoom_out.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - ..\Resources\resultset_next.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -295,6 +292,12 @@ ..\Resources\database_save.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\Einstellungen6.ico;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + ..\Resources\shape_square_go.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + ..\Resources\syncreon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -322,8 +325,8 @@ ..\Resources\Checkbox.PNG;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - - ..\Resources\Einstellungen6.ico;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\magifier_zoom_out.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a ..\Resources\key1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -331,7 +334,7 @@ ..\Resources\user_red.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - - ..\Resources\shape_square_go.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + ..\Resources\cancel.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a \ No newline at end of file diff --git a/app/DD_PM_WINDREAM/Resources/cancel.png b/app/DD_PM_WINDREAM/Resources/cancel.png new file mode 100644 index 0000000000000000000000000000000000000000..c149c2bc017d5ce5a8ae9330dd7dbd012482e0f4 GIT binary patch literal 587 zcmV-R0<`^!P)FS^-G}e*;M)Q6>s#cP zI`Y#S($G6W`W@NI5g|L-MKl0Zmu$m^(0~^Lwo5OO~d#(vPfz 0 + + Left + + + 0, 0 + + + 194, 25 + + + 0 + + + Zugeordnete Benutzer: + + + MiddleLeft + Label20 @@ -378,6 +396,24 @@ 0 + + Left + + + 0, 0 + + + 194, 25 + + + 0 + + + Verfügbare Benutzer: + + + MiddleLeft + Label19 @@ -447,69 +483,6 @@ 0 - - 206, 17 - - - Left - - - 0, 0 - - - 194, 25 - - - 0 - - - Zugeordnete Benutzer: - - - MiddleLeft - - - Label20 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - Panel1 - - - 0 - - - Left - - - 0, 0 - - - 194, 25 - - - 0 - - - Verfügbare Benutzer: - - - MiddleLeft - - - Label19 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - Panel2 - - - 0 - Fill @@ -567,6 +540,27 @@ 0 + + Left + + + NoControl + + + 0, 0 + + + 194, 25 + + + 0 + + + Zugeordnete Gruppen: + + + MiddleLeft + Label22 @@ -663,6 +657,27 @@ 0 + + Left + + + NoControl + + + 0, 0 + + + 194, 25 + + + 0 + + + Verfügbare Gruppen: + + + MiddleLeft + Label23 @@ -732,72 +747,6 @@ 0 - - Left - - - NoControl - - - 0, 0 - - - 194, 25 - - - 0 - - - Zugeordnete Gruppen: - - - MiddleLeft - - - Label22 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - Panel3 - - - 0 - - - Left - - - NoControl - - - 0, 0 - - - 194, 25 - - - 0 - - - Verfügbare Gruppen: - - - MiddleLeft - - - Label23 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - Panel4 - - - 0 - False @@ -1845,6 +1794,21 @@ der Wertänderungen nutzen wollen: 11 + + Tahoma, 9.75pt + + + 15, 22 + + + 104, 24 + + + 0 + + + Ja/Nein + FINAL_PROFILECheckBox @@ -1857,6 +1821,18 @@ der Wertänderungen nutzen wollen: 0 + + Tahoma, 9.75pt + + + 15, 71 + + + 392, 23 + + + 1 + FINAL_TEXTTextBox @@ -1896,56 +1872,23 @@ der Wertänderungen nutzen wollen: 14 - - Tahoma, 9.75pt + + True - - 15, 22 + + Tahoma, 9pt, style=Italic - - 104, 24 + + 6, 19 - - 0 + + 156, 14 - - Ja/Nein + + 72 - - FINAL_PROFILECheckBox - - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - GroupBox4 - - - 0 - - - Tahoma, 9.75pt - - - 15, 71 - - - 392, 23 - - - 1 - - - FINAL_TEXTTextBox - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - GroupBox4 - - - 2 + + Definiert die Art des Profils: Label1 @@ -1959,6 +1902,21 @@ der Wertänderungen nutzen wollen: 0 + + 17, 56 + + + Tahoma, 9.75pt + + + 9, 41 + + + 259, 24 + + + 0 + cmbType @@ -1998,66 +1956,18 @@ der Wertänderungen nutzen wollen: 18 - - True - - - Tahoma, 9pt, style=Italic - - - 6, 19 - - - 156, 14 - - - 72 - - - Definiert die Art des Profils: - - - Label1 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - GroupBox2 - - - 0 - - - 17, 56 - - - Tahoma, 9.75pt + + Segoe UI, 9pt - - 9, 41 + + 9, 21 - - 259, 24 + + 862, 23 - + 0 - - cmbType - - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - GroupBox2 - - - 1 - - - 17, 56 - MOVE2FOLDERTextBox @@ -2070,6 +1980,21 @@ der Wertänderungen nutzen wollen: 0 + + Segoe UI, 9.75pt, style=Bold + + + 877, 19 + + + 29, 23 + + + 72 + + + ... + btnmovetoFolderDialog @@ -2109,57 +2034,6 @@ der Wertänderungen nutzen wollen: 3 - - Segoe UI, 9pt - - - 9, 21 - - - 862, 23 - - - 0 - - - MOVE2FOLDERTextBox - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - GroupBox3 - - - 0 - - - Segoe UI, 9.75pt, style=Bold - - - 877, 19 - - - 29, 23 - - - 72 - - - ... - - - btnmovetoFolderDialog - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - GroupBox3 - - - 1 - Tahoma, 9.75pt @@ -2499,6 +2373,42 @@ der Wertänderungen nutzen wollen: True + + 6, 12 + + + Cyan + + + Fuchsia + + + Profil-Name + + + True + + + 0 + + + 166 + + + Titel + + + True + + + 1 + + + 268, 367 + + + 84 + GridControl1 @@ -2511,6 +2421,27 @@ der Wertänderungen nutzen wollen: 0 + + Tahoma, 8.25pt, style=Bold + + + MiddleLeft + + + 1069, 25 + + + 139, 34 + + + 81 + + + Daten zu Profil entfernen + + + MiddleRight + Button3 @@ -2523,6 +2454,15 @@ der Wertänderungen nutzen wollen: 1 + + 715, 248 + + + 230, 24 + + + 83 + cmbLOGIndex @@ -2535,6 +2475,15 @@ der Wertänderungen nutzen wollen: 2 + + 715, 186 + + + 230, 24 + + + 81 + PM_VEKTOR_INDEXComboBox @@ -2547,9 +2496,24 @@ der Wertänderungen nutzen wollen: 4 - - SORT_BY_LATESTCheckBox - + + Tahoma, 9.75pt + + + 715, 31 + + + 238, 24 + + + 78 + + + Neueste Dokumente zuerst anzeigen + + + SORT_BY_LATESTCheckBox + System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 @@ -2592,6 +2556,75 @@ der Wertänderungen nutzen wollen: True + + 245, 134 + + + Fill + + + 0, 0 + + + True + + + 0 + + + True + + + 1 + + + True + + + 2 + + + True + + + 3 + + + True + + + 4 + + + True + + + 5 + + + True + + + 6 + + + True + + + 7 + + + True + + + 8 + + + 906, 269 + + + 93 + gridFinalIndex @@ -2604,6 +2637,21 @@ der Wertänderungen nutzen wollen: 0 + + Right + + + False + + + 906, 0 + + + 323, 269 + + + 91 + PropertyGrid1 @@ -2652,9 +2700,6 @@ der Wertänderungen nutzen wollen: Neu hinzufügen - - 245, 134 - 127, 22 @@ -2767,6 +2812,18 @@ der Wertänderungen nutzen wollen: 6, 25 + + Magenta + + + 85, 22 + + + Abbrechen + + + False + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO @@ -2788,13 +2845,13 @@ der Wertänderungen nutzen wollen: Löschen - + Magenta - + 79, 22 - + Speichern @@ -2810,7 +2867,7 @@ der Wertänderungen nutzen wollen: 9, 133 - 689, 25 + 658, 25 92 @@ -2863,2117 +2920,1019 @@ der Wertänderungen nutzen wollen: Top, Bottom, Left, Right - - TabPage9 + + True - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 193, 27 - - TabControlFinalIndices + + 199, 20 - - 0 + + 87 - - TabPage10 + + Wert in Vektorindex schreiben - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + CheckBoxPMVEKTOR - - TabControlFinalIndices + + System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 1 + + TabPage9 - - False + + 0 - - 1104, 13 + + True - - 113, 70 + + 24, 135 - - 90 + + 45, 16 - - TabControlFinalIndices + + 89 - - System.Windows.Forms.TabControl, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + Label4 - - TabPage11 + + False - - 4 + + lblSaveFinalIndex - - True + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - Tahoma, 12pt, style=Bold + + TabPage9 - - 5, 83 + + 1 - - 120, 19 + + True - - 74 + + 24, 3 - - Finale Indexe + + 89, 16 - - Label5 + + 78 - + + Index wählen: + + + lblIndexPMVektor + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage11 + + TabPage9 - - 5 + + 2 - + True - - Segoe UI, 9.75pt, style=Italic - - - 6, 108 + + 7, 108 - - 583, 17 + + 19, 16 - - 75 + + 86 - - Diese Indexe werden nach erfolgreicher Indexierung automatisch bei dem indexierten Dokument gesetzt. + + 3. - - Label6 + + Label11 - + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage11 - - - 6 + + TabPage9 - - 765, 56 - - - 44, 22 + + 3 - - von {0} + + 32, 50 - - Die Gesamtanzahl der Elemente. + + 160, 23 - - None + + 88 - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - vAAADrwBlbxySQAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77 - wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0 - v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg - UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA - Iu/O/9T+11gVGSSd+C+b9vW/bvA83AYYZt3+H9byEqci/dTL/zV8p+E2QCftxn+/6od4Fal4TMBtgFPu - lf8gBXgVDULAwAAA8HbAq6XlmnAAAAAASUVORK5CYII= - + + False - - True + + txtBezeichner - - 23, 22 + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - Erste verschieben + + TabPage9 - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - vAAADrwBlbxySQAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w - 5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f - Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+ - 08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC - + + 4 - + True - - 23, 22 + + 7, 52 - - Vorherige verschieben + + 19, 16 - - 6, 25 + + 85 - - Position + + 2. - - False + + Label10 - - 50, 23 + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 0 + + TabPage9 - - Aktuelle Position + + 5 - - 6, 25 + + 27, 27 - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - vAAADrwBlbxySQAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78 - n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI - N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f - oAc0QjgAAAAASUVORK5CYII= - + + 160, 24 - - True + + 77 - - 23, 22 + + cmbIndexe - - Nächste verschieben + + System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - vAAADrwBlbxySQAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+// - h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B - twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA - kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG - WOTd+W9TcAVDMwiA5FL7X8O9hBUYZt3GqhkEQHJhLS//6wbPw22ATtoNnJIgOb/qh/81fKfhNgAfcMq9 - 8l/FYwIYQ4UGBWBgAAC+0b+zuQxOnAAAAABJRU5ErkJggg== - + + TabPage9 - + + 6 + + True - - 23, 22 + + 7, 3 - - Letzte verschieben + + 19, 16 - - 6, 25 + + 84 - - MiddleLeft + + 1. - - Magenta + + Label9 - - 156, 22 + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - Neuen Index hinzufügen + + TabPage9 - - MiddleLeft + + 7 - - Magenta + + True - - 99, 22 + + 24, 52 - - Index löschen + + 21, 16 - - MiddleLeft + + 79 - - Magenta + + sd - - 95, 22 + + False - - Aktualisieren + + lblIndex - - MiddleRight + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - Magenta + + TabPage9 - - 73, 22 + + 8 - - Abbruch + + MiddleLeft - - False + + 9, 51 - - 699, 100 + + 119, 29 - - 568, 25 + + 1 - - 76 + + Datumstempel - - BindingNavigator1 + + MiddleRight - - TBPM_PROFILE_FINAL_INDEXINGBindingNavigator + + btnStampDate - - System.Windows.Forms.BindingNavigator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage11 + + grbxSystemStamps - - 7 + + 0 - - True - - - Top, Bottom, Left + + MiddleLeft - - 1031, 23 + + 9, 22 - - 67, 43 + + 119, 23 - - 75 - - - TBPM_PROFILE_FINAL_INDEXINGDataGridView - - - System.Windows.Forms.DataGridView, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage11 + + 0 - - 8 + + Username - - 4, 25 + + MiddleRight - - 3, 3, 3, 3 + + btnStampUser - - 1235, 445 + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 0 + + grbxSystemStamps - - Move und finale Indexe + + 1 - - TabPage11 + + 298, 52 - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 153, 80 - - TabControl2 + + 83 - - 0 + + System-Stamps - - True + + False - - ANNOTATE_WORK_HISTORY_ENTRYCheckBox + + grbxSystemStamps - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage12 + + TabPage9 - - 0 + + 9 - - ANNOTATE_ALL_WORK_HISTORY_ENTRIESCheckBox + + 60, 72 - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 100, 23 - - TabPage12 + + 80 - - 1 + + False - - SQL_VIEWTextBox + + txtindexwert_final - + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage12 - - - 3 - - - WORK_HISTORY_ENTRYTextBox + + TabPage9 - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 10 - - TabPage12 + + MiddleLeft - - 5 + + 27, 101 - - 4, 25 + + 136, 31 - - 3, 3, 3, 3 + + 82 - - 1235, 448 + + Index einfügen - - 1 + + MiddleRight - - Nachbearbeitungsfunktionen 2 + + btnInsert_FinalIndex - - TabPage12 + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + TabPage9 - - TabControl2 + + 11 - - 1 + + True - - Fill + + 27, 79 - - 3, 3 + + 15, 14 - - 1243, 474 + + 81 - - 92 + + False - - TabControl2 + + chkbxfinalIndex - - System.Windows.Forms.TabControl, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage6 + + TabPage9 - - 0 + + 12 - + 4, 25 - + 3, 3, 3, 3 - - 1249, 480 + + 105, 50 - - 1 + + 0 - - Aktionen nach erfolgreicher Indexierung: + + Fester Wert - - TabPage6 + + TabPage9 - + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - tabctrl_Profilkonfig + + TabControlFinalIndices - - 1 + + 0 - - 9, 77 + + True - - 1257, 509 + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wwAADsMBx2+oZAAAANtJREFUOE+tkzsSgjAURbMEl+TQswDWg8M2LKSWggW4DrWhUBuKaAGUTw5DMASU + z5iZw0zeu/cmmRDljqqqtmVZJjW6Rhx0URR7NK38M7TWm7p5yrJMoiiSIAjE87we1OihQYuntStFIU1T + 8X1f4kMsl/NVnvrVgxo9NGjxNGaS8jxvGvfbY2B0QcOOONZ/AhhMKM49wteAJTQBfKYYMwO9yZVnB7jn + BSOyTTaDgOSYdM1VAVxPGO66uREZg8sggCsihJ2sCnAxIttk6H7lXyuA3R99TAgW4Dxnpd6OS61yelZ6 + QAAAAABJRU5ErkJggg== + - - 79 + + MiddleLeft - - tabctrl_Profilkonfig + + 110, 217 - - System.Windows.Forms.TabControl, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 114, 30 - - TabPage1 + + 80 - - 0 + + Editor Detail - - 4, 25 + + MiddleRight - - 3, 3, 3, 3 + + btnEditor - - 1272, 592 + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - + + TabPage10 + + 0 - - Profil-Verwaltung + + True - - TabPage1 + + Tahoma, 9.75pt - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 328, 3 - - TabControl1 + + 44, 16 - - 0 + + 79 - - SplitContainerProfilzuordnung + + Index: - - System.Windows.Forms.SplitContainer, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + Label15 - - TabPage2 + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 0 + + TabPage10 - - 4, 25 + + 1 - - 3, 3, 3, 3 + + 331, 22 - - 1272, 592 + + 194, 24 - - 1 + + 78 - - Profilzuordnung + + cmbIndexe2 - - TabPage2 + + System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + TabPage10 - - TabControl1 + + 2 - - 1 + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + xAAADsQBlSsOGwAAAFRJREFUOE9j+P//P0UYTHz79u0/Cfg9EBswAAGKAU5OTnD84f1HOEYWA9FtbW1w + Q8gyAIRhhpBtAAiD9BBlADJGVkNbA4jBowYMSgPIwXADyMf/GQC4A6rkpAjLjQAAAABJRU5ErkJggg== + - - btnUserManager + + MiddleLeft - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 9, 216 - - TabPage3 + + 95, 30 - - 0 + + 11 - - Button2 + + Speichern - + + MiddleRight + + + btnSaveSQLCommand + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage3 + + TabPage10 - - 1 + + 3 - - VEKTOR_DELIMITERTextBox + + Courier New, 9pt - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 9, 68 - - TabPage3 + + True - - 3 + + 516, 142 - - btnConnections + + 10 - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + SQL_COMMANDTextBox - - TabPage3 + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - + + TabPage10 + + 4 - - btnopen_SQLAdmin + + Tahoma, 9.75pt - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + MiddleLeft - - TabPage3 + + 218, 22 - - 5 + + 107, 24 - - EMAIL_ACTIVECheckBox + + 9 - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + Connections - - TabPage3 + + MiddleRight - - 6 + + btnShowConnections - - grpbxEmail + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + TabPage10 - - TabPage3 + + 5 - - 7 + + True - - btnlicensemanager_open + + Tahoma, 9.75pt - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 6, 3 - - TabPage3 + + 76, 16 - + 8 - - INTERVALL_CKECK_NO_OF_FILESNumericUpDown + + Connection: - - System.Windows.Forms.NumericUpDown, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + Label14 - - TabPage3 + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 10 + + TabPage10 - - Label3 + + 6 - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 502, 173 + + + Tahoma, 9.75pt - - TabPage3 + + 9, 23 - - 11 + + 203, 24 - - GEAENDERTWERTextBox + + 7 - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + cmbConnection - - TabPage3 + + System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 13 + + TabPage10 - - GEAENDERTWANNTextBox + + 7 - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + True - - TabPage3 + + 5, 49 - - 15 + + 99, 16 - - btnSaveKonfig + + 0 - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + SQL-Command: - - TabPage3 + + Label4 - - 16 + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - + + TabPage10 + + + 8 + + 4, 25 - + 3, 3, 3, 3 - - 1272, 592 + + 105, 53 - - 2 + + 1 - - Grundeinstellungen + + Dynamisches SQL - - TabPage3 + + TabPage10 - + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabControl1 + + TabControlFinalIndices - - 2 + + 1 - - 1092, 56 - - - TBPM_ERROR_LOGDataGridView + + False - - System.Windows.Forms.DataGridView, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 1104, 13 - - TabPage4 + + 113, 79 - - 0 + + 90 - - TBPM_ERROR_LOGBindingNavigator + + TabControlFinalIndices - - System.Windows.Forms.BindingNavigator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.TabControl, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabPage4 + + TabPage11 - - 1 + + 4 - - 4, 25 + + True - - 3, 3, 3, 3 + + Tahoma, 12pt, style=Bold - - 1272, 592 + + 5, 83 - - 3 + + 120, 19 - - Log + + 74 - - TabPage4 + + Finale Indexe - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + Label5 - - TabControl1 + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 3 + + TabPage11 - - Fill + + 5 - - 0, 0 + + True - - 1280, 621 + + Segoe UI, 9.75pt, style=Italic - - 3 + + 6, 108 - - TabControl1 + + 583, 17 - - System.Windows.Forms.TabControl, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 75 - - pnlMain + + Diese Indexe werden nach erfolgreicher Indexierung automatisch bei dem indexierten Dokument gesetzt. - - 0 + + Label6 - - 6, 12 + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - Cyan + + TabPage11 - - Fuchsia + + 6 - - Profil-Name + + 765, 56 + + + 44, 22 - - True + + von {0} - - 0 + + Die Gesamtanzahl der Elemente. - - 166 + + None - - Titel + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + vAAADrwBlbxySQAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77 + wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0 + v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg + UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA + Iu/O/9T+11gVGSSd+C+b9vW/bvA83AYYZt3+H9byEqci/dTL/zV8p+E2QCftxn+/6od4Fal4TMBtgFPu + lf8gBXgVDULAwAAA8HbAq6XlmnAAAAAASUVORK5CYII= + - + True - - 1 + + 23, 22 - - 268, 367 + + Erste verschieben - - 84 + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + vAAADrwBlbxySQAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w + 5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f + Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+ + 08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC + - - GridControl1 + + True - - DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + 23, 22 - - TabPage5 + + Vorherige verschieben - - 0 - - - Tahoma, 8.25pt, style=Bold - - - MiddleLeft - - - 1069, 25 - - - 139, 34 - - - 81 - - - Daten zu Profil entfernen - - - MiddleRight - - - Button3 - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage5 - - - 1 - - - 715, 248 - - - 230, 24 - - - 83 - - - cmbLOGIndex - - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage5 - - - 2 - - - 715, 186 - - - 230, 24 - - - 81 - - - PM_VEKTOR_INDEXComboBox - - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage5 - - - 4 - - - Tahoma, 9.75pt - - - 715, 31 - - - 238, 24 - - - 78 - - - Neueste Dokumente zuerst anzeigen - - - SORT_BY_LATESTCheckBox - - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage5 - - - 7 - - - Fill - - - 0, 0 - - - True - - - 0 - - - True - - - 1 - - - True - - - 2 - - - True - - - 3 - - - True - - - 4 - - - True - - - 5 - - - True - - - 6 - - - True - - - 7 - - - True - - - 8 - - - 906, 269 - - - 93 - - - gridFinalIndex - - - DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - Panel5 - - - 0 - - - Right - - - False - - - 906, 0 - - - 323, 269 - - - 91 - - - PropertyGrid1 - - - System.Windows.Forms.PropertyGrid, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - Panel5 - - - 1 - - - CheckBoxPMVEKTOR - - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 0 - - - lblSaveFinalIndex - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 1 - - - lblIndexPMVektor - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 2 - - - Label11 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 3 - - - txtBezeichner - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 4 - - - Label10 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 5 - - - cmbIndexe - - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 6 - - - Label9 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 7 - - - lblIndex - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 8 - - - grbxSystemStamps - - - System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 9 - - - txtindexwert_final - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 10 - - - btnInsert_FinalIndex - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 11 - - - chkbxfinalIndex - - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 12 - - - 4, 25 - - - 3, 3, 3, 3 - - - 105, 41 - - - 0 - - - Fester Wert - - - TabPage9 - - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabControlFinalIndices - - - 0 - - - True - - - 193, 27 - - - 199, 20 - - - 87 - - - Wert in Vektorindex schreiben - - - CheckBoxPMVEKTOR - - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 0 - - - True - - - 24, 135 - - - 45, 16 - - - 89 - - - Label4 - - - False - - - lblSaveFinalIndex - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 1 - - - True - - - 24, 3 - - - 89, 16 - - - 78 - - - Index wählen: - - - lblIndexPMVektor - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 2 - - - True - - - 7, 108 - - - 19, 16 - - - 86 - - - 3. - - - Label11 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 3 - - - 32, 50 - - - 160, 23 - - - 88 - - - False - - - txtBezeichner - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 4 - - - True - - - 7, 52 - - - 19, 16 - - - 85 - - - 2. - - - Label10 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 5 - - - 27, 27 - - - 160, 24 - - - 77 - - - cmbIndexe - - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 6 - - - True - - - 7, 3 - - - 19, 16 - - - 84 - - - 1. - - - Label9 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 7 - - - True - - - 24, 52 - - - 21, 16 - - - 79 - - - sd - - - False - - - lblIndex - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 8 - - - btnStampDate - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - grbxSystemStamps - - - 0 - - - btnStampUser - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - grbxSystemStamps - - - 1 - - - 298, 52 - - - 153, 80 - - - 83 - - - System-Stamps - - - False - - - grbxSystemStamps - - - System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 9 - - - MiddleLeft - - - 9, 51 - - - 119, 29 - - - 1 - - - Datumstempel - - - MiddleRight - - - btnStampDate - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - grbxSystemStamps - - - 0 - - - MiddleLeft - - - 9, 22 - - - 119, 23 - - - 0 - - - Username - - - MiddleRight - - - btnStampUser - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - grbxSystemStamps - - - 1 - - - 60, 72 - - - 100, 23 - - - 80 - - - False - - - txtindexwert_final - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 10 - - - MiddleLeft - - - 27, 101 - - - 136, 31 - - - 82 - - - Index einfügen - - - MiddleRight - - - btnInsert_FinalIndex - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 11 - - - True - - - 27, 79 - - - 15, 14 - - - 81 - - - False - - - chkbxfinalIndex - - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 12 - - - True - - - btnEditor - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 0 - - - Label15 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 1 - - - cmbIndexe2 - - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 2 - - - btnSaveSQLCommand - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 3 - - - SQL_COMMANDTextBox - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 4 - - - btnShowConnections - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 5 - - - Label14 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 6 - - - cmbConnection - - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 7 - - - Label4 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 8 - - - 4, 25 - - - 3, 3, 3, 3 - - - 105, 44 + + 6, 25 - - 1 + + Position - - Dynamisches SQL + + False - - TabPage10 + + 50, 23 - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 0 - - TabControlFinalIndices + + Aktuelle Position - - 1 + + 6, 25 - + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - wwAADsMBx2+oZAAAANtJREFUOE+tkzsSgjAURbMEl+TQswDWg8M2LKSWggW4DrWhUBuKaAGUTw5DMASU - z5iZw0zeu/cmmRDljqqqtmVZJjW6Rhx0URR7NK38M7TWm7p5yrJMoiiSIAjE87we1OihQYuntStFIU1T - 8X1f4kMsl/NVnvrVgxo9NGjxNGaS8jxvGvfbY2B0QcOOONZ/AhhMKM49wteAJTQBfKYYMwO9yZVnB7jn - BSOyTTaDgOSYdM1VAVxPGO66uREZg8sggCsihJ2sCnAxIttk6H7lXyuA3R99TAgW4Dxnpd6OS61yelZ6 - QAAAAABJRU5ErkJggg== + vAAADrwBlbxySQAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78 + n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI + N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f + oAc0QjgAAAAASUVORK5CYII= - - MiddleLeft - - - 110, 217 - - - 114, 30 - - - 80 - - - Editor Detail - - - MiddleRight - - - btnEditor - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 0 - - + True - - Tahoma, 9.75pt - - - 328, 3 - - - 44, 16 - - - 79 - - - Index: - - - Label15 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 1 - - - 331, 22 - - - 194, 24 - - - 78 - - - cmbIndexe2 - - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 + + 23, 22 - - 2 + + Nächste verschieben - + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - xAAADsQBlSsOGwAAAFRJREFUOE9j+P//P0UYTHz79u0/Cfg9EBswAAGKAU5OTnD84f1HOEYWA9FtbW1w - Q8gyAIRhhpBtAAiD9BBlADJGVkNbA4jBowYMSgPIwXADyMf/GQC4A6rkpAjLjQAAAABJRU5ErkJggg== + vAAADrwBlbxySQAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+// + h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B + twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA + kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG + WOTd+W9TcAVDMwiA5FL7X8O9hBUYZt3GqhkEQHJhLS//6wbPw22ATtoNnJIgOb/qh/81fKfhNgAfcMq9 + 8l/FYwIYQ4UGBWBgAAC+0b+zuQxOnAAAAABJRU5ErkJggg== - - MiddleLeft - - - 9, 216 - - - 95, 30 - - - 11 - - - Speichern - - - MiddleRight - - - btnSaveSQLCommand - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 3 - - - Courier New, 9pt - - - 9, 68 - - + True - - 516, 142 - - - 10 - - - SQL_COMMANDTextBox - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 + + 23, 22 - - 4 + + Letzte verschieben - - Tahoma, 9.75pt + + 6, 25 - + MiddleLeft - - 218, 22 - - - 107, 24 - - - 9 - - - Connections - - - MiddleRight - - - btnShowConnections - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 5 - - - True - - - Tahoma, 9.75pt - - - 6, 3 + + Magenta - - 76, 16 + + 156, 22 - - 8 + + Neuen Index hinzufügen - - Connection: + + MiddleLeft - - Label14 + + Magenta - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 99, 22 - - TabPage10 + + Index löschen - - 6 + + MiddleLeft - - 502, 173 - - - Tahoma, 9.75pt + + Magenta - - 9, 23 + + 95, 22 - - 203, 24 + + Aktualisieren - - 7 + + MiddleRight - - cmbConnection + + Magenta - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 73, 22 - - TabPage10 + + Abbruch - - 7 + + False - - 502, 173 - - - True + + 541, 86 - - 5, 49 + + 568, 25 - - 99, 16 + + 76 - - 0 + + BindingNavigator1 - - SQL-Command: + + TBPM_PROFILE_FINAL_INDEXINGBindingNavigator - - Label4 + + System.Windows.Forms.BindingNavigator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + TabPage11 - - TabPage10 + + 7 - - 8 + + Top, Bottom, Left True @@ -4993,6 +3952,57 @@ der Wertänderungen nutzen wollen: Erstellt wann + + 1031, 23 + + + 67, 52 + + + 75 + + + TBPM_PROFILE_FINAL_INDEXINGDataGridView + + + System.Windows.Forms.DataGridView, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage11 + + + 8 + + + 4, 25 + + + 3, 3, 3, 3 + + + 1235, 445 + + + 0 + + + Move und finale Indexe + + + TabPage11 + + + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabControl2 + + + 0 + + + True + 291, 336 @@ -5089,6 +4099,132 @@ der Wertänderungen nutzen wollen: 5 + + 4, 25 + + + 3, 3, 3, 3 + + + 1235, 448 + + + 1 + + + Nachbearbeitungsfunktionen 2 + + + TabPage12 + + + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabControl2 + + + 1 + + + Fill + + + 3, 3 + + + 1243, 474 + + + 92 + + + TabControl2 + + + System.Windows.Forms.TabControl, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage6 + + + 0 + + + 4, 25 + + + 3, 3, 3, 3 + + + 1249, 480 + + + 1 + + + Aktionen nach erfolgreicher Indexierung: + + + TabPage6 + + + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + tabctrl_Profilkonfig + + + 1 + + + 9, 77 + + + 1257, 509 + + + 79 + + + tabctrl_Profilkonfig + + + System.Windows.Forms.TabControl, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage1 + + + 0 + + + 4, 25 + + + 3, 3, 3, 3 + + + 1272, 592 + + + 0 + + + Profil-Verwaltung + + + TabPage1 + + + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabControl1 + + + 0 + Fill @@ -5170,15 +4306,30 @@ der Wertänderungen nutzen wollen: SplitContainerProfilzuordnung.Panel1 - - System.Windows.Forms.SplitterPanel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.SplitterPanel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + SplitContainerProfilzuordnung + + + 0 + + + 4, 25 + + + 3, 3, 3, 3 - - SplitContainerProfilzuordnung + + 906, 557 - + 0 + + Benutzer + TabPage7 @@ -5191,6 +4342,21 @@ der Wertänderungen nutzen wollen: 0 + + 4, 25 + + + 3, 3, 3, 3 + + + 906, 557 + + + 1 + + + Gruppen + TabPage8 @@ -5260,58 +4426,31 @@ der Wertänderungen nutzen wollen: 0 - - 4, 25 - - - 3, 3, 3, 3 - - - 906, 557 - - - 0 - - - Benutzer - - - TabPage7 - - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabControl3 - - - 0 - - + 4, 25 - + 3, 3, 3, 3 - - 906, 557 + + 1272, 592 - + 1 - - Gruppen + + Profilzuordnung - - TabPage8 + + TabPage2 - + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TabControl3 + + TabControl1 - + 1 @@ -5401,9 +4540,6 @@ der Wertänderungen nutzen wollen: 3 - - 457, 95 - MiddleLeft @@ -5416,248 +4552,77 @@ der Wertänderungen nutzen wollen: 13 - - Connections Verwaltung - - - MiddleRight - - - btnConnections - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage3 - - - 4 - - - MiddleLeft - - - 649, 104 - - - 172, 30 - - - 12 - - - SQL-Admin - - - MiddleRight - - - btnopen_SQLAdmin - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage3 - - - 5 - - - 463, 32 - - - 162, 24 - - - 11 - - - Email Meldungen Aktiv - - - EMAIL_ACTIVECheckBox - - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage3 - - - 6 - - - GroupBox5 - - - System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - grpbxEmail - - - 0 - - - EMAIL_REMINDER_FOOTERTextBox - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - grpbxEmail - - - 2 - - - EMAIL_REMINDER_HEADERTextBox - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - grpbxEmail - - - 4 - - - EMAIL_PWTextBox - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - grpbxEmail - - - 6 - - - EMAIL_USERTextBox - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - grpbxEmail - - - 8 - - - EMAIL_SMTPTextBox - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - grpbxEmail - - - 10 - - - EMAIL_FROMTextBox - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - grpbxEmail - - - 12 - - - False - - - 21, 90 - - - 622, 324 - - - 1 - - - E-Mail Konfiguration - - - grpbxEmail + + Connections Verwaltung - - System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + MiddleRight - - TabPage3 + + btnConnections - - 7 + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - txtemailEmpfaenger + + TabPage3 - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 4 - - GroupBox5 + + MiddleLeft - - 0 + + 649, 104 - - Label8 + + 172, 30 - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 12 - - GroupBox5 + + SQL-Admin - - 1 + + MiddleRight - - btnTest_Email + + btnopen_SQLAdmin - + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - GroupBox5 + + TabPage3 - - 2 + + 5 - - 307, 23 + + 463, 32 - - 303, 87 + + 162, 24 - - 21 + + 11 - - Email testen + + Email Meldungen Aktiv - - GroupBox5 + + EMAIL_ACTIVECheckBox - - System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - grpbxEmail + + TabPage3 - - 0 + + 6 112, 19 @@ -5740,6 +4705,30 @@ der Wertänderungen nutzen wollen: 2 + + 307, 23 + + + 303, 87 + + + 21 + + + Email testen + + + GroupBox5 + + + System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + grpbxEmail + + + 0 + 10, 258 @@ -5872,6 +4861,33 @@ der Wertänderungen nutzen wollen: 12 + + False + + + 21, 90 + + + 622, 324 + + + 1 + + + E-Mail Konfiguration + + + grpbxEmail + + + System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabPage3 + + + 7 + MiddleLeft @@ -6022,6 +5038,33 @@ der Wertänderungen nutzen wollen: 16 + + 4, 25 + + + 3, 3, 3, 3 + + + 1272, 592 + + + 2 + + + Grundeinstellungen + + + TabPage3 + + + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabControl1 + + + 2 + ID @@ -6221,12 +5264,69 @@ der Wertänderungen nutzen wollen: 1 + + 4, 25 + + + 3, 3, 3, 3 + + + 1272, 592 + + + 3 + + + Log + + + TabPage4 + + + System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TabControl1 + + + 3 + + + Fill + + + 0, 0 + + + 1280, 621 + + + 3 + + + TabControl1 + + + System.Windows.Forms.TabControl, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + pnlMain + + + 0 + 860, 134 977, 95 + + 16, 17 + + + False + 0, 621 @@ -6251,12 +5351,6 @@ der Wertänderungen nutzen wollen: 1 - - 16, 17 - - - False - 240, 95 @@ -6871,16 +5965,28 @@ der Wertänderungen nutzen wollen: System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + tsBtnCancel + + + System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + BindingNavigatorDeleteItem System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - ToolStripButton4 + + tsBtnSave + + + System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + ToolStripButton5 - + System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 @@ -6961,10 +6067,10 @@ der Wertänderungen nutzen wollen: System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - tsBtnCancel + + tsBtnCancel_old - + System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 @@ -7201,12 +6307,6 @@ der Wertänderungen nutzen wollen: System.Windows.Forms.OpenFileDialog, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - ToolStripButton5 - - - System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - frmAdministration diff --git a/app/DD_PM_WINDREAM/frmAdministration.vb b/app/DD_PM_WINDREAM/frmAdministration.vb index 95ba555..2d17ec5 100644 --- a/app/DD_PM_WINDREAM/frmAdministration.vb +++ b/app/DD_PM_WINDREAM/frmAdministration.vb @@ -725,7 +725,7 @@ Public Class frmAdministration End Sub Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) Handles ToolStripButton2.Click TabControlFinalIndices.Enabled = True - tsBtnCancel.Visible = True + tsBtnCancel_old.Visible = True cmbIndexe.Items.Clear() cmbIndexe2.Items.Clear() Dim indexe = _windreamPM.GetIndicesByObjecttype(cmbObjekttypen.Text) @@ -742,7 +742,7 @@ Public Class frmAdministration Private Sub CancelFinalIndexInsert() TabControlFinalIndices.Enabled = False INSERT_ACTIVE = False - tsBtnCancel.Visible = False + tsBtnCancel_old.Visible = False txtBezeichner.Text = String.Empty txtindexwert_final.Text = String.Empty @@ -976,7 +976,7 @@ Public Class frmAdministration End Try End Sub - Private Sub tsBtnCancel_Click(sender As Object, e As EventArgs) Handles tsBtnCancel.Click + Private Sub tsBtnCancel_Click(sender As Object, e As EventArgs) Handles tsBtnCancel_old.Click CancelFinalIndexInsert() End Sub @@ -1035,9 +1035,12 @@ Public Class frmAdministration Private Sub BindingNavigatorAddNewItem_Click(sender As Object, e As EventArgs) Handles BindingNavigatorAddNewItem.Click INSERT_ACTIVE = True + + tsBtnCancel.Visible = True + BindingNavigatorAddNewItem.Visible = False End Sub - Private Sub ToolStripButton4_Click_1(sender As Object, e As EventArgs) Handles ToolStripButton4.Click + Private Sub ToolStripButton4_Click_1(sender As Object, e As EventArgs) Handles tsBtnSave.Click Try Dim obj As FinalIndexProperties = PropertyGrid1.SelectedObject @@ -1087,6 +1090,10 @@ Public Class frmAdministration Catch ex As Exception MsgBox("Error while Saving Final Index: " & ex.Message, MsgBoxStyle.Critical) ClassLogger.Add("Error while Saving Final Index: " & ex.Message) + Finally + tsBtnCancel.Visible = False + BindingNavigatorAddNewItem.Visible = True + INSERT_ACTIVE = False End Try End Sub @@ -1123,4 +1130,16 @@ Public Class frmAdministration Private Sub ToolStripButton5_Click(sender As Object, e As EventArgs) Handles ToolStripButton5.Click Refresh_Final_indexe() End Sub + + Private Sub tsBtnCancel_Click_1(sender As Object, e As EventArgs) Handles tsBtnCancel.Click + CancelFinalIndexInsert() + End Sub + + 'Private Sub viewFinalIndex_ValidateRow(sender As Object, e As Views.Base.ValidateRowEventArgs) Handles viewFinalIndex.ValidateRow + ' Dim rowView As DataRowView = e.Row + + ' If rowView.IsNew Then + ' Dim props As FinalIndexProperties = PropertyGrid1.SelectedObject + ' End If + 'End Sub End Class \ No newline at end of file From c5ff6c576978daebf77e23e3e65c50ddb349c96f Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Tue, 26 Jun 2018 16:02:24 +0200 Subject: [PATCH 04/29] jj: change layout of profiles --- app/DD_PM_WINDREAM/frmMain.Designer.vb | 28 +- app/DD_PM_WINDREAM/frmMain.resx | 533 +++++++++++++------------ app/DD_PM_WINDREAM/frmMain.vb | 5 +- 3 files changed, 292 insertions(+), 274 deletions(-) diff --git a/app/DD_PM_WINDREAM/frmMain.Designer.vb b/app/DD_PM_WINDREAM/frmMain.Designer.vb index 7794ac5..f9548e3 100644 --- a/app/DD_PM_WINDREAM/frmMain.Designer.vb +++ b/app/DD_PM_WINDREAM/frmMain.Designer.vb @@ -22,6 +22,7 @@ Partial Class frmMain 'Das Bearbeiten mit dem Code-Editor ist nicht möglich. Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMain)) Me.SplitContainerDashboard = New System.Windows.Forms.SplitContainer() Me.SplitContainerTop = New System.Windows.Forms.SplitContainer() @@ -34,9 +35,9 @@ Partial Class frmMain Me.ToolStripBottomLeft = New System.Windows.Forms.ToolStrip() Me.ChartBottomRight = New DevExpress.XtraCharts.ChartControl() Me.ToolStripBottomRight = New System.Windows.Forms.ToolStrip() - Me.ImageListProfile = New System.Windows.Forms.ImageList() + Me.ImageListProfile = New System.Windows.Forms.ImageList(Me.components) Me.DD_DMSLiteDataSet = New DD_PM_WINDREAM.DD_DMSLiteDataSet() - Me.TBPM_PROFILEBindingSource = New System.Windows.Forms.BindingSource() + Me.TBPM_PROFILEBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPM_PROFILETableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILETableAdapter() Me.TableAdapterManager = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager() Me.ToolStrip1 = New System.Windows.Forms.ToolStrip() @@ -56,8 +57,8 @@ Partial Class frmMain Me.tslblmessage = New System.Windows.Forms.ToolStripStatusLabel() Me.Panel1 = New System.Windows.Forms.Panel() Me.pnlNavigator = New System.Windows.Forms.Panel() - Me.BindingNavigator1 = New System.Windows.Forms.BindingNavigator() - Me.bindsourcegrid = New System.Windows.Forms.BindingSource() + Me.BindingNavigator1 = New System.Windows.Forms.BindingNavigator(Me.components) + Me.bindsourcegrid = New System.Windows.Forms.BindingSource(Me.components) Me.BindingNavigatorCountItem = New System.Windows.Forms.ToolStripLabel() Me.BindingNavigatorMoveFirstItem = New System.Windows.Forms.ToolStripButton() Me.BindingNavigatorMovePreviousItem = New System.Windows.Forms.ToolStripButton() @@ -68,7 +69,7 @@ Partial Class frmMain Me.BindingNavigatorMoveLastItem = New System.Windows.Forms.ToolStripButton() Me.BindingNavigatorSeparator2 = New System.Windows.Forms.ToolStripSeparator() Me.GridControl_Docs = New DevExpress.XtraGrid.GridControl() - Me.ContextMenuGrid = New System.Windows.Forms.ContextMenuStrip() + Me.ContextMenuGrid = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.CMGroupStart = New System.Windows.Forms.ToolStripMenuItem() Me.CMFileStart = New System.Windows.Forms.ToolStripMenuItem() Me.MarkierteDateienAbschliessenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() @@ -77,20 +78,20 @@ Partial Class frmMain Me.lblViewType = New System.Windows.Forms.Label() Me.NavBarControl1 = New DevExpress.XtraNavBar.NavBarControl() Me.NavBarGroupProfiles = New DevExpress.XtraNavBar.NavBarGroup() - Me.cmsNavPane = New System.Windows.Forms.ContextMenuStrip() + Me.cmsNavPane = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.tsmiValidationProfil = New System.Windows.Forms.ToolStripMenuItem() Me.NavBarGroupMore = New DevExpress.XtraNavBar.NavBarGroup() Me.NavBarItemOverview = New DevExpress.XtraNavBar.NavBarItem() Me.NavBarItemDashboard = New DevExpress.XtraNavBar.NavBarItem() - Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon() - Me.TimerRefresh = New System.Windows.Forms.Timer() - Me.TBPM_USERBindingSource = New System.Windows.Forms.BindingSource() + Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon(Me.components) + Me.TimerRefresh = New System.Windows.Forms.Timer(Me.components) + Me.TBPM_USERBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPM_USERTableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBDD_USERTableAdapter() - Me.TBPM_KONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource() + Me.TBPM_KONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPM_KONFIGURATIONTableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter() - Me.TBPM_PROFILE_FILESBindingSource = New System.Windows.Forms.BindingSource() + Me.TBPM_PROFILE_FILESBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPM_PROFILE_FILESTableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_FILESTableAdapter() - Me.TimerReminder = New System.Windows.Forms.Timer() + Me.TimerReminder = New System.Windows.Forms.Timer(Me.components) CType(Me.SplitContainerDashboard, System.ComponentModel.ISupportInitialize).BeginInit() Me.SplitContainerDashboard.Panel1.SuspendLayout() Me.SplitContainerDashboard.Panel2.SuspendLayout() @@ -512,8 +513,7 @@ Partial Class frmMain 'NavBarGroupProfiles ' resources.ApplyResources(Me.NavBarGroupProfiles, "NavBarGroupProfiles") - Me.NavBarGroupProfiles.Expanded = True - Me.NavBarGroupProfiles.GroupStyle = DevExpress.XtraNavBar.NavBarGroupStyle.LargeIconsText + Me.NavBarGroupProfiles.GroupStyle = DevExpress.XtraNavBar.NavBarGroupStyle.SmallIconsText Me.NavBarGroupProfiles.Name = "NavBarGroupProfiles" ' 'cmsNavPane diff --git a/app/DD_PM_WINDREAM/frmMain.resx b/app/DD_PM_WINDREAM/frmMain.resx index c65500c..fdbe1bb 100644 --- a/app/DD_PM_WINDREAM/frmMain.resx +++ b/app/DD_PM_WINDREAM/frmMain.resx @@ -488,7 +488,7 @@ AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0 ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAADw - CAAAAk1TRnQBSQFMAgEBAgEAAZQBAwGUAQMBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo + CAAAAk1TRnQBSQFMAgEBAgEAAaQBAwGkAQMBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5 AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA @@ -547,6 +547,30 @@ Tahoma, 9pt + + 0, 0 + + + 1023, 25 + + + 2 + + + ToolStrip1 + + + ToolStrip1 + + + System.Windows.Forms.ToolStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + Panel1 + + + 4 + Segoe UI, 9pt, style=Bold, Italic @@ -604,35 +628,35 @@ Aktualisieren - - 0, 0 + + 1015, 17 + + + Tahoma, 9pt - - 1023, 25 + + 0, 502 - - 2 + + 1023, 25 - - ToolStrip1 + + 3 - - ToolStrip1 + + StatusStrip1 - - System.Windows.Forms.ToolStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + StatusStrip1 - - Panel1 + + System.Windows.Forms.StatusStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 4 + + $this - - 1015, 17 - - - Tahoma, 9pt + + 3 146, 20 @@ -679,162 +703,11 @@ 0, 20 - - 0, 502 - - - 1023, 25 - - - 3 - - - StatusStrip1 - - - StatusStrip1 - - - System.Windows.Forms.StatusStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - $this - - - 3 - - - Top, Left, Right - 349, 134 - - 503, 134 - - - 87, 22 - - - von {0} Dateien - - - Die Gesamtanzahl der Elemente. - - - Fill - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - wwAADsMBx2+oZAAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77 - wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0 - v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg - UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA - Iu/O/9T+11gVGSSd+C+b9vW/bvA83AYYZt3+H9byEqci/dTL/zV8p+E2QCftxn+/6od4Fal4TMBtgFPu - lf8gBXgVDULAwAAA8HbAq6XlmnAAAAAASUVORK5CYII= - - - - True - - - 23, 22 - - - Erste verschieben - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - wwAADsMBx2+oZAAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w - 5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f - Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+ - 08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC - - - - True - - - 23, 22 - - - Vorherige verschieben - - - 6, 25 - - - Position - - - False - - - 50, 23 - - - 0 - - - Aktuelle Position - - - 6, 25 - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - wwAADsMBx2+oZAAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78 - n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI - N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f - oAc0QjgAAAAASUVORK5CYII= - - - - True - - - 23, 22 - - - Nächste verschieben - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - wwAADsMBx2+oZAAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+// - h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B - twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA - kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG - WOTd+W9TcAVDMwiA5FL7X8O9hBUYZt3GqhkEQHJhLS//6wbPw22ATtoNnJIgOb/qh/81fKfhNgAfcMq9 - 8l/FYwIYQ4UGBWBgAAC+0b+zuQxOnAAAAABJRU5ErkJggg== - - - - True - - - 23, 22 - - - Letzte verschieben - - - 6, 25 - - - 0, 0 - - - 778, 25 - - - 9 - - - BindingNavigator1 + + Top, Left, Right BindingNavigator1 @@ -875,39 +748,6 @@ 637, 95 - - 265, 22 - - - Validierung für Gruppe/Profil starten - - - 265, 22 - - - Validierung für Datei starten - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - wwAADsMBx2+oZAAAAM5JREFUOE9jwAa+fv3a8O3bt/9I+D0QCECl8QOQQpAG+fTl/xmC5/yvXnryP8hA - qDRhALJx1s4rYM38sYv+P3/zAcUlX758MYAqhQAkSbACEI1se2Rk5H8nJycwTklJ+f/8+XNUQ0CakDUg - 2754xVq4ZpyGgPyHrAnZsI8fPv3/8P4jHOfl5mEagh5oyLYja0Y2AGYISB+GK2C2g/yObgAMwwwBhRfY - AJgrQAIgvHnzZrACbJpBGMMAZAAShCnAphmER5IBhDDtDCAef/sPAEGjQ6y45GCmAAAAAElFTkSuQmCC - - - - 265, 22 - - - Massenabschluss markierte Dateien - - - 265, 22 - - - Tabellenlayout zurücksetzen - 266, 92 @@ -1026,12 +866,6 @@ 786, 95 - - 215, 22 - - - Starte Validierung für Profil - 216, 26 @@ -1047,6 +881,51 @@ Weitere Ansichten + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAXdEVYdFRpdGxlAFByb2R1Y3Q7UHJvZHVjdHM7c0vM + pAAACNJJREFUWEfFV3lcT+kePsLYyoSmaeEqtO9psRUjkmUywhQyolSKaRCNFkmWiKGUTK4xKbkVVwta + SXW1WiptSpvSooWiLHe6z3zfU5mRX/+Mz2fu9/N5Tuf3vud9n+/2PufEAfi/QuDgYCAbQhBifwXN/xXw + l1z/eVzOSUMu6ycDLvPobC7jyAwu7ZA+l7pfl0vxnN5PPJwg7LtmymJV6dESdD+mb2xIsKUsF2Q+mfNf + OYk7YSrNHV0i+RHRYOAvOX5zufZHIR+BjEX72WSxkeMDN8ltSzlmUled7oPQzfLdp9bKxjkbS1nTvDhB + hD1HGNL1+DjnYyLxEdFg4C/ZJwz/TMqiHUoYaWc8UT7sB03/jMAV3VW39qD5/iHQM8gJt0NFvB0yTi7E + aQuZ9r2LpaIsp49fS2ukCGMJvDMDyQSBv2T/NIee54mHEcb42SguinbVS8wLseypy/REfeY+lEY7ofBf + W1ASvRfRHibIPmuF/Ev2KL1ij+wAU0Q4qMN7vni7o974SybThL+mfUYPJBMEZnx95aTGiIZu13BK9Dao + LKBNG3K9+YgZGHnn4yh0lJ7H84eBaLt/FK25nmjJ3I3mjO/RdNsWjTet0Ji8DnXxFjhno8R2niiIcCCY + fRbjruOTFWjaWZ3hw6d4IFjUHWUX8DR+xaBoSFyFtpztqI22gIfBF2znaYIIB4KZcPrhGXjVdA2tldGo + e/AzavL8UZ5+FPmxrrgT4oAol0V4URQkkJihJXMbGpJsUBSgjQJfFbjOFmM7ywkiHAhmoumH9fGmwRvv + 2sLQ87oAPa/u4PWzy2h7FIzqTB+kBWxAe/6xj4gbU23QlL4DZb/MQpG/OgqPqyLfRwkuMyewnRUEEQ4E + s/G3D+ridb0nup+4o6t2H962RZMjpehujkdzgR/yLzuhNc/rD+KUDWjOdMPjcCOU/qyN4kANPDyhhoKj + yrh3UAG79MeznVUITCfYiRr0RDATS92vg64aN3RV78HLyt3orHDGy8d7yZEkvHv5CC3FIWjJ+hENyZZo + yduPmmgzVJzXQ9nZ6Sg5rYkiPyI/poK7BxVxx10OBxdJIMRW9kGo7ZQsT1NJU+J4rxMBq6Q5v+VS3LGl + vVrBTPzmPm0i3sUTdz7ajs4yJ3QUb6WOd6Tf3uh58wyt9w6hIcUaVRdnoCJEH4/+qYPSM1pEroF8qnu2 + lxKSXeQRu0OejqcDuhrTUB1vjQy/JQiwmHTf3kBsDXGJEUYShHyX/OGARIqnFk/cUfo9XjDiQgc8L7BH + +/3NaL1rjTetWaiOmo3KS7PwOFQf5ed1UEKpL/TXQJ6PCm65KSLeRRGFkY5EnE6On8azO84oj5yPtw0X + 0F5wAClHjHFomUSRhaYoU08mWKMJTGk5qSQPTTwvciTiLdRstmi7R8R5m9Cas4FSvx7djcmojpiFyrAZ + KP9Vj6KfTuSaSPNWQZK7MkqubP2AmOHpTSfk+umgKtkDVYnuqEpwRVG4DSIcdeA6U7TWVFHEnriZanIT + 49000P6AiCna1txNaMnegGeZ60lk1lCXm+NV7VVUhs9ExQVK/bne1Of5quGmlyraS3zxpu0u6m87oSrm + G1ReXYqKy8ZErjuoeJVHrUeA2WQojOI0mAP/uOGiRpNWFO135L1lL3GaORpvraKON0Nn+YW+1OuiLJga + L1AT2YdVkOKpiu7avdS81LCt1/Fb10O8a72Cd00XKXLPj8SrIXE1BTKPAtDG/vm8WLGTwslc26WK5v8Q + cboFyeq3RLySOp4WJS1H/Y1lfATlIbp86kuCqPHozGcfUEaShwpeVbriZYUL9RA1cZk73rak4beObN6B + fvGqv2GGmiuL+fXs2JYEacJrHu+AGnNgcuxOFTSlUrQ3+4gTiPj6MtTFLUFdjAn1w2GU86mnMx/Qe+az + qOsT3ZTxsmwXOkp2kpNOeJ6/lfqHGvihJ57kxKHtgS+exC4n5/VRdo7Ig3vJ2R775vJqqc4cmHDSckpC + 0l4tVEQtIuKlqI9dzBPX/nsBai4bUUlc35/5hyfV+TOfuU8BCa5KeNFH3H7fgcpoS2W0oTJuxKsn11AV + YURNS2Vjzp9l5JQ9JlqUQU9D3gFN5gBTK6l1M8V+CLaa2pJ+RJeOHBFHGaEm4itUU80ak7ehtC/1/XKb + 6jIN1+notVPEPHG2NZVxI/XOd1TCteisjOwt2y865Lw237hMMYtOqVMQanCfw8u1Vr8YsPMoIiY8TMt5 + oURMuJ1cz4MAfVSFGaAy1AD1cVaUNoq+T27jtsnCSW/c22u7FPiIe4nXE/E6PE02R338KjwvPtdLzvqG + 1Z0at5+cBeE2m3dAk3cgYos8VxP5FXOEz8Y8ORFrLxPJuugdiuS9PmVjJSmeOnIPKeHMamlYqYwtkxwz + dG3MDgU8TVmLBor4abIF6hNWoe76CjyJMSXlPNmrlsFafOn43qE9Co+rINJeBnban9cQlyzvQLjtNK76 + oiFH0TInWDbYB6eypZZo+PHlkv9NPzwTCbvl4DH3izcLZccE0ZwiYcKB1RN/vOqs1F0cZoK6aytQG2uK + GtKB6ssmaLrjhTL2oqKmKyJy9r5gkZ/5VhrmyiLpw4WGsK/dUbwDYZumcuc3yHJn18nQ1+0k7pSZNM3x + n2cSyuIjzB10xxXZTRctkvl8+Dc0xj5C2RxftmUaokaBlpNLbh3UQWWkCTWeMUm2EWVmO990LPIifzWS + bGUcWfzl/xbIjg6kdVMJI/jys8tgIGOfa0yzJxKYV+z+/auV3RNGEGR2LhAPCbeX68kPmoWKUEPUxm2i + ujNydSTvkYeroVi3ktiIzfTsl4Rhu/XG9e7Rv9mngIy988WNFUWsfZZLPkt0V0VV5EoUE/lFGxk46o2r + EP5MiDUZ036hD9b++cengIxlQ1hy7DC9LbMmpP66cSr8VkjCTFkkYqgQp0pzIwWuEzT4V8E+Nsj4knyt + JOI8Y9Io9r8CGxzuNmeCwDUCBz8VZKwkowjMmQ9SPhACB/9OCBz8+wDud0IUucB3M2m1AAAAAElFTkSu + QmCC + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAAB10RVh0VGl0 @@ -1155,51 +1034,6 @@ ozk0xzFyplk+zeIZP5OBrU5e8ruu/jlwZa4EstkB2XBhB7n4ZcHFl+GThdM+d+BMeDMuKODkrYAji4SD V6aAZwbsPYh02LP8FIuc8+mwI9zlHJvTCfeYNn8b0r/m9GlE9yTtSoKcvQo/fgV+wqDfMHGLLf8BKVH4 p8+ug0MAAAAASUVORK5CYII= - - - - - iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m - dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAXdEVYdFRpdGxlAFByb2R1Y3Q7UHJvZHVjdHM7c0vM - pAAACNJJREFUWEfFV3lcT+kePsLYyoSmaeEqtO9psRUjkmUywhQyolSKaRCNFkmWiKGUTK4xKbkVVwta - SXW1WiptSpvSooWiLHe6z3zfU5mRX/+Mz2fu9/N5Tuf3vud9n+/2PufEAfi/QuDgYCAbQhBifwXN/xXw - l1z/eVzOSUMu6ycDLvPobC7jyAwu7ZA+l7pfl0vxnN5PPJwg7LtmymJV6dESdD+mb2xIsKUsF2Q+mfNf - OYk7YSrNHV0i+RHRYOAvOX5zufZHIR+BjEX72WSxkeMDN8ltSzlmUled7oPQzfLdp9bKxjkbS1nTvDhB - hD1HGNL1+DjnYyLxEdFg4C/ZJwz/TMqiHUoYaWc8UT7sB03/jMAV3VW39qD5/iHQM8gJt0NFvB0yTi7E - aQuZ9r2LpaIsp49fS2ukCGMJvDMDyQSBv2T/NIee54mHEcb42SguinbVS8wLseypy/REfeY+lEY7ofBf - W1ASvRfRHibIPmuF/Ev2KL1ij+wAU0Q4qMN7vni7o974SybThL+mfUYPJBMEZnx95aTGiIZu13BK9Dao - LKBNG3K9+YgZGHnn4yh0lJ7H84eBaLt/FK25nmjJ3I3mjO/RdNsWjTet0Ji8DnXxFjhno8R2niiIcCCY - fRbjruOTFWjaWZ3hw6d4IFjUHWUX8DR+xaBoSFyFtpztqI22gIfBF2znaYIIB4KZcPrhGXjVdA2tldGo - e/AzavL8UZ5+FPmxrrgT4oAol0V4URQkkJihJXMbGpJsUBSgjQJfFbjOFmM7ywkiHAhmoumH9fGmwRvv - 2sLQ87oAPa/u4PWzy2h7FIzqTB+kBWxAe/6xj4gbU23QlL4DZb/MQpG/OgqPqyLfRwkuMyewnRUEEQ4E - s/G3D+ridb0nup+4o6t2H962RZMjpehujkdzgR/yLzuhNc/rD+KUDWjOdMPjcCOU/qyN4kANPDyhhoKj - yrh3UAG79MeznVUITCfYiRr0RDATS92vg64aN3RV78HLyt3orHDGy8d7yZEkvHv5CC3FIWjJ+hENyZZo - yduPmmgzVJzXQ9nZ6Sg5rYkiPyI/poK7BxVxx10OBxdJIMRW9kGo7ZQsT1NJU+J4rxMBq6Q5v+VS3LGl - vVrBTPzmPm0i3sUTdz7ajs4yJ3QUb6WOd6Tf3uh58wyt9w6hIcUaVRdnoCJEH4/+qYPSM1pEroF8qnu2 - lxKSXeQRu0OejqcDuhrTUB1vjQy/JQiwmHTf3kBsDXGJEUYShHyX/OGARIqnFk/cUfo9XjDiQgc8L7BH - +/3NaL1rjTetWaiOmo3KS7PwOFQf5ed1UEKpL/TXQJ6PCm65KSLeRRGFkY5EnE6On8azO84oj5yPtw0X - 0F5wAClHjHFomUSRhaYoU08mWKMJTGk5qSQPTTwvciTiLdRstmi7R8R5m9Cas4FSvx7djcmojpiFyrAZ - KP9Vj6KfTuSaSPNWQZK7MkqubP2AmOHpTSfk+umgKtkDVYnuqEpwRVG4DSIcdeA6U7TWVFHEnriZanIT - 49000P6AiCna1txNaMnegGeZ60lk1lCXm+NV7VVUhs9ExQVK/bne1Of5quGmlyraS3zxpu0u6m87oSrm - G1ReXYqKy8ZErjuoeJVHrUeA2WQojOI0mAP/uOGiRpNWFO135L1lL3GaORpvraKON0Nn+YW+1OuiLJga - L1AT2YdVkOKpiu7avdS81LCt1/Fb10O8a72Cd00XKXLPj8SrIXE1BTKPAtDG/vm8WLGTwslc26WK5v8Q - cboFyeq3RLySOp4WJS1H/Y1lfATlIbp86kuCqPHozGcfUEaShwpeVbriZYUL9RA1cZk73rak4beObN6B - fvGqv2GGmiuL+fXs2JYEacJrHu+AGnNgcuxOFTSlUrQ3+4gTiPj6MtTFLUFdjAn1w2GU86mnMx/Qe+az - qOsT3ZTxsmwXOkp2kpNOeJ6/lfqHGvihJ57kxKHtgS+exC4n5/VRdo7Ig3vJ2R775vJqqc4cmHDSckpC - 0l4tVEQtIuKlqI9dzBPX/nsBai4bUUlc35/5hyfV+TOfuU8BCa5KeNFH3H7fgcpoS2W0oTJuxKsn11AV - YURNS2Vjzp9l5JQ9JlqUQU9D3gFN5gBTK6l1M8V+CLaa2pJ+RJeOHBFHGaEm4itUU80ak7ehtC/1/XKb - 6jIN1+notVPEPHG2NZVxI/XOd1TCteisjOwt2y865Lw237hMMYtOqVMQanCfw8u1Vr8YsPMoIiY8TMt5 - oURMuJ1cz4MAfVSFGaAy1AD1cVaUNoq+T27jtsnCSW/c22u7FPiIe4nXE/E6PE02R338KjwvPtdLzvqG - 1Z0at5+cBeE2m3dAk3cgYos8VxP5FXOEz8Y8ORFrLxPJuugdiuS9PmVjJSmeOnIPKeHMamlYqYwtkxwz - dG3MDgU8TVmLBor4abIF6hNWoe76CjyJMSXlPNmrlsFafOn43qE9Co+rINJeBnban9cQlyzvQLjtNK76 - oiFH0TInWDbYB6eypZZo+PHlkv9NPzwTCbvl4DH3izcLZccE0ZwiYcKB1RN/vOqs1F0cZoK6aytQG2uK - GtKB6ssmaLrjhTL2oqKmKyJy9r5gkZ/5VhrmyiLpw4WGsK/dUbwDYZumcuc3yHJn18nQ1+0k7pSZNM3x - n2cSyuIjzB10xxXZTRctkvl8+Dc0xj5C2RxftmUaokaBlpNLbh3UQWWkCTWeMUm2EWVmO990LPIifzWS - bGUcWfzl/xbIjg6kdVMJI/jys8tgIGOfa0yzJxKYV+z+/auV3RNGEGR2LhAPCbeX68kPmoWKUEPUxm2i - ujNydSTvkYeroVi3ktiIzfTsl4Rhu/XG9e7Rv9mngIy988WNFUWsfZZLPkt0V0VV5EoUE/lFGxk46o2r - EP5MiDUZ036hD9b++cengIxlQ1hy7DC9LbMmpP66cSr8VkjCTFkkYqgQp0pzIwWuEzT4V8E+Nsj4knyt - JOI8Y9Io9r8CGxzuNmeCwDUCBz8VZKwkowjMmQ9SPhACB/9OCBz8+wDud0IUucB3M2m1AAAAAElFTkSu - QmCC @@ -1256,6 +1090,187 @@ 2 + + 349, 134 + + + 503, 134 + + + 87, 22 + + + von {0} Dateien + + + Die Gesamtanzahl der Elemente. + + + Fill + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wwAADsMBx2+oZAAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77 + wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0 + v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg + UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA + Iu/O/9T+11gVGSSd+C+b9vW/bvA83AYYZt3+H9byEqci/dTL/zV8p+E2QCftxn+/6od4Fal4TMBtgFPu + lf8gBXgVDULAwAAA8HbAq6XlmnAAAAAASUVORK5CYII= + + + + True + + + 23, 22 + + + Erste verschieben + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wwAADsMBx2+oZAAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w + 5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f + Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+ + 08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC + + + + True + + + 23, 22 + + + Vorherige verschieben + + + 6, 25 + + + Position + + + False + + + 50, 23 + + + 0 + + + Aktuelle Position + + + 6, 25 + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wwAADsMBx2+oZAAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78 + n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI + N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f + oAc0QjgAAAAASUVORK5CYII= + + + + True + + + 23, 22 + + + Nächste verschieben + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wwAADsMBx2+oZAAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+// + h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B + twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA + kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG + WOTd+W9TcAVDMwiA5FL7X8O9hBUYZt3GqhkEQHJhLS//6wbPw22ATtoNnJIgOb/qh/81fKfhNgAfcMq9 + 8l/FYwIYQ4UGBWBgAAC+0b+zuQxOnAAAAABJRU5ErkJggg== + + + + True + + + 23, 22 + + + Letzte verschieben + + + 6, 25 + + + 0, 0 + + + 778, 25 + + + 9 + + + BindingNavigator1 + + + BindingNavigator1 + + + System.Windows.Forms.BindingNavigator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + pnlNavigator + + + 0 + + + 265, 22 + + + Validierung für Gruppe/Profil starten + + + 265, 22 + + + Validierung für Datei starten + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wwAADsMBx2+oZAAAAM5JREFUOE9jwAa+fv3a8O3bt/9I+D0QCECl8QOQQpAG+fTl/xmC5/yvXnryP8hA + qDRhALJx1s4rYM38sYv+P3/zAcUlX758MYAqhQAkSbACEI1se2Rk5H8nJycwTklJ+f/8+XNUQ0CakDUg + 2754xVq4ZpyGgPyHrAnZsI8fPv3/8P4jHOfl5mEagh5oyLYja0Y2AGYISB+GK2C2g/yObgAMwwwBhRfY + AJgrQAIgvHnzZrACbJpBGMMAZAAShCnAphmER5IBhDDtDCAef/sPAEGjQ6y45GCmAAAAAElFTkSuQmCC + + + + 265, 22 + + + Massenabschluss markierte Dateien + + + 265, 22 + + + Tabellenlayout zurücksetzen + + + 215, 22 + + + Starte Validierung für Profil + 17, 56 diff --git a/app/DD_PM_WINDREAM/frmMain.vb b/app/DD_PM_WINDREAM/frmMain.vb index 236c653..599aea6 100644 --- a/app/DD_PM_WINDREAM/frmMain.vb +++ b/app/DD_PM_WINDREAM/frmMain.vb @@ -240,11 +240,14 @@ Public Class frmMain For Each profile As DataRow In CURR_DT_VWPM_PROFILE_ACTIVE.Rows Dim item1 As NavBarItem = NavBarControl1.Items.Add() item1.Caption = profile.Item("TITLE") + item1.Hint = profile.Item("TITLE") + item1.Appearance.TextOptions.WordWrap = WordWrap.Wrap item1.Tag = "itmProfile#" & profile.Item("GUID").ToString Dim _image As Image = Nothing - _image = DevExpress.Images.ImageResourceCache.Default.GetImage("images/actions/add_16x16.png") + _image = DevExpress.Images.ImageResourceCache.Default.GetImage("images/business%20objects/bofileattachment_16x16.png") item1.LargeImage = _image + item1.SmallImage = _image NavBarControl1.Groups(0).ItemLinks.Add(item1) From 37d945f0b73b24e89624ccf81029234d23479e4a Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Thu, 28 Jun 2018 14:23:13 +0200 Subject: [PATCH 05/29] jj: fix mass validation --- app/DD_PM_WINDREAM/frmMain.vb | 95 ++++++++++++++++++++++------------- 1 file changed, 59 insertions(+), 36 deletions(-) diff --git a/app/DD_PM_WINDREAM/frmMain.vb b/app/DD_PM_WINDREAM/frmMain.vb index 599aea6..0d850a5 100644 --- a/app/DD_PM_WINDREAM/frmMain.vb +++ b/app/DD_PM_WINDREAM/frmMain.vb @@ -904,38 +904,57 @@ Public Class frmMain Dim selectedRows As Integer() = GridView_Docs.GetSelectedRows() Dim hitInfo As GridHitInfo = GridView_Docs.CalcHitInfo(GridCursorLocation) Dim workedFiles As Integer = 0 - Dim dt As New DataTable - dt.Columns.Add("DOC_ID") - dt.Columns.Add("DOC_GUID") - dt.Columns.Add("FULL_PATH") - If Init_windream() = True Then - CURRENT_ProfilGUID = 0 - Dim i As Integer = 0 - For Each rowhandle As Integer In selectedRows - Dim R As DataRow = dt.NewRow - Dim PROFILE_ID As Integer = 0 - PROFILE_ID = GridView_Docs.GetRowCellValue(GridView_Docs.GetDataRowHandleByGroupRowHandle(GridView_Docs.GetParentRowHandle(hitInfo.RowHandle)), GridView_Docs.Columns("PROFILE_ID")) - If i = 0 And CURRENT_ProfilGUID = 0 Then - CURRENT_ProfilGUID = PROFILE_ID - CURRENT_DT_FINAL_INDEXING = ClassDatabase.Return_Datatable(String.Format("select * from TBPM_PROFILE_FINAL_INDEXING where PROFIL_ID = {0}", CURRENT_ProfilGUID)) - CURRENT_DT_PROFILE = ClassDatabase.Return_Datatable(String.Format("select * from TBPM_PROFILE where GUID = {0}", CURRENT_ProfilGUID)) - CURRENT_PROFILE_VEKTOR_LOG = CURRENT_DT_PROFILE.Rows(0).Item("PM_VEKTOR_INDEX") - If CURRENT_PROFILE_VEKTOR_LOG = "" Then - CURRENT_PROFILE_VEKTOR_LOG = CURRENT_DT_PROFILE.Rows(0).Item("LOG_INDEX") - End If - End If - If PROFILE_ID <> CURRENT_ProfilGUID Then - If CURRENT_USER_LANGUAGE <> "de_DE" Then - MsgBox("Sorry but You can only mass-validate docs which belong to he same profile!", MsgBoxStyle.Exclamation) - Else - MsgBox("Bitte bachten Sie dass Sie nur Dokumente, welche zum gleichen Profil gehören, mit der Massenfunktion bearbeiten können!", MsgBoxStyle.Exclamation) - End If - Exit Sub - End If + Dim profileId = 0 + + If selectedRows.Count = 0 Then + If CURRENT_USER_LANGUAGE = "de-DE" Then + MsgBox("Bitte selektieren Sie einige 1 oder mehr Dokumente", MsgBoxStyle.Exclamation, "Massenabschluss") + Else + MsgBox("Please select some documents!", MsgBoxStyle.Exclamation, "Mass Validation") + End If + + Exit Sub + End If + + If GridView_Docs.IsGroupRow(hitInfo.RowHandle) Then + Dim groupRowHandle = hitInfo.RowHandle + + Dim childRows As Integer = GridView_Docs.GetChildRowCount(groupRowHandle) + + If childRows > 0 Then + Dim childRowHandle = GridView_Docs.GetChildRowHandle(groupRowHandle, 0) + + profileId = GridView_Docs.GetRowCellValue(childRowHandle, "PROFILE_ID") + Else + MsgBox("This profile has no documents!") + End If + Else + Dim parentRowHandle = GridView_Docs.GetParentRowHandle(hitInfo.RowHandle) + Dim dataRowHandle = GridView_Docs.GetDataRowHandleByGroupRowHandle(parentRowHandle) + + profileId = GridView_Docs.GetRowCellValue(dataRowHandle, "PROFILE_ID") + End If + + If Init_windream() Then + + CURRENT_ProfilGUID = profileId + CURRENT_DT_FINAL_INDEXING = ClassDatabase.Return_Datatable(String.Format("select * from TBPM_PROFILE_FINAL_INDEXING where PROFIL_ID = {0}", CURRENT_ProfilGUID)) + CURRENT_DT_PROFILE = ClassDatabase.Return_Datatable(String.Format("select * from TBPM_PROFILE where GUID = {0}", CURRENT_ProfilGUID)) + CURRENT_PROFILE_VEKTOR_LOG = CURRENT_DT_PROFILE.Rows(0).Item("PM_VEKTOR_INDEX") + If CURRENT_PROFILE_VEKTOR_LOG = "" Then + CURRENT_PROFILE_VEKTOR_LOG = CURRENT_DT_PROFILE.Rows(0).Item("LOG_INDEX") + End If + + Dim dt As New DataTable + dt.Columns.Add("DOC_ID") + dt.Columns.Add("DOC_GUID") + dt.Columns.Add("FULL_PATH") + For Each rowhandle As Integer In selectedRows + Dim R As DataRow = dt.NewRow Dim DOC_ID = GridView_Docs.GetRowCellValue(rowhandle, "DOC_ID") CURRENT_DOC_ID = DOC_ID Dim DOC_PATH = GridView_Docs.GetRowCellValue(rowhandle, "FULL_FILE_PATH") @@ -945,18 +964,22 @@ Public Class frmMain R("FULL_PATH") = CURRENT_DOC_PATH R("DOC_GUID") = GridView_Docs.GetRowCellValue(rowhandle, "GUID") dt.Rows.Add(R) - CURRENT_DT_MASS_CHANGE_DOCS = Nothing - CURRENT_DT_MASS_CHANGE_DOCS = dt Next - End If + CURRENT_DT_MASS_CHANGE_DOCS = Nothing + CURRENT_DT_MASS_CHANGE_DOCS = dt - frmMassValidator.ShowDialog() - - - Load_Profile_items() - Decide_Load() + frmMassValidator.ShowDialog() + Load_Profile_items() + Decide_Load() + Else + If CURRENT_USER_LANGUAGE = "de-DE" Then + MsgBox("Massenabschluss konnte nicht ausgeführt werden, weil windream nicht initialisiert werden konnte!", MsgBoxStyle.Critical, "Massenabschluss") + Else + MsgBox("Massvalidation could not be completed because of an error in windream", MsgBoxStyle.Critical, "Massvalidation") + End If + End If End Sub Private Sub CMGroupStart_Click(sender As Object, e As EventArgs) Handles CMGroupStart.Click Item_Scope() From 4c45b66098ffef51806f5c7061471b03dea5b410 Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Thu, 28 Jun 2018 14:26:46 +0200 Subject: [PATCH 06/29] jj: fix profil panel being collapsed on refresh --- app/DD_PM_WINDREAM/frmMain.vb | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/app/DD_PM_WINDREAM/frmMain.vb b/app/DD_PM_WINDREAM/frmMain.vb index 0d850a5..9de6b30 100644 --- a/app/DD_PM_WINDREAM/frmMain.vb +++ b/app/DD_PM_WINDREAM/frmMain.vb @@ -221,8 +221,11 @@ Public Class frmMain Sub Load_Profile_items() Cursor = Cursors.WaitCursor + Dim profileGroupOpen As Boolean = False + Try Dim CurrGroup As NavBarGroup = NavBarControl1.Groups(0) + profileGroupOpen = CurrGroup.Expanded Try CurrGroup.ItemLinks.Clear() @@ -253,9 +256,8 @@ Public Class frmMain AddHandler NavBarControl1.LinkClicked, AddressOf navBar_LinkClicked Next - If GRID_LOAD_TYPE = "OVERVIEW" Then - CurrGroup.Expanded = False - End If + + CurrGroup.Expanded = profileGroupOpen Catch ex As Exception ClassLogger.Add("Load_Profile_items - Error: " & ex.Message) From 9e1c0ac927de1f6517d240d9d811f0699d6f6174 Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Thu, 28 Jun 2018 15:24:19 +0200 Subject: [PATCH 07/29] jj: fix mass validation not working for single profile, fix context menu not disabling certain actions --- app/DD_PM_WINDREAM/frmMain.Designer.vb | 10 +++++----- app/DD_PM_WINDREAM/frmMain.vb | 26 ++++++++++++++++---------- 2 files changed, 21 insertions(+), 15 deletions(-) diff --git a/app/DD_PM_WINDREAM/frmMain.Designer.vb b/app/DD_PM_WINDREAM/frmMain.Designer.vb index f9548e3..c3fe4dd 100644 --- a/app/DD_PM_WINDREAM/frmMain.Designer.vb +++ b/app/DD_PM_WINDREAM/frmMain.Designer.vb @@ -72,7 +72,7 @@ Partial Class frmMain Me.ContextMenuGrid = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.CMGroupStart = New System.Windows.Forms.ToolStripMenuItem() Me.CMFileStart = New System.Windows.Forms.ToolStripMenuItem() - Me.MarkierteDateienAbschliessenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.CMMassValidation = New System.Windows.Forms.ToolStripMenuItem() Me.TabellenlayoutZurücksetzenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.GridView_Docs = New DevExpress.XtraGrid.Views.Grid.GridView() Me.lblViewType = New System.Windows.Forms.Label() @@ -453,7 +453,7 @@ Partial Class frmMain ' 'ContextMenuGrid ' - Me.ContextMenuGrid.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.CMGroupStart, Me.CMFileStart, Me.MarkierteDateienAbschliessenToolStripMenuItem, Me.TabellenlayoutZurücksetzenToolStripMenuItem}) + Me.ContextMenuGrid.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.CMGroupStart, Me.CMFileStart, Me.CMMassValidation, Me.TabellenlayoutZurücksetzenToolStripMenuItem}) Me.ContextMenuGrid.Name = "ContextMenuStrip1" resources.ApplyResources(Me.ContextMenuGrid, "ContextMenuGrid") ' @@ -471,8 +471,8 @@ Partial Class frmMain ' 'MarkierteDateienAbschliessenToolStripMenuItem ' - resources.ApplyResources(Me.MarkierteDateienAbschliessenToolStripMenuItem, "MarkierteDateienAbschliessenToolStripMenuItem") - Me.MarkierteDateienAbschliessenToolStripMenuItem.Name = "MarkierteDateienAbschliessenToolStripMenuItem" + resources.ApplyResources(Me.CMMassValidation, "MarkierteDateienAbschliessenToolStripMenuItem") + Me.CMMassValidation.Name = "MarkierteDateienAbschliessenToolStripMenuItem" ' 'TabellenlayoutZurücksetzenToolStripMenuItem ' @@ -695,7 +695,7 @@ Partial Class frmMain Friend WithEvents ToolStripBottomRight As ToolStrip Friend WithEvents TabellenlayoutZurücksetzenToolStripMenuItem As ToolStripMenuItem Friend WithEvents tslblmessage As ToolStripStatusLabel - Friend WithEvents MarkierteDateienAbschliessenToolStripMenuItem As ToolStripMenuItem + Friend WithEvents CMMassValidation As ToolStripMenuItem Friend WithEvents GridControl_Docs As DevExpress.XtraGrid.GridControl Friend WithEvents GridView_Docs As DevExpress.XtraGrid.Views.Grid.GridView Friend WithEvents pnlNavigator As Panel diff --git a/app/DD_PM_WINDREAM/frmMain.vb b/app/DD_PM_WINDREAM/frmMain.vb index 9de6b30..91b4287 100644 --- a/app/DD_PM_WINDREAM/frmMain.vb +++ b/app/DD_PM_WINDREAM/frmMain.vb @@ -796,11 +796,18 @@ Public Class frmMain Private Sub ContextMenuGrid_Opening(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles ContextMenuGrid.Opening CMFileStart.Enabled = False CMGroupStart.Enabled = False + CMMassValidation.Enabled = False + + Dim selectedRows As Integer() = GridView_Docs.GetSelectedRows() + + If selectedRows.Count > 0 Then + CMMassValidation.Enabled = True + End If + Select Case GridViewItem_Clicked Case "GROUP" CMGroupStart.Enabled = True Case "ROW" - Dim selectedRows As Integer() = GridView_Docs.GetSelectedRows() If selectedRows.Count > 1 Then CMFileStart.Enabled = False Else @@ -902,12 +909,11 @@ Public Class frmMain Return False End Try End Function - Private Sub MarkierteDateienAbschliessenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles MarkierteDateienAbschliessenToolStripMenuItem.Click + Private Sub MarkierteDateienAbschliessenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles CMMassValidation.Click Dim selectedRows As Integer() = GridView_Docs.GetSelectedRows() Dim hitInfo As GridHitInfo = GridView_Docs.CalcHitInfo(GridCursorLocation) Dim workedFiles As Integer = 0 - Dim profileId = 0 If selectedRows.Count = 0 Then @@ -933,10 +939,14 @@ Public Class frmMain MsgBox("This profile has no documents!") End If Else - Dim parentRowHandle = GridView_Docs.GetParentRowHandle(hitInfo.RowHandle) - Dim dataRowHandle = GridView_Docs.GetDataRowHandleByGroupRowHandle(parentRowHandle) + If hitInfo.RowHandle >= 0 Then + profileId = GridView_Docs.GetRowCellValue(hitInfo.RowHandle, "PROFILE_ID") + Else + Dim parentRowHandle = GridView_Docs.GetParentRowHandle(hitInfo.RowHandle) + Dim dataRowHandle = GridView_Docs.GetDataRowHandleByGroupRowHandle(parentRowHandle) - profileId = GridView_Docs.GetRowCellValue(dataRowHandle, "PROFILE_ID") + profileId = GridView_Docs.GetRowCellValue(dataRowHandle, "PROFILE_ID") + End If End If If Init_windream() Then @@ -1228,10 +1238,6 @@ Public Class frmMain End Try End Sub - Private Sub GridView_Docs_RowClick(sender As Object, e As RowClickEventArgs) Handles GridView_Docs.RowClick - - End Sub - Private Sub GridView_Docs_DoubleClick(sender As Object, e As EventArgs) Handles GridView_Docs.DoubleClick Item_Scope() End Sub From 0dc40d38c24dd1816fc45d0eec1899d5e49b2e4e Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Thu, 28 Jun 2018 15:24:56 +0200 Subject: [PATCH 08/29] version 1.9.4.2 --- app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb b/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb index d7c3cf6..ce5292b 100644 --- a/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb +++ b/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - + From 7f0f381ffa2d3fc5a96cb702bf4ada53db03e305 Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Thu, 28 Jun 2018 16:52:47 +0200 Subject: [PATCH 09/29] jj: fix indexlistconverter --- app/DD_PM_WINDREAM/ClassIndexListConverter.vb | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/app/DD_PM_WINDREAM/ClassIndexListConverter.vb b/app/DD_PM_WINDREAM/ClassIndexListConverter.vb index 1a73736..1c1c800 100644 --- a/app/DD_PM_WINDREAM/ClassIndexListConverter.vb +++ b/app/DD_PM_WINDREAM/ClassIndexListConverter.vb @@ -9,7 +9,14 @@ Public Class IndexListConverter End Function Public Overrides Function GetStandardValues(context As ITypeDescriptorContext) As StandardValuesCollection - Dim indexList = DirectCast(context.Instance, FinalIndexProperties).Indicies + Dim indexList = New List(Of String) + + If TypeOf (context.Instance) Is FinalIndexProperties Then + indexList = DirectCast(context.Instance, FinalIndexProperties).Indicies + ElseIf TypeOf (context.Instance) Is InputProperties Then + indexList = DirectCast(context.Instance, InputProperties).Indicies + End If + Dim values As New StandardValuesCollection(indexList) Return values End Function From ca0213ad712a684e57fb1500b01274faa4d82caf Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Thu, 28 Jun 2018 17:13:17 +0200 Subject: [PATCH 10/29] jj: move index consts --- app/DD_PM_WINDREAM/ClassFinalIndex.vb | 20 ++++++++++++++++++- .../ModuleFinalIndexProperties.vb | 20 +++++-------------- 2 files changed, 24 insertions(+), 16 deletions(-) diff --git a/app/DD_PM_WINDREAM/ClassFinalIndex.vb b/app/DD_PM_WINDREAM/ClassFinalIndex.vb index 81900ff..596cd7c 100644 --- a/app/DD_PM_WINDREAM/ClassFinalIndex.vb +++ b/app/DD_PM_WINDREAM/ClassFinalIndex.vb @@ -1,5 +1,15 @@ Public Class ClassFinalIndex - Public Shared PREFIX_VECTOR = "[%VKT" + Public Const INDEX_TYPE_STRING = 1 + Public Const INDEX_TYPE_INTEGER = 2 + Public Const INDEX_TYPE_FLOAT = 3 + Public Const INDEX_TYPE_BOOLEAN = 4 + Public Const INDEX_TYPE_DATE = 5 + Public Const INDEX_TYPE_VECTOR_INTEGER = 4107 + Public Const INDEX_TYPE_VECTOR_STRING = 4097 + Public Const INDEX_TYPE_VECTOR_BOOLEAN = 4100 + Public Const INDEX_TYPE_VECTOR_DATE = 4101 + + Public Const PREFIX_VECTOR = "[%VKT" Public Shared Function GetValue(obj As Object, indexName As String, indcies As List(Of String), types As List(Of Integer), isVector As Boolean) Try @@ -70,4 +80,12 @@ MsgBox($"Error in SetValue: {ex.Message}", MsgBoxStyle.Critical) End Try End Function + + Public Shared Function IsVectorIndex(type As Integer) As Boolean + If type = INDEX_TYPE_VECTOR_BOOLEAN Or type = INDEX_TYPE_VECTOR_DATE Or type = INDEX_TYPE_VECTOR_INTEGER Or type = INDEX_TYPE_VECTOR_STRING Then + Return True + Else + Return False + End If + End Function End Class diff --git a/app/DD_PM_WINDREAM/ModuleFinalIndexProperties.vb b/app/DD_PM_WINDREAM/ModuleFinalIndexProperties.vb index f75b51c..61d1642 100644 --- a/app/DD_PM_WINDREAM/ModuleFinalIndexProperties.vb +++ b/app/DD_PM_WINDREAM/ModuleFinalIndexProperties.vb @@ -4,16 +4,6 @@ Imports System.Globalization Imports FormsUtils Module ModuleFinalIndexProperties - Public Const INDEX_TYPE_STRING = 1 - Public Const INDEX_TYPE_INTEGER = 2 - Public Const INDEX_TYPE_FLOAT = 3 - Public Const INDEX_TYPE_BOOLEAN = 4 - Public Const INDEX_TYPE_DATE = 5 - Public Const INDEX_TYPE_VECTOR_INTEGER = 4107 - Public Const INDEX_TYPE_VECTOR_STRING = 4097 - Public Const INDEX_TYPE_VECTOR_BOOLEAN = 4100 - Public Const INDEX_TYPE_VECTOR_DATE = 4101 - Public Class FinalIndexProperties @@ -101,27 +91,27 @@ Module ModuleFinalIndexProperties End Sub Public Sub IndexTypeBooleanProvider(attrs As PropertyAttributes) - MaybeSetBrowsable(attrs, {INDEX_TYPE_BOOLEAN, INDEX_TYPE_VECTOR_BOOLEAN}) + MaybeSetBrowsable(attrs, {ClassFinalIndex.INDEX_TYPE_BOOLEAN, ClassFinalIndex.INDEX_TYPE_VECTOR_BOOLEAN}) MaybeSetReadOnly(attrs) End Sub Public Sub IndexTypeStringProvider(attrs As PropertyAttributes) - MaybeSetBrowsable(attrs, {INDEX_TYPE_STRING, INDEX_TYPE_VECTOR_STRING}) + MaybeSetBrowsable(attrs, {ClassFinalIndex.INDEX_TYPE_STRING, ClassFinalIndex.INDEX_TYPE_VECTOR_STRING}) MaybeSetReadOnly(attrs) End Sub Public Sub IndexTypeFloatProvider(attrs As PropertyAttributes) - MaybeSetBrowsable(attrs, {INDEX_TYPE_FLOAT}) + MaybeSetBrowsable(attrs, {ClassFinalIndex.INDEX_TYPE_FLOAT}) MaybeSetReadOnly(attrs) End Sub Public Sub IndexTypeIntegerProvider(attrs As PropertyAttributes) - MaybeSetBrowsable(attrs, {INDEX_TYPE_INTEGER, INDEX_TYPE_VECTOR_INTEGER}) + MaybeSetBrowsable(attrs, {ClassFinalIndex.INDEX_TYPE_INTEGER, ClassFinalIndex.INDEX_TYPE_VECTOR_INTEGER}) MaybeSetReadOnly(attrs) End Sub Public Sub IndexTypeDateProvider(attrs As PropertyAttributes) - MaybeSetBrowsable(attrs, {INDEX_TYPE_DATE, INDEX_TYPE_VECTOR_DATE}) + MaybeSetBrowsable(attrs, {ClassFinalIndex.INDEX_TYPE_DATE, ClassFinalIndex.INDEX_TYPE_VECTOR_DATE}) MaybeSetReadOnly(attrs) End Sub End Class From 995a076d37b911a3429c8d6fce8f79b1ee699e4f Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Thu, 28 Jun 2018 18:09:34 +0200 Subject: [PATCH 11/29] jj: fix final index kram --- app/DD_PM_WINDREAM/ClassFinalIndex.vb | 5 +++++ app/DD_PM_WINDREAM/frmAdministration.vb | 5 ++++- 2 files changed, 9 insertions(+), 1 deletion(-) diff --git a/app/DD_PM_WINDREAM/ClassFinalIndex.vb b/app/DD_PM_WINDREAM/ClassFinalIndex.vb index 596cd7c..6908830 100644 --- a/app/DD_PM_WINDREAM/ClassFinalIndex.vb +++ b/app/DD_PM_WINDREAM/ClassFinalIndex.vb @@ -42,6 +42,11 @@ Try Dim props As FinalIndexProperties = obj Dim i As Integer = indcies.IndexOf(indexName) + + If Not indcies.Contains(indexName) Then + Return obj + End If + Dim type As Integer = types.Item(i) Dim isVector = value.StartsWith(PREFIX_VECTOR) diff --git a/app/DD_PM_WINDREAM/frmAdministration.vb b/app/DD_PM_WINDREAM/frmAdministration.vb index 2d17ec5..93c8340 100644 --- a/app/DD_PM_WINDREAM/frmAdministration.vb +++ b/app/DD_PM_WINDREAM/frmAdministration.vb @@ -726,6 +726,7 @@ Public Class frmAdministration Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) Handles ToolStripButton2.Click TabControlFinalIndices.Enabled = True tsBtnCancel_old.Visible = True + tsBtnCancel.Visible = True cmbIndexe.Items.Clear() cmbIndexe2.Items.Clear() Dim indexe = _windreamPM.GetIndicesByObjecttype(cmbObjekttypen.Text) @@ -743,6 +744,8 @@ Public Class frmAdministration TabControlFinalIndices.Enabled = False INSERT_ACTIVE = False tsBtnCancel_old.Visible = False + tsBtnCancel.Visible = False + BindingNavigatorAddNewItem.Visible = True txtBezeichner.Text = String.Empty txtindexwert_final.Text = String.Empty @@ -976,7 +979,7 @@ Public Class frmAdministration End Try End Sub - Private Sub tsBtnCancel_Click(sender As Object, e As EventArgs) Handles tsBtnCancel_old.Click + Private Sub tsBtnCancel_Click(sender As Object, e As EventArgs) Handles tsBtnCancel.Click CancelFinalIndexInsert() End Sub From 97866e1c453185e7d0e47187680beb516fbfcde2 Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Thu, 28 Jun 2018 18:12:53 +0200 Subject: [PATCH 12/29] jj: remove old final index stuff --- .../frmAdministration.Designer.vb | 434 ------- app/DD_PM_WINDREAM/frmAdministration.resx | 1111 +---------------- app/DD_PM_WINDREAM/frmAdministration.vb | 26 +- 3 files changed, 18 insertions(+), 1553 deletions(-) diff --git a/app/DD_PM_WINDREAM/frmAdministration.Designer.vb b/app/DD_PM_WINDREAM/frmAdministration.Designer.vb index 947e4c2..18ddfb1 100644 --- a/app/DD_PM_WINDREAM/frmAdministration.Designer.vb +++ b/app/DD_PM_WINDREAM/frmAdministration.Designer.vb @@ -185,56 +185,9 @@ Partial Class frmAdministration Me.tsBtnSave = New System.Windows.Forms.ToolStripButton() Me.ToolStripButton5 = New System.Windows.Forms.ToolStripButton() Me.Label13 = New System.Windows.Forms.Label() - Me.TabControlFinalIndices = New System.Windows.Forms.TabControl() - Me.TabPage9 = New System.Windows.Forms.TabPage() - Me.CheckBoxPMVEKTOR = New System.Windows.Forms.CheckBox() - Me.lblSaveFinalIndex = New System.Windows.Forms.Label() - Me.lblIndexPMVektor = New System.Windows.Forms.Label() - Me.Label11 = New System.Windows.Forms.Label() - Me.txtBezeichner = New System.Windows.Forms.TextBox() - Me.Label10 = New System.Windows.Forms.Label() - Me.cmbIndexe = New System.Windows.Forms.ComboBox() - Me.Label9 = New System.Windows.Forms.Label() - Me.lblIndex = New System.Windows.Forms.Label() - Me.grbxSystemStamps = New System.Windows.Forms.GroupBox() - Me.btnStampDate = New System.Windows.Forms.Button() - Me.btnStampUser = New System.Windows.Forms.Button() - Me.txtindexwert_final = New System.Windows.Forms.TextBox() - Me.btnInsert_FinalIndex = New System.Windows.Forms.Button() - Me.chkbxfinalIndex = New System.Windows.Forms.CheckBox() - Me.TabPage10 = New System.Windows.Forms.TabPage() - Me.btnEditor = New System.Windows.Forms.Button() - Me.Label15 = New System.Windows.Forms.Label() - Me.cmbIndexe2 = New System.Windows.Forms.ComboBox() - Me.btnSaveSQLCommand = New System.Windows.Forms.Button() - Me.SQL_COMMANDTextBox = New System.Windows.Forms.TextBox() - Me.btnShowConnections = New System.Windows.Forms.Button() - Me.Label14 = New System.Windows.Forms.Label() - Me.cmbConnection = New System.Windows.Forms.ComboBox() Me.TBDD_CONNECTIONBindingSource = New System.Windows.Forms.BindingSource(Me.components) - Me.Label4 = New System.Windows.Forms.Label() Me.Label5 = New System.Windows.Forms.Label() Me.Label6 = New System.Windows.Forms.Label() - Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator = New System.Windows.Forms.BindingNavigator(Me.components) - Me.BindingNavigatorCountItem4 = New System.Windows.Forms.ToolStripLabel() - Me.BindingNavigatorMoveFirstItem4 = New System.Windows.Forms.ToolStripButton() - Me.BindingNavigatorMovePreviousItem4 = New System.Windows.Forms.ToolStripButton() - Me.BindingNavigatorSeparator12 = New System.Windows.Forms.ToolStripSeparator() - Me.BindingNavigatorPositionItem4 = New System.Windows.Forms.ToolStripTextBox() - Me.BindingNavigatorSeparator13 = New System.Windows.Forms.ToolStripSeparator() - Me.BindingNavigatorMoveNextItem4 = New System.Windows.Forms.ToolStripButton() - Me.BindingNavigatorMoveLastItem4 = New System.Windows.Forms.ToolStripButton() - Me.BindingNavigatorSeparator14 = New System.Windows.Forms.ToolStripSeparator() - Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton() - Me.ToolStripButton3 = New System.Windows.Forms.ToolStripButton() - Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton() - Me.tsBtnCancel_old = New System.Windows.Forms.ToolStripButton() - Me.TBPM_PROFILE_FINAL_INDEXINGDataGridView = New System.Windows.Forms.DataGridView() - Me.GUID = New System.Windows.Forms.DataGridViewTextBoxColumn() - Me.DataGridViewTextBoxColumn26 = New System.Windows.Forms.DataGridViewTextBoxColumn() - Me.DataGridViewTextBoxColumn27 = New System.Windows.Forms.DataGridViewTextBoxColumn() - Me.DataGridViewTextBoxColumn28 = New System.Windows.Forms.DataGridViewTextBoxColumn() - Me.DataGridViewTextBoxColumn29 = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.TabPage12 = New System.Windows.Forms.TabPage() Me.ANNOTATE_WORK_HISTORY_ENTRYCheckBox = New System.Windows.Forms.CheckBox() Me.ANNOTATE_ALL_WORK_HISTORY_ENTRIESCheckBox = New System.Windows.Forms.CheckBox() @@ -383,14 +336,7 @@ Partial Class frmAdministration CType(Me.viewFinalIndex, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.BindingNavigator1, System.ComponentModel.ISupportInitialize).BeginInit() Me.BindingNavigator1.SuspendLayout() - Me.TabControlFinalIndices.SuspendLayout() - Me.TabPage9.SuspendLayout() - Me.grbxSystemStamps.SuspendLayout() - Me.TabPage10.SuspendLayout() CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() - CType(Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator, System.ComponentModel.ISupportInitialize).BeginInit() - Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator.SuspendLayout() - CType(Me.TBPM_PROFILE_FINAL_INDEXINGDataGridView, System.ComponentModel.ISupportInitialize).BeginInit() Me.TabPage12.SuspendLayout() Me.TabPage2.SuspendLayout() CType(Me.SplitContainerProfilzuordnung, System.ComponentModel.ISupportInitialize).BeginInit() @@ -1305,11 +1251,8 @@ Partial Class frmAdministration Me.TabPage11.Controls.Add(Me.BindingNavigator1) Me.TabPage11.Controls.Add(Me.Label13) Me.TabPage11.Controls.Add(Me.GroupBox3) - Me.TabPage11.Controls.Add(Me.TabControlFinalIndices) Me.TabPage11.Controls.Add(Me.Label5) Me.TabPage11.Controls.Add(Me.Label6) - Me.TabPage11.Controls.Add(Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator) - Me.TabPage11.Controls.Add(Me.TBPM_PROFILE_FINAL_INDEXINGDataGridView) resources.ApplyResources(Me.TabPage11, "TabPage11") Me.TabPage11.Name = "TabPage11" Me.TabPage11.UseVisualStyleBackColor = True @@ -1501,197 +1444,11 @@ Partial Class frmAdministration resources.ApplyResources(Me.Label13, "Label13") Me.Label13.Name = "Label13" ' - 'TabControlFinalIndices - ' - resources.ApplyResources(Me.TabControlFinalIndices, "TabControlFinalIndices") - Me.TabControlFinalIndices.Controls.Add(Me.TabPage9) - Me.TabControlFinalIndices.Controls.Add(Me.TabPage10) - Me.TabControlFinalIndices.Name = "TabControlFinalIndices" - Me.TabControlFinalIndices.SelectedIndex = 0 - ' - 'TabPage9 - ' - Me.TabPage9.Controls.Add(Me.CheckBoxPMVEKTOR) - Me.TabPage9.Controls.Add(Me.lblSaveFinalIndex) - Me.TabPage9.Controls.Add(Me.lblIndexPMVektor) - Me.TabPage9.Controls.Add(Me.Label11) - Me.TabPage9.Controls.Add(Me.txtBezeichner) - Me.TabPage9.Controls.Add(Me.Label10) - Me.TabPage9.Controls.Add(Me.cmbIndexe) - Me.TabPage9.Controls.Add(Me.Label9) - Me.TabPage9.Controls.Add(Me.lblIndex) - Me.TabPage9.Controls.Add(Me.grbxSystemStamps) - Me.TabPage9.Controls.Add(Me.txtindexwert_final) - Me.TabPage9.Controls.Add(Me.btnInsert_FinalIndex) - Me.TabPage9.Controls.Add(Me.chkbxfinalIndex) - resources.ApplyResources(Me.TabPage9, "TabPage9") - Me.TabPage9.Name = "TabPage9" - Me.TabPage9.UseVisualStyleBackColor = True - ' - 'CheckBoxPMVEKTOR - ' - resources.ApplyResources(Me.CheckBoxPMVEKTOR, "CheckBoxPMVEKTOR") - Me.CheckBoxPMVEKTOR.Name = "CheckBoxPMVEKTOR" - Me.CheckBoxPMVEKTOR.UseVisualStyleBackColor = True - ' - 'lblSaveFinalIndex - ' - resources.ApplyResources(Me.lblSaveFinalIndex, "lblSaveFinalIndex") - Me.lblSaveFinalIndex.BackColor = System.Drawing.Color.Yellow - Me.lblSaveFinalIndex.Name = "lblSaveFinalIndex" - ' - 'lblIndexPMVektor - ' - resources.ApplyResources(Me.lblIndexPMVektor, "lblIndexPMVektor") - Me.lblIndexPMVektor.Name = "lblIndexPMVektor" - ' - 'Label11 - ' - resources.ApplyResources(Me.Label11, "Label11") - Me.Label11.Name = "Label11" - ' - 'txtBezeichner - ' - resources.ApplyResources(Me.txtBezeichner, "txtBezeichner") - Me.txtBezeichner.Name = "txtBezeichner" - ' - 'Label10 - ' - resources.ApplyResources(Me.Label10, "Label10") - Me.Label10.Name = "Label10" - ' - 'cmbIndexe - ' - Me.cmbIndexe.FormattingEnabled = True - resources.ApplyResources(Me.cmbIndexe, "cmbIndexe") - Me.cmbIndexe.Name = "cmbIndexe" - ' - 'Label9 - ' - resources.ApplyResources(Me.Label9, "Label9") - Me.Label9.Name = "Label9" - ' - 'lblIndex - ' - resources.ApplyResources(Me.lblIndex, "lblIndex") - Me.lblIndex.Name = "lblIndex" - ' - 'grbxSystemStamps - ' - Me.grbxSystemStamps.Controls.Add(Me.btnStampDate) - Me.grbxSystemStamps.Controls.Add(Me.btnStampUser) - resources.ApplyResources(Me.grbxSystemStamps, "grbxSystemStamps") - Me.grbxSystemStamps.Name = "grbxSystemStamps" - Me.grbxSystemStamps.TabStop = False - ' - 'btnStampDate - ' - Me.btnStampDate.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.world_link - resources.ApplyResources(Me.btnStampDate, "btnStampDate") - Me.btnStampDate.Name = "btnStampDate" - Me.btnStampDate.UseVisualStyleBackColor = True - ' - 'btnStampUser - ' - Me.btnStampUser.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.user - resources.ApplyResources(Me.btnStampUser, "btnStampUser") - Me.btnStampUser.Name = "btnStampUser" - Me.btnStampUser.UseVisualStyleBackColor = True - ' - 'txtindexwert_final - ' - resources.ApplyResources(Me.txtindexwert_final, "txtindexwert_final") - Me.txtindexwert_final.Name = "txtindexwert_final" - ' - 'btnInsert_FinalIndex - ' - Me.btnInsert_FinalIndex.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.add - resources.ApplyResources(Me.btnInsert_FinalIndex, "btnInsert_FinalIndex") - Me.btnInsert_FinalIndex.Name = "btnInsert_FinalIndex" - Me.btnInsert_FinalIndex.UseVisualStyleBackColor = True - ' - 'chkbxfinalIndex - ' - resources.ApplyResources(Me.chkbxfinalIndex, "chkbxfinalIndex") - Me.chkbxfinalIndex.Name = "chkbxfinalIndex" - Me.chkbxfinalIndex.UseVisualStyleBackColor = True - ' - 'TabPage10 - ' - resources.ApplyResources(Me.TabPage10, "TabPage10") - Me.TabPage10.Controls.Add(Me.btnEditor) - Me.TabPage10.Controls.Add(Me.Label15) - Me.TabPage10.Controls.Add(Me.cmbIndexe2) - Me.TabPage10.Controls.Add(Me.btnSaveSQLCommand) - Me.TabPage10.Controls.Add(Me.SQL_COMMANDTextBox) - Me.TabPage10.Controls.Add(Me.btnShowConnections) - Me.TabPage10.Controls.Add(Me.Label14) - Me.TabPage10.Controls.Add(Me.cmbConnection) - Me.TabPage10.Controls.Add(Me.Label4) - Me.TabPage10.Name = "TabPage10" - Me.TabPage10.UseVisualStyleBackColor = True - ' - 'btnEditor - ' - resources.ApplyResources(Me.btnEditor, "btnEditor") - Me.btnEditor.Name = "btnEditor" - Me.btnEditor.UseVisualStyleBackColor = True - ' - 'Label15 - ' - resources.ApplyResources(Me.Label15, "Label15") - Me.Label15.Name = "Label15" - ' - 'cmbIndexe2 - ' - Me.cmbIndexe2.FormattingEnabled = True - resources.ApplyResources(Me.cmbIndexe2, "cmbIndexe2") - Me.cmbIndexe2.Name = "cmbIndexe2" - ' - 'btnSaveSQLCommand - ' - resources.ApplyResources(Me.btnSaveSQLCommand, "btnSaveSQLCommand") - Me.btnSaveSQLCommand.Name = "btnSaveSQLCommand" - Me.btnSaveSQLCommand.UseVisualStyleBackColor = True - ' - 'SQL_COMMANDTextBox - ' - Me.SQL_COMMANDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource, "SQL_COMMAND", True)) - resources.ApplyResources(Me.SQL_COMMANDTextBox, "SQL_COMMANDTextBox") - Me.SQL_COMMANDTextBox.Name = "SQL_COMMANDTextBox" - ' - 'btnShowConnections - ' - resources.ApplyResources(Me.btnShowConnections, "btnShowConnections") - Me.btnShowConnections.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.database_go1 - Me.btnShowConnections.Name = "btnShowConnections" - Me.btnShowConnections.UseVisualStyleBackColor = True - ' - 'Label14 - ' - resources.ApplyResources(Me.Label14, "Label14") - Me.Label14.Name = "Label14" - ' - 'cmbConnection - ' - Me.cmbConnection.DataBindings.Add(New System.Windows.Forms.Binding("SelectedValue", Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource, "CONNECTION_ID", True)) - Me.cmbConnection.DataSource = Me.TBDD_CONNECTIONBindingSource - Me.cmbConnection.DisplayMember = "BEZEICHNUNG" - resources.ApplyResources(Me.cmbConnection, "cmbConnection") - Me.cmbConnection.FormattingEnabled = True - Me.cmbConnection.Name = "cmbConnection" - Me.cmbConnection.ValueMember = "GUID" - ' 'TBDD_CONNECTIONBindingSource ' Me.TBDD_CONNECTIONBindingSource.DataMember = "TBDD_CONNECTION" Me.TBDD_CONNECTIONBindingSource.DataSource = Me.DD_DMSLiteDataSet ' - 'Label4 - ' - resources.ApplyResources(Me.Label4, "Label4") - Me.Label4.Name = "Label4" - ' 'Label5 ' resources.ApplyResources(Me.Label5, "Label5") @@ -1702,140 +1459,6 @@ Partial Class frmAdministration resources.ApplyResources(Me.Label6, "Label6") Me.Label6.Name = "Label6" ' - 'TBPM_PROFILE_FINAL_INDEXINGBindingNavigator - ' - Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator.AddNewItem = Nothing - Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator.BindingSource = Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource - Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator.CountItem = Me.BindingNavigatorCountItem4 - Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator.DeleteItem = Nothing - resources.ApplyResources(Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator, "TBPM_PROFILE_FINAL_INDEXINGBindingNavigator") - Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem4, Me.BindingNavigatorMovePreviousItem4, Me.BindingNavigatorSeparator12, Me.BindingNavigatorPositionItem4, Me.BindingNavigatorCountItem4, Me.BindingNavigatorSeparator13, Me.BindingNavigatorMoveNextItem4, Me.BindingNavigatorMoveLastItem4, Me.BindingNavigatorSeparator14, Me.ToolStripButton2, Me.ToolStripButton3, Me.ToolStripButton1, Me.tsBtnCancel_old}) - Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator.MoveFirstItem = Me.BindingNavigatorMoveFirstItem4 - Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator.MoveLastItem = Me.BindingNavigatorMoveLastItem4 - Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator.MoveNextItem = Me.BindingNavigatorMoveNextItem4 - Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator.MovePreviousItem = Me.BindingNavigatorMovePreviousItem4 - Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator.Name = "TBPM_PROFILE_FINAL_INDEXINGBindingNavigator" - Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator.PositionItem = Me.BindingNavigatorPositionItem4 - ' - 'BindingNavigatorCountItem4 - ' - Me.BindingNavigatorCountItem4.Name = "BindingNavigatorCountItem4" - resources.ApplyResources(Me.BindingNavigatorCountItem4, "BindingNavigatorCountItem4") - ' - 'BindingNavigatorMoveFirstItem4 - ' - Me.BindingNavigatorMoveFirstItem4.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image - resources.ApplyResources(Me.BindingNavigatorMoveFirstItem4, "BindingNavigatorMoveFirstItem4") - Me.BindingNavigatorMoveFirstItem4.Name = "BindingNavigatorMoveFirstItem4" - ' - 'BindingNavigatorMovePreviousItem4 - ' - Me.BindingNavigatorMovePreviousItem4.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image - resources.ApplyResources(Me.BindingNavigatorMovePreviousItem4, "BindingNavigatorMovePreviousItem4") - Me.BindingNavigatorMovePreviousItem4.Name = "BindingNavigatorMovePreviousItem4" - ' - 'BindingNavigatorSeparator12 - ' - Me.BindingNavigatorSeparator12.Name = "BindingNavigatorSeparator12" - resources.ApplyResources(Me.BindingNavigatorSeparator12, "BindingNavigatorSeparator12") - ' - 'BindingNavigatorPositionItem4 - ' - resources.ApplyResources(Me.BindingNavigatorPositionItem4, "BindingNavigatorPositionItem4") - Me.BindingNavigatorPositionItem4.Name = "BindingNavigatorPositionItem4" - ' - 'BindingNavigatorSeparator13 - ' - Me.BindingNavigatorSeparator13.Name = "BindingNavigatorSeparator13" - resources.ApplyResources(Me.BindingNavigatorSeparator13, "BindingNavigatorSeparator13") - ' - 'BindingNavigatorMoveNextItem4 - ' - Me.BindingNavigatorMoveNextItem4.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image - resources.ApplyResources(Me.BindingNavigatorMoveNextItem4, "BindingNavigatorMoveNextItem4") - Me.BindingNavigatorMoveNextItem4.Name = "BindingNavigatorMoveNextItem4" - ' - 'BindingNavigatorMoveLastItem4 - ' - Me.BindingNavigatorMoveLastItem4.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image - resources.ApplyResources(Me.BindingNavigatorMoveLastItem4, "BindingNavigatorMoveLastItem4") - Me.BindingNavigatorMoveLastItem4.Name = "BindingNavigatorMoveLastItem4" - ' - 'BindingNavigatorSeparator14 - ' - Me.BindingNavigatorSeparator14.Name = "BindingNavigatorSeparator14" - resources.ApplyResources(Me.BindingNavigatorSeparator14, "BindingNavigatorSeparator14") - ' - 'ToolStripButton2 - ' - Me.ToolStripButton2.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.add - resources.ApplyResources(Me.ToolStripButton2, "ToolStripButton2") - Me.ToolStripButton2.Name = "ToolStripButton2" - ' - 'ToolStripButton3 - ' - Me.ToolStripButton3.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.delete_12x12 - resources.ApplyResources(Me.ToolStripButton3, "ToolStripButton3") - Me.ToolStripButton3.Name = "ToolStripButton3" - ' - 'ToolStripButton1 - ' - Me.ToolStripButton1.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.refresh_16xMD - resources.ApplyResources(Me.ToolStripButton1, "ToolStripButton1") - Me.ToolStripButton1.Name = "ToolStripButton1" - ' - 'tsBtnCancel_old - ' - Me.tsBtnCancel_old.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.delete_12x12 - resources.ApplyResources(Me.tsBtnCancel_old, "tsBtnCancel_old") - Me.tsBtnCancel_old.Name = "tsBtnCancel_old" - ' - 'TBPM_PROFILE_FINAL_INDEXINGDataGridView - ' - Me.TBPM_PROFILE_FINAL_INDEXINGDataGridView.AllowUserToAddRows = False - Me.TBPM_PROFILE_FINAL_INDEXINGDataGridView.AllowUserToDeleteRows = False - resources.ApplyResources(Me.TBPM_PROFILE_FINAL_INDEXINGDataGridView, "TBPM_PROFILE_FINAL_INDEXINGDataGridView") - Me.TBPM_PROFILE_FINAL_INDEXINGDataGridView.AutoGenerateColumns = False - Me.TBPM_PROFILE_FINAL_INDEXINGDataGridView.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize - Me.TBPM_PROFILE_FINAL_INDEXINGDataGridView.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.GUID, Me.DataGridViewTextBoxColumn26, Me.DataGridViewTextBoxColumn27, Me.DataGridViewTextBoxColumn28, Me.DataGridViewTextBoxColumn29}) - Me.TBPM_PROFILE_FINAL_INDEXINGDataGridView.DataSource = Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource - Me.TBPM_PROFILE_FINAL_INDEXINGDataGridView.MultiSelect = False - Me.TBPM_PROFILE_FINAL_INDEXINGDataGridView.Name = "TBPM_PROFILE_FINAL_INDEXINGDataGridView" - ' - 'GUID - ' - Me.GUID.DataPropertyName = "GUID" - Me.GUID.Frozen = True - resources.ApplyResources(Me.GUID, "GUID") - Me.GUID.Name = "GUID" - Me.GUID.ReadOnly = True - ' - 'DataGridViewTextBoxColumn26 - ' - Me.DataGridViewTextBoxColumn26.DataPropertyName = "INDEXNAME" - resources.ApplyResources(Me.DataGridViewTextBoxColumn26, "DataGridViewTextBoxColumn26") - Me.DataGridViewTextBoxColumn26.Name = "DataGridViewTextBoxColumn26" - ' - 'DataGridViewTextBoxColumn27 - ' - Me.DataGridViewTextBoxColumn27.DataPropertyName = "VALUE" - resources.ApplyResources(Me.DataGridViewTextBoxColumn27, "DataGridViewTextBoxColumn27") - Me.DataGridViewTextBoxColumn27.Name = "DataGridViewTextBoxColumn27" - ' - 'DataGridViewTextBoxColumn28 - ' - Me.DataGridViewTextBoxColumn28.DataPropertyName = "ADDED_WHO" - resources.ApplyResources(Me.DataGridViewTextBoxColumn28, "DataGridViewTextBoxColumn28") - Me.DataGridViewTextBoxColumn28.Name = "DataGridViewTextBoxColumn28" - Me.DataGridViewTextBoxColumn28.ReadOnly = True - ' - 'DataGridViewTextBoxColumn29 - ' - Me.DataGridViewTextBoxColumn29.DataPropertyName = "ADDED_WHEN" - resources.ApplyResources(Me.DataGridViewTextBoxColumn29, "DataGridViewTextBoxColumn29") - Me.DataGridViewTextBoxColumn29.Name = "DataGridViewTextBoxColumn29" - Me.DataGridViewTextBoxColumn29.ReadOnly = True - ' 'TabPage12 ' resources.ApplyResources(Me.TabPage12, "TabPage12") @@ -2413,17 +2036,7 @@ Partial Class frmAdministration CType(Me.BindingNavigator1, System.ComponentModel.ISupportInitialize).EndInit() Me.BindingNavigator1.ResumeLayout(False) Me.BindingNavigator1.PerformLayout() - Me.TabControlFinalIndices.ResumeLayout(False) - Me.TabPage9.ResumeLayout(False) - Me.TabPage9.PerformLayout() - Me.grbxSystemStamps.ResumeLayout(False) - Me.TabPage10.ResumeLayout(False) - Me.TabPage10.PerformLayout() CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).EndInit() - CType(Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator, System.ComponentModel.ISupportInitialize).EndInit() - Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator.ResumeLayout(False) - Me.TBPM_PROFILE_FINAL_INDEXINGBindingNavigator.PerformLayout() - CType(Me.TBPM_PROFILE_FINAL_INDEXINGDataGridView, System.ComponentModel.ISupportInitialize).EndInit() Me.TabPage12.ResumeLayout(False) Me.TabPage12.PerformLayout() Me.TabPage2.ResumeLayout(False) @@ -2552,29 +2165,6 @@ Partial Class frmAdministration Friend WithEvents Label5 As System.Windows.Forms.Label Friend WithEvents TBPM_PROFILE_FINAL_INDEXINGBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBPM_PROFILE_FINAL_INDEXINGTableAdapter As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_FINAL_INDEXINGTableAdapter - Friend WithEvents TBPM_PROFILE_FINAL_INDEXINGDataGridView As System.Windows.Forms.DataGridView - Friend WithEvents TBPM_PROFILE_FINAL_INDEXINGBindingNavigator As System.Windows.Forms.BindingNavigator - Friend WithEvents BindingNavigatorCountItem4 As System.Windows.Forms.ToolStripLabel - Friend WithEvents BindingNavigatorMoveFirstItem4 As System.Windows.Forms.ToolStripButton - Friend WithEvents BindingNavigatorMovePreviousItem4 As System.Windows.Forms.ToolStripButton - Friend WithEvents BindingNavigatorSeparator12 As System.Windows.Forms.ToolStripSeparator - Friend WithEvents BindingNavigatorPositionItem4 As System.Windows.Forms.ToolStripTextBox - Friend WithEvents BindingNavigatorSeparator13 As System.Windows.Forms.ToolStripSeparator - Friend WithEvents BindingNavigatorMoveNextItem4 As System.Windows.Forms.ToolStripButton - Friend WithEvents BindingNavigatorMoveLastItem4 As System.Windows.Forms.ToolStripButton - Friend WithEvents BindingNavigatorSeparator14 As System.Windows.Forms.ToolStripSeparator - Friend WithEvents lblIndexPMVektor As System.Windows.Forms.Label - Friend WithEvents cmbIndexe As System.Windows.Forms.ComboBox - Friend WithEvents chkbxfinalIndex As System.Windows.Forms.CheckBox - Friend WithEvents txtindexwert_final As System.Windows.Forms.TextBox - Friend WithEvents lblIndex As System.Windows.Forms.Label - Friend WithEvents btnInsert_FinalIndex As System.Windows.Forms.Button - Friend WithEvents GUID As System.Windows.Forms.DataGridViewTextBoxColumn - Friend WithEvents DataGridViewTextBoxColumn26 As System.Windows.Forms.DataGridViewTextBoxColumn - Friend WithEvents DataGridViewTextBoxColumn27 As System.Windows.Forms.DataGridViewTextBoxColumn - Friend WithEvents DataGridViewTextBoxColumn28 As System.Windows.Forms.DataGridViewTextBoxColumn - Friend WithEvents DataGridViewTextBoxColumn29 As System.Windows.Forms.DataGridViewTextBoxColumn - Friend WithEvents ToolStripButton1 As System.Windows.Forms.ToolStripButton Friend WithEvents ToolStripSeparator2 As System.Windows.Forms.ToolStripSeparator Friend WithEvents tsbtnProfilkopieren As System.Windows.Forms.ToolStripButton Friend WithEvents TBPM_PROFILE_CONTROLSBindingSource As System.Windows.Forms.BindingSource @@ -2592,19 +2182,9 @@ Partial Class frmAdministration Friend WithEvents txtemailEmpfaenger As System.Windows.Forms.TextBox Friend WithEvents Label8 As System.Windows.Forms.Label Friend WithEvents EMAIL_ACTIVECheckBox As System.Windows.Forms.CheckBox - Friend WithEvents grbxSystemStamps As System.Windows.Forms.GroupBox - Friend WithEvents btnStampUser As System.Windows.Forms.Button - Friend WithEvents btnStampDate As System.Windows.Forms.Button - Friend WithEvents Label11 As System.Windows.Forms.Label - Friend WithEvents Label10 As System.Windows.Forms.Label - Friend WithEvents Label9 As System.Windows.Forms.Label Friend WithEvents PM_VEKTOR_INDEXComboBox As System.Windows.Forms.ComboBox - Friend WithEvents CheckBoxPMVEKTOR As System.Windows.Forms.CheckBox - Friend WithEvents txtBezeichner As System.Windows.Forms.TextBox Friend WithEvents btnopen_SQLAdmin As System.Windows.Forms.Button Friend WithEvents btnRefreshProfiles As System.Windows.Forms.ToolStripButton - Friend WithEvents ToolStripButton2 As System.Windows.Forms.ToolStripButton - Friend WithEvents ToolStripButton3 As System.Windows.Forms.ToolStripButton Friend WithEvents TBPM_PROFILE_FILESBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBPM_PROFILE_FILESTableAdapter As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_FILESTableAdapter Friend WithEvents btnConnections As System.Windows.Forms.Button @@ -2617,27 +2197,14 @@ Partial Class frmAdministration Friend WithEvents DataGridViewTextBoxColumn25 As System.Windows.Forms.DataGridViewTextBoxColumn Friend WithEvents Button2 As System.Windows.Forms.Button Friend WithEvents Label13 As System.Windows.Forms.Label - Friend WithEvents lblSaveFinalIndex As System.Windows.Forms.Label Friend WithEvents Button3 As System.Windows.Forms.Button Friend WithEvents DataGridViewCheckBoxColumn2 As System.Windows.Forms.DataGridViewCheckBoxColumn Friend WithEvents GridControl1 As DevExpress.XtraGrid.GridControl Friend WithEvents GridView1 As DevExpress.XtraGrid.Views.Grid.GridView Friend WithEvents colNAME As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents colTITLE As DevExpress.XtraGrid.Columns.GridColumn - Friend WithEvents TabControlFinalIndices As System.Windows.Forms.TabControl - Friend WithEvents TabPage9 As System.Windows.Forms.TabPage - Friend WithEvents TabPage10 As System.Windows.Forms.TabPage - Friend WithEvents Label4 As System.Windows.Forms.Label - Friend WithEvents Label14 As System.Windows.Forms.Label - Friend WithEvents cmbConnection As System.Windows.Forms.ComboBox Friend WithEvents TBDD_CONNECTIONBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBDD_CONNECTIONTableAdapter As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter - Friend WithEvents SQL_COMMANDTextBox As System.Windows.Forms.TextBox - Friend WithEvents btnSaveSQLCommand As System.Windows.Forms.Button - Friend WithEvents Label15 As System.Windows.Forms.Label - Friend WithEvents cmbIndexe2 As System.Windows.Forms.ComboBox - Friend WithEvents btnShowConnections As System.Windows.Forms.Button - Friend WithEvents btnEditor As System.Windows.Forms.Button Friend WithEvents TabControl2 As TabControl Friend WithEvents TabPage11 As TabPage Friend WithEvents TabPage12 As TabPage @@ -2691,7 +2258,6 @@ Partial Class frmAdministration Friend WithEvents GridColumn2 As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents GridColumn3 As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents GridColumn4 As DevExpress.XtraGrid.Columns.GridColumn - Friend WithEvents tsBtnCancel_old As ToolStripButton Friend WithEvents OpenFileDialog1 As OpenFileDialog Friend WithEvents gridFinalIndex As DevExpress.XtraGrid.GridControl Friend WithEvents viewFinalIndex As DevExpress.XtraGrid.Views.Grid.GridView diff --git a/app/DD_PM_WINDREAM/frmAdministration.resx b/app/DD_PM_WINDREAM/frmAdministration.resx index e6c9c03..6085e53 100644 --- a/app/DD_PM_WINDREAM/frmAdministration.resx +++ b/app/DD_PM_WINDREAM/frmAdministration.resx @@ -2917,770 +2917,6 @@ der Wertänderungen nutzen wollen: 2 - - Top, Bottom, Left, Right - - - True - - - 193, 27 - - - 199, 20 - - - 87 - - - Wert in Vektorindex schreiben - - - CheckBoxPMVEKTOR - - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 0 - - - True - - - 24, 135 - - - 45, 16 - - - 89 - - - Label4 - - - False - - - lblSaveFinalIndex - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 1 - - - True - - - 24, 3 - - - 89, 16 - - - 78 - - - Index wählen: - - - lblIndexPMVektor - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 2 - - - True - - - 7, 108 - - - 19, 16 - - - 86 - - - 3. - - - Label11 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 3 - - - 32, 50 - - - 160, 23 - - - 88 - - - False - - - txtBezeichner - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 4 - - - True - - - 7, 52 - - - 19, 16 - - - 85 - - - 2. - - - Label10 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 5 - - - 27, 27 - - - 160, 24 - - - 77 - - - cmbIndexe - - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 6 - - - True - - - 7, 3 - - - 19, 16 - - - 84 - - - 1. - - - Label9 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 7 - - - True - - - 24, 52 - - - 21, 16 - - - 79 - - - sd - - - False - - - lblIndex - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 8 - - - MiddleLeft - - - 9, 51 - - - 119, 29 - - - 1 - - - Datumstempel - - - MiddleRight - - - btnStampDate - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - grbxSystemStamps - - - 0 - - - MiddleLeft - - - 9, 22 - - - 119, 23 - - - 0 - - - Username - - - MiddleRight - - - btnStampUser - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - grbxSystemStamps - - - 1 - - - 298, 52 - - - 153, 80 - - - 83 - - - System-Stamps - - - False - - - grbxSystemStamps - - - System.Windows.Forms.GroupBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 9 - - - 60, 72 - - - 100, 23 - - - 80 - - - False - - - txtindexwert_final - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 10 - - - MiddleLeft - - - 27, 101 - - - 136, 31 - - - 82 - - - Index einfügen - - - MiddleRight - - - btnInsert_FinalIndex - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 11 - - - True - - - 27, 79 - - - 15, 14 - - - 81 - - - False - - - chkbxfinalIndex - - - System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage9 - - - 12 - - - 4, 25 - - - 3, 3, 3, 3 - - - 105, 50 - - - 0 - - - Fester Wert - - - TabPage9 - - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabControlFinalIndices - - - 0 - - - True - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - wwAADsMBx2+oZAAAANtJREFUOE+tkzsSgjAURbMEl+TQswDWg8M2LKSWggW4DrWhUBuKaAGUTw5DMASU - z5iZw0zeu/cmmRDljqqqtmVZJjW6Rhx0URR7NK38M7TWm7p5yrJMoiiSIAjE87we1OihQYuntStFIU1T - 8X1f4kMsl/NVnvrVgxo9NGjxNGaS8jxvGvfbY2B0QcOOONZ/AhhMKM49wteAJTQBfKYYMwO9yZVnB7jn - BSOyTTaDgOSYdM1VAVxPGO66uREZg8sggCsihJ2sCnAxIttk6H7lXyuA3R99TAgW4Dxnpd6OS61yelZ6 - QAAAAABJRU5ErkJggg== - - - - MiddleLeft - - - 110, 217 - - - 114, 30 - - - 80 - - - Editor Detail - - - MiddleRight - - - btnEditor - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 0 - - - True - - - Tahoma, 9.75pt - - - 328, 3 - - - 44, 16 - - - 79 - - - Index: - - - Label15 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 1 - - - 331, 22 - - - 194, 24 - - - 78 - - - cmbIndexe2 - - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 2 - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - xAAADsQBlSsOGwAAAFRJREFUOE9j+P//P0UYTHz79u0/Cfg9EBswAAGKAU5OTnD84f1HOEYWA9FtbW1w - Q8gyAIRhhpBtAAiD9BBlADJGVkNbA4jBowYMSgPIwXADyMf/GQC4A6rkpAjLjQAAAABJRU5ErkJggg== - - - - MiddleLeft - - - 9, 216 - - - 95, 30 - - - 11 - - - Speichern - - - MiddleRight - - - btnSaveSQLCommand - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 3 - - - Courier New, 9pt - - - 9, 68 - - - True - - - 516, 142 - - - 10 - - - SQL_COMMANDTextBox - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 4 - - - Tahoma, 9.75pt - - - MiddleLeft - - - 218, 22 - - - 107, 24 - - - 9 - - - Connections - - - MiddleRight - - - btnShowConnections - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 5 - - - True - - - Tahoma, 9.75pt - - - 6, 3 - - - 76, 16 - - - 8 - - - Connection: - - - Label14 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 6 - - - 502, 173 - - - Tahoma, 9.75pt - - - 9, 23 - - - 203, 24 - - - 7 - - - cmbConnection - - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 7 - - - True - - - 5, 49 - - - 99, 16 - - - 0 - - - SQL-Command: - - - Label4 - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage10 - - - 8 - - - 4, 25 - - - 3, 3, 3, 3 - - - 105, 53 - - - 1 - - - Dynamisches SQL - - - TabPage10 - - - System.Windows.Forms.TabPage, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabControlFinalIndices - - - 1 - - - False - - - 1104, 13 - - - 113, 79 - - - 90 - - - TabControlFinalIndices - - - System.Windows.Forms.TabControl, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage11 - - - 4 - True @@ -3709,7 +2945,7 @@ der Wertänderungen nutzen wollen: TabPage11 - 5 + 4 True @@ -3739,239 +2975,7 @@ der Wertänderungen nutzen wollen: TabPage11 - 6 - - - 765, 56 - - - 44, 22 - - - von {0} - - - Die Gesamtanzahl der Elemente. - - - None - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - vAAADrwBlbxySQAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77 - wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0 - v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg - UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA - Iu/O/9T+11gVGSSd+C+b9vW/bvA83AYYZt3+H9byEqci/dTL/zV8p+E2QCftxn+/6od4Fal4TMBtgFPu - lf8gBXgVDULAwAAA8HbAq6XlmnAAAAAASUVORK5CYII= - - - - True - - - 23, 22 - - - Erste verschieben - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - vAAADrwBlbxySQAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w - 5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f - Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+ - 08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC - - - - True - - - 23, 22 - - - Vorherige verschieben - - - 6, 25 - - - Position - - - False - - - 50, 23 - - - 0 - - - Aktuelle Position - - - 6, 25 - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - vAAADrwBlbxySQAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78 - n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI - N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f - oAc0QjgAAAAASUVORK5CYII= - - - - True - - - 23, 22 - - - Nächste verschieben - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - vAAADrwBlbxySQAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+// - h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B - twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA - kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG - WOTd+W9TcAVDMwiA5FL7X8O9hBUYZt3GqhkEQHJhLS//6wbPw22ATtoNnJIgOb/qh/81fKfhNgAfcMq9 - 8l/FYwIYQ4UGBWBgAAC+0b+zuQxOnAAAAABJRU5ErkJggg== - - - - True - - - 23, 22 - - - Letzte verschieben - - - 6, 25 - - - MiddleLeft - - - Magenta - - - 156, 22 - - - Neuen Index hinzufügen - - - MiddleLeft - - - Magenta - - - 99, 22 - - - Index löschen - - - MiddleLeft - - - Magenta - - - 95, 22 - - - Aktualisieren - - - MiddleRight - - - Magenta - - - 73, 22 - - - Abbruch - - - False - - - 541, 86 - - - 568, 25 - - - 76 - - - BindingNavigator1 - - - TBPM_PROFILE_FINAL_INDEXINGBindingNavigator - - - System.Windows.Forms.BindingNavigator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage11 - - - 7 - - - Top, Bottom, Left - - - True - - - ID - - - Indexname - - - Value - - - Erstellt wer - - - Erstellt wann - - - 1031, 23 - - - 67, 52 - - - 75 - - - TBPM_PROFILE_FINAL_INDEXINGDataGridView - - - System.Windows.Forms.DataGridView, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage11 - - - 8 + 5 4, 25 @@ -5315,6 +4319,9 @@ der Wertänderungen nutzen wollen: 0 + + 502, 173 + 860, 134 @@ -5995,114 +5002,6 @@ der Wertänderungen nutzen wollen: System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - BindingNavigatorCountItem4 - - - System.Windows.Forms.ToolStripLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - BindingNavigatorMoveFirstItem4 - - - System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - BindingNavigatorMovePreviousItem4 - - - System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - BindingNavigatorSeparator12 - - - System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - BindingNavigatorPositionItem4 - - - System.Windows.Forms.ToolStripTextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - BindingNavigatorSeparator13 - - - System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - BindingNavigatorMoveNextItem4 - - - System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - BindingNavigatorMoveLastItem4 - - - System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - BindingNavigatorSeparator14 - - - System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - ToolStripButton2 - - - System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - ToolStripButton3 - - - System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - ToolStripButton1 - - - System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - tsBtnCancel_old - - - System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - GUID - - - System.Windows.Forms.DataGridViewTextBoxColumn, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - DataGridViewTextBoxColumn26 - - - System.Windows.Forms.DataGridViewTextBoxColumn, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - DataGridViewTextBoxColumn27 - - - System.Windows.Forms.DataGridViewTextBoxColumn, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - DataGridViewTextBoxColumn28 - - - System.Windows.Forms.DataGridViewTextBoxColumn, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - DataGridViewTextBoxColumn29 - - - System.Windows.Forms.DataGridViewTextBoxColumn, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - viewAvailableProfiles diff --git a/app/DD_PM_WINDREAM/frmAdministration.vb b/app/DD_PM_WINDREAM/frmAdministration.vb index 93c8340..ea31088 100644 --- a/app/DD_PM_WINDREAM/frmAdministration.vb +++ b/app/DD_PM_WINDREAM/frmAdministration.vb @@ -437,7 +437,7 @@ Public Class frmAdministration MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Refresh Error:") End Try End Sub - Private Sub cmbIndexe_SelectedIndexChanged(sender As System.Object, e As System.EventArgs) Handles cmbIndexe.SelectedIndexChanged + Private Sub cmbIndexe_SelectedIndexChanged(sender As System.Object, e As System.EventArgs) If cmbIndexe.SelectedIndex <> -1 Then 'MsgBox(_windreamPM.GetTypeOfIndex(cmbIndexe.Text)) btnInsert_FinalIndex.Enabled = True @@ -530,7 +530,7 @@ Public Class frmAdministration End If End Sub - Private Sub btnInsert_FinalIndex_Click(sender As System.Object, e As System.EventArgs) Handles btnInsert_FinalIndex.Click + Private Sub btnInsert_FinalIndex_Click(sender As System.Object, e As System.EventArgs) Me.lblSaveFinalIndex.Visible = False If CheckBoxPMVEKTOR.Checked = False Then If cmbIndexe.SelectedIndex <> -1 Then @@ -582,7 +582,7 @@ Public Class frmAdministration TabControlFinalIndices.Enabled = False End Sub - Private Sub ToolStripButton1_Click_1(sender As System.Object, e As System.EventArgs) Handles ToolStripButton1.Click + Private Sub ToolStripButton1_Click_1(sender As System.Object, e As System.EventArgs) Refresh_Final_indexe() INSERT_ACTIVE = False TabControlFinalIndices.Enabled = False @@ -684,15 +684,15 @@ Public Class frmAdministration End If End Sub - Private Sub Button2_Click(sender As Object, e As EventArgs) Handles btnStampUser.Click + Private Sub Button2_Click(sender As Object, e As EventArgs) Me.txtindexwert_final.Text = "vUserName" End Sub - Private Sub Button3_Click(sender As Object, e As EventArgs) Handles btnStampDate.Click + Private Sub Button3_Click(sender As Object, e As EventArgs) Me.txtindexwert_final.Text = "vDate" End Sub - Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBoxPMVEKTOR.CheckedChanged + Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) If CheckBoxPMVEKTOR.Checked Then Me.txtBezeichner.Visible = True Me.cmbIndexe.Visible = False @@ -723,7 +723,7 @@ Public Class frmAdministration Private Sub btnRefreshProfiles_Click(sender As Object, e As EventArgs) Handles btnRefreshProfiles.Click Refresh_Profildaten() End Sub - Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) Handles ToolStripButton2.Click + Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) TabControlFinalIndices.Enabled = True tsBtnCancel_old.Visible = True tsBtnCancel.Visible = True @@ -756,7 +756,7 @@ Public Class frmAdministration CheckBoxPMVEKTOR.Checked = False End Sub - Private Sub ToolStripButton3_Click(sender As Object, e As EventArgs) Handles ToolStripButton3.Click + Private Sub ToolStripButton3_Click(sender As Object, e As EventArgs) Dim i, ID As Integer i = TBPM_PROFILE_FINAL_INDEXINGDataGridView.CurrentRow.Index ID = TBPM_PROFILE_FINAL_INDEXINGDataGridView.Item(0, i).Value @@ -840,7 +840,7 @@ Public Class frmAdministration End If End Sub - Private Sub TabControlFinalIndices_SelectedIndexChanged(sender As Object, e As EventArgs) Handles TabControlFinalIndices.SelectedIndexChanged + Private Sub TabControlFinalIndices_SelectedIndexChanged(sender As Object, e As EventArgs) If TabControlFinalIndices.SelectedIndex = 1 Then Me.cmbIndexe2.Enabled = False If INSERT_ACTIVE = True Then @@ -849,7 +849,7 @@ Public Class frmAdministration End If End Sub - Private Sub btnSaveSQLCommand_Click(sender As Object, e As EventArgs) Handles btnSaveSQLCommand.Click + Private Sub btnSaveSQLCommand_Click(sender As Object, e As EventArgs) If INSERT_ACTIVE = True Then If cmbConnection.SelectedIndex = -1 Or SQL_COMMANDTextBox.Text = String.Empty Or cmbIndexe2.SelectedIndex = -1 Then MsgBox("Bitte wählen Sie eine Connection und definieren einen SQL-Befehl!", MsgBoxStyle.Exclamation) @@ -869,7 +869,7 @@ Public Class frmAdministration Refresh_Final_indexe() End Sub - Private Sub btnEditor_Click(sender As Object, e As EventArgs) Handles btnEditor.Click + Private Sub btnEditor_Click(sender As Object, e As EventArgs) Try Dim CONID = 0 If cmbConnection.SelectedValue > 0 Then @@ -907,7 +907,7 @@ Public Class frmAdministration clsLogger.Add("Error while opening SQLEditor: " & ex.Message) End Try End Sub - Private Sub TBPM_PROFILE_FINAL_INDEXINGDataGridView_CellClick(sender As Object, e As DataGridViewCellEventArgs) Handles TBPM_PROFILE_FINAL_INDEXINGDataGridView.CellClick + Private Sub TBPM_PROFILE_FINAL_INDEXINGDataGridView_CellClick(sender As Object, e As DataGridViewCellEventArgs) Try TabControlFinalIndices.Enabled = False TabControlFinalIndices.SelectedIndex = 0 @@ -936,7 +936,7 @@ Public Class frmAdministration End Try End Sub - Private Sub btnShowConnections_Click(sender As Object, e As EventArgs) Handles btnShowConnections.Click + Private Sub btnShowConnections_Click(sender As Object, e As EventArgs) frmConnection.ShowDialog() End Sub From 40d08d208481c966b18c762f7da2c93af5c8c0ab Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Thu, 28 Jun 2018 18:19:50 +0200 Subject: [PATCH 13/29] jj: remove stuff --- app/DD_PM_WINDREAM/frmAdministration.vb | 628 ++++++++++++------------ 1 file changed, 314 insertions(+), 314 deletions(-) diff --git a/app/DD_PM_WINDREAM/frmAdministration.vb b/app/DD_PM_WINDREAM/frmAdministration.vb index ea31088..a3773c4 100644 --- a/app/DD_PM_WINDREAM/frmAdministration.vb +++ b/app/DD_PM_WINDREAM/frmAdministration.vb @@ -390,7 +390,7 @@ Public Class frmAdministration Private Sub Refresh_Final_indexe() Try - Me.lblSaveFinalIndex.Visible = False + 'Me.lblSaveFinalIndex.Visible = False If formloaded = False Then Exit Sub If PROFILGUIDTextBox.Text <> String.Empty Then Me.TBPM_PROFILE_FINAL_INDEXINGTableAdapter.FillByID(Me.DD_DMSLiteDataSet.TBPM_PROFILE_FINAL_INDEXING, PROFILGUIDTextBox.Text) @@ -437,159 +437,159 @@ Public Class frmAdministration MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Refresh Error:") End Try End Sub - Private Sub cmbIndexe_SelectedIndexChanged(sender As System.Object, e As System.EventArgs) - If cmbIndexe.SelectedIndex <> -1 Then - 'MsgBox(_windreamPM.GetTypeOfIndex(cmbIndexe.Text)) - btnInsert_FinalIndex.Enabled = True - Me.btnStampDate.Visible = False - Me.btnStampDate.Visible = False - Dim type = _windreamPM.GetTypeOfIndex(cmbIndexe.Text) - Select Case type - Case 1 'String - Me.lblIndex.Text = "Definieren Sie den festen Wert: (Text)" - Me.lblIndex.Visible = True - Me.txtindexwert_final.Visible = True - Me.grbxSystemStamps.Visible = True - Me.btnStampDate.Visible = True - Me.btnStampDate.Visible = True - Me.txtindexwert_final.Text = "" - Me.chkbxfinalIndex.Visible = False - Case 2 'Integer - Me.lblIndex.Text = "Definieren Sie den festen Wert: (Zahl)" - Me.lblIndex.Visible = True - Me.txtindexwert_final.Visible = True - Me.grbxSystemStamps.Visible = True - Me.btnStampDate.Visible = True - Me.btnStampDate.Visible = True - Me.txtindexwert_final.Text = "" - Me.chkbxfinalIndex.Visible = False - Case 3 'Float - Me.lblIndex.Text = "Definieren Sie den festen Wert: (Decimal)" - Me.lblIndex.Visible = True - Me.txtindexwert_final.Visible = True - Me.grbxSystemStamps.Visible = False - Me.txtindexwert_final.Text = "" - Me.chkbxfinalIndex.Visible = False - Case 4 ' Boolean - Me.lblIndex.Text = "Wählen Sie den Boolean-Wert: (Ja/Nein)" - Me.lblIndex.Visible = True - Me.txtindexwert_final.Visible = False - Me.grbxSystemStamps.Visible = False - Me.chkbxfinalIndex.CheckState = CheckState.Checked - Me.chkbxfinalIndex.Visible = True - Case 5 'Date - Me.lblIndex.Text = "Definieren Sie den festen Wert: (Date)" - Me.lblIndex.Visible = True - Me.txtindexwert_final.Visible = True - Me.grbxSystemStamps.Visible = True - Me.txtindexwert_final.Text = "" - Me.chkbxfinalIndex.Visible = False - Case 4107 'Vektor Zahl - Me.lblIndex.Text = "Definieren Sie den festen Wert - Vektorfeld: (Zahl)" - Me.lblIndex.Visible = True - Me.txtindexwert_final.Visible = True - Me.grbxSystemStamps.Visible = False - Me.txtindexwert_final.Text = "" - Me.chkbxfinalIndex.Visible = False - Case 4097 'Vektor String - Me.lblIndex.Text = "Definieren Sie den festen Wert - Vektorfeld: (Text)" - Me.lblIndex.Visible = True - Me.txtindexwert_final.Visible = True - Me.grbxSystemStamps.Visible = True - Me.btnStampDate.Visible = True - Me.btnStampDate.Visible = True - Me.txtindexwert_final.Text = "" - Me.chkbxfinalIndex.Visible = False - Case 4100 'Vektor Bool - Me.lblIndex.Text = "Definieren Sie den festen Wert - Vektorfeld: (Boolean)" - Me.lblIndex.Visible = True - Me.txtindexwert_final.Visible = True - Me.grbxSystemStamps.Visible = False - Me.btnStampDate.Visible = False - Me.txtindexwert_final.Text = "" - Me.chkbxfinalIndex.Visible = False - Case 4101 'Vektor Date - Me.lblIndex.Text = "Definieren Sie den festen Wert - Vektorfeld: (Date)" - Me.lblIndex.Visible = True - Me.txtindexwert_final.Visible = True - Me.grbxSystemStamps.Visible = True - Me.btnStampDate.Visible = True - Me.txtindexwert_final.Text = "" - Me.chkbxfinalIndex.Visible = False - Case 4104 - Me.lblIndex.Text = "Definieren Sie den festen Wert - Vektorfeld: (Currency)" - Me.lblIndex.Visible = True - Me.txtindexwert_final.Visible = True - Me.grbxSystemStamps.Visible = False - Me.txtindexwert_final.Text = "" - Me.chkbxfinalIndex.Visible = False - Case Else - btnInsert_FinalIndex.Enabled = False - End Select + 'Private Sub cmbIndexe_SelectedIndexChanged(sender As System.Object, e As System.EventArgs) + ' If cmbIndexe.SelectedIndex <> -1 Then + ' 'MsgBox(_windreamPM.GetTypeOfIndex(cmbIndexe.Text)) + ' btnInsert_FinalIndex.Enabled = True + ' Me.btnStampDate.Visible = False + ' Me.btnStampDate.Visible = False + ' Dim type = _windreamPM.GetTypeOfIndex(cmbIndexe.Text) + ' Select Case type + ' Case 1 'String + ' Me.lblIndex.Text = "Definieren Sie den festen Wert: (Text)" + ' Me.lblIndex.Visible = True + ' Me.txtindexwert_final.Visible = True + ' Me.grbxSystemStamps.Visible = True + ' Me.btnStampDate.Visible = True + ' Me.btnStampDate.Visible = True + ' Me.txtindexwert_final.Text = "" + ' Me.chkbxfinalIndex.Visible = False + ' Case 2 'Integer + ' Me.lblIndex.Text = "Definieren Sie den festen Wert: (Zahl)" + ' Me.lblIndex.Visible = True + ' Me.txtindexwert_final.Visible = True + ' Me.grbxSystemStamps.Visible = True + ' Me.btnStampDate.Visible = True + ' Me.btnStampDate.Visible = True + ' Me.txtindexwert_final.Text = "" + ' Me.chkbxfinalIndex.Visible = False + ' Case 3 'Float + ' Me.lblIndex.Text = "Definieren Sie den festen Wert: (Decimal)" + ' Me.lblIndex.Visible = True + ' Me.txtindexwert_final.Visible = True + ' Me.grbxSystemStamps.Visible = False + ' Me.txtindexwert_final.Text = "" + ' Me.chkbxfinalIndex.Visible = False + ' Case 4 ' Boolean + ' Me.lblIndex.Text = "Wählen Sie den Boolean-Wert: (Ja/Nein)" + ' Me.lblIndex.Visible = True + ' Me.txtindexwert_final.Visible = False + ' Me.grbxSystemStamps.Visible = False + ' Me.chkbxfinalIndex.CheckState = CheckState.Checked + ' Me.chkbxfinalIndex.Visible = True + ' Case 5 'Date + ' Me.lblIndex.Text = "Definieren Sie den festen Wert: (Date)" + ' Me.lblIndex.Visible = True + ' Me.txtindexwert_final.Visible = True + ' Me.grbxSystemStamps.Visible = True + ' Me.txtindexwert_final.Text = "" + ' Me.chkbxfinalIndex.Visible = False + ' Case 4107 'Vektor Zahl + ' Me.lblIndex.Text = "Definieren Sie den festen Wert - Vektorfeld: (Zahl)" + ' Me.lblIndex.Visible = True + ' Me.txtindexwert_final.Visible = True + ' Me.grbxSystemStamps.Visible = False + ' Me.txtindexwert_final.Text = "" + ' Me.chkbxfinalIndex.Visible = False + ' Case 4097 'Vektor String + ' Me.lblIndex.Text = "Definieren Sie den festen Wert - Vektorfeld: (Text)" + ' Me.lblIndex.Visible = True + ' Me.txtindexwert_final.Visible = True + ' Me.grbxSystemStamps.Visible = True + ' Me.btnStampDate.Visible = True + ' Me.btnStampDate.Visible = True + ' Me.txtindexwert_final.Text = "" + ' Me.chkbxfinalIndex.Visible = False + ' Case 4100 'Vektor Bool + ' Me.lblIndex.Text = "Definieren Sie den festen Wert - Vektorfeld: (Boolean)" + ' Me.lblIndex.Visible = True + ' Me.txtindexwert_final.Visible = True + ' Me.grbxSystemStamps.Visible = False + ' Me.btnStampDate.Visible = False + ' Me.txtindexwert_final.Text = "" + ' Me.chkbxfinalIndex.Visible = False + ' Case 4101 'Vektor Date + ' Me.lblIndex.Text = "Definieren Sie den festen Wert - Vektorfeld: (Date)" + ' Me.lblIndex.Visible = True + ' Me.txtindexwert_final.Visible = True + ' Me.grbxSystemStamps.Visible = True + ' Me.btnStampDate.Visible = True + ' Me.txtindexwert_final.Text = "" + ' Me.chkbxfinalIndex.Visible = False + ' Case 4104 + ' Me.lblIndex.Text = "Definieren Sie den festen Wert - Vektorfeld: (Currency)" + ' Me.lblIndex.Visible = True + ' Me.txtindexwert_final.Visible = True + ' Me.grbxSystemStamps.Visible = False + ' Me.txtindexwert_final.Text = "" + ' Me.chkbxfinalIndex.Visible = False + ' Case Else + ' btnInsert_FinalIndex.Enabled = False + ' End Select - End If - End Sub - - Private Sub btnInsert_FinalIndex_Click(sender As System.Object, e As System.EventArgs) - Me.lblSaveFinalIndex.Visible = False - If CheckBoxPMVEKTOR.Checked = False Then - If cmbIndexe.SelectedIndex <> -1 Then - Dim indexwert As String = "" - If txtindexwert_final.Visible = True Then - indexwert = txtindexwert_final.Text - Else - If chkbxfinalIndex.CheckState = CheckState.Checked Then - indexwert = 1 - Else - indexwert = 0 - End If - - End If - Try - TBPM_PROFILE_FINAL_INDEXINGTableAdapter.CmdInsert(PROFILGUIDTextBox.Text, cmbIndexe.Text, indexwert, Environment.UserName, 0, "") - Me.lblSaveFinalIndex.Text = "Der Index wurde erfolgreich angelegt - " & Now - Me.lblSaveFinalIndex.Visible = True - - Catch ex As Exception - MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Anlage Final Index:") - End Try - - End If - Else - If txtBezeichner.Text <> "" Then - Dim indexwert As String = "" - If txtindexwert_final.Visible = True Then - indexwert = txtindexwert_final.Text - Else - If chkbxfinalIndex.CheckState = CheckState.Checked Then - indexwert = "True" - Else - indexwert = "False" - End If + ' End If + 'End Sub - End If - Try - TBPM_PROFILE_FINAL_INDEXINGTableAdapter.CmdInsert(PROFILGUIDTextBox.Text, "[%VKT" & txtBezeichner.Text, indexwert, Environment.UserName, 0, "") - Me.lblSaveFinalIndex.Text = "Der Index wurde erfolgreich angelegt - " & Now - Me.lblSaveFinalIndex.Visible = True - Catch ex As Exception - MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Anlage Final Index in VEKTORFELD:") - End Try - End If - End If - Refresh_Final_indexe() - INSERT_ACTIVE = False - TabControlFinalIndices.Enabled = False + 'Private Sub btnInsert_FinalIndex_Click(sender As System.Object, e As System.EventArgs) + ' Me.lblSaveFinalIndex.Visible = False + ' If CheckBoxPMVEKTOR.Checked = False Then + ' If cmbIndexe.SelectedIndex <> -1 Then + ' Dim indexwert As String = "" + ' If txtindexwert_final.Visible = True Then + ' indexwert = txtindexwert_final.Text + ' Else + ' If chkbxfinalIndex.CheckState = CheckState.Checked Then + ' indexwert = 1 + ' Else + ' indexwert = 0 + ' End If + + ' End If + ' Try + ' TBPM_PROFILE_FINAL_INDEXINGTableAdapter.CmdInsert(PROFILGUIDTextBox.Text, cmbIndexe.Text, indexwert, Environment.UserName, 0, "") + ' Me.lblSaveFinalIndex.Text = "Der Index wurde erfolgreich angelegt - " & Now + ' Me.lblSaveFinalIndex.Visible = True + + ' Catch ex As Exception + ' MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Anlage Final Index:") + ' End Try + + ' End If + ' Else + ' If txtBezeichner.Text <> "" Then + ' Dim indexwert As String = "" + ' If txtindexwert_final.Visible = True Then + ' indexwert = txtindexwert_final.Text + ' Else + ' If chkbxfinalIndex.CheckState = CheckState.Checked Then + ' indexwert = "True" + ' Else + ' indexwert = "False" + ' End If + + ' End If + ' Try + ' TBPM_PROFILE_FINAL_INDEXINGTableAdapter.CmdInsert(PROFILGUIDTextBox.Text, "[%VKT" & txtBezeichner.Text, indexwert, Environment.UserName, 0, "") + ' Me.lblSaveFinalIndex.Text = "Der Index wurde erfolgreich angelegt - " & Now + ' Me.lblSaveFinalIndex.Visible = True + ' Catch ex As Exception + ' MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Anlage Final Index in VEKTORFELD:") + ' End Try + ' End If + ' End If + ' Refresh_Final_indexe() + ' INSERT_ACTIVE = False + ' TabControlFinalIndices.Enabled = False - End Sub - Private Sub ToolStripButton1_Click_1(sender As System.Object, e As System.EventArgs) - Refresh_Final_indexe() - INSERT_ACTIVE = False - TabControlFinalIndices.Enabled = False + 'End Sub + 'Private Sub ToolStripButton1_Click_1(sender As System.Object, e As System.EventArgs) + ' Refresh_Final_indexe() + ' INSERT_ACTIVE = False + ' TabControlFinalIndices.Enabled = False - txtBezeichner.Text = String.Empty - txtindexwert_final.Text = String.Empty - End Sub + ' txtBezeichner.Text = String.Empty + ' txtindexwert_final.Text = String.Empty + 'End Sub Private Sub tsbtnProfilkopieren_Click(sender As System.Object, e As System.EventArgs) Handles tsbtnProfilkopieren.Click Dim result As MsgBoxResult = MsgBox("Wollen Sie das gesamte Profil kopieren?" & vbNewLine & "Alle Einstellungen werden übernommen, das Profil wird angelegt und inaktiv gesetzt!", MsgBoxStyle.YesNo, "Bestätigung erforderlich:") @@ -684,89 +684,89 @@ Public Class frmAdministration End If End Sub - Private Sub Button2_Click(sender As Object, e As EventArgs) - Me.txtindexwert_final.Text = "vUserName" - End Sub + 'Private Sub Button2_Click(sender As Object, e As EventArgs) + ' Me.txtindexwert_final.Text = "vUserName" + 'End Sub - Private Sub Button3_Click(sender As Object, e As EventArgs) - Me.txtindexwert_final.Text = "vDate" - End Sub + 'Private Sub Button3_Click(sender As Object, e As EventArgs) + ' Me.txtindexwert_final.Text = "vDate" + 'End Sub - Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) - If CheckBoxPMVEKTOR.Checked Then - Me.txtBezeichner.Visible = True - Me.cmbIndexe.Visible = False - txtBezeichner.Text = "" - Me.lblIndexPMVektor.Text = "Bezeichner für VektorIndex eingeben:" - - Me.lblIndex.Visible = True - Me.lblIndex.Text = "Bitte den festen Wert als String eingeben:" - Me.txtindexwert_final.Visible = True - Me.grbxSystemStamps.Visible = True - Me.txtindexwert_final.Text = "" - Me.chkbxfinalIndex.Visible = False - Else - Me.txtBezeichner.Visible = False - Me.cmbIndexe.Visible = True - Me.lblIndexPMVektor.Text = "Index wählen:" - - Me.lblIndex.Visible = False - Me.txtindexwert_final.Visible = False - Me.grbxSystemStamps.Visible = False - Me.txtindexwert_final.Text = "" - Me.chkbxfinalIndex.Visible = False - End If - End Sub + 'Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) + ' If CheckBoxPMVEKTOR.Checked Then + ' Me.txtBezeichner.Visible = True + ' Me.cmbIndexe.Visible = False + ' txtBezeichner.Text = "" + ' Me.lblIndexPMVektor.Text = "Bezeichner für VektorIndex eingeben:" + + ' Me.lblIndex.Visible = True + ' Me.lblIndex.Text = "Bitte den festen Wert als String eingeben:" + ' Me.txtindexwert_final.Visible = True + ' Me.grbxSystemStamps.Visible = True + ' Me.txtindexwert_final.Text = "" + ' Me.chkbxfinalIndex.Visible = False + ' Else + ' Me.txtBezeichner.Visible = False + ' Me.cmbIndexe.Visible = True + ' Me.lblIndexPMVektor.Text = "Index wählen:" + + ' Me.lblIndex.Visible = False + ' Me.txtindexwert_final.Visible = False + ' Me.grbxSystemStamps.Visible = False + ' Me.txtindexwert_final.Text = "" + ' Me.chkbxfinalIndex.Visible = False + ' End If + 'End Sub Private Sub btnopen_SQLAdmin_Click(sender As Object, e As EventArgs) Handles btnopen_SQLAdmin.Click frmSQL_Admin.ShowDialog() End Sub Private Sub btnRefreshProfiles_Click(sender As Object, e As EventArgs) Handles btnRefreshProfiles.Click Refresh_Profildaten() End Sub - Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) - TabControlFinalIndices.Enabled = True - tsBtnCancel_old.Visible = True - tsBtnCancel.Visible = True - cmbIndexe.Items.Clear() - cmbIndexe2.Items.Clear() - Dim indexe = _windreamPM.GetIndicesByObjecttype(cmbObjekttypen.Text) - If indexe IsNot Nothing Then - For Each index As String In indexe - Me.cmbIndexe.Items.Add(index) - Me.cmbIndexe2.Items.Add(index) - Next - Me.cmbIndexe.SelectedIndex = -1 - End If - INSERT_ACTIVE = True - End Sub + 'Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) + ' TabControlFinalIndices.Enabled = True + ' tsBtnCancel_old.Visible = True + ' tsBtnCancel.Visible = True + ' cmbIndexe.Items.Clear() + ' cmbIndexe2.Items.Clear() + ' Dim indexe = _windreamPM.GetIndicesByObjecttype(cmbObjekttypen.Text) + ' If indexe IsNot Nothing Then + ' For Each index As String In indexe + ' Me.cmbIndexe.Items.Add(index) + ' Me.cmbIndexe2.Items.Add(index) + ' Next + ' Me.cmbIndexe.SelectedIndex = -1 + ' End If + ' INSERT_ACTIVE = True + 'End Sub Private Sub CancelFinalIndexInsert() - TabControlFinalIndices.Enabled = False + 'TabControlFinalIndices.Enabled = False INSERT_ACTIVE = False - tsBtnCancel_old.Visible = False + 'tsBtnCancel_old.Visible = False tsBtnCancel.Visible = False BindingNavigatorAddNewItem.Visible = True - txtBezeichner.Text = String.Empty - txtindexwert_final.Text = String.Empty - cmbIndexe.SelectedIndex = -1 - cmbIndexe2.SelectedIndex = -1 - cmbConnection.SelectedIndex = -1 - SQL_COMMANDTextBox.Text = String.Empty - CheckBoxPMVEKTOR.Checked = False - End Sub - - Private Sub ToolStripButton3_Click(sender As Object, e As EventArgs) - Dim i, ID As Integer - i = TBPM_PROFILE_FINAL_INDEXINGDataGridView.CurrentRow.Index - ID = TBPM_PROFILE_FINAL_INDEXINGDataGridView.Item(0, i).Value - If ID > 0 Then - TBPM_PROFILE_FINAL_INDEXINGTableAdapter.CmdDelete(ID) - End If - Refresh_Final_indexe() - MsgBox("Index erfolgreich gelöscht!", MsgBoxStyle.Information, "Hinweis:") - ' DD_DMSLiteDataSet.TBPM_PROFILE_FINAL_INDEXING.Clear() - End Sub + 'txtBezeichner.Text = String.Empty + 'txtindexwert_final.Text = String.Empty + 'cmbIndexe.SelectedIndex = -1 + 'cmbIndexe2.SelectedIndex = -1 + 'cmbConnection.SelectedIndex = -1 + 'SQL_COMMANDTextBox.Text = String.Empty + 'CheckBoxPMVEKTOR.Checked = False + End Sub + + 'Private Sub ToolStripButton3_Click(sender As Object, e As EventArgs) + ' Dim i, ID As Integer + ' i = TBPM_PROFILE_FINAL_INDEXINGDataGridView.CurrentRow.Index + ' ID = TBPM_PROFILE_FINAL_INDEXINGDataGridView.Item(0, i).Value + ' If ID > 0 Then + ' TBPM_PROFILE_FINAL_INDEXINGTableAdapter.CmdDelete(ID) + ' End If + ' Refresh_Final_indexe() + ' MsgBox("Index erfolgreich gelöscht!", MsgBoxStyle.Information, "Hinweis:") + ' ' DD_DMSLiteDataSet.TBPM_PROFILE_FINAL_INDEXING.Clear() + 'End Sub Private Sub ACTIVECheckBox_CheckedChanged(sender As Object, e As EventArgs) Handles ACTIVECheckBox.CheckedChanged If ACTIVECheckBox.Checked Then ACTIVECheckBox.BackColor = Color.Lime @@ -840,105 +840,105 @@ Public Class frmAdministration End If End Sub - Private Sub TabControlFinalIndices_SelectedIndexChanged(sender As Object, e As EventArgs) - If TabControlFinalIndices.SelectedIndex = 1 Then - Me.cmbIndexe2.Enabled = False - If INSERT_ACTIVE = True Then - Me.cmbIndexe2.Enabled = True - End If - End If - End Sub - - Private Sub btnSaveSQLCommand_Click(sender As Object, e As EventArgs) - If INSERT_ACTIVE = True Then - If cmbConnection.SelectedIndex = -1 Or SQL_COMMANDTextBox.Text = String.Empty Or cmbIndexe2.SelectedIndex = -1 Then - MsgBox("Bitte wählen Sie eine Connection und definieren einen SQL-Befehl!", MsgBoxStyle.Exclamation) - Exit Sub - End If - TBPM_PROFILE_FINAL_INDEXINGTableAdapter.CmdInsert(PROFILGUIDTextBox.Text, cmbIndexe2.Text, "SQL-Command", Environment.UserName, cmbConnection.SelectedValue, SQL_COMMANDTextBox.Text) - INSERT_ACTIVE = False - Else - Dim i, ID As Integer - i = TBPM_PROFILE_FINAL_INDEXINGDataGridView.CurrentRow.Index - ID = TBPM_PROFILE_FINAL_INDEXINGDataGridView.Item(0, i).Value - If ID > 0 Then - TBPM_PROFILE_FINAL_INDEXINGTableAdapter.cmdUpdateSQL(cmbConnection.SelectedValue, SQL_COMMANDTextBox.Text, Environment.UserName, ID) - End If - - End If - Refresh_Final_indexe() - End Sub - - Private Sub btnEditor_Click(sender As Object, e As EventArgs) - Try - Dim CONID = 0 - If cmbConnection.SelectedValue > 0 Then - CONID = cmbConnection.SelectedValue - End If - If INSERT_ACTIVE = True Then - If cmbIndexe2.SelectedIndex = -1 Then - MsgBox("Bitte wählen Sie einen Index!", MsgBoxStyle.Exclamation) - Exit Sub - End If + 'Private Sub TabControlFinalIndices_SelectedIndexChanged(sender As Object, e As EventArgs) + ' If TabControlFinalIndices.SelectedIndex = 1 Then + ' Me.cmbIndexe2.Enabled = False + ' If INSERT_ACTIVE = True Then + ' Me.cmbIndexe2.Enabled = True + ' End If + ' End If + 'End Sub - TBPM_PROFILE_FINAL_INDEXINGTableAdapter.CmdInsert(PROFILGUIDTextBox.Text, cmbIndexe2.Text, "SQL-Command", Environment.UserName, CONID, SQL_COMMANDTextBox.Text) + 'Private Sub btnSaveSQLCommand_Click(sender As Object, e As EventArgs) + ' If INSERT_ACTIVE = True Then + ' If cmbConnection.SelectedIndex = -1 Or SQL_COMMANDTextBox.Text = String.Empty Or cmbIndexe2.SelectedIndex = -1 Then + ' MsgBox("Bitte wählen Sie eine Connection und definieren einen SQL-Befehl!", MsgBoxStyle.Exclamation) + ' Exit Sub + ' End If + ' TBPM_PROFILE_FINAL_INDEXINGTableAdapter.CmdInsert(PROFILGUIDTextBox.Text, cmbIndexe2.Text, "SQL-Command", Environment.UserName, cmbConnection.SelectedValue, SQL_COMMANDTextBox.Text) + ' INSERT_ACTIVE = False + ' Else + ' Dim i, ID As Integer + ' i = TBPM_PROFILE_FINAL_INDEXINGDataGridView.CurrentRow.Index + ' ID = TBPM_PROFILE_FINAL_INDEXINGDataGridView.Item(0, i).Value + ' If ID > 0 Then + ' TBPM_PROFILE_FINAL_INDEXINGTableAdapter.cmdUpdateSQL(cmbConnection.SelectedValue, SQL_COMMANDTextBox.Text, Environment.UserName, ID) + ' End If - End If - Dim i, ID As Integer - Try - i = TBPM_PROFILE_FINAL_INDEXINGDataGridView.CurrentRow.Index - ID = TBPM_PROFILE_FINAL_INDEXINGDataGridView.Item(0, i).Value - If ID > 0 Then - CURRENT_INDEX_ID = ID - CURRENT_DESIGN_TYPE = "FINAL_INDEX" - CURRENT_SQL_COMAMND = SQL_COMMANDTextBox.Text - CURRENT_SQL_CON = CONID - CURRENT_ProfilGUID = PROFILGUIDTextBox.Text - - frmSQL_DESIGNER.ShowDialog() - End If - Catch ex As Exception - clsLogger.Add("Error while operating on TBPM_PROFILE_FINAL_INDEXINGDataGridView: " & ex.Message) - End Try + ' End If + ' Refresh_Final_indexe() + 'End Sub - Refresh_Final_indexe() - Catch ex As Exception - MsgBox("Error while opening SQLEditor: " & ex.Message, MsgBoxStyle.Critical) - clsLogger.Add("Error while opening SQLEditor: " & ex.Message) - End Try - End Sub - Private Sub TBPM_PROFILE_FINAL_INDEXINGDataGridView_CellClick(sender As Object, e As DataGridViewCellEventArgs) - Try - TabControlFinalIndices.Enabled = False - TabControlFinalIndices.SelectedIndex = 0 - - Dim i, ID As Integer - i = TBPM_PROFILE_FINAL_INDEXINGDataGridView.CurrentRow.Index - ID = TBPM_PROFILE_FINAL_INDEXINGDataGridView.Item(0, i).Value - If ID > 0 Then - Dim sql = String.Format("SELECT T.*, T1.BEZEICHNUNG AS CON_STRING FROM TBPM_PROFILE_FINAL_INDEXING T,TBDD_CONNECTION T1 WHERE T.GUID = {0} AND T.CONNECTION_ID = T1.GUID ", ID) - CURRENT_DT_SQL_CONFIG_TABLE = ClassDatabase.Return_Datatable(sql, True) - - Dim Type = TBPM_PROFILE_FINAL_INDEXINGDataGridView.Item(2, i).Value - If Type = "SQL-Command" Then - Dim Indexname = TBPM_PROFILE_FINAL_INDEXINGDataGridView.Item(1, i).Value - TabControlFinalIndices.Enabled = True - TabControlFinalIndices.SelectedIndex = 1 - cmbIndexe2.Text = Indexname - cmbConnection.SelectedValue = CURRENT_DT_SQL_CONFIG_TABLE.Rows(0).Item("CONNECTION_ID") - cmbConnection.FindStringExact(CURRENT_DT_SQL_CONFIG_TABLE.Rows(0).Item("CON_STRING")) - SQL_COMMANDTextBox.Text = CURRENT_DT_SQL_CONFIG_TABLE.Rows(0).Item("SQL_COMMAND") - End If - End If - Catch ex As Exception - MsgBox("Error while loading final Index: " & ex.Message, MsgBoxStyle.Critical) - clsLogger.Add("Error while loading final Index: " & ex.Message) - End Try - End Sub + 'Private Sub btnEditor_Click(sender As Object, e As EventArgs) + ' Try + ' Dim CONID = 0 + ' If cmbConnection.SelectedValue > 0 Then + ' CONID = cmbConnection.SelectedValue + ' End If + ' If INSERT_ACTIVE = True Then + ' If cmbIndexe2.SelectedIndex = -1 Then + ' MsgBox("Bitte wählen Sie einen Index!", MsgBoxStyle.Exclamation) + ' Exit Sub + ' End If + + ' TBPM_PROFILE_FINAL_INDEXINGTableAdapter.CmdInsert(PROFILGUIDTextBox.Text, cmbIndexe2.Text, "SQL-Command", Environment.UserName, CONID, SQL_COMMANDTextBox.Text) + + ' End If + ' Dim i, ID As Integer + ' Try + ' i = TBPM_PROFILE_FINAL_INDEXINGDataGridView.CurrentRow.Index + ' ID = TBPM_PROFILE_FINAL_INDEXINGDataGridView.Item(0, i).Value + ' If ID > 0 Then + ' CURRENT_INDEX_ID = ID + ' CURRENT_DESIGN_TYPE = "FINAL_INDEX" + ' CURRENT_SQL_COMAMND = SQL_COMMANDTextBox.Text + ' CURRENT_SQL_CON = CONID + ' CURRENT_ProfilGUID = PROFILGUIDTextBox.Text + + ' frmSQL_DESIGNER.ShowDialog() + ' End If + ' Catch ex As Exception + ' clsLogger.Add("Error while operating on TBPM_PROFILE_FINAL_INDEXINGDataGridView: " & ex.Message) + ' End Try + + ' Refresh_Final_indexe() + ' Catch ex As Exception + ' MsgBox("Error while opening SQLEditor: " & ex.Message, MsgBoxStyle.Critical) + ' clsLogger.Add("Error while opening SQLEditor: " & ex.Message) + ' End Try + 'End Sub + 'Private Sub TBPM_PROFILE_FINAL_INDEXINGDataGridView_CellClick(sender As Object, e As DataGridViewCellEventArgs) + ' Try + ' TabControlFinalIndices.Enabled = False + ' TabControlFinalIndices.SelectedIndex = 0 + + ' Dim i, ID As Integer + ' i = TBPM_PROFILE_FINAL_INDEXINGDataGridView.CurrentRow.Index + ' ID = TBPM_PROFILE_FINAL_INDEXINGDataGridView.Item(0, i).Value + ' If ID > 0 Then + ' Dim sql = String.Format("SELECT T.*, T1.BEZEICHNUNG AS CON_STRING FROM TBPM_PROFILE_FINAL_INDEXING T,TBDD_CONNECTION T1 WHERE T.GUID = {0} AND T.CONNECTION_ID = T1.GUID ", ID) + ' CURRENT_DT_SQL_CONFIG_TABLE = ClassDatabase.Return_Datatable(sql, True) + + ' Dim Type = TBPM_PROFILE_FINAL_INDEXINGDataGridView.Item(2, i).Value + ' If Type = "SQL-Command" Then + ' Dim Indexname = TBPM_PROFILE_FINAL_INDEXINGDataGridView.Item(1, i).Value + ' TabControlFinalIndices.Enabled = True + ' TabControlFinalIndices.SelectedIndex = 1 + ' cmbIndexe2.Text = Indexname + ' cmbConnection.SelectedValue = CURRENT_DT_SQL_CONFIG_TABLE.Rows(0).Item("CONNECTION_ID") + ' cmbConnection.FindStringExact(CURRENT_DT_SQL_CONFIG_TABLE.Rows(0).Item("CON_STRING")) + ' SQL_COMMANDTextBox.Text = CURRENT_DT_SQL_CONFIG_TABLE.Rows(0).Item("SQL_COMMAND") + ' End If + ' End If + ' Catch ex As Exception + ' MsgBox("Error while loading final Index: " & ex.Message, MsgBoxStyle.Critical) + ' clsLogger.Add("Error while loading final Index: " & ex.Message) + ' End Try + 'End Sub - Private Sub btnShowConnections_Click(sender As Object, e As EventArgs) - frmConnection.ShowDialog() - End Sub + 'Private Sub btnShowConnections_Click(sender As Object, e As EventArgs) + ' frmConnection.ShowDialog() + 'End Sub Private Sub btnUserManager_Click(sender As Object, e As EventArgs) Handles btnUserManager.Click Try From b1680604f91e1e40c66ef879dfcd84d9e985027d Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Mon, 2 Jul 2018 16:30:14 +0200 Subject: [PATCH 14/29] jj: fix locking of files when validating, use lockFor with WMObjectEditModeIndexEdit flag --- app/DD_PM_WINDREAM/ClassPMWindream.vb | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/app/DD_PM_WINDREAM/ClassPMWindream.vb b/app/DD_PM_WINDREAM/ClassPMWindream.vb index d0c1c8b..a2a4bdb 100644 --- a/app/DD_PM_WINDREAM/ClassPMWindream.vb +++ b/app/DD_PM_WINDREAM/ClassPMWindream.vb @@ -27,6 +27,8 @@ Public Class ClassPMWindream Const WMObjectVariableValueTypeVector = &H1000 Const WMObjectVariableValueTypeFulltext = &H2000 Const WMObjectVariableValueTypeDefaultValue = &H4000 + + Const WMObjectEditModeIndexEdit = &H3DA #End Region #Region "+++++ Variablen +++++" @@ -112,7 +114,12 @@ Public Class ClassPMWindream Try If Indizes IsNot Nothing And aValues IsNot Nothing Then If Not oDocument.aLocked Then - oDocument.lock() + + ' 02.07. Änderung der Lock Methode, um eine Validierung auch zuzulassen, wenn das Recht "Datei ändern" + ' nicht gesetzt ist + 'oDocument.lock() + oDocument.LockFor(WMObjectEditModeIndexEdit) + Dim i As Integer = 0 Dim indexname As String If aValues.Length = 1 And aValues(0) = "" Then From 23795dd3dadb74422f5359e4656f79e63909446c Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Tue, 3 Jul 2018 12:09:15 +0200 Subject: [PATCH 15/29] jj: cancel edit for binding source of final indicies --- app/DD_PM_WINDREAM/frmAdministration.vb | 2 ++ 1 file changed, 2 insertions(+) diff --git a/app/DD_PM_WINDREAM/frmAdministration.vb b/app/DD_PM_WINDREAM/frmAdministration.vb index a3773c4..eb59cb7 100644 --- a/app/DD_PM_WINDREAM/frmAdministration.vb +++ b/app/DD_PM_WINDREAM/frmAdministration.vb @@ -747,6 +747,8 @@ Public Class frmAdministration tsBtnCancel.Visible = False BindingNavigatorAddNewItem.Visible = True + TBPM_PROFILE_FINAL_INDEXINGBindingSource.CancelEdit() + 'txtBezeichner.Text = String.Empty 'txtindexwert_final.Text = String.Empty 'cmbIndexe.SelectedIndex = -1 From 80099c5a01c963808d60abf9621d9844758f68ff Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Thu, 12 Jul 2018 11:04:52 +0200 Subject: [PATCH 16/29] jj: add confirmation when removing final index, set (readonly) vector prop when selecting index --- app/DD_PM_WINDREAM/ClassFinalIndex.vb | 26 +++- .../ModuleFinalIndexProperties.vb | 2 + .../frmAdministration.Designer.vb | 34 ++--- app/DD_PM_WINDREAM/frmAdministration.resx | 60 ++++----- app/DD_PM_WINDREAM/frmAdministration.vb | 124 +++++++----------- 5 files changed, 115 insertions(+), 131 deletions(-) diff --git a/app/DD_PM_WINDREAM/ClassFinalIndex.vb b/app/DD_PM_WINDREAM/ClassFinalIndex.vb index 6908830..c71afd0 100644 --- a/app/DD_PM_WINDREAM/ClassFinalIndex.vb +++ b/app/DD_PM_WINDREAM/ClassFinalIndex.vb @@ -28,11 +28,13 @@ value = IIf(props.BoolValue, "1", "0") End If - If isVector Then - Return $"{PREFIX_VECTOR}{value}" - Else - Return value - End If + Return value + + 'If isVector Then + ' Return $"{PREFIX_VECTOR}{value}" + 'Else + ' Return value + 'End If Catch ex As Exception MsgBox($"Error in GetValue: {ex.Message}", MsgBoxStyle.Critical) End Try @@ -50,6 +52,12 @@ Dim type As Integer = types.Item(i) Dim isVector = value.StartsWith(PREFIX_VECTOR) + If isVector Then + value = value.Replace(PREFIX_VECTOR, String.Empty) + End If + + props.VectorIndex = isVector + If type = INDEX_TYPE_STRING Or type = INDEX_TYPE_VECTOR_STRING Then value = NotNull(value, "") @@ -93,4 +101,12 @@ Return False End If End Function + + Public Shared Function GetIndexType(indexName As String, indicies As List(Of String), types As List(Of Integer)) + Dim position As Integer = indicies.IndexOf(indexName) + Dim type As Integer = types.Item(position) + + Return type + End Function + End Class diff --git a/app/DD_PM_WINDREAM/ModuleFinalIndexProperties.vb b/app/DD_PM_WINDREAM/ModuleFinalIndexProperties.vb index 61d1642..2d7fd7b 100644 --- a/app/DD_PM_WINDREAM/ModuleFinalIndexProperties.vb +++ b/app/DD_PM_WINDREAM/ModuleFinalIndexProperties.vb @@ -53,7 +53,9 @@ Module ModuleFinalIndexProperties Public Property IndexName As String + + <[ReadOnly](True)> Public Property VectorIndex As Boolean ' Eigenschaften für die Liste der Indicies diff --git a/app/DD_PM_WINDREAM/frmAdministration.Designer.vb b/app/DD_PM_WINDREAM/frmAdministration.Designer.vb index 18ddfb1..bad09d9 100644 --- a/app/DD_PM_WINDREAM/frmAdministration.Designer.vb +++ b/app/DD_PM_WINDREAM/frmAdministration.Designer.vb @@ -166,7 +166,6 @@ Partial Class frmAdministration Me.colCHANGED_WHO = New DevExpress.XtraGrid.Columns.GridColumn() Me.colCHANGED_WHEN = New DevExpress.XtraGrid.Columns.GridColumn() Me.colGUID = New DevExpress.XtraGrid.Columns.GridColumn() - Me.colCONNECTION_ID = New DevExpress.XtraGrid.Columns.GridColumn() Me.colSQL_COMMAND = New DevExpress.XtraGrid.Columns.GridColumn() Me.PropertyGrid1 = New System.Windows.Forms.PropertyGrid() Me.BindingNavigator1 = New System.Windows.Forms.BindingNavigator(Me.components) @@ -185,7 +184,6 @@ Partial Class frmAdministration Me.tsBtnSave = New System.Windows.Forms.ToolStripButton() Me.ToolStripButton5 = New System.Windows.Forms.ToolStripButton() Me.Label13 = New System.Windows.Forms.Label() - Me.TBDD_CONNECTIONBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.Label5 = New System.Windows.Forms.Label() Me.Label6 = New System.Windows.Forms.Label() Me.TabPage12 = New System.Windows.Forms.TabPage() @@ -247,6 +245,7 @@ Partial Class frmAdministration Me.BindingNavigatorMoveNextItem3 = New System.Windows.Forms.ToolStripButton() Me.BindingNavigatorMoveLastItem3 = New System.Windows.Forms.ToolStripButton() Me.BindingNavigatorSeparator11 = New System.Windows.Forms.ToolStripSeparator() + Me.TBDD_CONNECTIONBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPM_PROFILE_CONTROLSBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.StatusStrip1 = New System.Windows.Forms.StatusStrip() Me.tstrpinfo = New System.Windows.Forms.ToolStripStatusLabel() @@ -336,7 +335,6 @@ Partial Class frmAdministration CType(Me.viewFinalIndex, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.BindingNavigator1, System.ComponentModel.ISupportInitialize).BeginInit() Me.BindingNavigator1.SuspendLayout() - CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() Me.TabPage12.SuspendLayout() Me.TabPage2.SuspendLayout() CType(Me.SplitContainerProfilzuordnung, System.ComponentModel.ISupportInitialize).BeginInit() @@ -358,6 +356,7 @@ Partial Class frmAdministration CType(Me.TBPM_ERROR_LOGBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBPM_ERROR_LOGBindingNavigator, System.ComponentModel.ISupportInitialize).BeginInit() Me.TBPM_ERROR_LOGBindingNavigator.SuspendLayout() + CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBPM_PROFILE_CONTROLSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() Me.StatusStrip1.SuspendLayout() Me.pnlMain.SuspendLayout() @@ -1279,7 +1278,7 @@ Partial Class frmAdministration ' 'viewFinalIndex ' - Me.viewFinalIndex.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colINDEXNAME, Me.colVALUE, Me.colADDED_WHO, Me.colADDED_WHEN, Me.colCHANGED_WHO, Me.colCHANGED_WHEN, Me.colGUID, Me.colCONNECTION_ID, Me.colSQL_COMMAND}) + Me.viewFinalIndex.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colGUID, Me.colINDEXNAME, Me.colVALUE, Me.colSQL_COMMAND, Me.colADDED_WHO, Me.colADDED_WHEN, Me.colCHANGED_WHO, Me.colCHANGED_WHEN}) Me.viewFinalIndex.GridControl = Me.gridFinalIndex Me.viewFinalIndex.Name = "viewFinalIndex" Me.viewFinalIndex.OptionsBehavior.Editable = False @@ -1288,15 +1287,15 @@ Partial Class frmAdministration ' 'colINDEXNAME ' + resources.ApplyResources(Me.colINDEXNAME, "colINDEXNAME") Me.colINDEXNAME.FieldName = "INDEXNAME" Me.colINDEXNAME.Name = "colINDEXNAME" - resources.ApplyResources(Me.colINDEXNAME, "colINDEXNAME") ' 'colVALUE ' + resources.ApplyResources(Me.colVALUE, "colVALUE") Me.colVALUE.FieldName = "VALUE" Me.colVALUE.Name = "colVALUE" - resources.ApplyResources(Me.colVALUE, "colVALUE") ' 'colADDED_WHO ' @@ -1324,21 +1323,15 @@ Partial Class frmAdministration ' 'colGUID ' + resources.ApplyResources(Me.colGUID, "colGUID") Me.colGUID.FieldName = "GUID" Me.colGUID.Name = "colGUID" - resources.ApplyResources(Me.colGUID, "colGUID") - ' - 'colCONNECTION_ID - ' - Me.colCONNECTION_ID.FieldName = "CONNECTION_ID" - Me.colCONNECTION_ID.Name = "colCONNECTION_ID" - resources.ApplyResources(Me.colCONNECTION_ID, "colCONNECTION_ID") ' 'colSQL_COMMAND ' + resources.ApplyResources(Me.colSQL_COMMAND, "colSQL_COMMAND") Me.colSQL_COMMAND.FieldName = "SQL_COMMAND" Me.colSQL_COMMAND.Name = "colSQL_COMMAND" - resources.ApplyResources(Me.colSQL_COMMAND, "colSQL_COMMAND") ' 'PropertyGrid1 ' @@ -1444,11 +1437,6 @@ Partial Class frmAdministration resources.ApplyResources(Me.Label13, "Label13") Me.Label13.Name = "Label13" ' - 'TBDD_CONNECTIONBindingSource - ' - Me.TBDD_CONNECTIONBindingSource.DataMember = "TBDD_CONNECTION" - Me.TBDD_CONNECTIONBindingSource.DataSource = Me.DD_DMSLiteDataSet - ' 'Label5 ' resources.ApplyResources(Me.Label5, "Label5") @@ -1901,6 +1889,11 @@ Partial Class frmAdministration Me.BindingNavigatorSeparator11.Name = "BindingNavigatorSeparator11" resources.ApplyResources(Me.BindingNavigatorSeparator11, "BindingNavigatorSeparator11") ' + 'TBDD_CONNECTIONBindingSource + ' + Me.TBDD_CONNECTIONBindingSource.DataMember = "TBDD_CONNECTION" + Me.TBDD_CONNECTIONBindingSource.DataSource = Me.DD_DMSLiteDataSet + ' 'TBPM_PROFILE_CONTROLSBindingSource ' Me.TBPM_PROFILE_CONTROLSBindingSource.DataMember = "TBPM_PROFILE_CONTROLS" @@ -2036,7 +2029,6 @@ Partial Class frmAdministration CType(Me.BindingNavigator1, System.ComponentModel.ISupportInitialize).EndInit() Me.BindingNavigator1.ResumeLayout(False) Me.BindingNavigator1.PerformLayout() - CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).EndInit() Me.TabPage12.ResumeLayout(False) Me.TabPage12.PerformLayout() Me.TabPage2.ResumeLayout(False) @@ -2064,6 +2056,7 @@ Partial Class frmAdministration CType(Me.TBPM_ERROR_LOGBindingNavigator, System.ComponentModel.ISupportInitialize).EndInit() Me.TBPM_ERROR_LOGBindingNavigator.ResumeLayout(False) Me.TBPM_ERROR_LOGBindingNavigator.PerformLayout() + CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBPM_PROFILE_CONTROLSBindingSource, System.ComponentModel.ISupportInitialize).EndInit() Me.StatusStrip1.ResumeLayout(False) Me.StatusStrip1.PerformLayout() @@ -2283,7 +2276,6 @@ Partial Class frmAdministration Friend WithEvents colCHANGED_WHO As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents colCHANGED_WHEN As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents colGUID As DevExpress.XtraGrid.Columns.GridColumn - Friend WithEvents colCONNECTION_ID As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents colSQL_COMMAND As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents ToolStripButton5 As ToolStripButton Friend WithEvents tsBtnCancel As ToolStripButton diff --git a/app/DD_PM_WINDREAM/frmAdministration.resx b/app/DD_PM_WINDREAM/frmAdministration.resx index 6085e53..e034373 100644 --- a/app/DD_PM_WINDREAM/frmAdministration.resx +++ b/app/DD_PM_WINDREAM/frmAdministration.resx @@ -2565,18 +2565,42 @@ der Wertänderungen nutzen wollen: 0, 0 + + Id + + + True + + + 6 + + + Windream Index + True 0 + + Fester Wert + True 1 + + SQL Befehl + + + True + + + 7 + True @@ -2601,24 +2625,6 @@ der Wertänderungen nutzen wollen: 5 - - True - - - 6 - - - True - - - 7 - - - True - - - 8 - 906, 269 @@ -4900,12 +4906,6 @@ der Wertänderungen nutzen wollen: DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - colCONNECTION_ID - - - DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - colSQL_COMMAND @@ -4996,12 +4996,6 @@ der Wertänderungen nutzen wollen: System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - TBDD_CONNECTIONBindingSource - - - System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - viewAvailableProfiles @@ -5122,6 +5116,12 @@ der Wertänderungen nutzen wollen: System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + TBDD_CONNECTIONBindingSource + + + System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + TBPM_PROFILE_CONTROLSBindingSource diff --git a/app/DD_PM_WINDREAM/frmAdministration.vb b/app/DD_PM_WINDREAM/frmAdministration.vb index eb59cb7..0fee886 100644 --- a/app/DD_PM_WINDREAM/frmAdministration.vb +++ b/app/DD_PM_WINDREAM/frmAdministration.vb @@ -684,91 +684,23 @@ Public Class frmAdministration End If End Sub - 'Private Sub Button2_Click(sender As Object, e As EventArgs) - ' Me.txtindexwert_final.Text = "vUserName" - 'End Sub - - 'Private Sub Button3_Click(sender As Object, e As EventArgs) - ' Me.txtindexwert_final.Text = "vDate" - 'End Sub - - 'Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) - ' If CheckBoxPMVEKTOR.Checked Then - ' Me.txtBezeichner.Visible = True - ' Me.cmbIndexe.Visible = False - ' txtBezeichner.Text = "" - ' Me.lblIndexPMVektor.Text = "Bezeichner für VektorIndex eingeben:" - - ' Me.lblIndex.Visible = True - ' Me.lblIndex.Text = "Bitte den festen Wert als String eingeben:" - ' Me.txtindexwert_final.Visible = True - ' Me.grbxSystemStamps.Visible = True - ' Me.txtindexwert_final.Text = "" - ' Me.chkbxfinalIndex.Visible = False - ' Else - ' Me.txtBezeichner.Visible = False - ' Me.cmbIndexe.Visible = True - ' Me.lblIndexPMVektor.Text = "Index wählen:" - - ' Me.lblIndex.Visible = False - ' Me.txtindexwert_final.Visible = False - ' Me.grbxSystemStamps.Visible = False - ' Me.txtindexwert_final.Text = "" - ' Me.chkbxfinalIndex.Visible = False - ' End If - 'End Sub Private Sub btnopen_SQLAdmin_Click(sender As Object, e As EventArgs) Handles btnopen_SQLAdmin.Click frmSQL_Admin.ShowDialog() End Sub Private Sub btnRefreshProfiles_Click(sender As Object, e As EventArgs) Handles btnRefreshProfiles.Click Refresh_Profildaten() End Sub - 'Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) - ' TabControlFinalIndices.Enabled = True - ' tsBtnCancel_old.Visible = True - ' tsBtnCancel.Visible = True - ' cmbIndexe.Items.Clear() - ' cmbIndexe2.Items.Clear() - ' Dim indexe = _windreamPM.GetIndicesByObjecttype(cmbObjekttypen.Text) - ' If indexe IsNot Nothing Then - ' For Each index As String In indexe - ' Me.cmbIndexe.Items.Add(index) - ' Me.cmbIndexe2.Items.Add(index) - ' Next - ' Me.cmbIndexe.SelectedIndex = -1 - ' End If - ' INSERT_ACTIVE = True - 'End Sub Private Sub CancelFinalIndexInsert() - 'TabControlFinalIndices.Enabled = False INSERT_ACTIVE = False - 'tsBtnCancel_old.Visible = False tsBtnCancel.Visible = False BindingNavigatorAddNewItem.Visible = True TBPM_PROFILE_FINAL_INDEXINGBindingSource.CancelEdit() - 'txtBezeichner.Text = String.Empty - 'txtindexwert_final.Text = String.Empty - 'cmbIndexe.SelectedIndex = -1 - 'cmbIndexe2.SelectedIndex = -1 - 'cmbConnection.SelectedIndex = -1 - 'SQL_COMMANDTextBox.Text = String.Empty - 'CheckBoxPMVEKTOR.Checked = False End Sub - 'Private Sub ToolStripButton3_Click(sender As Object, e As EventArgs) - ' Dim i, ID As Integer - ' i = TBPM_PROFILE_FINAL_INDEXINGDataGridView.CurrentRow.Index - ' ID = TBPM_PROFILE_FINAL_INDEXINGDataGridView.Item(0, i).Value - ' If ID > 0 Then - ' TBPM_PROFILE_FINAL_INDEXINGTableAdapter.CmdDelete(ID) - ' End If - ' Refresh_Final_indexe() - ' MsgBox("Index erfolgreich gelöscht!", MsgBoxStyle.Information, "Hinweis:") - ' ' DD_DMSLiteDataSet.TBPM_PROFILE_FINAL_INDEXING.Clear() - 'End Sub + Private Sub ACTIVECheckBox_CheckedChanged(sender As Object, e As EventArgs) Handles ACTIVECheckBox.CheckedChanged If ACTIVECheckBox.Checked Then ACTIVECheckBox.BackColor = Color.Lime @@ -1021,15 +953,48 @@ Public Class frmAdministration obj.Description = description obj.Active = active - obj.Indicies = Windream_Indicies - obj.IndiciesType = Windream_Indicies_Types - obj.IndexName = index + ' Wenn eine neue Zeile hinzugefügt wird, auf StringValue setzen If e.FocusedRowHandle <> GridControl.NewItemRowHandle Then obj = ClassFinalIndex.SetValue(value, obj, index, Windream_Indicies, Windream_Indicies_Types) End If + 'Dim type As Integer = ClassFinalIndex.GetIndexType(index, Windream_Indicies, Windream_Indicies_Types) + 'Dim isCurrentIndexVectorIndex = ClassFinalIndex.IsVectorIndex(type) + + 'Dim indicies As List(Of String) = Windream_Indicies.AsEnumerable _ + ' .Where(Function(currentIndex As String) + ' Dim currentType As Integer = ClassFinalIndex.GetIndexType(currentIndex, Windream_Indicies, Windream_Indicies_Types) + + ' If isCurrentIndexVectorIndex Then + ' Return ClassFinalIndex.IsVectorIndex(currentType) + ' Else + ' Return Not ClassFinalIndex.IsVectorIndex(currentType) + ' End If + ' End Function).ToList() + + 'Dim indexTypes As List(Of Integer) = Windream_Indicies_Types.AsEnumerable _ + ' .Where(Function(currentType) + ' If isCurrentIndexVectorIndex Then + ' Return ClassFinalIndex.IsVectorIndex(currentType) + ' Else + ' Return Not ClassFinalIndex.IsVectorIndex(currentType) + ' End If + ' End Function).ToList() + + + 'obj.Indicies = indicies + 'obj.IndiciesType = indexTypes + obj.Indicies = Windream_Indicies + obj.IndiciesType = Windream_Indicies_Types + obj.IndexName = index + + If Not index Is Nothing Then + Dim indexType As Integer = ClassFinalIndex.GetIndexType(index, Windream_Indicies, Windream_Indicies_Types) + obj.VectorIndex = ClassFinalIndex.IsVectorIndex(indexType) + End If + PropertyGrid1.SelectedObject = obj PropertyGrid1.Refresh() Catch ex As Exception @@ -1072,6 +1037,10 @@ Public Class frmAdministration Exit Sub End If + If obj.VectorIndex Then + value = $"{ClassFinalIndex.PREFIX_VECTOR}{value}" + End If + If INSERT_ACTIVE = True Then Dim sql As String = $"INSERT INTO TBPM_PROFILE_FINAL_INDEXING (PROFIL_ID, CONNECTION_ID, SQL_COMMAND, INDEXNAME, VALUE, ACTIVE, ADDED_WHO) VALUES ({profileId}, {connectionId}, '{sqlCommand}', '{indexName}', '{value}', {active}, '{addedWho}')" @@ -1116,6 +1085,9 @@ Public Class frmAdministration propertyGrid.Refresh() ElseIf e.ChangedItem.Label = "IndexName" Then + Dim type As Integer = ClassFinalIndex.GetIndexType(e.ChangedItem.Value, Windream_Indicies, Windream_Indicies_Types) + obj.VectorIndex = ClassFinalIndex.IsVectorIndex(type) + propertyGrid.Refresh() End If End Sub @@ -1125,10 +1097,12 @@ Public Class frmAdministration Dim row As DataRow = viewFinalIndex.GetDataRow(selectedRowHandle) If Not IsNothing(row) Then - TBPM_PROFILE_FINAL_INDEXINGTableAdapter.CmdDelete(row.Item("GUID")) - Refresh_Final_indexe() + If MsgBox("Wollen Sie den Index wirklich löschen?", MsgBoxStyle.YesNo Or MsgBoxStyle.Question) = MsgBoxResult.Yes Then + TBPM_PROFILE_FINAL_INDEXINGTableAdapter.CmdDelete(row.Item("GUID")) + Refresh_Final_indexe() - MsgBox("Index erfolgreich gelöscht!", MsgBoxStyle.Information, "Hinweis:") + MsgBox("Index erfolgreich gelöscht!", MsgBoxStyle.Information, "Hinweis:") + End If End If End Sub From 88e88f19283ec76b719f7101f247d0f1c4fca1df Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Thu, 12 Jul 2018 11:07:22 +0200 Subject: [PATCH 17/29] jj: refresh table when resetting table layout --- app/DD_PM_WINDREAM/frmMain.vb | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/app/DD_PM_WINDREAM/frmMain.vb b/app/DD_PM_WINDREAM/frmMain.vb index 91b4287..ee5db5f 100644 --- a/app/DD_PM_WINDREAM/frmMain.vb +++ b/app/DD_PM_WINDREAM/frmMain.vb @@ -1198,7 +1198,12 @@ Public Class frmMain End Sub Private Sub TabellenlayoutZurücksetzenToolStripMenuItem_Click_1(sender As Object, e As EventArgs) Handles TabellenlayoutZurücksetzenToolStripMenuItem.Click + ' Layout zurücksetzen ResetLayout() + + ' Ansicht neu laden + Load_Profile_items() + Decide_Load() End Sub From a87ce4deecb343afbe01deb81ed36124e5bf541a Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Thu, 12 Jul 2018 11:38:05 +0200 Subject: [PATCH 18/29] jj: add formsutils for propertygrid to installer --- app/Setup/Product.wxs | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/app/Setup/Product.wxs b/app/Setup/Product.wxs index af32faf..5059990 100644 --- a/app/Setup/Product.wxs +++ b/app/Setup/Product.wxs @@ -98,6 +98,10 @@ + + + + @@ -155,11 +159,12 @@ + - + From 658569dfe9652e3a8b52a41ebd46ebb883d385ae Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Tue, 28 Aug 2018 12:13:56 +0200 Subject: [PATCH 19/29] jj: fix main grid not being expandable with mouse click --- app/DD_PM_WINDREAM/frmMain.vb | 27 +++------------------------ 1 file changed, 3 insertions(+), 24 deletions(-) diff --git a/app/DD_PM_WINDREAM/frmMain.vb b/app/DD_PM_WINDREAM/frmMain.vb index ee5db5f..dfcee38 100644 --- a/app/DD_PM_WINDREAM/frmMain.vb +++ b/app/DD_PM_WINDREAM/frmMain.vb @@ -1285,9 +1285,11 @@ Public Class frmMain Private Sub GridView_Docs_MouseDown(sender As Object, e As MouseEventArgs) Handles GridView_Docs.MouseDown Dim view As GridView = sender Dim hi As GridHitInfo = view.CalcHitInfo(e.Location) + Dim groupRowButtonClicked = (hi.HitTest = GridHitTest.RowGroupButton) + GridCursorLocation = e.Location ' wenn in eine Group Row Doppelt geklickt wurde.. - If hi.InGroupRow Then + If hi.InGroupRow And Not groupRowButtonClicked Then ' Ein/Ausklappen verhindern DXMouseEventArgs.GetMouseArgs(e).Handled = True GridViewItem_Clicked = "GROUP" @@ -1301,27 +1303,4 @@ Public Class frmMain GridViewItem_Clicked = Nothing End If End Sub - - 'Private Sub GridView_Docs_RowStyle(sender As Object, e As RowStyleEventArgs) Handles GridView_Docs.RowStyle - ' Dim view As GridView = TryCast(sender, GridView) - ' Dim row As DataRow = view.GetDataRow(e.RowHandle) - - ' If IsNothing(row) Then - ' Exit Sub - ' End If - - ' Dim state = row.Item("TL_STATE") - - ' e.HighPriority = True - - ' Select Case state - ' Case 1 - ' ' e.Appearance.BackColor = Color.LightSalmon - ' Case 2 - ' ' e.Appearance.BackColor = Color.LightGoldenrodYellow - ' Case 3 - ' ' e.Appearance.BackColor = Color.LightGreen - ' End Select - - 'End Sub End Class \ No newline at end of file From ad4d416c931f75244d3bc9436c2162647c16e1d3 Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Tue, 28 Aug 2018 14:04:39 +0200 Subject: [PATCH 20/29] jj: Fix validation to allow for empty strings to be set as an index value --- app/DD_PM_WINDREAM/ClassPMWindream.vb | 7 ++++--- app/DD_PM_WINDREAM/frmValidator.vb | 3 ++- 2 files changed, 6 insertions(+), 4 deletions(-) diff --git a/app/DD_PM_WINDREAM/ClassPMWindream.vb b/app/DD_PM_WINDREAM/ClassPMWindream.vb index a2a4bdb..80da517 100644 --- a/app/DD_PM_WINDREAM/ClassPMWindream.vb +++ b/app/DD_PM_WINDREAM/ClassPMWindream.vb @@ -45,9 +45,10 @@ Public Class ClassPMWindream Dim itsType As Type = aValue.GetType If itsType Is GetType(String) Then - If Not aValue = "" Then - Return True - End If + ' Änderung 28.08.2018: Auch ein leerer String gilt als Wert, damit indexfelder auch geleert werden können + 'If Not aValue = "" Then + ' Return True + 'End If Return False Else diff --git a/app/DD_PM_WINDREAM/frmValidator.vb b/app/DD_PM_WINDREAM/frmValidator.vb index 18bbcdd..c8f33bf 100644 --- a/app/DD_PM_WINDREAM/frmValidator.vb +++ b/app/DD_PM_WINDREAM/frmValidator.vb @@ -2518,7 +2518,8 @@ Public Class frmValidator missing = True errmessage = "Please Choose an entry out of ComboBox '" & cmb.Name & "'" Exit For - ElseIf cmb.SelectedIndex <> -1 Then + 'ElseIf cmb.SelectedIndex <> -1 Then + Else 'Änderung 28.08.2018: Ein leerer Wert in der Combobox wird in den Index geschrieben input = cmb.Text Dim wertWD As String 'den aktuellen Wert in windream auslesen From c7c1ff91a4cd637b484dc0ca49b9463c3e103d39 Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Tue, 28 Aug 2018 14:08:28 +0200 Subject: [PATCH 21/29] jj: Version 1.9.4.3 --- app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb b/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb index ce5292b..51a87aa 100644 --- a/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb +++ b/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - + From 240657097cc4f3fe99c0e7e3a13113d21cb333c2 Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Mon, 17 Sep 2018 14:59:57 +0200 Subject: [PATCH 22/29] jj: clear form designer propertygrid on form closing --- app/DD_PM_WINDREAM/frmFormDesigner.vb | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/app/DD_PM_WINDREAM/frmFormDesigner.vb b/app/DD_PM_WINDREAM/frmFormDesigner.vb index a9c7a8a..b06803a 100644 --- a/app/DD_PM_WINDREAM/frmFormDesigner.vb +++ b/app/DD_PM_WINDREAM/frmFormDesigner.vb @@ -1,4 +1,5 @@ -Imports DD_LIB_Standards +Imports System.ComponentModel +Imports DD_LIB_Standards Public Class frmFormDesigner Public ProfileId As Integer @@ -92,6 +93,9 @@ Public Class frmFormDesigner ' Setzt den typ des SQL-Befehls für frmSQL_DESIGNER CURRENT_DESIGN_TYPE = "FINAL_INDEX" + + ' Beim Schließen das PropertyGrid leeren + pgControls.SelectedObject = Nothing End Sub ''' From f8f2ee098dbf397ee4736d7c1195573b5330cde4 Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Mon, 17 Sep 2018 15:36:47 +0200 Subject: [PATCH 23/29] jj: fix resetting layout, remove .default layout file --- .../DD_PM_WINDREAM/DesignTimeBuild/.dtbcache | Bin 218 -> 218 bytes app/DD_PM_WINDREAM/frmMain.vb | 32 +++++++++++------- 2 files changed, 20 insertions(+), 12 deletions(-) diff --git a/app/.vs/DD_PM_WINDREAM/DesignTimeBuild/.dtbcache b/app/.vs/DD_PM_WINDREAM/DesignTimeBuild/.dtbcache index 715c91bb439b5d68c69962a8f4a3c4d0343f04fc..671ed4a1339e1ed6980c0b51ee8bfb3acd087d30 100644 GIT binary patch delta 51 zcmcb`c#Cm@h-erC1A{Ar6+;Yz7egvT9uTH7cuh2vpBT|3P{2^ckk63Ca7Vr_5QG6f C`wfNw delta 48 zcmcb`c#Cm@h-@4K1A{Ar6+;X|Fhep!215};Dnlki5|Aun@SUhB&+5+L$q+KpwG{vb C=nAp` diff --git a/app/DD_PM_WINDREAM/frmMain.vb b/app/DD_PM_WINDREAM/frmMain.vb index dfcee38..34617a7 100644 --- a/app/DD_PM_WINDREAM/frmMain.vb +++ b/app/DD_PM_WINDREAM/frmMain.vb @@ -186,12 +186,6 @@ Public Class frmMain Private Sub SaveGridLayout() Try Dim xml As String = GetXML_LayoutName() - Dim xmlDefault = xml & ".default" - - If IO.File.Exists(xmlDefault) = False Then - GridView_Docs.SaveLayoutToXml(xmlDefault, OptionsLayoutBase.FullLayout) - End If - GridView_Docs.SaveLayoutToXml(xml, OptionsLayoutBase.FullLayout) Catch ex As Exception ClassLogger.Add("Error while saving GridLayout: " & ex.Message) @@ -210,10 +204,24 @@ Public Class frmMain Private Sub ResetLayout() Try Dim xml As String = GetXML_LayoutName() - Dim xmlDefault = xml & ".default" IO.File.Delete(xml) - GridView_Docs.RestoreLayoutFromXml(xmlDefault, OptionsLayoutBase.FullLayout) + GridView_Docs.Columns.Clear() + GridView_Docs.PopulateColumns() + + GridView_Docs.Columns.Item("PROFILE_ID").Visible = False + GridView_Docs.Columns.Item("GUID").Visible = False + GridView_Docs.Columns.Item("FULL_FILE_PATH").Visible = False + GridView_Docs.Columns.Item("DOC_ID").Visible = False + GridView_Docs.Columns.Item("TL_STATE").Visible = False + GridView_Docs.Columns.Item("ICON").MaxWidth = 24 + GridView_Docs.Columns.Item("ICON").MinWidth = 24 + GridView_Docs.Columns.Item("ICON").AppearanceCell.BackColor = Color.White + GridView_Docs.Columns.Item("ICON").Fixed = FixedStyle.Left + GridView_Docs.Columns("Last edited").DisplayFormat.FormatType = FormatType.DateTime + GridView_Docs.Columns("Last edited").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss" + GridView_Docs.Columns.Item("PROFILE_GROUP_TEXT").Visible = False + GridView_Docs.Columns.Item("PROFILE_GROUP_COLOR").Visible = False Catch ex As Exception ClassLogger.Add("Error while resetting layout: " & ex.Message) End Try @@ -1100,10 +1108,9 @@ Public Class frmMain GridView_Docs.Columns.Item("PROFILE_GROUP_TEXT").GroupIndex = 0 GridView_Docs.Columns.Item("PROFILE_GROUP_TEXT").Visible = False GridView_Docs.Columns.Item("PROFILE_GROUP_COLOR").Visible = False - For I = 0 To GridView_Docs.GroupCount - 1 - Dim v = GridView_Docs.GroupedColumns(I).ToString - Dim ii = Nothing - GridView_Docs.GroupedColumns(I).Tag = GridView_Docs.Columns.Item("PROFILE_ID") + For index = 0 To GridView_Docs.GroupCount - 1 + Dim v = GridView_Docs.GroupedColumns(index).ToString + GridView_Docs.GroupedColumns(index).Tag = GridView_Docs.Columns.Item("PROFILE_ID") Next GridView_Docs.Columns.Item("PROFILE_ID").Visible = False @@ -1200,6 +1207,7 @@ Public Class frmMain Private Sub TabellenlayoutZurücksetzenToolStripMenuItem_Click_1(sender As Object, e As EventArgs) Handles TabellenlayoutZurücksetzenToolStripMenuItem.Click ' Layout zurücksetzen ResetLayout() + SaveGridLayout() ' Ansicht neu laden Load_Profile_items() From 55a7c994174d360c43e749e09a79827365574a3e Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Mon, 17 Sep 2018 15:53:44 +0200 Subject: [PATCH 24/29] jj: Version 1.9.4.4 --- app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb b/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb index 51a87aa..c94d30a 100644 --- a/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb +++ b/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - + From 35c46987e9327b18d8996d64d865fd74f45b5e77 Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Tue, 18 Sep 2018 16:44:12 +0200 Subject: [PATCH 25/29] jj: tweak final index table, fix sql command --- .../frmAdministration.Designer.vb | 36 ++++++------ app/DD_PM_WINDREAM/frmAdministration.resx | 56 ++++++++++--------- app/DD_PM_WINDREAM/frmAdministration.vb | 11 +++- 3 files changed, 58 insertions(+), 45 deletions(-) diff --git a/app/DD_PM_WINDREAM/frmAdministration.Designer.vb b/app/DD_PM_WINDREAM/frmAdministration.Designer.vb index bad09d9..053388c 100644 --- a/app/DD_PM_WINDREAM/frmAdministration.Designer.vb +++ b/app/DD_PM_WINDREAM/frmAdministration.Designer.vb @@ -159,14 +159,14 @@ Partial Class frmAdministration Me.gridFinalIndex = New DevExpress.XtraGrid.GridControl() Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.viewFinalIndex = New DevExpress.XtraGrid.Views.Grid.GridView() + Me.colGUID = New DevExpress.XtraGrid.Columns.GridColumn() Me.colINDEXNAME = New DevExpress.XtraGrid.Columns.GridColumn() Me.colVALUE = New DevExpress.XtraGrid.Columns.GridColumn() + Me.colSQL_COMMAND = New DevExpress.XtraGrid.Columns.GridColumn() Me.colADDED_WHO = New DevExpress.XtraGrid.Columns.GridColumn() Me.colADDED_WHEN = New DevExpress.XtraGrid.Columns.GridColumn() Me.colCHANGED_WHO = New DevExpress.XtraGrid.Columns.GridColumn() Me.colCHANGED_WHEN = New DevExpress.XtraGrid.Columns.GridColumn() - Me.colGUID = New DevExpress.XtraGrid.Columns.GridColumn() - Me.colSQL_COMMAND = New DevExpress.XtraGrid.Columns.GridColumn() Me.PropertyGrid1 = New System.Windows.Forms.PropertyGrid() Me.BindingNavigator1 = New System.Windows.Forms.BindingNavigator(Me.components) Me.BindingNavigatorAddNewItem = New System.Windows.Forms.ToolStripButton() @@ -1285,6 +1285,12 @@ Partial Class frmAdministration Me.viewFinalIndex.OptionsBehavior.ReadOnly = True Me.viewFinalIndex.OptionsView.ShowGroupPanel = False ' + 'colGUID + ' + resources.ApplyResources(Me.colGUID, "colGUID") + Me.colGUID.FieldName = "GUID" + Me.colGUID.Name = "colGUID" + ' 'colINDEXNAME ' resources.ApplyResources(Me.colINDEXNAME, "colINDEXNAME") @@ -1297,41 +1303,35 @@ Partial Class frmAdministration Me.colVALUE.FieldName = "VALUE" Me.colVALUE.Name = "colVALUE" ' + 'colSQL_COMMAND + ' + resources.ApplyResources(Me.colSQL_COMMAND, "colSQL_COMMAND") + Me.colSQL_COMMAND.FieldName = "SQL_COMMAND" + Me.colSQL_COMMAND.Name = "colSQL_COMMAND" + ' 'colADDED_WHO ' + resources.ApplyResources(Me.colADDED_WHO, "colADDED_WHO") Me.colADDED_WHO.FieldName = "ADDED_WHO" Me.colADDED_WHO.Name = "colADDED_WHO" - resources.ApplyResources(Me.colADDED_WHO, "colADDED_WHO") ' 'colADDED_WHEN ' + resources.ApplyResources(Me.colADDED_WHEN, "colADDED_WHEN") Me.colADDED_WHEN.FieldName = "ADDED_WHEN" Me.colADDED_WHEN.Name = "colADDED_WHEN" - resources.ApplyResources(Me.colADDED_WHEN, "colADDED_WHEN") ' 'colCHANGED_WHO ' + resources.ApplyResources(Me.colCHANGED_WHO, "colCHANGED_WHO") Me.colCHANGED_WHO.FieldName = "CHANGED_WHO" Me.colCHANGED_WHO.Name = "colCHANGED_WHO" - resources.ApplyResources(Me.colCHANGED_WHO, "colCHANGED_WHO") ' 'colCHANGED_WHEN ' + resources.ApplyResources(Me.colCHANGED_WHEN, "colCHANGED_WHEN") Me.colCHANGED_WHEN.FieldName = "CHANGED_WHEN" Me.colCHANGED_WHEN.Name = "colCHANGED_WHEN" - resources.ApplyResources(Me.colCHANGED_WHEN, "colCHANGED_WHEN") - ' - 'colGUID - ' - resources.ApplyResources(Me.colGUID, "colGUID") - Me.colGUID.FieldName = "GUID" - Me.colGUID.Name = "colGUID" - ' - 'colSQL_COMMAND - ' - resources.ApplyResources(Me.colSQL_COMMAND, "colSQL_COMMAND") - Me.colSQL_COMMAND.FieldName = "SQL_COMMAND" - Me.colSQL_COMMAND.Name = "colSQL_COMMAND" ' 'PropertyGrid1 ' diff --git a/app/DD_PM_WINDREAM/frmAdministration.resx b/app/DD_PM_WINDREAM/frmAdministration.resx index e034373..6181b0a 100644 --- a/app/DD_PM_WINDREAM/frmAdministration.resx +++ b/app/DD_PM_WINDREAM/frmAdministration.resx @@ -2568,12 +2568,6 @@ der Wertänderungen nutzen wollen: Id - - True - - - 6 - Windream Index @@ -2599,31 +2593,43 @@ der Wertänderungen nutzen wollen: True - 7 + 2 + + + Hinzugefügt Wer True - 2 + 3 + + + Hinzugefügt Wann True - 3 + 4 + + + Geändert Wer True - 4 + 5 + + + Geändert Wann True - 5 + 6 906, 269 @@ -3116,7 +3122,7 @@ der Wertänderungen nutzen wollen: 3, 3, 3, 3 - 1235, 448 + 1235, 445 1 @@ -4428,7 +4434,7 @@ der Wertänderungen nutzen wollen: True - 270 + 185 7, 16 @@ -4864,6 +4870,12 @@ der Wertänderungen nutzen wollen: DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + colGUID + + + DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + colINDEXNAME @@ -4876,6 +4888,12 @@ der Wertänderungen nutzen wollen: DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + colSQL_COMMAND + + + DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + colADDED_WHO @@ -4900,18 +4918,6 @@ der Wertänderungen nutzen wollen: DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - colGUID - - - DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - colSQL_COMMAND - - - DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - BindingNavigatorAddNewItem diff --git a/app/DD_PM_WINDREAM/frmAdministration.vb b/app/DD_PM_WINDREAM/frmAdministration.vb index 0fee886..dd851b9 100644 --- a/app/DD_PM_WINDREAM/frmAdministration.vb +++ b/app/DD_PM_WINDREAM/frmAdministration.vb @@ -1016,7 +1016,14 @@ Public Class frmAdministration If Not IsNothing(obj) Then - Dim value = ClassFinalIndex.GetValue(obj, obj.IndexName, Windream_Indicies, Windream_Indicies_Types, obj.VectorIndex) + Dim value + + If obj.SQLCommand.Value <> String.Empty Then + value = "SQL-Command" + Else + value = ClassFinalIndex.GetValue(obj, obj.IndexName, Windream_Indicies, Windream_Indicies_Types, obj.VectorIndex) + End If + Dim guid = obj.GUID Dim profileId As Integer = PROFILGUIDTextBox.Text Dim connectionId As Integer = obj.ConnectionId @@ -1080,7 +1087,7 @@ Public Class frmAdministration If value.Value <> String.Empty Then obj.ConnectionId = CURRENT_SQL_CON - obj = ClassFinalIndex.SetValue("", obj, obj.IndexName, Windream_Indicies, Windream_Indicies_Types) + obj.StringValue = "SQL-Command" End If propertyGrid.Refresh() From 1e9885a8e23b1f3ed4ab03ad4972493614102821 Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Tue, 18 Sep 2018 16:44:48 +0200 Subject: [PATCH 26/29] jj: Version 1.9.4.5 --- app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb b/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb index c94d30a..a8c061b 100644 --- a/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb +++ b/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - + From 83e34d98fb3881563e4e83cef00f73cb4fb8cde7 Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Wed, 19 Sep 2018 15:03:11 +0200 Subject: [PATCH 27/29] jj: Allow same version upgrades, respect revision version number --- app/Setup/Product.wxs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/app/Setup/Product.wxs b/app/Setup/Product.wxs index 5059990..59447a2 100644 --- a/app/Setup/Product.wxs +++ b/app/Setup/Product.wxs @@ -24,7 +24,7 @@ From 932bf2af7ce1cc2c06eee52e62ef58a4f2f3ac7d Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Thu, 20 Sep 2018 14:25:37 +0200 Subject: [PATCH 28/29] jj: fix IsNotEmpty --- app/DD_PM_WINDREAM/ClassPMWindream.vb | 65 +++++++++++++-------------- 1 file changed, 31 insertions(+), 34 deletions(-) diff --git a/app/DD_PM_WINDREAM/ClassPMWindream.vb b/app/DD_PM_WINDREAM/ClassPMWindream.vb index 80da517..6896043 100644 --- a/app/DD_PM_WINDREAM/ClassPMWindream.vb +++ b/app/DD_PM_WINDREAM/ClassPMWindream.vb @@ -40,24 +40,22 @@ Public Class ClassPMWindream MyBase.New() End Sub Private Function IsNotEmpty(ByVal aValue As Object) - If aValue IsNot Nothing Then - Dim itsType As Type = aValue.GetType - If itsType Is GetType(String) Then + Return True - ' Änderung 28.08.2018: Auch ein leerer String gilt als Wert, damit indexfelder auch geleert werden können - 'If Not aValue = "" Then - ' Return True - 'End If + 'If TypeOf aValue Is String Then + ' ' Änderung 28.08.2018: Auch ein leerer String gilt als Wert, damit indexfelder auch geleert werden können + ' 'If Not aValue = "" Then + ' ' Return True + ' 'End If - Return False - Else - Return True - End If + ' Return False + 'Else + ' Return True + 'End If Else Return False End If - End Function Private Function return_type(ByVal _wert As Object) Return _wert.GetType @@ -134,7 +132,8 @@ Public Class ClassPMWindream ' den Variablentyp (String, Integer, ...) auslesen vType = oAttribute.getVariableValue("dwAttrType") ' wenn in aValues an Position i ein Wert steht - If Me.IsNotEmpty(aValues(i)) Then + + If IsNotEmpty(aValues(i)) Then Dim _int As Boolean = False Dim _date As Boolean = False Dim _dbl As Boolean = False @@ -440,27 +439,25 @@ Public Class ClassPMWindream Dim vType = oAttribute.getVariableValue("dwAttrType") 'MsgBox("Typ: " & vType.ToString, MsgBoxStyle.Critical, "_state: " & _state.ToString) ' wenn in aValues an Position i ein Wert steht - If Me.IsNotEmpty(Indexname) Then - 'MsgBox(oDocument.aName & vbNewLine & aValues(i) & vbNewLine & vType, MsgBoxStyle.Exclamation, "Zeile 87") - Dim value = _state - Dim convertValue - 'Den Typ des Index-Feldes auslesen - If LogErrorsOnly = False Then ClassLogger.Add(">> Typ des windream-Indexes: " & vType.ToString) - Select Case (vType) - Case WMObjectVariableValueTypeBoolean - convertValue = CBool(value) - Case Else - ClassLogger.Add(">> Typ des windream-Indexes ist nicht BOOLEAN also Abbruch:") - End Select - '############################################################################################ - '####################### Der eigentliche Indexierungsvorgang ################################ - - oDocument.SetVariableValue(Indexname, convertValue) - If LogErrorsOnly = False Then ClassLogger.Add(">> Index '" & Indexname & "' wurde gesetzt") - oDocument.Save() - oDocument.unlock() - ClassLogger.Add(">> DATEI wurde erfolgreich als fertig nachindexiert gekennzeichnet") - End If + 'MsgBox(oDocument.aName & vbNewLine & aValues(i) & vbNewLine & vType, MsgBoxStyle.Exclamation, "Zeile 87") + Dim value = _state + Dim convertValue + 'Den Typ des Index-Feldes auslesen + If LogErrorsOnly = False Then ClassLogger.Add(">> Typ des windream-Indexes: " & vType.ToString) + Select Case (vType) + Case WMObjectVariableValueTypeBoolean + convertValue = CBool(value) + Case Else + ClassLogger.Add(">> Typ des windream-Indexes ist nicht BOOLEAN also Abbruch:") + End Select + '############################################################################################ + '####################### Der eigentliche Indexierungsvorgang ################################ + + oDocument.SetVariableValue(Indexname, convertValue) + If LogErrorsOnly = False Then ClassLogger.Add(">> Index '" & Indexname & "' wurde gesetzt") + oDocument.Save() + oDocument.unlock() + ClassLogger.Add(">> DATEI wurde erfolgreich als fertig nachindexiert gekennzeichnet") Else ClassLogger.Add(">> Dokument ist gesperrt, Indexierung erst im nächsten Durchlauf!") End If From ed0759d590b89936d4170e68357eedf63a76123f Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Thu, 20 Sep 2018 14:33:40 +0200 Subject: [PATCH 29/29] jj: fix installer crash when selecting folder --- app/Setup/Product.wxs | 1 + 1 file changed, 1 insertion(+) diff --git a/app/Setup/Product.wxs b/app/Setup/Product.wxs index 59447a2..8a67d92 100644 --- a/app/Setup/Product.wxs +++ b/app/Setup/Product.wxs @@ -179,6 +179,7 @@ +