diff --git a/app/DD_PM_WINDREAM/App.config b/app/DD_PM_WINDREAM/App.config index 9083b80..705200f 100644 --- a/app/DD_PM_WINDREAM/App.config +++ b/app/DD_PM_WINDREAM/App.config @@ -54,7 +54,7 @@ 0, 0 - 558 + 563 Normal diff --git a/app/DD_PM_WINDREAM/ClassAllgemeineFunktionen.vb b/app/DD_PM_WINDREAM/ClassAllgemeineFunktionen.vb index 6061aec..9764b8e 100644 --- a/app/DD_PM_WINDREAM/ClassAllgemeineFunktionen.vb +++ b/app/DD_PM_WINDREAM/ClassAllgemeineFunktionen.vb @@ -49,7 +49,7 @@ Public Class ClassAllgemeineFunktionen LOGGER.Debug("User logged in....") Return True Else - LOGGER.Info(" >> User could not be logged in/out....") + LOGGER.Info("User could not be logged in/out....") Return False End If Catch ex As Exception @@ -156,7 +156,7 @@ Public Class ClassAllgemeineFunktionen Dim xffres As String = Path & "\" & Stammname & ".xffres" If file_exists(xffres, clsWD) = True Then System.IO.File.Delete(xffres) - LOGGER.Info(">> Datei " & xffres & " erfolgreich gelöscht") + LOGGER.Info("Datei " & xffres & " erfolgreich gelöscht") Return True Else Return Nothing @@ -164,7 +164,7 @@ Public Class ClassAllgemeineFunktionen Catch ex As Exception LOGGER.Error(ex) LOGGER.Info(" Fehler bei Delete_xffres", True) - LOGGER.Info(">> Fehlermeldung: " & ex.Message) + LOGGER.Info("Fehlermeldung: " & ex.Message) End Try End Function 'Public Function Delete_File(originFile As String) @@ -172,7 +172,7 @@ Public Class ClassAllgemeineFunktionen ' If file_exists(originFile, False) = True Then ' System.IO.File.Delete(originFile) - ' LOGGER.Info(">> Manuelles Löschen: Datei " & originFile & " erfolgreich gelöscht", False) + ' LOGGER.Info("Manuelles Löschen: Datei " & originFile & " erfolgreich gelöscht", False) ' Return True ' Else ' MsgBox("Die Datei konnte nicht gelsöcht werden. File NOT EXISTS", MsgBoxStyle.Exclamation) @@ -180,7 +180,7 @@ Public Class ClassAllgemeineFunktionen ' End If ' Catch ex As Exception ' LOGGER.Info(" Fehler bei Delete_File", True) - ' LOGGER.Info(">> Fehlermeldung: " & ex.Message) + ' LOGGER.Info("Fehlermeldung: " & ex.Message) ' End Try 'End Function @@ -201,18 +201,18 @@ Public Class ClassAllgemeineFunktionen version = version + 1 Loop My.Computer.FileSystem.MoveFile(vMove_File, _Ziel) - LOGGER.Info(">> Datei erfolgreich verschoben - Ziel: " & _Ziel) + LOGGER.Info("Datei erfolgreich verschoben - Ziel: " & _Ziel) Else - LOGGER.Info(">> Ziel und Quellpfad sind identisch!") + LOGGER.Info("Ziel und Quellpfad sind identisch!") End If Return "" Catch ex As Exception LOGGER.Error(ex) - LOGGER.Info(" Fehler bei Move2Folder", True) - LOGGER.Info(">> Fehlermeldung") - LOGGER.Info(">>" & ex.Message) - Insert_LogEntry($"ERROR >> {ex.Message}") + LOGGER.Info("Fehler bei Move2Folder", True) + LOGGER.Info("Fehlermeldung") + LOGGER.Info(ex.Message) + Insert_LogEntry($"ERROR {ex.Message}") Return ex.Message End Try End Function @@ -298,7 +298,7 @@ Public Class ClassAllgemeineFunktionen Catch ex As Exception LOGGER.Error(ex) MsgBox("Unvorhergesehener Fehler bei Execute_Scalar_SQLServer" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler bei Ausführen sql:") - Insert_LogEntry($"ERROR Execute_Scalar_SQLServer>> {ex.Message}") + Insert_LogEntry($"ERROR Execute_Scalar_SQLServer{ex.Message}") LOGGER.Info(" - Unvorhergesehener Fehler bei Execute_Scalar_SQLServer" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler: " & vbNewLine & ex.Message) LOGGER.Info(" - SQL: " & vsql_statement) LOGGER.Info(" - Connection: " & vconnectionString) @@ -332,7 +332,7 @@ Public Class ClassAllgemeineFunktionen Catch ex As Exception LOGGER.Error(ex) MsgBox("Unvorhergesehener Fehler bei Execute_Scalar_Oracle" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler bei Ausführen sql:") - Insert_LogEntry($"ERROR Execute_Scalar_Oracle>> {ex.Message}") + Insert_LogEntry($"ERROR Execute_Scalar_Oracle{ex.Message}") LOGGER.Info(" - Unvorhergesehener Fehler bei Execute_Scalar_Oracle" & vbNewLine & "Automatischer Index (j/n): " & check.ToString & vbNewLine & "Fehler: " & vbNewLine & ex.Message) LOGGER.Info(" - SQL: " & vsql_statement) LOGGER.Info(" - Connection: " & vconnectionString) diff --git a/app/DD_PM_WINDREAM/ClassControlCreator.vb b/app/DD_PM_WINDREAM/ClassControlCreator.vb index 849671c..6132b66 100644 --- a/app/DD_PM_WINDREAM/ClassControlCreator.vb +++ b/app/DD_PM_WINDREAM/ClassControlCreator.vb @@ -577,7 +577,7 @@ Public Class ClassControlCreator CURRENT_CONTROL_ID = row("GUID") CURR_CON_ID = IIf(IsDBNull(row("CONNECTION_ID")), 0, row("CONNECTION_ID")) If CURR_CON_ID = 0 Then - LOGGER.Info(" >> CONNECTION NOT DEFINED - CTRL_GUID:" & CURRENT_CONTROL_ID) + LOGGER.Info("CONNECTION NOT DEFINED - CTRL_GUID:" & CURRENT_CONTROL_ID) End If CURR_SELECT_CONTROL = IIf(IsDBNull(row("SQL_UEBERPRUEFUNG")), "", row("SQL_UEBERPRUEFUNG")) diff --git a/app/DD_PM_WINDREAM/ClassDatabase.vb b/app/DD_PM_WINDREAM/ClassDatabase.vb index 0bbad4d..ca7aaba 100644 --- a/app/DD_PM_WINDREAM/ClassDatabase.vb +++ b/app/DD_PM_WINDREAM/ClassDatabase.vb @@ -61,12 +61,12 @@ Public Class ClassDatabase Try Dim SQLconnect As New SqlClient.SqlConnection Dim SQLcommand As SqlClient.SqlCommand - LOGGER.Debug(">>> ReturnDatatable: " & Select_anweisung) + LOGGER.Debug("ReturnDatatable: " & Select_anweisung) SQLconnect.ConnectionString = SQLSERVERConnectionString SQLconnect.Open() SQLcommand = SQLconnect.CreateCommand SQLcommand.CommandText = Select_anweisung - LOGGER.Debug(">>> Execute ReturnDatatable: " & Select_anweisung) + LOGGER.Debug("Execute ReturnDatatable: " & Select_anweisung) Dim adapter1 As SqlClient.SqlDataAdapter = New SqlClient.SqlDataAdapter(SQLcommand) Dim dt As DataTable = New DataTable() adapter1.Fill(dt) @@ -74,16 +74,13 @@ Public Class ClassDatabase Return dt Catch ex As Exception LOGGER.Warn($"Unexpected Error in Return_Datatable: {ex.Message} [{Select_anweisung}]") - If userInput = True Then - MsgBox("Error in Return Datatable - Error-Message:" & vbNewLine & ex.Message & vbNewLine & "SQL-Command:" & vbNewLine & Select_anweisung, MsgBoxStyle.Critical) - End If Return Nothing End Try End Function Public Shared Function Return_Datatable_ConId(SQLCommand As String, ConnID As Integer, Optional userInput As Boolean = False) Try Dim oConnString = Get_ConnectionString(ConnID) - LOGGER.Debug(">>> ReturnDatatable: " & SQLCommand) + LOGGER.Debug("ReturnDatatable: " & SQLCommand) Dim oSQLconnect As New SqlClient.SqlConnection Dim oSQLcommand As SqlClient.SqlCommand oSQLconnect.ConnectionString = oConnString @@ -106,7 +103,7 @@ Public Class ClassDatabase End Function Public Shared Function Return_Datatable_ConStr(SQLCommand As String, ConNStr As String, Optional userInput As Boolean = False) Try - LOGGER.Debug(">>> ReturnDatatable: " & SQLCommand) + LOGGER.Debug("ReturnDatatable: " & SQLCommand) Dim oSQLconnect As New SqlClient.SqlConnection Dim oSQLcommand As SqlClient.SqlCommand oSQLconnect.ConnectionString = ConNStr @@ -216,7 +213,7 @@ Public Class ClassDatabase SQLcommand = SQLconnect.CreateCommand 'Update Last Created Record in Foo SQLcommand.CommandText = cmdscalar - LOGGER.Debug(">>> Execute Scalar: " & cmdscalar) + LOGGER.Debug("Execute Scalar: " & cmdscalar) result = SQLcommand.ExecuteScalar() SQLcommand.Dispose() SQLconnect.Close() diff --git a/app/DD_PM_WINDREAM/ClassFinalizeDoc.vb b/app/DD_PM_WINDREAM/ClassFinalizeDoc.vb index 24da374..f6f7a6d 100644 --- a/app/DD_PM_WINDREAM/ClassFinalizeDoc.vb +++ b/app/DD_PM_WINDREAM/ClassFinalizeDoc.vb @@ -25,7 +25,7 @@ '' alle Vorkommen innerhalbd er Namenkonvention durchlaufen 'For Each element As System.Text.RegularExpressions.Match In elemente ' Try - ' If LogErrorsOnly = False Then LOGGER.Info(" >> element in RegeX: " & element.Value) + ' If LogErrorsOnly = False Then LOGGER.Info(" element in RegeX: " & element.Value) ' Dim WDINDEXNAME = element.Value.Substring(2, element.Value.Length - 3) ' Dim wertWD = WMObject.GetVariableValue(WDINDEXNAME) ' If Not IsNothing(wertWD) Then @@ -41,7 +41,7 @@ sql_Statement = clsPatterns.ReplaceInternalValues(sql_Statement) sql_Statement = clsPatterns.ReplaceWindreamIndicies(sql_Statement, WMObject) - LOGGER.Debug(">>> sql after ReplaceAllValues: " & sql_Statement) + LOGGER.Debug("sql after ReplaceAllValues: " & sql_Statement) Dim dynamic_value = ClassDatabase.Execute_Scalar(sql_Statement, CONNECTION_STRING, True) If Not IsNothing(dynamic_value) Then value = dynamic_value @@ -107,7 +107,7 @@ End If Catch ex As Exception LOGGER.Error(ex) - LOGGER.Info(">> unexpected error in Write_Final_Metadata: " & ex.Message.ToString, True) + LOGGER.Info("unexpected error in Write_Final_Metadata: " & ex.Message.ToString, True) Return False End Try End Function @@ -147,7 +147,7 @@ End If 'Catch ex As Exception - ' LOGGER.Info(">> Unvorhergesehener Fehler bei Indexiere_File: " & ex.Message.ToString, True) + ' LOGGER.Info("Unvorhergesehener Fehler bei Indexiere_File: " & ex.Message.ToString, True) ' Return Err() 'End Try End Function @@ -200,7 +200,7 @@ PM_String = "DD-PM#" & Bezeichner & "#" & input & "#" & USER_USERNAME & "#" & Now.ToString Catch ex As Exception LOGGER.Error(ex) - LOGGER.Info(">> Fehler in Return_PM_VEKTOR: " & ex.Message, True) + LOGGER.Info("Fehler in Return_PM_VEKTOR: " & ex.Message, True) PM_String = "DD-PM ERROR: " & ex.Message End Try Return PM_String @@ -217,7 +217,7 @@ Catch ex As Exception LOGGER.Error(ex) - LOGGER.Info(">> Fehler in Return_LOGString: " & ex.Message, True) + LOGGER.Info("Fehler in Return_LOGString: " & ex.Message, True) PM_String = "DD-PM ERROR: " & ex.Message End Try Return PM_String diff --git a/app/DD_PM_WINDREAM/ClassIDBData.vb b/app/DD_PM_WINDREAM/ClassIDBData.vb index 93314ed..88408f1 100644 --- a/app/DD_PM_WINDREAM/ClassIDBData.vb +++ b/app/DD_PM_WINDREAM/ClassIDBData.vb @@ -131,14 +131,14 @@ End Function - Public Function SetVariableValue(oAttributeName As String, oNewValue As Object, Optional CheckDeleted As Boolean = False) + Public Function SetVariableValue(oAttributeName As String, oNewValue As Object, Optional CheckDeleted As Boolean = False, Optional oIDBTyp As Integer = 0) Try Dim omytype = oNewValue.GetType.ToString If omytype = "System.Data.DataTable" Then Dim oDTMyNewValues As DataTable = oNewValue If CheckDeleted = True Then - Dim oOldAttributeResult = GetVariableValue(oAttributeName) + Dim oOldAttributeResult = GetVariableValue(oAttributeName, oIDBTyp) Dim oTypeOldResult = oOldAttributeResult.GetType.ToString If oTypeOldResult = "System.Data.DataTable" Then Dim myOldValues As DataTable = oOldAttributeResult diff --git a/app/DD_PM_WINDREAM/ClassInit.vb b/app/DD_PM_WINDREAM/ClassInit.vb index a14cff4..18ccceb 100644 --- a/app/DD_PM_WINDREAM/ClassInit.vb +++ b/app/DD_PM_WINDREAM/ClassInit.vb @@ -21,9 +21,10 @@ Public Class ClassInit Public Sub InitUserConfig() - CONFIG = New ConfigManager(Of ClassConfig)(LOGCONFIG, Application.UserAppDataPath, Application.CommonAppDataPath) + CONFIG = New ConfigManager(Of ClassConfig)(LOGCONFIG, Application.UserAppDataPath, Application.CommonAppDataPath, Application.StartupPath) LOGGER.Info("Config loaded") + If CONFIG.Config.ConnectionStringTest <> String.Empty And CONFIG.Config.TestMode = True Then LOGGER.Debug("Test Connection String loaded") CONNECTION_STRING = DecryptConnectionString(CONFIG.Config.ConnectionStringTest) @@ -146,7 +147,7 @@ Public Class ClassInit CLIENT_SELECTED = 1 End Try - LOGGER.Info(">> Username: " & USER_USERNAME) + LOGGER.Debug("Username: " & USER_USERNAME) Dim sql = String.Format("SELECT * FROM [dbo].[FNDD_CHECK_USER_MODULE] ('{0}','PM',{1})", USER_USERNAME, CLIENT_SELECTED) @@ -227,11 +228,11 @@ Public Class ClassInit LOGGER.Debug("Count Users logged in: " & USERCOUNT_LOGGED_IN.ToString) If LICENSE_COUNT < USERCOUNT_LOGGED_IN And LICENSE_EXPIRED = False Then MsgBox("Die Anzahl der aktuell angemeldeten User (" & USERCOUNT_LOGGED_IN.ToString & ") überschreitet die Anzahl der aktuellen Lizenzen!" & vbNewLine & "Anzahl der Lizenzen: " & LICENSE_COUNT.ToString & vbNewLine & "Bitte setzen Sie sich mit dem Systembetreuer in Verbindung!", MsgBoxStyle.Critical, "Achtung:") - LOGGER.Info(" >> Die Anzahl der aktuell angemeldeten User (" & USERCOUNT_LOGGED_IN.ToString & ") überschreitet die Anzahl der Lizenzen (" & LICENSE_COUNT & ") für Process Manager!") - If USER_IS_ADMIN = False Then + LOGGER.Info("Die Anzahl der aktuell angemeldeten User (" & USERCOUNT_LOGGED_IN.ToString & ") überschreitet die Anzahl der Lizenzen (" & LICENSE_COUNT & ") für Process Manager!") + If USER_IS_ADMIN = False Then ClassAllgemeineFunktionen.LoginOut("LOGOUT") - LOGGER.Info(" - Wieder abgemeldet - START INCOMPLETE") - ERROR_STATE = "START INCOMPLETE" + LOGGER.Info("Wieder abgemeldet - START INCOMPLETE") + ERROR_STATE = "START INCOMPLETE" End If End If 'Alles OK bis hierhin...nun die FolderwatchKonfig laden @@ -254,7 +255,7 @@ Public Class ClassInit CURRENT_DT_TBDD_CONNECTION = ClassDatabase.Return_Datatable(oSql) Settings_LoadBasicConfig() - oSql = "Select * from TBDD_3RD_PARTY_MODULES" + oSql = "Select * FROM TBDD_3RD_PARTY_MODULES WHERE ACTIVE = 1" Dim oDT As DataTable = ClassDatabase.Return_Datatable(oSql) For Each oROW As DataRow In oDT.Rows If oROW.Item("NAME") = "GDPICTURE" Then diff --git a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.Designer.vb b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.Designer.vb index fa721fd..49f9715 100644 --- a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.Designer.vb +++ b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.Designer.vb @@ -4053,6 +4053,8 @@ Partial Public Class DD_DMSLiteDataSet Private columnDISPLAY_MODE As Global.System.Data.DataColumn + Private columnSQL_BTN_FINISH As Global.System.Data.DataColumn + _ Public Sub New() @@ -4288,6 +4290,14 @@ Partial Public Class DD_DMSLiteDataSet End Get End Property + _ + Public ReadOnly Property SQL_BTN_FINISHColumn() As Global.System.Data.DataColumn + Get + Return Me.columnSQL_BTN_FINISH + End Get + End Property + _ @@ -4349,9 +4359,10 @@ Partial Public Class DD_DMSLiteDataSet ByVal ANNOTATE_ALL_WORK_HISTORY_ENTRIES As Boolean, _ ByVal ANNOTATE_WORK_HISTORY_ENTRY As Boolean, _ ByVal WORK_HISTORY_ENTRY As String, _ - ByVal DISPLAY_MODE As String) As TBPM_PROFILERow + ByVal DISPLAY_MODE As String, _ + ByVal SQL_BTN_FINISH As String) As TBPM_PROFILERow Dim rowTBPM_PROFILERow As TBPM_PROFILERow = CType(Me.NewRow,TBPM_PROFILERow) - Dim columnValuesArray() As Object = New Object() {Nothing, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PROFILE, FINAL_TEXT, MOVE2FOLDER, Nothing, WD_OBJECTTYPE, SORT_BY_LATEST, PM_VEKTOR_INDEX, LOG_INDEX, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY, WORK_HISTORY_ENTRY, DISPLAY_MODE} + Dim columnValuesArray() As Object = New Object() {Nothing, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PROFILE, FINAL_TEXT, MOVE2FOLDER, Nothing, WD_OBJECTTYPE, SORT_BY_LATEST, PM_VEKTOR_INDEX, LOG_INDEX, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY, WORK_HISTORY_ENTRY, DISPLAY_MODE, SQL_BTN_FINISH} If (Not (parentTBPM_TYPERowByFK_TBPM_PROFILE_TYPE1) Is Nothing) Then columnValuesArray(15) = parentTBPM_TYPERowByFK_TBPM_PROFILE_TYPE1(0) End If @@ -4408,6 +4419,7 @@ Partial Public Class DD_DMSLiteDataSet Me.columnANNOTATE_WORK_HISTORY_ENTRY = MyBase.Columns("ANNOTATE_WORK_HISTORY_ENTRY") Me.columnWORK_HISTORY_ENTRY = MyBase.Columns("WORK_HISTORY_ENTRY") Me.columnDISPLAY_MODE = MyBase.Columns("DISPLAY_MODE") + Me.columnSQL_BTN_FINISH = MyBase.Columns("SQL_BTN_FINISH") End Sub _ + Public Property SQL_BTN_FINISH() As String + Get + Return CType(Me(Me.tableTBPM_PROFILE.SQL_BTN_FINISHColumn),String) + End Get + Set + Me(Me.tableTBPM_PROFILE.SQL_BTN_FINISHColumn) = value + End Set + End Property + _ Public Property TBPM_TYPERow() As TBPM_TYPERow @@ -17938,6 +17966,7 @@ Namespace DD_DMSLiteDataSetTableAdapters tableMapping.ColumnMappings.Add("ANNOTATE_WORK_HISTORY_ENTRY", "ANNOTATE_WORK_HISTORY_ENTRY") tableMapping.ColumnMappings.Add("WORK_HISTORY_ENTRY", "WORK_HISTORY_ENTRY") tableMapping.ColumnMappings.Add("DISPLAY_MODE", "DISPLAY_MODE") + tableMapping.ColumnMappings.Add("SQL_BTN_FINISH", "SQL_BTN_FINISH") Me._adapter.TableMappings.Add(tableMapping) Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand() Me._adapter.DeleteCommand.Connection = Me.Connection @@ -17995,21 +18024,22 @@ Namespace DD_DMSLiteDataSetTableAdapters "PTION, ACTIVE, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WHO, FINAL_PROFILE, FINAL_TEXT,"& _ " MOVE2FOLDER, TYPE, WD_OBJECTTYPE, SORT_BY_LATEST, PM_VEKTOR_INDEX, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _ " WORK_HISTORY_ENTRY, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, "& _ - "ANNOTATE_WORK_HISTORY_ENTRY, DISPLAY_MODE)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES (@NAME,@TITLE,@PRIORIT"& _ - "Y,@DESCRIPTION,@ACTIVE,@WD_SEARCH,@NO_OF_DOCUMENTS,@ADDED_WHO,@FINAL_PROFILE,@FI"& _ - "NAL_TEXT,@MOVE2FOLDER,@TYPE,@WD_OBJECTTYPE,@SORT_BY_LATEST,@PM_VEKTOR_INDEX,@WOR"& _ - "K_HISTORY_ENTRY,@SQL_VIEW,@ANNOTATE_ALL_WORK_HISTORY_ENTRIES,@ANNOTATE_WORK_HIST"& _ - "ORY_ENTRY,@DISPLAY_MODE); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTIO"& _ - "N, ACTIVE, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANG"& _ - "ED_WHEN, FINAL_PROFILE, FINAL_TEXT, MOVE2FOLDER, TYPE, WD_OBJECTTYPE, SORT_BY_LA"& _ - "TEST FROM TBPM_PROFILE WHERE (GUID = SCOPE_IDENTITY())" + "ANNOTATE_WORK_HISTORY_ENTRY, DISPLAY_MODE, SQL_BTN_FINISH)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES (@NAME"& _ + ",@TITLE,@PRIORITY,@DESCRIPTION,@ACTIVE,@WD_SEARCH,@NO_OF_DOCUMENTS,@ADDED_WHO,@F"& _ + "INAL_PROFILE,@FINAL_TEXT,@MOVE2FOLDER,@TYPE,@WD_OBJECTTYPE,@SORT_BY_LATEST,@PM_V"& _ + "EKTOR_INDEX,@WORK_HISTORY_ENTRY,@SQL_VIEW,@ANNOTATE_ALL_WORK_HISTORY_ENTRIES,@AN"& _ + "NOTATE_WORK_HISTORY_ENTRY,@DISPLAY_MODE,@SQL_BTN_FINISH); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, "& _ + "NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WH"& _ + "O, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PROFILE, FINAL_TEXT, MOVE2FOLDER"& _ + ", TYPE, WD_OBJECTTYPE, SORT_BY_LATEST FROM TBPM_PROFILE WHERE (GUID = SCOPE_IDEN"& _ + "TITY())" Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text Me._adapter.InsertCommand.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._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TITLE", Global.System.Data.SqlDbType.VarChar, 150, Global.System.Data.ParameterDirection.Input, 0, 0, "TITLE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PRIORITY", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PRIORITY", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DESCRIPTION", Global.System.Data.SqlDbType.VarChar, 250, Global.System.Data.ParameterDirection.Input, 0, 0, "DESCRIPTION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ACTIVE", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ACTIVE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) - Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@WD_SEARCH", Global.System.Data.SqlDbType.VarChar, 500, Global.System.Data.ParameterDirection.Input, 0, 0, "WD_SEARCH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) + Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@WD_SEARCH", Global.System.Data.SqlDbType.VarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "WD_SEARCH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NO_OF_DOCUMENTS", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "NO_OF_DOCUMENTS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 30, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FINAL_PROFILE", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "FINAL_PROFILE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) @@ -18024,6 +18054,7 @@ Namespace DD_DMSLiteDataSetTableAdapters Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ANNOTATE_ALL_WORK_HISTORY_ENTRIES", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ANNOTATE_ALL_WORK_HISTORY_ENTRIES", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ANNOTATE_WORK_HISTORY_ENTRY", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ANNOTATE_WORK_HISTORY_ENTRY", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DISPLAY_MODE", Global.System.Data.SqlDbType.VarChar, 20, Global.System.Data.ParameterDirection.Input, 0, 0, "DISPLAY_MODE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) + Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL_BTN_FINISH", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_BTN_FINISH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand() Me._adapter.UpdateCommand.Connection = Me.Connection Me._adapter.UpdateCommand.CommandText = "UPDATE TBPM_PROFILE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET NAME = @NAME, TITLE = @TITLE, PRIOR"& _ @@ -18035,18 +18066,19 @@ Namespace DD_DMSLiteDataSetTableAdapters "INDEX, LOG_INDEX = @LOG_INDEX, WORK_HISTORY_ENTRY = @WORK_HISTORY_ENTRY, SQL_VIE"& _ "W = @SQL_VIEW, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ANNOTATE_ALL_WORK_HISTORY_ENTRIES = @A"& _ "NNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY = @ANNOTATE_WORK_H"& _ - "ISTORY_ENTRY, DISPLAY_MODE = @DISPLAY_MODE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID)"& _ - "; "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, N"& _ - "O_OF_DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PROFILE,"& _ - " FINAL_TEXT, MOVE2FOLDER, TYPE, WD_OBJECTTYPE, SORT_BY_LATEST FROM TBPM_PROFILE "& _ - "WHERE (GUID = @GUID)" + "ISTORY_ENTRY, DISPLAY_MODE = @DISPLAY_MODE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" SQL_BTN_F"& _ + "INISH = @SQL_BTN_FINISH"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT "& _ + "GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUMENTS, AD"& _ + "DED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PROFILE, FINAL_TEXT, MOVE2"& _ + "FOLDER, TYPE, WD_OBJECTTYPE, SORT_BY_LATEST FROM TBPM_PROFILE WHERE (GUID = @GUI"& _ + "D)" Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text Me._adapter.UpdateCommand.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._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TITLE", Global.System.Data.SqlDbType.VarChar, 150, Global.System.Data.ParameterDirection.Input, 0, 0, "TITLE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PRIORITY", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PRIORITY", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DESCRIPTION", Global.System.Data.SqlDbType.VarChar, 250, Global.System.Data.ParameterDirection.Input, 0, 0, "DESCRIPTION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ACTIVE", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ACTIVE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) - Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@WD_SEARCH", Global.System.Data.SqlDbType.VarChar, 500, Global.System.Data.ParameterDirection.Input, 0, 0, "WD_SEARCH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) + Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@WD_SEARCH", Global.System.Data.SqlDbType.VarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "WD_SEARCH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NO_OF_DOCUMENTS", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "NO_OF_DOCUMENTS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_WHO", Global.System.Data.SqlDbType.VarChar, 30, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FINAL_PROFILE", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "FINAL_PROFILE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) @@ -18062,6 +18094,7 @@ Namespace DD_DMSLiteDataSetTableAdapters Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ANNOTATE_ALL_WORK_HISTORY_ENTRIES", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ANNOTATE_ALL_WORK_HISTORY_ENTRIES", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ANNOTATE_WORK_HISTORY_ENTRY", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ANNOTATE_WORK_HISTORY_ENTRY", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DISPLAY_MODE", Global.System.Data.SqlDbType.VarChar, 20, Global.System.Data.ParameterDirection.Input, 0, 0, "DISPLAY_MODE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) + Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL_BTN_FINISH", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_BTN_FINISH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", "")) End Sub @@ -18083,8 +18116,8 @@ Namespace DD_DMSLiteDataSetTableAdapters "DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PROFILE, FINA"& _ "L_TEXT, MOVE2FOLDER, TYPE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" WD_OBJECTTYPE, SORT_BY_LAT"& _ "EST, PM_VEKTOR_INDEX, LOG_INDEX, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, AN"& _ - "NOTATE_WORK_HISTORY_ENTRY, WORK_HISTORY_ENTRY, DISPLAY_MODE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBP"& _ - "M_PROFILE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY NAME" + "NOTATE_WORK_HISTORY_ENTRY, WORK_HISTORY_ENTRY, DISPLAY_MODE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _ + " SQL_BTN_FINISH"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_PROFILE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY NAME" Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand() Me._commandCollection(1).Connection = Me.Connection @@ -18365,7 +18398,8 @@ Namespace DD_DMSLiteDataSetTableAdapters ByVal SQL_VIEW As String, _ ByVal ANNOTATE_ALL_WORK_HISTORY_ENTRIES As Boolean, _ ByVal ANNOTATE_WORK_HISTORY_ENTRY As Boolean, _ - ByVal DISPLAY_MODE As String) As Integer + ByVal DISPLAY_MODE As String, _ + ByVal SQL_BTN_FINISH As String) As Integer If (NAME Is Nothing) Then Throw New Global.System.ArgumentNullException("NAME") Else @@ -18434,6 +18468,11 @@ Namespace DD_DMSLiteDataSetTableAdapters Else Me.Adapter.InsertCommand.Parameters(19).Value = CType(DISPLAY_MODE,String) End If + If (SQL_BTN_FINISH Is Nothing) Then + Throw New Global.System.ArgumentNullException("SQL_BTN_FINISH") + Else + Me.Adapter.InsertCommand.Parameters(20).Value = CType(SQL_BTN_FINISH,String) + End If Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _ <> Global.System.Data.ConnectionState.Open) Then @@ -18475,6 +18514,7 @@ Namespace DD_DMSLiteDataSetTableAdapters ByVal ANNOTATE_ALL_WORK_HISTORY_ENTRIES As Boolean, _ ByVal ANNOTATE_WORK_HISTORY_ENTRY As Boolean, _ ByVal DISPLAY_MODE As String, _ + ByVal SQL_BTN_FINISH As String, _ ByVal Original_GUID As Integer, _ ByVal GUID As Integer) As Integer If (NAME Is Nothing) Then @@ -18550,8 +18590,13 @@ Namespace DD_DMSLiteDataSetTableAdapters Else Me.Adapter.UpdateCommand.Parameters(20).Value = CType(DISPLAY_MODE,String) End If - Me.Adapter.UpdateCommand.Parameters(21).Value = CType(Original_GUID,Integer) - Me.Adapter.UpdateCommand.Parameters(22).Value = CType(GUID,Integer) + If (SQL_BTN_FINISH Is Nothing) Then + Throw New Global.System.ArgumentNullException("SQL_BTN_FINISH") + Else + Me.Adapter.UpdateCommand.Parameters(21).Value = CType(SQL_BTN_FINISH,String) + End If + Me.Adapter.UpdateCommand.Parameters(22).Value = CType(Original_GUID,Integer) + Me.Adapter.UpdateCommand.Parameters(23).Value = CType(GUID,Integer) Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _ <> Global.System.Data.ConnectionState.Open) Then diff --git a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsd b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsd index bdc9969..f2c31df 100644 --- a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsd +++ b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xsd @@ -966,8 +966,8 @@ WHERE (GUID = @GUID) INSERT INTO TBPM_PROFILE (NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WHO, FINAL_PROFILE, FINAL_TEXT, MOVE2FOLDER, TYPE, WD_OBJECTTYPE, SORT_BY_LATEST, PM_VEKTOR_INDEX, - WORK_HISTORY_ENTRY, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY, DISPLAY_MODE) -VALUES (@NAME,@TITLE,@PRIORITY,@DESCRIPTION,@ACTIVE,@WD_SEARCH,@NO_OF_DOCUMENTS,@ADDED_WHO,@FINAL_PROFILE,@FINAL_TEXT,@MOVE2FOLDER,@TYPE,@WD_OBJECTTYPE,@SORT_BY_LATEST,@PM_VEKTOR_INDEX,@WORK_HISTORY_ENTRY,@SQL_VIEW,@ANNOTATE_ALL_WORK_HISTORY_ENTRIES,@ANNOTATE_WORK_HISTORY_ENTRY,@DISPLAY_MODE); + WORK_HISTORY_ENTRY, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY, DISPLAY_MODE, SQL_BTN_FINISH) +VALUES (@NAME,@TITLE,@PRIORITY,@DESCRIPTION,@ACTIVE,@WD_SEARCH,@NO_OF_DOCUMENTS,@ADDED_WHO,@FINAL_PROFILE,@FINAL_TEXT,@MOVE2FOLDER,@TYPE,@WD_OBJECTTYPE,@SORT_BY_LATEST,@PM_VEKTOR_INDEX,@WORK_HISTORY_ENTRY,@SQL_VIEW,@ANNOTATE_ALL_WORK_HISTORY_ENTRIES,@ANNOTATE_WORK_HISTORY_ENTRY,@DISPLAY_MODE,@SQL_BTN_FINISH); SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PROFILE, FINAL_TEXT, MOVE2FOLDER, TYPE, WD_OBJECTTYPE, SORT_BY_LATEST FROM TBPM_PROFILE WHERE (GUID = SCOPE_IDENTITY()) @@ -975,7 +975,7 @@ SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUME - + @@ -990,13 +990,15 @@ SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUME + SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PROFILE, FINAL_TEXT, MOVE2FOLDER, TYPE, - WD_OBJECTTYPE, SORT_BY_LATEST, PM_VEKTOR_INDEX, LOG_INDEX, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY, WORK_HISTORY_ENTRY, DISPLAY_MODE + WD_OBJECTTYPE, SORT_BY_LATEST, PM_VEKTOR_INDEX, LOG_INDEX, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY, WORK_HISTORY_ENTRY, DISPLAY_MODE, + SQL_BTN_FINISH FROM TBPM_PROFILE ORDER BY NAME @@ -1008,8 +1010,9 @@ ORDER BY NAME SET NAME = @NAME, TITLE = @TITLE, PRIORITY = @PRIORITY, DESCRIPTION = @DESCRIPTION, ACTIVE = @ACTIVE, WD_SEARCH = @WD_SEARCH, NO_OF_DOCUMENTS = @NO_OF_DOCUMENTS, CHANGED_WHO = @CHANGED_WHO, FINAL_PROFILE = @FINAL_PROFILE, FINAL_TEXT = @FINAL_TEXT, MOVE2FOLDER = @MOVE2FOLDER, TYPE = @TYPE, WD_OBJECTTYPE = @WD_OBJECTTYPE, SORT_BY_LATEST = @SORT_BY_LATEST, PM_VEKTOR_INDEX = @PM_VEKTOR_INDEX, LOG_INDEX = @LOG_INDEX, WORK_HISTORY_ENTRY = @WORK_HISTORY_ENTRY, SQL_VIEW = @SQL_VIEW, - ANNOTATE_ALL_WORK_HISTORY_ENTRIES = @ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY = @ANNOTATE_WORK_HISTORY_ENTRY, DISPLAY_MODE = @DISPLAY_MODE -WHERE (GUID = @Original_GUID); + ANNOTATE_ALL_WORK_HISTORY_ENTRIES = @ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY = @ANNOTATE_WORK_HISTORY_ENTRY, DISPLAY_MODE = @DISPLAY_MODE, + SQL_BTN_FINISH = @SQL_BTN_FINISH +WHERE (GUID = @Original_GUID); SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PROFILE, FINAL_TEXT, MOVE2FOLDER, TYPE, WD_OBJECTTYPE, SORT_BY_LATEST FROM TBPM_PROFILE WHERE (GUID = @GUID) @@ -1017,7 +1020,7 @@ SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUME - + @@ -1033,6 +1036,7 @@ SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUME + @@ -1066,6 +1070,7 @@ SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUME + @@ -2535,6 +2540,13 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI + + + + + + + @@ -3111,7 +3123,7 @@ SELECT GUID, MODULE, TITLE, LANGUAGE, CAPT_TYPE, STRING1, STRING2, STRING3, STRI - + diff --git a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xss b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xss index 8f757d3..6791efa 100644 --- a/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xss +++ b/app/DD_PM_WINDREAM/DD_DMSLiteDataSet.xss @@ -4,7 +4,7 @@ Changes to this file may cause incorrect behavior and will be lost if the code is regenerated. --> - + @@ -17,12 +17,12 @@ - + - + diff --git a/app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj b/app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj index 72b9367..5c92a41 100644 --- a/app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj +++ b/app/DD_PM_WINDREAM/DD_PM_WINDREAM.vbproj @@ -164,8 +164,10 @@ P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DLL_Bibliotheken\PdfSharp-gdi.dll + + @@ -517,6 +519,7 @@ frmValidatorSearch.vb + Designer diff --git a/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb b/app/DD_PM_WINDREAM/My Project/AssemblyInfo.vb index 77c9052..308a4d1 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: ' - + diff --git a/app/DD_PM_WINDREAM/My Project/Settings.Designer.vb b/app/DD_PM_WINDREAM/My Project/Settings.Designer.vb index 5528daa..9716fdb 100644 --- a/app/DD_PM_WINDREAM/My Project/Settings.Designer.vb +++ b/app/DD_PM_WINDREAM/My Project/Settings.Designer.vb @@ -231,7 +231,7 @@ Namespace My _ + Global.System.Configuration.DefaultSettingValueAttribute("563")> _ Public Property frmValSearchSplitterDistance() As Integer Get Return CType(Me("frmValSearchSplitterDistance"),Integer) diff --git a/app/DD_PM_WINDREAM/My Project/Settings.settings b/app/DD_PM_WINDREAM/My Project/Settings.settings index 4e45d56..172fd91 100644 --- a/app/DD_PM_WINDREAM/My Project/Settings.settings +++ b/app/DD_PM_WINDREAM/My Project/Settings.settings @@ -50,7 +50,7 @@ 0, 0 - 558 + 563 Normal diff --git a/app/DD_PM_WINDREAM/My Project/licenses.licx b/app/DD_PM_WINDREAM/My Project/licenses.licx index 9b6c594..db6fe7a 100644 --- a/app/DD_PM_WINDREAM/My Project/licenses.licx +++ b/app/DD_PM_WINDREAM/My Project/licenses.licx @@ -1,5 +1,5 @@ -DevExpress.XtraCharts.ChartControl, DevExpress.XtraCharts.v19.2.UI, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraNavBar.NavBarControl, DevExpress.XtraNavBar.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a -DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraCharts.ChartControl, DevExpress.XtraCharts.v19.2.UI, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraNavBar.NavBarControl, DevExpress.XtraNavBar.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a diff --git a/app/DD_PM_WINDREAM/My Project/licenses.licx.bak b/app/DD_PM_WINDREAM/My Project/licenses.licx.bak index 3b1559f..9b6c594 100644 --- a/app/DD_PM_WINDREAM/My Project/licenses.licx.bak +++ b/app/DD_PM_WINDREAM/My Project/licenses.licx.bak @@ -1 +1,5 @@ +DevExpress.XtraCharts.ChartControl, DevExpress.XtraCharts.v19.2.UI, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraNavBar.NavBarControl, DevExpress.XtraNavBar.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a +DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a diff --git a/app/DD_PM_WINDREAM/clsPatterns.vb b/app/DD_PM_WINDREAM/clsPatterns.vb index 3f6cfa1..dca15b4 100644 --- a/app/DD_PM_WINDREAM/clsPatterns.vb +++ b/app/DD_PM_WINDREAM/clsPatterns.vb @@ -114,7 +114,9 @@ Public Class clsPatterns While ContainsPatternAndValue(result, PATTERN_USER, USER_VALUE_SURNAME) result = ReplacePattern(result, PATTERN_USER, surname) End While - + If IsDBNull(shortname) Then + shortname = "" + End If While ContainsPatternAndValue(result, PATTERN_USER, USER_VALUE_SHORTNAME) result = ReplacePattern(result, PATTERN_USER, shortname) End While @@ -145,7 +147,7 @@ Public Class clsPatterns While ContainsPattern(result, PATTERN_CTRL) If oTryCounter > MAX_TRY_COUNT Then - Throw New Exception("Max tries in ReplaceControlValues exceeded.") + Throw New Exception($"Max tries in ReplaceControlValues exceeded - Result so far [{result}].") End If Dim controlName As String = GetNextPattern(result, PATTERN_CTRL).Value diff --git a/app/DD_PM_WINDREAM/frmAdmin2.Designer.vb b/app/DD_PM_WINDREAM/frmAdmin2.Designer.vb index 1f749c7..1f5f064 100644 --- a/app/DD_PM_WINDREAM/frmAdmin2.Designer.vb +++ b/app/DD_PM_WINDREAM/frmAdmin2.Designer.vb @@ -85,8 +85,9 @@ Partial Class frmAdmin2 Me.CHANGED_WHOTextBox = New System.Windows.Forms.TextBox() Me.CHANGED_WHENTextBox = New System.Windows.Forms.TextBox() Me.XtraTabPage2 = New DevExpress.XtraTab.XtraTabPage() - Me.OBJ_NAMETextBox = New System.Windows.Forms.TextBox() + Me.INTERNALCheckBox = New System.Windows.Forms.CheckBox() Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource = New System.Windows.Forms.BindingSource(Me.components) + Me.OBJ_NAMETextBox = New System.Windows.Forms.TextBox() Me.CHANGED_WHENTextBox1 = New System.Windows.Forms.TextBox() Me.CHANGED_WHOTextBox1 = New System.Windows.Forms.TextBox() Me.ADDED_WHENTextBox1 = New System.Windows.Forms.TextBox() @@ -387,6 +388,7 @@ Partial Class frmAdmin2 ' 'RibbonPageGroup2 ' + Me.RibbonPageGroup2.Enabled = False Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem6) Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem3) Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem4) @@ -475,6 +477,7 @@ Partial Class frmAdmin2 Me.GridView1.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False] Me.GridView1.OptionsBehavior.AllowDeleteRows = DevExpress.Utils.DefaultBoolean.[False] Me.GridView1.OptionsBehavior.Editable = False + Me.GridView1.OptionsBehavior.ReadOnly = True Me.GridView1.OptionsView.EnableAppearanceEvenRow = True Me.GridView1.OptionsView.ShowAutoFilterRow = True ' @@ -495,12 +498,14 @@ Partial Class frmAdmin2 Me.GUIDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_EMAIL_TEMPLATEBindingSource, "GUID", True)) resources.ApplyResources(Me.GUIDTextBox, "GUIDTextBox") Me.GUIDTextBox.Name = "GUIDTextBox" + Me.GUIDTextBox.ReadOnly = True ' 'TITLETextBox ' Me.TITLETextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_EMAIL_TEMPLATEBindingSource, "TITLE", True)) resources.ApplyResources(Me.TITLETextBox, "TITLETextBox") Me.TITLETextBox.Name = "TITLETextBox" + Me.TITLETextBox.ReadOnly = True ' 'EMAIL_SUBJECTTextBox ' @@ -510,20 +515,20 @@ Partial Class frmAdmin2 ' 'EMAIL_BODY1TextBox ' - Me.EMAIL_BODY1TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_EMAIL_TEMPLATEBindingSource, "EMAIL_BODY1", True)) resources.ApplyResources(Me.EMAIL_BODY1TextBox, "EMAIL_BODY1TextBox") + Me.EMAIL_BODY1TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_EMAIL_TEMPLATEBindingSource, "EMAIL_BODY1", True)) Me.EMAIL_BODY1TextBox.Name = "EMAIL_BODY1TextBox" ' 'EMAIL_BODY2TextBox ' - Me.EMAIL_BODY2TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_EMAIL_TEMPLATEBindingSource, "EMAIL_BODY2", True)) resources.ApplyResources(Me.EMAIL_BODY2TextBox, "EMAIL_BODY2TextBox") + Me.EMAIL_BODY2TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_EMAIL_TEMPLATEBindingSource, "EMAIL_BODY2", True)) Me.EMAIL_BODY2TextBox.Name = "EMAIL_BODY2TextBox" ' 'EMAIL_BODY3TextBox ' - Me.EMAIL_BODY3TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_EMAIL_TEMPLATEBindingSource, "EMAIL_BODY3", True)) resources.ApplyResources(Me.EMAIL_BODY3TextBox, "EMAIL_BODY3TextBox") + Me.EMAIL_BODY3TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_EMAIL_TEMPLATEBindingSource, "EMAIL_BODY3", True)) Me.EMAIL_BODY3TextBox.Name = "EMAIL_BODY3TextBox" ' 'ADDED_WHOTextBox @@ -531,28 +536,33 @@ Partial Class frmAdmin2 Me.ADDED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_EMAIL_TEMPLATEBindingSource, "ADDED_WHO", True)) resources.ApplyResources(Me.ADDED_WHOTextBox, "ADDED_WHOTextBox") Me.ADDED_WHOTextBox.Name = "ADDED_WHOTextBox" + Me.ADDED_WHOTextBox.ReadOnly = True ' 'ADDED_WHENTextBox ' Me.ADDED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_EMAIL_TEMPLATEBindingSource, "ADDED_WHEN", True)) resources.ApplyResources(Me.ADDED_WHENTextBox, "ADDED_WHENTextBox") Me.ADDED_WHENTextBox.Name = "ADDED_WHENTextBox" + Me.ADDED_WHENTextBox.ReadOnly = True ' 'CHANGED_WHOTextBox ' Me.CHANGED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_EMAIL_TEMPLATEBindingSource, "CHANGED_WHO", True)) resources.ApplyResources(Me.CHANGED_WHOTextBox, "CHANGED_WHOTextBox") Me.CHANGED_WHOTextBox.Name = "CHANGED_WHOTextBox" + Me.CHANGED_WHOTextBox.ReadOnly = True ' 'CHANGED_WHENTextBox ' Me.CHANGED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_EMAIL_TEMPLATEBindingSource, "CHANGED_WHEN", True)) resources.ApplyResources(Me.CHANGED_WHENTextBox, "CHANGED_WHENTextBox") Me.CHANGED_WHENTextBox.Name = "CHANGED_WHENTextBox" + Me.CHANGED_WHENTextBox.ReadOnly = True ' 'XtraTabPage2 ' resources.ApplyResources(Me.XtraTabPage2, "XtraTabPage2") + Me.XtraTabPage2.Controls.Add(Me.INTERNALCheckBox) Me.XtraTabPage2.Controls.Add(OBJ_NAMELabel) Me.XtraTabPage2.Controls.Add(Me.OBJ_NAMETextBox) Me.XtraTabPage2.Controls.Add(CHANGED_WHENLabel1) @@ -586,17 +596,24 @@ Partial Class frmAdmin2 Me.XtraTabPage2.Controls.Add(Me.GridControl2) Me.XtraTabPage2.Name = "XtraTabPage2" ' - 'OBJ_NAMETextBox + 'INTERNALCheckBox ' - Me.OBJ_NAMETextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "OBJ_NAME", True)) - resources.ApplyResources(Me.OBJ_NAMETextBox, "OBJ_NAMETextBox") - Me.OBJ_NAMETextBox.Name = "OBJ_NAMETextBox" + Me.INTERNALCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "INTERNAL", True)) + resources.ApplyResources(Me.INTERNALCheckBox, "INTERNALCheckBox") + Me.INTERNALCheckBox.Name = "INTERNALCheckBox" + Me.INTERNALCheckBox.UseVisualStyleBackColor = True ' 'TBDD_GUI_LANGUAGE_PHRASEBindingSource ' Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource.DataMember = "TBDD_GUI_LANGUAGE_PHRASE" Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource.DataSource = Me.DD_DMSLiteDataSet ' + 'OBJ_NAMETextBox + ' + Me.OBJ_NAMETextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "OBJ_NAME", True)) + resources.ApplyResources(Me.OBJ_NAMETextBox, "OBJ_NAMETextBox") + Me.OBJ_NAMETextBox.Name = "OBJ_NAMETextBox" + ' 'CHANGED_WHENTextBox1 ' Me.CHANGED_WHENTextBox1.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "CHANGED_WHEN", True)) @@ -651,14 +668,18 @@ Partial Class frmAdmin2 ' 'STRING2TextBox ' - Me.STRING2TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "STRING2", True)) + Me.STRING2TextBox.AcceptsReturn = True + Me.STRING2TextBox.AcceptsTab = True resources.ApplyResources(Me.STRING2TextBox, "STRING2TextBox") + Me.STRING2TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "STRING2", True)) Me.STRING2TextBox.Name = "STRING2TextBox" ' 'STRING1TextBox ' - Me.STRING1TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "STRING1", True)) + Me.STRING1TextBox.AcceptsReturn = True + Me.STRING1TextBox.AcceptsTab = True resources.ApplyResources(Me.STRING1TextBox, "STRING1TextBox") + Me.STRING1TextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_GUI_LANGUAGE_PHRASEBindingSource, "STRING1", True)) Me.STRING1TextBox.Name = "STRING1TextBox" ' 'CAPT_TYPEComboBox @@ -709,6 +730,7 @@ Partial Class frmAdmin2 Me.GridView2.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False] Me.GridView2.OptionsBehavior.AllowDeleteRows = DevExpress.Utils.DefaultBoolean.[False] Me.GridView2.OptionsBehavior.Editable = False + Me.GridView2.OptionsBehavior.ReadOnly = True Me.GridView2.OptionsView.EnableAppearanceEvenRow = True Me.GridView2.OptionsView.ShowAutoFilterRow = True ' @@ -852,4 +874,5 @@ Partial Class frmAdmin2 Friend WithEvents GridColumn4 As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents OBJ_NAMETextBox As TextBox Friend WithEvents GridColumn5 As DevExpress.XtraGrid.Columns.GridColumn + Friend WithEvents INTERNALCheckBox As CheckBox End Class diff --git a/app/DD_PM_WINDREAM/frmAdmin2.resx b/app/DD_PM_WINDREAM/frmAdmin2.resx index 45a71ab..6411afd 100644 --- a/app/DD_PM_WINDREAM/frmAdmin2.resx +++ b/app/DD_PM_WINDREAM/frmAdmin2.resx @@ -246,7 +246,7 @@ True - 359, 166 + 359, 224 41, 13 @@ -276,7 +276,7 @@ True - 359, 239 + 359, 350 41, 13 @@ -306,7 +306,7 @@ True - 359, 315 + 359, 426 65, 13 @@ -336,7 +336,7 @@ True - 604, 315 + 604, 426 73, 13 @@ -366,7 +366,7 @@ True - 359, 345 + 359, 456 77, 13 @@ -396,7 +396,7 @@ True - 604, 345 + 604, 456 85, 13 @@ -447,7 +447,7 @@ XtraTabPage2 - 28 + 29 False @@ -477,7 +477,7 @@ XtraTabPage2 - 26 + 27 False @@ -507,7 +507,7 @@ XtraTabPage2 - 24 + 25 False @@ -537,7 +537,7 @@ XtraTabPage2 - 22 + 23 False @@ -567,7 +567,7 @@ XtraTabPage2 - 20 + 21 False @@ -576,7 +576,7 @@ True - 586, 178 + 586, 256 48, 13 @@ -597,7 +597,7 @@ XtraTabPage2 - 18 + 19 False @@ -606,7 +606,7 @@ True - 586, 205 + 586, 349 48, 13 @@ -627,7 +627,7 @@ XtraTabPage2 - 16 + 17 False @@ -636,7 +636,7 @@ True - 586, 232 + 586, 376 48, 13 @@ -657,7 +657,7 @@ XtraTabPage2 - 14 + 15 False @@ -666,7 +666,7 @@ True - 586, 259 + 586, 403 48, 13 @@ -687,7 +687,7 @@ XtraTabPage2 - 12 + 13 False @@ -696,7 +696,7 @@ True - 586, 286 + 586, 430 48, 13 @@ -717,7 +717,7 @@ XtraTabPage2 - 10 + 11 False @@ -726,7 +726,7 @@ True - 586, 313 + 586, 457 65, 13 @@ -747,7 +747,7 @@ XtraTabPage2 - 8 + 9 False @@ -756,7 +756,7 @@ True - 803, 313 + 803, 457 73, 13 @@ -777,7 +777,7 @@ XtraTabPage2 - 6 + 7 False @@ -786,7 +786,7 @@ True - 586, 337 + 586, 481 77, 13 @@ -807,7 +807,7 @@ XtraTabPage2 - 4 + 5 False @@ -816,7 +816,7 @@ True - 803, 337 + 803, 481 85, 13 @@ -837,7 +837,7 @@ XtraTabPage2 - 2 + 3 False @@ -867,7 +867,7 @@ XtraTabPage2 - 0 + 1 Neue Vorlage @@ -1138,23 +1138,17 @@ 0, 0 - - Vorlagen Verwaltung - - - Phrasen Verwaltung - Aktionen - 1207, 158 + 1059, 158 - 0, 559 + 0, 691 - 1207, 24 + 1059, 24 RibbonStatusBar1 @@ -1180,6 +1174,12 @@ 2 + + Vorlagen Verwaltung + + + Phrasen Verwaltung + RibbonPage2 @@ -1193,6 +1193,654 @@ True + + Button1 + + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage1 + + + 0 + + + GridControl1 + + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabPage1 + + + 1 + + + GUIDTextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage1 + + + 3 + + + TITLETextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage1 + + + 5 + + + EMAIL_SUBJECTTextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage1 + + + 7 + + + EMAIL_BODY1TextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage1 + + + 9 + + + EMAIL_BODY2TextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage1 + + + 11 + + + EMAIL_BODY3TextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage1 + + + 13 + + + ADDED_WHOTextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage1 + + + 15 + + + ADDED_WHENTextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage1 + + + 17 + + + CHANGED_WHOTextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage1 + + + 19 + + + CHANGED_WHENTextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage1 + + + 21 + + + 1057, 508 + + + Email Inhalte Workflow + + + XtraTabPage1 + + + DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabControl1 + + + 0 + + + 1059, 533 + + + 2 + + + True + + + 17, 56 + + + False + + + 999, 89 + + + 56, 24 + + + 38 + + + Intern + + + INTERNALCheckBox + + + System.Windows.Forms.CheckBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage2 + + + 0 + + + 17, 56 + + + 671, 65 + + + 375, 21 + + + 37 + + + OBJ_NAMETextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage2 + + + 2 + + + 933, 478 + + + 113, 21 + + + 36 + + + CHANGED_WHENTextBox1 + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage2 + + + 4 + + + 671, 478 + + + 116, 21 + + + 35 + + + CHANGED_WHOTextBox1 + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage2 + + + 6 + + + 933, 454 + + + 113, 21 + + + 34 + + + ADDED_WHENTextBox1 + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage2 + + + 8 + + + 671, 454 + + + 116, 21 + + + 33 + + + ADDED_WHOTextBox1 + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage2 + + + 10 + + + 671, 427 + + + 375, 21 + + + 32 + + + STRING6TextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage2 + + + 12 + + + 671, 400 + + + 375, 21 + + + 31 + + + STRING5TextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage2 + + + 14 + + + 671, 373 + + + 375, 21 + + + 30 + + + STRING4TextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage2 + + + 16 + + + 671, 346 + + + 375, 21 + + + 29 + + + STRING3TextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage2 + + + 18 + + + Top, Left, Right + + + 671, 253 + + + True + + + 375, 87 + + + 28 + + + STRING2TextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage2 + + + 20 + + + Top, Left, Right + + + 671, 148 + + + True + + + 375, 99 + + + 27 + + + STRING1TextBox + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage2 + + + 22 + + + Button + + + Caption Validator Control + + + Information + + + Msgbox + + + MsgboxResult + + + 671, 120 + + + 217, 21 + + + 26 + + + CAPT_TYPEComboBox + + + System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage2 + + + 24 + + + de-DE + + + en-US + + + fr-FR + + + 671, 92 + + + 217, 21 + + + 25 + + + LANGUAGEComboBox + + + System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage2 + + + 26 + + + 671, 39 + + + 375, 21 + + + 24 + + + TITLETextBox1 + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage2 + + + 28 + + + 671, 12 + + + 77, 21 + + + 22 + + + GUIDTextBox1 + + + System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + XtraTabPage2 + + + 30 + + + Left + + + 0, 0 + + + Object + + + True + + + 0 + + + Titel + + + True + + + 2 + + + 128 + + + Typ + + + True + + + 1 + + + Language + + + True + + + 3 + + + 580, 508 + + + 21 + + + GridControl2 + + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabPage2 + + + 31 + + + 1057, 508 + + + GUI Phrasen + + + XtraTabPage2 + + + DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabControl1 + + + 1 + + + XtraTabControl1 + + + DevExpress.XtraTab.XtraTabControl, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + $this + + + 0 + 907, 37 @@ -1254,7 +1902,7 @@ 128 - 353, 376 + 353, 508 20 @@ -1271,6 +1919,9 @@ 1 + + 17, 17 + 461, 12 @@ -1334,6 +1985,9 @@ 7 + + Top, Left, Right + 461, 93 @@ -1344,7 +1998,7 @@ Both - 583, 67 + 583, 125 7 @@ -1361,8 +2015,11 @@ 9 + + Top, Left, Right + - 461, 166 + 461, 224 True @@ -1371,7 +2028,7 @@ Both - 583, 67 + 583, 120 9 @@ -1388,8 +2045,11 @@ 11 + + Top, Left, Right + - 461, 239 + 461, 350 True @@ -1416,7 +2076,7 @@ 13 - 461, 312 + 461, 423 124, 21 @@ -1437,7 +2097,7 @@ 15 - 694, 312 + 694, 423 128, 21 @@ -1458,7 +2118,7 @@ 17 - 461, 342 + 461, 453 124, 21 @@ -1479,7 +2139,7 @@ 19 - 694, 342 + 694, 453 128, 21 @@ -1499,468 +2159,6 @@ 21 - - 1205, 376 - - - Email Inhalte Workflow - - - XtraTabPage1 - - - DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - XtraTabControl1 - - - 0 - - - 1207, 401 - - - 2 - - - True - - - 17, 56 - - - 671, 65 - - - 384, 21 - - - 37 - - - OBJ_NAMETextBox - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - XtraTabPage2 - - - 1 - - - 942, 334 - - - 113, 21 - - - 36 - - - CHANGED_WHENTextBox1 - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - XtraTabPage2 - - - 3 - - - 671, 334 - - - 116, 21 - - - 35 - - - CHANGED_WHOTextBox1 - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - XtraTabPage2 - - - 5 - - - 942, 310 - - - 113, 21 - - - 34 - - - ADDED_WHENTextBox1 - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - XtraTabPage2 - - - 7 - - - 671, 310 - - - 116, 21 - - - 33 - - - ADDED_WHOTextBox1 - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - XtraTabPage2 - - - 9 - - - 671, 283 - - - 384, 21 - - - 32 - - - STRING6TextBox - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - XtraTabPage2 - - - 11 - - - 671, 256 - - - 384, 21 - - - 31 - - - STRING5TextBox - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - XtraTabPage2 - - - 13 - - - 671, 229 - - - 384, 21 - - - 30 - - - STRING4TextBox - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - XtraTabPage2 - - - 15 - - - 671, 202 - - - 384, 21 - - - 29 - - - STRING3TextBox - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - XtraTabPage2 - - - 17 - - - 671, 175 - - - 384, 21 - - - 28 - - - STRING2TextBox - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - XtraTabPage2 - - - 19 - - - 671, 148 - - - 384, 21 - - - 27 - - - STRING1TextBox - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - XtraTabPage2 - - - 21 - - - Button - - - Caption Validator Control - - - Information - - - Msgbox - - - MsgboxResult - - - 671, 120 - - - 217, 21 - - - 26 - - - CAPT_TYPEComboBox - - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - XtraTabPage2 - - - 23 - - - de-DE - - - en-US - - - fr-FR - - - 671, 92 - - - 217, 21 - - - 25 - - - LANGUAGEComboBox - - - System.Windows.Forms.ComboBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - XtraTabPage2 - - - 25 - - - 671, 39 - - - 384, 21 - - - 24 - - - TITLETextBox1 - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - XtraTabPage2 - - - 27 - - - 671, 12 - - - 77, 21 - - - 22 - - - GUIDTextBox1 - - - System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - XtraTabPage2 - - - 29 - - - Left - - - 0, 0 - - - Object - - - True - - - 0 - - - Titel - - - True - - - 2 - - - 128 - - - Typ - - - True - - - 1 - - - Language - - - True - - - 3 - - - 580, 376 - - - 21 - - - GridControl2 - - - DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - XtraTabPage2 - - - 30 - - - 1205, 376 - - - GUI Phrasen - - - XtraTabPage2 - - - DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - XtraTabControl1 - - - 1 - - - XtraTabControl1 - - - DevExpress.XtraTab.XtraTabControl, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - $this - - - 0 - 442, 17 @@ -1977,7 +2175,7 @@ 6, 13 - 1207, 583 + 1059, 715 diff --git a/app/DD_PM_WINDREAM/frmAdmin2.vb b/app/DD_PM_WINDREAM/frmAdmin2.vb index 7b375df..75e5ed8 100644 --- a/app/DD_PM_WINDREAM/frmAdmin2.vb +++ b/app/DD_PM_WINDREAM/frmAdmin2.vb @@ -19,6 +19,7 @@ Public Class frmAdmin2 Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BbitemplateAdd.ItemClick TBDD_EMAIL_TEMPLATEBindingSource.AddNew() + TITLETextBox.ReadOnly = False End Sub @@ -57,6 +58,7 @@ Public Class frmAdmin2 Me.TBDD_EMAIL_TEMPLATEBindingSource.EndEdit() Me.TBDD_EMAIL_TEMPLATETableAdapter.Update(DD_DMSLiteDataSet.TBDD_EMAIL_TEMPLATE) Status_Changed("Vorlage gespeichert") + TITLETextBox.ReadOnly = True Else Status_Changed("Keine Änderung") End If @@ -137,4 +139,14 @@ Public Class frmAdmin2 Private Sub TBDD_GUI_LANGUAGE_PHRASEBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs) Handles TBDD_GUI_LANGUAGE_PHRASEBindingSource.AddingNew DD_DMSLiteDataSet.TBDD_GUI_LANGUAGE_PHRASE.ADDED_WHOColumn.DefaultValue = USER_USERNAME End Sub + + Private Sub INTERNALCheckBox_CheckedChanged(sender As Object, e As EventArgs) Handles INTERNALCheckBox.CheckedChanged + If INTERNALCheckBox.Checked Then + TITLETextBox1.ReadOnly = True + OBJ_NAMETextBox.ReadOnly = True + Else + TITLETextBox1.ReadOnly = False + OBJ_NAMETextBox.ReadOnly = False + End If + End Sub End Class \ No newline at end of file diff --git a/app/DD_PM_WINDREAM/frmDocView.Designer.vb b/app/DD_PM_WINDREAM/frmDocView.Designer.vb index bdeec96..52fe3b9 100644 --- a/app/DD_PM_WINDREAM/frmDocView.Designer.vb +++ b/app/DD_PM_WINDREAM/frmDocView.Designer.vb @@ -32,7 +32,7 @@ Partial Class frmDocView ' Me.DocumentViewer1.Dock = System.Windows.Forms.DockStyle.Fill Me.DocumentViewer1.Location = New System.Drawing.Point(0, 0) - Me.DocumentViewer1.Name = "DocumentViewer1" + Me.DocumentViewer1.Name = "DocumentViewerfrmDocView" Me.DocumentViewer1.Size = New System.Drawing.Size(800, 450) Me.DocumentViewer1.TabIndex = 0 ' diff --git a/app/DD_PM_WINDREAM/frmKonfig.Designer.vb b/app/DD_PM_WINDREAM/frmKonfig.Designer.vb index a97f60f..4593b96 100644 --- a/app/DD_PM_WINDREAM/frmKonfig.Designer.vb +++ b/app/DD_PM_WINDREAM/frmKonfig.Designer.vb @@ -50,7 +50,6 @@ Partial Class frmKonfig Me.chkLogErrorsOnly = New System.Windows.Forms.CheckBox() Me.Button3 = New System.Windows.Forms.Button() Me.LinkLabel1 = New System.Windows.Forms.LinkLabel() - Me.Button2 = New System.Windows.Forms.Button() Me.Button1 = New System.Windows.Forms.Button() Me.btnLogMail = New System.Windows.Forms.Button() Me.TabPage4 = New System.Windows.Forms.TabPage() @@ -202,7 +201,6 @@ Partial Class frmKonfig Me.TabPage3.Controls.Add(Me.chkLogErrorsOnly) Me.TabPage3.Controls.Add(Me.Button3) Me.TabPage3.Controls.Add(Me.LinkLabel1) - Me.TabPage3.Controls.Add(Me.Button2) Me.TabPage3.Controls.Add(Me.Button1) Me.TabPage3.Controls.Add(Me.btnLogMail) resources.ApplyResources(Me.TabPage3, "TabPage3") @@ -256,12 +254,6 @@ Partial Class frmKonfig Me.LinkLabel1.Name = "LinkLabel1" Me.LinkLabel1.TabStop = True ' - 'Button2 - ' - resources.ApplyResources(Me.Button2, "Button2") - Me.Button2.Name = "Button2" - Me.Button2.UseVisualStyleBackColor = True - ' 'Button1 ' resources.ApplyResources(Me.Button1, "Button1") @@ -308,7 +300,7 @@ Partial Class frmKonfig ' 'gvLogs ' - Me.gvLogs.Appearance.OddRow.BackColor = CType(resources.GetObject("gvLogs.Appearance.OddRow.BackColor"), System.Drawing.Color) + Me.gvLogs.Appearance.OddRow.BackColor = System.Drawing.Color.LightCyan Me.gvLogs.Appearance.OddRow.Options.UseBackColor = True Me.gvLogs.GridControl = Me.GridControlLogs Me.gvLogs.Name = "gvLogs" @@ -334,6 +326,8 @@ Partial Class frmKonfig ' Me.TableAdapterManager.BackupDataSetBeforeUpdate = False Me.TableAdapterManager.TBDD_CONNECTIONTableAdapter = Nothing + Me.TableAdapterManager.TBDD_EMAIL_TEMPLATETableAdapter = Nothing + Me.TableAdapterManager.TBDD_GUI_LANGUAGE_PHRASETableAdapter = Nothing Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing Me.TableAdapterManager.TBPM_CONTROL_TABLETableAdapter = Nothing Me.TableAdapterManager.TBPM_ERROR_LOGTableAdapter = Nothing @@ -388,7 +382,6 @@ Partial Class frmKonfig Friend WithEvents TBPM_KONFIGURATIONTableAdapter As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter Friend WithEvents TableAdapterManager As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager Friend WithEvents Button1 As System.Windows.Forms.Button - Friend WithEvents Button2 As System.Windows.Forms.Button Friend WithEvents LinkLabel1 As System.Windows.Forms.LinkLabel Friend WithEvents Button3 As System.Windows.Forms.Button Friend WithEvents chkLogErrorsOnly As System.Windows.Forms.CheckBox diff --git a/app/DD_PM_WINDREAM/frmKonfig.resx b/app/DD_PM_WINDREAM/frmKonfig.resx index 19a78ee..cd9da18 100644 --- a/app/DD_PM_WINDREAM/frmKonfig.resx +++ b/app/DD_PM_WINDREAM/frmKonfig.resx @@ -643,7 +643,7 @@ True - 506, 28 + 438, 29 117, 21 @@ -717,32 +717,8 @@ 7 - - 506, 105 - - - 219, 28 - - - 38 - - - List all processes - - - Button2 - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TabPage3 - - - 8 - - 506, 71 + 438, 64 219, 29 @@ -763,7 +739,7 @@ TabPage3 - 9 + 8 MiddleLeft @@ -793,7 +769,7 @@ TabPage3 - 10 + 9 4, 26 @@ -838,7 +814,7 @@ Speichere Log als... - 198, 48 + 198, 70 ContextMenuInternalLog @@ -855,9 +831,6 @@ 3, 3 - - LightCyan - 826, 312 diff --git a/app/DD_PM_WINDREAM/frmKonfig.vb b/app/DD_PM_WINDREAM/frmKonfig.vb index f3c3dcd..5a167db 100644 --- a/app/DD_PM_WINDREAM/frmKonfig.vb +++ b/app/DD_PM_WINDREAM/frmKonfig.vb @@ -150,22 +150,6 @@ Public Class frmKonfig MsgBox("Culture-Name: " & CultureInfo.CurrentCulture.Name & vbNewLine & "Culture-ThreeLetterISOLanguageName: " & CultureInfo.CurrentCulture.ThreeLetterISOLanguageName & vbNewLine & "CurrentUICulture-Name: " & CultureInfo.CurrentUICulture.Name & vbNewLine & "CurrentUICulture-ThreeLetterISOLanguageName: " & CultureInfo.CurrentUICulture.ThreeLetterISOLanguageName) End Sub - - Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click - Dim p As Process - Dim processes As Process() - processes = Process.GetProcesses() - Dim msg As String - For Each p In processes - If p.ProcessName <> "svchost" Then - msg = msg & p.ProcessName & vbNewLine - End If - - - Next - MsgBox("Liste der Processnames: " & vbNewLine & msg, MsgBoxStyle.Information) - End Sub - Private Sub CheckBox2_CheckedChanged(sender As Object, e As EventArgs) My.Settings.Save() End Sub diff --git a/app/DD_PM_WINDREAM/frmMain.Designer.vb b/app/DD_PM_WINDREAM/frmMain.Designer.vb index 8b26c09..d3ea2aa 100644 --- a/app/DD_PM_WINDREAM/frmMain.Designer.vb +++ b/app/DD_PM_WINDREAM/frmMain.Designer.vb @@ -1,6 +1,6 @@  Partial Class frmMain - Inherits System.Windows.Forms.Form + Inherits DevExpress.XtraBars.Ribbon.RibbonForm 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. @@ -40,23 +40,6 @@ Partial Class frmMain 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() - Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton() - Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton() - Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator() - Me.tsbtnrefresh = New System.Windows.Forms.ToolStripButton() - Me.tsddConfig = New System.Windows.Forms.ToolStripDropDownButton() - Me.ProfileUndBasisToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.KonfigurationenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.tsbtnMonitoring = New System.Windows.Forms.ToolStripButton() - Me.StatusStrip1 = New System.Windows.Forms.StatusStrip() - Me.tsstlblUser = New System.Windows.Forms.ToolStripStatusLabel() - Me.tslblLicenses = New System.Windows.Forms.ToolStripStatusLabel() - Me.tslblUserLoggedin = New System.Windows.Forms.ToolStripStatusLabel() - Me.tslblVersion = New System.Windows.Forms.ToolStripStatusLabel() - Me.tsslblLastSysnc = New System.Windows.Forms.ToolStripStatusLabel() - Me.tslblmessage = New System.Windows.Forms.ToolStripStatusLabel() - Me.tsslblDEBUG_LOG = New System.Windows.Forms.ToolStripStatusLabel() Me.Panel1 = New System.Windows.Forms.Panel() Me.GridControl_Docs = New DevExpress.XtraGrid.GridControl() Me.ContextMenuGrid = New System.Windows.Forms.ContextMenuStrip(Me.components) @@ -102,6 +85,29 @@ Partial Class frmMain Me.TimerReminder = New System.Windows.Forms.Timer(Me.components) Me.Timer5Mins = New System.Windows.Forms.Timer(Me.components) Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components) + Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl() + Me.bbtniRefresh = New DevExpress.XtraBars.BarButtonItem() + Me.bbtniMonitor = New DevExpress.XtraBars.BarButtonItem() + Me.bbiProfilverwaltung = New DevExpress.XtraBars.BarButtonItem() + Me.bbiKonfiguration = New DevExpress.XtraBars.BarButtonItem() + Me.bbtniGrundeinstellung = New DevExpress.XtraBars.BarButtonItem() + Me.bbtnitemInfo = New DevExpress.XtraBars.BarButtonItem() + Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem() + Me.bsiUser = New DevExpress.XtraBars.BarStaticItem() + Me.bsiLicenses = New DevExpress.XtraBars.BarStaticItem() + Me.bsiUserLoggedIn = New DevExpress.XtraBars.BarStaticItem() + Me.bsiVersion = New DevExpress.XtraBars.BarStaticItem() + Me.bsilastsync = New DevExpress.XtraBars.BarStaticItem() + Me.bsiDebug = New DevExpress.XtraBars.BarStaticItem() + Me.bsiMessage = New DevExpress.XtraBars.BarStaticItem() + Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage() + Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() + Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() + Me.RibbonPageGroup3 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() + Me.RibbonPageGroup4 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() + Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar() + Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage() + Me.ApplicationMenu1 = New DevExpress.XtraBars.Ribbon.ApplicationMenu(Me.components) CType(Me.SplitContainerDashboard, System.ComponentModel.ISupportInitialize).BeginInit() Me.SplitContainerDashboard.Panel1.SuspendLayout() Me.SplitContainerDashboard.Panel2.SuspendLayout() @@ -120,8 +126,6 @@ Partial Class frmMain CType(Me.ChartBottomRight, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBPM_PROFILEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() - Me.ToolStrip1.SuspendLayout() - Me.StatusStrip1.SuspendLayout() Me.Panel1.SuspendLayout() CType(Me.GridControl_Docs, System.ComponentModel.ISupportInitialize).BeginInit() Me.ContextMenuGrid.SuspendLayout() @@ -135,6 +139,8 @@ Partial Class frmMain CType(Me.TBPM_USERBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBPM_KONFIGURATIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBPM_PROFILE_FILESBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.ApplicationMenu1, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'SplitContainerDashboard @@ -275,134 +281,11 @@ Partial Class frmMain Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing Me.TableAdapterManager.UpdateOrder = DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete ' - 'ToolStrip1 - ' - resources.ApplyResources(Me.ToolStrip1, "ToolStrip1") - Me.ToolStrip1.ImageScalingSize = New System.Drawing.Size(20, 20) - Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton2, Me.ToolStripButton1, Me.ToolStripSeparator1, Me.tsbtnrefresh, Me.tsddConfig, Me.tsbtnMonitoring}) - Me.ToolStrip1.Name = "ToolStrip1" - ' - 'ToolStripButton2 - ' - Me.ToolStripButton2.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right - Me.ToolStripButton2.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image - resources.ApplyResources(Me.ToolStripButton2, "ToolStripButton2") - Me.ToolStripButton2.Name = "ToolStripButton2" - ' - 'ToolStripButton1 - ' - Me.ToolStripButton1.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right - Me.ToolStripButton1.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.Hammer_Builder_16xLG - resources.ApplyResources(Me.ToolStripButton1, "ToolStripButton1") - Me.ToolStripButton1.Name = "ToolStripButton1" - ' - 'ToolStripSeparator1 - ' - Me.ToolStripSeparator1.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right - Me.ToolStripSeparator1.Name = "ToolStripSeparator1" - resources.ApplyResources(Me.ToolStripSeparator1, "ToolStripSeparator1") - ' - 'tsbtnrefresh - ' - Me.tsbtnrefresh.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.refresh_16xLG - resources.ApplyResources(Me.tsbtnrefresh, "tsbtnrefresh") - Me.tsbtnrefresh.Name = "tsbtnrefresh" - ' - 'tsddConfig - ' - Me.tsddConfig.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right - Me.tsddConfig.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ProfileUndBasisToolStripMenuItem, Me.KonfigurationenToolStripMenuItem}) - resources.ApplyResources(Me.tsddConfig, "tsddConfig") - Me.tsddConfig.Name = "tsddConfig" - ' - 'ProfileUndBasisToolStripMenuItem - ' - Me.ProfileUndBasisToolStripMenuItem.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.puzzle2 - Me.ProfileUndBasisToolStripMenuItem.Name = "ProfileUndBasisToolStripMenuItem" - resources.ApplyResources(Me.ProfileUndBasisToolStripMenuItem, "ProfileUndBasisToolStripMenuItem") - ' - 'KonfigurationenToolStripMenuItem - ' - resources.ApplyResources(Me.KonfigurationenToolStripMenuItem, "KonfigurationenToolStripMenuItem") - Me.KonfigurationenToolStripMenuItem.Name = "KonfigurationenToolStripMenuItem" - ' - 'tsbtnMonitoring - ' - Me.tsbtnMonitoring.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right - Me.tsbtnMonitoring.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.Monitor_Screen_16xLG - resources.ApplyResources(Me.tsbtnMonitoring, "tsbtnMonitoring") - Me.tsbtnMonitoring.Name = "tsbtnMonitoring" - ' - 'StatusStrip1 - ' - resources.ApplyResources(Me.StatusStrip1, "StatusStrip1") - Me.StatusStrip1.ImageScalingSize = New System.Drawing.Size(20, 20) - Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsstlblUser, Me.tslblLicenses, Me.tslblUserLoggedin, Me.tslblVersion, Me.tsslblLastSysnc, Me.tslblmessage, Me.tsslblDEBUG_LOG}) - Me.StatusStrip1.Name = "StatusStrip1" - ' - 'tsstlblUser - ' - Me.tsstlblUser.BorderSides = CType((((System.Windows.Forms.ToolStripStatusLabelBorderSides.Left Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Top) _ - Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Right) _ - Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides) - Me.tsstlblUser.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.user - Me.tsstlblUser.Name = "tsstlblUser" - resources.ApplyResources(Me.tsstlblUser, "tsstlblUser") - ' - 'tslblLicenses - ' - Me.tslblLicenses.BorderSides = CType((((System.Windows.Forms.ToolStripStatusLabelBorderSides.Left Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Top) _ - Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Right) _ - Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides) - Me.tslblLicenses.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.key - Me.tslblLicenses.Name = "tslblLicenses" - resources.ApplyResources(Me.tslblLicenses, "tslblLicenses") - ' - 'tslblUserLoggedin - ' - Me.tslblUserLoggedin.BorderSides = CType((((System.Windows.Forms.ToolStripStatusLabelBorderSides.Left Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Top) _ - Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Right) _ - Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides) - Me.tslblUserLoggedin.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.group_key - Me.tslblUserLoggedin.Name = "tslblUserLoggedin" - resources.ApplyResources(Me.tslblUserLoggedin, "tslblUserLoggedin") - ' - 'tslblVersion - ' - Me.tslblVersion.BorderSides = CType((((System.Windows.Forms.ToolStripStatusLabelBorderSides.Left Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Top) _ - Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Right) _ - Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides) - Me.tslblVersion.Name = "tslblVersion" - resources.ApplyResources(Me.tslblVersion, "tslblVersion") - ' - 'tsslblLastSysnc - ' - Me.tsslblLastSysnc.BorderSides = CType((((System.Windows.Forms.ToolStripStatusLabelBorderSides.Left Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Top) _ - Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Right) _ - Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides) - resources.ApplyResources(Me.tsslblLastSysnc, "tsslblLastSysnc") - Me.tsslblLastSysnc.Name = "tsslblLastSysnc" - ' - 'tslblmessage - ' - Me.tslblmessage.BackColor = System.Drawing.Color.Yellow - Me.tslblmessage.Name = "tslblmessage" - resources.ApplyResources(Me.tslblmessage, "tslblmessage") - ' - 'tsslblDEBUG_LOG - ' - resources.ApplyResources(Me.tsslblDEBUG_LOG, "tsslblDEBUG_LOG") - Me.tsslblDEBUG_LOG.ForeColor = System.Drawing.SystemColors.ActiveCaptionText - Me.tsslblDEBUG_LOG.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.A_1 - Me.tsslblDEBUG_LOG.Name = "tsslblDEBUG_LOG" - ' 'Panel1 ' Me.Panel1.Controls.Add(Me.GridControl_Docs) Me.Panel1.Controls.Add(Me.BindingNavigator1) Me.Panel1.Controls.Add(Me.NavBarControl1) - Me.Panel1.Controls.Add(Me.ToolStrip1) - Me.Panel1.Controls.Add(Me.StatusStrip1) Me.Panel1.Controls.Add(Me.SplitContainerDashboard) resources.ApplyResources(Me.Panel1, "Panel1") Me.Panel1.Name = "Panel1" @@ -476,6 +359,7 @@ Partial Class frmMain Me.GridView_Docs.OptionsBehavior.AllowFixedGroups = DevExpress.Utils.DefaultBoolean.[True] Me.GridView_Docs.OptionsBehavior.AllowGroupExpandAnimation = DevExpress.Utils.DefaultBoolean.[True] Me.GridView_Docs.OptionsBehavior.Editable = False + Me.GridView_Docs.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False] Me.GridView_Docs.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CheckBoxRowSelect Me.GridView_Docs.OptionsView.ColumnAutoWidth = False Me.GridView_Docs.OptionsView.EnableAppearanceEvenRow = True @@ -669,13 +553,200 @@ Partial Class frmMain Me.Timer5Mins.Enabled = True Me.Timer5Mins.Interval = 350000 ' + 'RibbonControl1 + ' + Me.RibbonControl1.ExpandCollapseItem.Id = 0 + Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bbtniRefresh, Me.bbtniMonitor, Me.bbiProfilverwaltung, Me.bbiKonfiguration, Me.bbtniGrundeinstellung, Me.bbtnitemInfo, Me.BarButtonItem1, Me.bsiUser, Me.bsiLicenses, Me.bsiUserLoggedIn, Me.bsiVersion, Me.bsilastsync, Me.bsiDebug, Me.bsiMessage}) + resources.ApplyResources(Me.RibbonControl1, "RibbonControl1") + Me.RibbonControl1.MaxItemId = 15 + Me.RibbonControl1.Name = "RibbonControl1" + Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1}) + Me.RibbonControl1.QuickToolbarItemLinks.Add(Me.bbtnitemInfo) + Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False] + Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1 + ' + 'bbtniRefresh + ' + resources.ApplyResources(Me.bbtniRefresh, "bbtniRefresh") + Me.bbtniRefresh.Id = 1 + Me.bbtniRefresh.ImageOptions.Image = CType(resources.GetObject("bbtniRefresh.ImageOptions.Image"), System.Drawing.Image) + Me.bbtniRefresh.ImageOptions.LargeImage = CType(resources.GetObject("bbtniRefresh.ImageOptions.LargeImage"), System.Drawing.Image) + Me.bbtniRefresh.Name = "bbtniRefresh" + ' + 'bbtniMonitor + ' + resources.ApplyResources(Me.bbtniMonitor, "bbtniMonitor") + Me.bbtniMonitor.Id = 2 + Me.bbtniMonitor.ImageOptions.Image = CType(resources.GetObject("bbtniMonitor.ImageOptions.Image"), System.Drawing.Image) + Me.bbtniMonitor.ImageOptions.LargeImage = CType(resources.GetObject("bbtniMonitor.ImageOptions.LargeImage"), System.Drawing.Image) + Me.bbtniMonitor.Name = "bbtniMonitor" + ' + 'bbiProfilverwaltung + ' + resources.ApplyResources(Me.bbiProfilverwaltung, "bbiProfilverwaltung") + Me.bbiProfilverwaltung.Id = 3 + Me.bbiProfilverwaltung.ImageOptions.Image = CType(resources.GetObject("bbiProfilverwaltung.ImageOptions.Image"), System.Drawing.Image) + Me.bbiProfilverwaltung.ImageOptions.LargeImage = CType(resources.GetObject("bbiProfilverwaltung.ImageOptions.LargeImage"), System.Drawing.Image) + Me.bbiProfilverwaltung.Name = "bbiProfilverwaltung" + ' + 'bbiKonfiguration + ' + resources.ApplyResources(Me.bbiKonfiguration, "bbiKonfiguration") + Me.bbiKonfiguration.Id = 4 + Me.bbiKonfiguration.ImageOptions.Image = CType(resources.GetObject("bbiKonfiguration.ImageOptions.Image"), System.Drawing.Image) + Me.bbiKonfiguration.ImageOptions.LargeImage = CType(resources.GetObject("bbiKonfiguration.ImageOptions.LargeImage"), System.Drawing.Image) + Me.bbiKonfiguration.Name = "bbiKonfiguration" + ' + 'bbtniGrundeinstellung + ' + resources.ApplyResources(Me.bbtniGrundeinstellung, "bbtniGrundeinstellung") + Me.bbtniGrundeinstellung.Id = 5 + Me.bbtniGrundeinstellung.ImageOptions.Image = CType(resources.GetObject("bbtniGrundeinstellung.ImageOptions.Image"), System.Drawing.Image) + Me.bbtniGrundeinstellung.ImageOptions.LargeImage = CType(resources.GetObject("bbtniGrundeinstellung.ImageOptions.LargeImage"), System.Drawing.Image) + Me.bbtniGrundeinstellung.Name = "bbtniGrundeinstellung" + Me.bbtniGrundeinstellung.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.SmallWithText + ' + 'bbtnitemInfo + ' + resources.ApplyResources(Me.bbtnitemInfo, "bbtnitemInfo") + Me.bbtnitemInfo.Id = 6 + Me.bbtnitemInfo.ImageOptions.Image = CType(resources.GetObject("bbtnitemInfo.ImageOptions.Image"), System.Drawing.Image) + Me.bbtnitemInfo.ImageOptions.LargeImage = CType(resources.GetObject("bbtnitemInfo.ImageOptions.LargeImage"), System.Drawing.Image) + Me.bbtnitemInfo.Name = "bbtnitemInfo" + Me.bbtnitemInfo.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.SmallWithText + ' + 'BarButtonItem1 + ' + resources.ApplyResources(Me.BarButtonItem1, "BarButtonItem1") + Me.BarButtonItem1.Id = 7 + Me.BarButtonItem1.Name = "BarButtonItem1" + ' + 'bsiUser + ' + resources.ApplyResources(Me.bsiUser, "bsiUser") + Me.bsiUser.Id = 8 + Me.bsiUser.ImageOptions.Image = CType(resources.GetObject("bsiUser.ImageOptions.Image"), System.Drawing.Image) + Me.bsiUser.ImageOptions.LargeImage = CType(resources.GetObject("bsiUser.ImageOptions.LargeImage"), System.Drawing.Image) + Me.bsiUser.Name = "bsiUser" + Me.bsiUser.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph + ' + 'bsiLicenses + ' + resources.ApplyResources(Me.bsiLicenses, "bsiLicenses") + Me.bsiLicenses.Id = 9 + Me.bsiLicenses.ImageOptions.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.key + Me.bsiLicenses.Name = "bsiLicenses" + Me.bsiLicenses.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph + ' + 'bsiUserLoggedIn + ' + resources.ApplyResources(Me.bsiUserLoggedIn, "bsiUserLoggedIn") + Me.bsiUserLoggedIn.Id = 10 + Me.bsiUserLoggedIn.ImageOptions.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.group_key + Me.bsiUserLoggedIn.Name = "bsiUserLoggedIn" + Me.bsiUserLoggedIn.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph + ' + 'bsiVersion + ' + resources.ApplyResources(Me.bsiVersion, "bsiVersion") + Me.bsiVersion.Id = 11 + Me.bsiVersion.Name = "bsiVersion" + ' + 'bsilastsync + ' + resources.ApplyResources(Me.bsilastsync, "bsilastsync") + Me.bsilastsync.Id = 12 + Me.bsilastsync.ImageOptions.Image = CType(resources.GetObject("bsilastsync.ImageOptions.Image"), System.Drawing.Image) + Me.bsilastsync.ImageOptions.LargeImage = CType(resources.GetObject("bsilastsync.ImageOptions.LargeImage"), System.Drawing.Image) + Me.bsilastsync.Name = "bsilastsync" + Me.bsilastsync.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph + ' + 'bsiDebug + ' + resources.ApplyResources(Me.bsiDebug, "bsiDebug") + Me.bsiDebug.Id = 13 + Me.bsiDebug.ImageOptions.Image = CType(resources.GetObject("bsiDebug.ImageOptions.Image"), System.Drawing.Image) + Me.bsiDebug.ImageOptions.LargeImage = CType(resources.GetObject("bsiDebug.ImageOptions.LargeImage"), System.Drawing.Image) + Me.bsiDebug.Name = "bsiDebug" + Me.bsiDebug.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph + ' + 'bsiMessage + ' + resources.ApplyResources(Me.bsiMessage, "bsiMessage") + Me.bsiMessage.Id = 14 + Me.bsiMessage.Name = "bsiMessage" + ' + 'RibbonPage1 + ' + Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2, Me.RibbonPageGroup3, Me.RibbonPageGroup4}) + Me.RibbonPage1.Name = "RibbonPage1" + resources.ApplyResources(Me.RibbonPage1, "RibbonPage1") + ' + 'RibbonPageGroup1 + ' + Me.RibbonPageGroup1.ItemLinks.Add(Me.bbtniRefresh) + Me.RibbonPageGroup1.Name = "RibbonPageGroup1" + resources.ApplyResources(Me.RibbonPageGroup1, "RibbonPageGroup1") + ' + 'RibbonPageGroup2 + ' + Me.RibbonPageGroup2.Alignment = DevExpress.XtraBars.Ribbon.RibbonPageGroupAlignment.Far + Me.RibbonPageGroup2.ItemLinks.Add(Me.bbtniMonitor) + Me.RibbonPageGroup2.Name = "RibbonPageGroup2" + resources.ApplyResources(Me.RibbonPageGroup2, "RibbonPageGroup2") + ' + 'RibbonPageGroup3 + ' + Me.RibbonPageGroup3.Alignment = DevExpress.XtraBars.Ribbon.RibbonPageGroupAlignment.Far + Me.RibbonPageGroup3.ItemLinks.Add(Me.bbiProfilverwaltung) + Me.RibbonPageGroup3.ItemLinks.Add(Me.bbiKonfiguration) + Me.RibbonPageGroup3.Name = "RibbonPageGroup3" + resources.ApplyResources(Me.RibbonPageGroup3, "RibbonPageGroup3") + ' + 'RibbonPageGroup4 + ' + Me.RibbonPageGroup4.Alignment = DevExpress.XtraBars.Ribbon.RibbonPageGroupAlignment.Far + Me.RibbonPageGroup4.ItemLinks.Add(Me.bbtniGrundeinstellung) + Me.RibbonPageGroup4.ItemLinks.Add(Me.bbtnitemInfo) + Me.RibbonPageGroup4.Name = "RibbonPageGroup4" + resources.ApplyResources(Me.RibbonPageGroup4, "RibbonPageGroup4") + ' + 'RibbonStatusBar1 + ' + Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiUser) + Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiLicenses) + Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiUserLoggedIn) + Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiVersion) + Me.RibbonStatusBar1.ItemLinks.Add(Me.bsilastsync) + Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiDebug) + Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiMessage) + resources.ApplyResources(Me.RibbonStatusBar1, "RibbonStatusBar1") + Me.RibbonStatusBar1.Name = "RibbonStatusBar1" + Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1 + ' + 'RibbonPage2 + ' + Me.RibbonPage2.Name = "RibbonPage2" + resources.ApplyResources(Me.RibbonPage2, "RibbonPage2") + ' + 'ApplicationMenu1 + ' + Me.ApplicationMenu1.Name = "ApplicationMenu1" + Me.ApplicationMenu1.Ribbon = Me.RibbonControl1 + ' 'frmMain ' + Me.Appearance.Options.UseFont = True resources.ApplyResources(Me, "$this") Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.Controls.Add(Me.Panel1) + Me.Controls.Add(Me.RibbonStatusBar1) + Me.Controls.Add(Me.RibbonControl1) + Me.IconOptions.Icon = CType(resources.GetObject("frmMain.IconOptions.Icon"), System.Drawing.Icon) Me.KeyPreview = True Me.Name = "frmMain" + Me.Ribbon = Me.RibbonControl1 + Me.StatusBar = Me.RibbonStatusBar1 Me.SplitContainerDashboard.Panel1.ResumeLayout(False) Me.SplitContainerDashboard.Panel2.ResumeLayout(False) CType(Me.SplitContainerDashboard, System.ComponentModel.ISupportInitialize).EndInit() @@ -698,10 +769,6 @@ Partial Class frmMain CType(Me.ChartBottomRight, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBPM_PROFILEBindingSource, System.ComponentModel.ISupportInitialize).EndInit() - Me.ToolStrip1.ResumeLayout(False) - Me.ToolStrip1.PerformLayout() - Me.StatusStrip1.ResumeLayout(False) - Me.StatusStrip1.PerformLayout() Me.Panel1.ResumeLayout(False) Me.Panel1.PerformLayout() CType(Me.GridControl_Docs, System.ComponentModel.ISupportInitialize).EndInit() @@ -717,7 +784,10 @@ Partial Class frmMain CType(Me.TBPM_USERBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBPM_KONFIGURATIONBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBPM_PROFILE_FILESBindingSource, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.ApplicationMenu1, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) + Me.PerformLayout() End Sub Friend WithEvents DD_DMSLiteDataSet As DD_PM_WINDREAM.DD_DMSLiteDataSet @@ -725,24 +795,14 @@ Partial Class frmMain Friend WithEvents TBPM_PROFILETableAdapter As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILETableAdapter Friend WithEvents TableAdapterManager As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager Friend WithEvents ImageListProfile As System.Windows.Forms.ImageList - Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip - Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip - Friend WithEvents tsstlblUser As System.Windows.Forms.ToolStripStatusLabel - Friend WithEvents ToolStripButton1 As System.Windows.Forms.ToolStripButton Friend WithEvents NotifyIcon1 As System.Windows.Forms.NotifyIcon Friend WithEvents TimerRefresh As System.Windows.Forms.Timer - Friend WithEvents ToolStripSeparator1 As System.Windows.Forms.ToolStripSeparator Friend WithEvents TBPM_USERBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBPM_USERTableAdapter As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBDD_USERTableAdapter Friend WithEvents TBPM_KONFIGURATIONBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBPM_KONFIGURATIONTableAdapter As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter 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 tslblLicenses As System.Windows.Forms.ToolStripStatusLabel - Friend WithEvents tslblUserLoggedin As System.Windows.Forms.ToolStripStatusLabel - Friend WithEvents tsbtnrefresh As System.Windows.Forms.ToolStripButton - Friend WithEvents ToolStripButton2 As System.Windows.Forms.ToolStripButton - Friend WithEvents tslblVersion As System.Windows.Forms.ToolStripStatusLabel Friend WithEvents TimerReminder As System.Windows.Forms.Timer Friend WithEvents ContextMenuGrid As ContextMenuStrip Friend WithEvents CMGroupStart As ToolStripMenuItem @@ -752,7 +812,6 @@ Partial Class frmMain Friend WithEvents NavBarGroupMore As DevExpress.XtraNavBar.NavBarGroup Friend WithEvents NavBarItemOverview As DevExpress.XtraNavBar.NavBarItem Friend WithEvents NavBarItemDashboard As DevExpress.XtraNavBar.NavBarItem - Friend WithEvents tsslblLastSysnc As ToolStripStatusLabel Friend WithEvents cmsNavPane As ContextMenuStrip Friend WithEvents tsmiValidationProfil As ToolStripMenuItem Friend WithEvents Panel1 As Panel @@ -768,7 +827,6 @@ Partial Class frmMain Friend WithEvents ChartBottomRight As DevExpress.XtraCharts.ChartControl Friend WithEvents ToolStripBottomRight As ToolStrip Friend WithEvents TabellenlayoutZurücksetzenToolStripMenuItem As ToolStripMenuItem - Friend WithEvents tslblmessage As ToolStripStatusLabel Friend WithEvents tsmiMarkedFilesFinish As ToolStripMenuItem Friend WithEvents GridControl_Docs As DevExpress.XtraGrid.GridControl Friend WithEvents GridView_Docs As DevExpress.XtraGrid.Views.Grid.GridView @@ -788,14 +846,32 @@ Partial Class frmMain Friend WithEvents ToolStripSeparator3 As ToolStripSeparator Friend WithEvents LayoutSpeichernToolStripMenuItem As ToolStripMenuItem Friend WithEvents Timer5Mins As Timer - Friend WithEvents tsslblDEBUG_LOG As ToolStripStatusLabel Friend WithEvents ToolTip1 As ToolTip - Friend WithEvents tsddConfig As ToolStripDropDownButton - Friend WithEvents ProfileUndBasisToolStripMenuItem As ToolStripMenuItem - Friend WithEvents KonfigurationenToolStripMenuItem As ToolStripMenuItem Friend WithEvents LöscheAlleFilterToolStripMenuItem As ToolStripMenuItem Friend WithEvents ContextMenuNotifyIcon As ContextMenuStrip Friend WithEvents PopupErinnerungInaktivierenToolStripMenuItem As ToolStripMenuItem Friend WithEvents AnzeigenToolStripMenuItem As ToolStripMenuItem - Friend WithEvents tsbtnMonitoring As ToolStripButton + Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl + Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage + Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup + Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup + Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar + Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage + Friend WithEvents bbtniRefresh As DevExpress.XtraBars.BarButtonItem + Friend WithEvents bbtniMonitor As DevExpress.XtraBars.BarButtonItem + Friend WithEvents bbiProfilverwaltung As DevExpress.XtraBars.BarButtonItem + Friend WithEvents bbiKonfiguration As DevExpress.XtraBars.BarButtonItem + Friend WithEvents bbtniGrundeinstellung As DevExpress.XtraBars.BarButtonItem + Friend WithEvents RibbonPageGroup3 As DevExpress.XtraBars.Ribbon.RibbonPageGroup + Friend WithEvents RibbonPageGroup4 As DevExpress.XtraBars.Ribbon.RibbonPageGroup + Friend WithEvents bbtnitemInfo As DevExpress.XtraBars.BarButtonItem + Friend WithEvents ApplicationMenu1 As DevExpress.XtraBars.Ribbon.ApplicationMenu + Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem + Friend WithEvents bsiUser As DevExpress.XtraBars.BarStaticItem + Friend WithEvents bsiLicenses As DevExpress.XtraBars.BarStaticItem + Friend WithEvents bsiUserLoggedIn As DevExpress.XtraBars.BarStaticItem + Friend WithEvents bsiVersion As DevExpress.XtraBars.BarStaticItem + Friend WithEvents bsilastsync As DevExpress.XtraBars.BarStaticItem + Friend WithEvents bsiDebug As DevExpress.XtraBars.BarStaticItem + Friend WithEvents bsiMessage As DevExpress.XtraBars.BarStaticItem End Class diff --git a/app/DD_PM_WINDREAM/frmMain.resx b/app/DD_PM_WINDREAM/frmMain.resx index 215b600..adb73ac 100644 --- a/app/DD_PM_WINDREAM/frmMain.resx +++ b/app/DD_PM_WINDREAM/frmMain.resx @@ -141,7 +141,7 @@ 0, 25 - 162, 147 + 162, 39 @@ -160,7 +160,7 @@ 0 - 662, 95 + 907, 95 0, 0 @@ -205,7 +205,7 @@ 0, 25 - 330, 147 + 330, 39 1 @@ -223,7 +223,7 @@ 0 - 804, 95 + 17, 134 0, 0 @@ -262,7 +262,7 @@ 1 - 496, 172 + 496, 64 162 @@ -307,7 +307,7 @@ 0, 25 - 162, 89 + 162, 15 1 @@ -325,7 +325,7 @@ 0 - 955, 95 + 168, 134 0, 0 @@ -370,7 +370,7 @@ 0, 25 - 330, 89 + 330, 15 1 @@ -388,7 +388,7 @@ 0 - 1117, 95 + 330, 134 0, 0 @@ -427,7 +427,7 @@ 1 - 496, 114 + 496, 40 162 @@ -460,10 +460,10 @@ 1 - 496, 290 + 496, 108 - 172 + 64 7 @@ -478,7 +478,7 @@ Panel1 - 5 + 3 770, 17 @@ -488,7 +488,7 @@ AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0 ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAADw - CAAAAk1TRnQBSQFMAgEBAgEAAewBBAHsAQQBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo + CAAAAk1TRnQBSQFMAgEBAgEAAUQBBQFEAQUBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5 AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA @@ -541,214 +541,70 @@ 597, 17 - - 908, 17 - - - Tahoma, 9pt - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 - YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAC9SURBVDhP3ZOxEcMgEAQpxbWoEtdBAeSqyDERpWAHQIhZ - /PYIhNCMnflmLvm/u3leL9UjpXQNIdxijHlLavREtkdpXorQWWuz1jovy9KQGj00aMX2gpi9MWZn7Lmu - KyG+CSGVRi+++0dlX5cQV828i9F6ETwKgHjwKpYzevMZ8eBl/KEAziaAeP8hYLbEWcBniT9/RlBGcaMr - PApoDglwlqXgR9fYc3jKQEK++5m24F0spwjrlt+kRk9kAqWezFIoWYYVo9kAAAAASUVORK5CYII= - - - - Magenta - - - 24, 24 - - - Information - - - MiddleLeft - - - Magenta - - - 136, 24 - - - Grundeinstellungen - - - 6, 27 - - - Magenta - - - 99, 24 - - - Aktualisieren - - - 184, 26 - - - Profilverwaltung - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - xAAADsQBlSsOGwAAAQNJREFUOE+VUrkNg0AQpASXQAkuwSKnADICCiCmAFJEThfkEJOTk0NARnqeWe9Z - x2NOHmmE8Dy3ezj4F9u25eCqfOrPfsAcgv04jibLMlOWpWGJyn7Q3DSNiaJImCTJfQHECpQR+QS/YXIY - BhbkYr4CAyD3TPnkyDZc1zW1Xq1nQJQTdU95MmjfQRaHat8DAsM0SIi7OuH7m6c4z/NaFIXhbduT9cLI - VK1n2DA/kbPncfzrCY5hmpdlMXYSFjmsNPYBw+Dadd0ufJjk9+4QJpp4Er+tG74d2wKimOM4lhJ3Em+Y - YAHDbon+y/xhAqaqbVspIL07HwHjgyUgg+QEvlT2IAje23iU4vnsUjYAAAAASUVORK5CYII= - - - - 184, 26 - - - Konfigurationen - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 - YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAACpSURBVDhPvVLLDcMgDO0InYktmIIVemKHZA2m4NQLe7g9 - wJXwrBoRBdJGiWrpoScbPz8+t1GklPIv+GzfBopKqV38T+BF7xUOC4xwnQMiuscYHyVBSAq01nVzD1Wg - kGcIgRPGGAa49z5ba7vNAAtgMpqRQKMUhUNk5IQFysK20TBNcz0nuDhxzu0K1GntBQlHDS4k3+IygUNH - aIewwOlLPP2MEr2P9B0pLx8WRpfW43ukAAAAAElFTkSuQmCC - - - - Magenta - - - 103, 24 - - - Verwaltung - - - Magenta - - - 88, 24 - - - Monitoring - - - 0, 0 - - - 1023, 27 - - - 2 - - - ToolStrip1 - - - ToolStrip1 - - - System.Windows.Forms.ToolStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - Panel1 - - - 3 - - - 1015, 17 - - - Tahoma, 9pt - - - 0, 498 - - - 1023, 29 - - - 3 - - - StatusStrip1 - - - StatusStrip1 - - - System.Windows.Forms.StatusStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - Panel1 - - - 4 - - - 150, 24 - - - ToolStripStatusLabel1 - - - 120, 24 - - - Anzahl Lizenzen: - - - 137, 24 - - - Angemeldete User: - - - 130, 24 - - - ToolStripStatusLabel1 - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - xAAADsQBlSsOGwAAAMhJREFUOE+lksENwyAMRTMKI2SG3LkzQMZCyjLNMnCgvXB1/ZHd0sZpmybSk4xj - P0PCQESnMJNHeAby1FodszCFIQExck7KbAEXjCmlEmMk7z1N09RAjJyIRlMAOwrmeX5pDCE81ngnEmcJ - FkzRxvWy0rXcGoh1R7KTxRIULdJmxL1E5ajdCHLOrQBb1qZeAHQAC7hlR4CiXqBgrd/DFFhH6Pl6BE6e - /oib3/jOx9+oFwkFmKITAWKZvH+R9IGdOX6V/8VM/g4Nd1V+xlTSTXpaAAAAAElFTkSuQmCC - - - - No - - - 43, 24 - - - ... - - - 0, 24 - - - Tahoma, 9pt, style=Bold - - - 20, 24 - - - False - - 392, 95 + 637, 95 + + 269, 26 + + + Validierung für Gruppe/Profil starten + + + 269, 26 + + + Validierung für Datei starten + + + 266, 6 + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wwAADsMBx2+oZAAAAM5JREFUOE9jwAa+fv3a8O3bt/9I+D0QCECl8QOQQpAG+fTl/xmC5/yvXnryP8hA + qDRhALJx1s4rYM38sYv+P3/zAcUlX758MYAqhQAkSbACEI1se2Rk5H8nJycwTklJ+f/8+XNUQ0CakDUg + 2754xVq4ZpyGgPyHrAnZsI8fPv3/8P4jHOfl5mEagh5oyLYja0Y2AGYISB+GK2C2g/yObgAMwwwBhRfY + AJgrQAIgvHnzZrACbJpBGMMAZAAShCnAphmER5IBhDDtDCAef/sPAEGjQ6y45GCmAAAAAElFTkSuQmCC + + + + 269, 26 + + + Massenabschluss markierte Dateien + + + 266, 6 + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wwAADsMBx2+oZAAAAP9JREFUOE9jAIHv3787fHz5/P/DQ3v+f/v2jSQMNuDr168NZ/qa/i9U4/1/sCQF + RcGRPbvAYk/v3fkfGRn538nJCY7hBgBdkPDs/Kn/y4xlwIYcaywGS17YueX/Gget/6fnTv6fkpKCohnF + ABAAcV7fufl/o68l3BCQgddWzIe7BhuGaocYAMKgsIC5ZFuUO4YGdAzVjukCkNNBNC7no3gBGIj7b29d + C7cZFpAg54PEbh/Zjz8MQM4GaUTWDMOgwAW5CkQji8Mw2AAg4z1IIygq0RUQwmADvnz5YgDi4PIrLgw3 + AARAHGyK8GEMA8jBUO1UMgCbM/Fh6htAOv72HwANMrXhfARkwAAAAABJRU5ErkJggg== + + + + 269, 26 + + + Lösche alle Filter + + + 269, 26 + + + Layout zurücksetzen + + + 269, 26 + + + Layout speichern + 270, 172 @@ -759,10 +615,10 @@ System.Windows.Forms.ContextMenuStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - 252, 57 + 256, 30 - 631, 380 + 631, 241 8 @@ -780,10 +636,10 @@ 0 - 17, 134 + 500, 134 - 171, 134 + 654, 134 87, 24 @@ -904,7 +760,7 @@ Letzte verschieben - 233, 27 + 233, 0 790, 27 @@ -980,8 +836,14 @@ - 541, 95 + 786, 95 + + 219, 26 + + + Starte Validierung für Profil + 220, 30 @@ -1153,13 +1015,13 @@ - 0, 27 + 0, 0 233 - 233, 471 + 233, 345 5 @@ -1186,10 +1048,10 @@ Tahoma, 9pt - 0, 0 + 0, 158 - 1023, 527 + 1023, 345 4 @@ -1206,79 +1068,24 @@ 3 - - 269, 26 - - - Validierung für Gruppe/Profil starten - - - 269, 26 - - - Validierung für Datei starten - - - 266, 6 - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - wwAADsMBx2+oZAAAAM5JREFUOE9jwAa+fv3a8O3bt/9I+D0QCECl8QOQQpAG+fTl/xmC5/yvXnryP8hA - qDRhALJx1s4rYM38sYv+P3/zAcUlX758MYAqhQAkSbACEI1se2Rk5H8nJycwTklJ+f/8+XNUQ0CakDUg - 2754xVq4ZpyGgPyHrAnZsI8fPv3/8P4jHOfl5mEagh5oyLYja0Y2AGYISB+GK2C2g/yObgAMwwwBhRfY - AJgrQAIgvHnzZrACbJpBGMMAZAAShCnAphmER5IBhDDtDCAef/sPAEGjQ6y45GCmAAAAAElFTkSuQmCC - - - - 269, 26 - - - Massenabschluss markierte Dateien - - - 266, 6 - - - - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO - wwAADsMBx2+oZAAAAP9JREFUOE9jAIHv3787fHz5/P/DQ3v+f/v2jSQMNuDr168NZ/qa/i9U4/1/sCQF - RcGRPbvAYk/v3fkfGRn538nJCY7hBgBdkPDs/Kn/y4xlwIYcaywGS17YueX/Gget/6fnTv6fkpKCohnF - ABAAcV7fufl/o68l3BCQgddWzIe7BhuGaocYAMKgsIC5ZFuUO4YGdAzVjukCkNNBNC7no3gBGIj7b29d - C7cZFpAg54PEbh/Zjz8MQM4GaUTWDMOgwAW5CkQji8Mw2AAg4z1IIygq0RUQwmADvnz5YgDi4PIrLgw3 - AARAHGyK8GEMA8jBUO1UMgCbM/Fh6htAOv72HwANMrXhfARkwAAAAABJRU5ErkJggg== - - - - 269, 26 - - - Lösche alle Filter - - - 269, 26 - - - Layout zurücksetzen - - - 269, 26 - - - Layout speichern - - - 219, 26 - - - Starte Validierung für Profil - - 1132, 17 + 908, 17 - 519, 134 + 17, 173 + + 234, 22 + + + Popup Erinnerung inaktivieren + + + 234, 22 + + + Monitor anzeigen + 235, 48 @@ -1460,18 +1267,6 @@ True - - 234, 22 - - - Popup Erinnerung inaktivieren - - - 234, 22 - - - Monitor anzeigen - 17, 56 @@ -1488,19 +1283,341 @@ 789, 56 - 1046, 56 - - 17, 95 + + 262, 95 + - 257, 95 + 502, 95 - 305, 134 + 788, 134 - 420, 134 + 903, 134 + + + Aktualisieren + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAA1dEVYdFRpdGxlAEFycm93O1JlY3VycmVuY2U7UmVm + cmVzaDtVcGRhdGU7UmVsb2FkO0V4Y2hhbmdlhrRdSAAAANJJREFUOE+lkrENwkAQBI1EATRg0YFzirDI + SMgdIkeQ0wQlkJKZjH5o4tl9/Z5O6B6BCUY67d7tv33fpJT+IhR/wYr+fBctGMEEngXW1OjlvlrAAhxA + qnADGxAGrEAPGHICA1gXWD+AQtooYF8aGGK68zugkFG6TA7pmjlEDR7ovAn9SVo0LCwk8IyPJoeP18sS + dfUQfz2uiuIgzcPm4tswdd/APdPgj+qkO9+H2Of5Bj4Srkgh72vcAYXYnA8gfCQKidiC3FsLIPOe8lxC + 8XtS8wL/7IdaesUzOwAAAABJRU5ErkJggg== + + + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAA1dEVYdFRpdGxlAEFycm93O1JlY3VycmVuY2U7UmVm + cmVzaDtVcGRhdGU7UmVsb2FkO0V4Y2hhbmdlhrRdSAAAAc5JREFUWEfFlj1Ow1AQhFMEmnRIFCgUFCDl + BNAlJ/BVUtImQkIcAW7gA9BwgHTUqSgouAK9mUHeaN9mXuwQ8VJ8Sjxvdnfkv+dB0zRHRYolkWJJpFgS + KZZEijmqh7cJmIMarMF3C/9T49pE1eaQYgRNx2AJPkDTAT30jlWviBQ9aHQLXkEc1AVrpqqnR4oGGpAL + 8AnUkC5WYGcIKRIUkqr9vQIW4h0swAyctfA/Na7FEDwT2cshRYIiDmcDH+IR3Cg/4Rp4ATHEUvnJlnBf + Pw9RYMMNC3ES/RF4RiCG4I0pn47kAMPPYYzDjcp7dwEvz0S8HHPlTQ5gyg039gnBe8LX1sq3+QND13Cj + Vwj4eGP6urXymbnvcCMJweOw3pfqoOIDQ/zWbxp4sMh3uzfPlC8C396XcasJgYEbiy9YKJ8C3q4QyZlL + ig2YuKv5Ij5S2RdQBN5ciIqPuvcmhQaM3HbjzseXy0j5PfCcAhWCw4fRnxx4UMAt1TcgDNH1Kn4C18CH + SE67R4oERfwGUNtwn83oC/gQcgaRooHCKeCWGkP0gSEugextSNGDBgzx1w+SO9XTI8UIGh3vk8yDpsf5 + KP1PpFgSKZZEiiWRYjmawQ//5PL6OeAKogAAAABJRU5ErkJggg== + + + + Monitoring + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAbdEVYdFRpdGxlAEZpbmQ7SWQ7TG9jYXRlO1NlYXJj + aMjN118AAACCSURBVDhPtY7REYAwCENd0DUcxGOJbuJ22KjpUSy13unHOw0JoZOqFuZ1UzIyB5WIgtEc + NEM2HM2JL1h80OrM4XMHfFPgQoUnD4TXO1SvCC9cdH1bMHqdlFf8VwAzf0nlZV4XNLEFN2ACEVGD12mk + gEv8t/oM9XALXreXLFeYOC1pB/JUiL0FdxNpAAAAAElFTkSuQmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAbdEVYdFRpdGxlAEZpbmQ7SWQ7TG9jYXRlO1NlYXJj + aMjN118AAADxSURBVFhH7ZJRDsIwDEN3Qa7BQdAuwU24XUZQi1zPrbJ1G2Lax5OIcRxTMZjZT5HikUjx + SKTI3B4vI5Rn5mOPQopMNDjqQ6TIRIOjPkSKGQ5klvoUUsykgDuGIeRTfHazTyHFDIZUQJ/iKvDHBSio + RtiL2YgUnbTY+vVRmq8gRQeXO9mvAHlrLCtAy5vD94rBScYtnp6RL1EMDpo35mQFKnstrgK7FwjBezPh + bfIDqwqM42hL8L0ixEkHugqgLuYn+r5fZNKB7hdwTc2o++cixOFDNcTeSQr0kIP5EM6o+2cZtBYMRo3m + 9p+whxwcxcyGCV++4POOhQ6sAAAAAElFTkSuQmCC + + + + Profilverwaltung + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAABHdEVYdFRpdGxlAEN1c3RvbWVyO0VtcGxveWVlO0Zp + eDtQdWJsaWM7U2V0dGluZ3M7T3B0aW9ucztDdXN0b21pejtHcm91cDtUZWFtaQsTiAAAARBJREFUOE+l + 0z9qAlEQx/E1Bi1t7D1BCgXb3EBT2nkBmxQSW5HtPUCKdIGcwL2CFnuI4A0EFSRuvr9lHsyTlSWk+PCY + cf68XTUpiuJfKpN/kaRpek8D7ziYDzwgqouCG11sUThDRHU+uLfxB2HABL4nGqDpfpsot3PxAr4nGqDp + vlmU+0SONnx9yQeaHg0YrbLENNHH2U7F5Wd+QAdHNZqDFWnQG2a42qm4XOAHyBxhwJQCbVLxxRoCxcpH + Ax7xhGfToEDX1UY1rdGzU7HyfTXq5SzxjT1eTIsCPbOurYYeuVedFit/1oAvhGt77fFqM6Co9ganm8Yg + p6DuHTTD81eioP5bqPqHBSpw/O/AclnyC9lwIPbajFPHAAAAAElFTkSuQmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAABHdEVYdFRpdGxlAEN1c3RvbWVyO0VtcGxveWVlO0Zp + eDtQdWJsaWM7U2V0dGluZ3M7T3B0aW9ucztDdXN0b21pejtHcm91cDtUZWFtaQsTiAAAAsFJREFUWEfF + 1k+ITWEYx/EZ/8IwslQWNlJylcJM/hU76U7drBAWWCh2YiGb6W5sbSULRSQrf0aNPxmE/JdpRlZI2E0i + orm+v5n3bZ6ennMdV6E+Ofd53/f3vOfcc86dtkaj8V+FxX8pLJZVr9fX4zI+4gc+4So2RPMjYbEMmnTj + JxoB1ddF67ywWAYNTpmGkbPROi8slkGDJ66h9zRa54XFMmhwFKOmofc6WueFxYyQHRiAvcnuYifacRhR + c9F9UIlyrbAoLD5iwiL6NwMjiMalGmVbYZGFM/HZBEW+ohO3TM16hulRvhUWWdhlgppZi4uulu2Ksr2w + yOJNLqyI5h1zNfmAjijbC4ss3mfCmtmP5a72HRuj3EhYJOCeCWzmAXS/HMd9nMRv73wrLBLSj6ih11+w + voIp0ZgXFlNA0Xs+0/hSTHNr50Pvi8fYq8923AuLwsKixyvTC2oy9Ou3GyuwB+9g5+kFdgJzq719bV7Y + XFhQSwFFNL7G1byFxgLMK70BYcEZRMGn0/gFV79jjKQmrzCcG3ph44yQqTiAN1CDtzgEXfotqZbpyWnv + 6b2yutZ7aQ7HldSkkeSmnViVP4eNMwWa49nmeFL6fzOGMLYBmncTOorn2I4byBu4mWoa05wuxBsgbBF0 + +Q8WjOtX8LzmKcTQ2b1AblpEczR3YgOEzYIu7yDyZdVbreaa69LbR1Tzta5DgdiK3EhnqqsgOs51zZn4 + Clisu9k/PtZDnMMjU7PsldClzs17Uk10nDehOeMbYPEyfDFhrdAGhlJ4dh25eWbvCRnWBsq+dpvRBl66 + 8NvwG1DNzhnUBr65sFYsJiw3sV9BNdVEx+FX8N6FtUp/mi0h1N+E1zCQjnN9G8Y3YO/wVuSgpPXHsFUK + MVZCZ/p3L6I/oRBHr9mxs0vyBvJnjZV7FZeRg5rQj5EEY31tvwDXIzKeLFW7IwAAAABJRU5ErkJggg== + + + + Konfiguration + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAldEVYdFRpdGxlAEJ1aWxkO1NldHRpbmdzO0N1c3Rv + bWl6O09wdGlvbnNZCaCYAAAAvklEQVQ4T72RQQoCMQxFB7qYY8wZ6j0E7+HOxRxAu/c44wFcz1FcFxTj + /5DBBmaa4sLAIyTk/6ZtJyKGlJI4mHlTEA5txX8MgBdm3hSP+0lKlljptxlsUWpaDF5gBv1CqfEM2Ov2 + 51s4XKYdctYcWgx4MsUCRnAEb82sIakbzBgKOvykoID16Bn0ui5PpOgKBs2s2Y9VAwxkwLUpGNDjlWjC + mv3sGUTw8wbuG4BgDNZQQdsv1ICA1+GbxG9fug/ssNACwjT8OgAAAABJRU5ErkJggg== + + + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAldEVYdFRpdGxlAEJ1aWxkO1NldHRpbmdzO0N1c3Rv + bWl6O09wdGlvbnNZCaCYAAABy0lEQVRYR82VPU7DQBSEc4O0UZQ2TZooB6HMRZCoIyFXdFyDE3AAKqrQ + 0keIBkU0EQixzET7nJeXifAPllnpU9azb2d27bUzSCn1ihQjRVGkBnCe9PNIUVC7VQknUvS4HdUmeimk + 6MlGtVtehPT0SDHQuLVeQN5FK6JnRIpGNmjcWi8A/EVTviVSJG8Pl+kc3187lBwar1WdgSYziBSJMjI+ + Xh9Rcmi8VnUGmswgUiTKyHh/ut2Hcuf85bWqM6K3R4pEGTUlenukSJRRU6K3R4pEGTUlenukSJRRRZ7B + 0KP8DSkSTFTmihewcawvru+nYJuZKn9DigRGKizC8AFCRmCM/hJcoT8HKTM3T9aAkc8pO5Ec8BsbGuag + O7AAE3ADPjPsU+MYa1hbLuIk2BBhCi6AuzLjKrB2bDknwYYIU/CZL2HI3akwxcLnHIV6QpCCp30N+Mx5 + iy2Ad2UFZhn2qdn4xOcchXpc0DmGMONp54Hjc7aAFcY4v4SaG2ct5+zfDhlOMFGFergAvmY05WGzgBnG + 4gJ4J2zcarfMkeEEE1Wo518soNdH0PshJN29hlWBYTcfoqrArJtPcR1oCMpdod/+z6gNCKn4d5wGP9ko + qHzFAnr7AAAAAElFTkSuQmCC + + + + Grundeinstellungen + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAydEVYdFRpdGxlAEN1c3RvbWVyO0VtcGxveWVlO1Bl + cnNvbjtDb250YWN0O1VzZXI7Q2xpZW50fhE26AAAAM1JREFUOE+l0TEOQUEUBdBfiN4ySDQqKvTfGuxF + pbEIi5DoRcIa/gqovwKRca/MvMw8/zGhODKZd98NpnDO/eX1MVtstSHs4eIdYAxJzipowQmccoY2SNYq + 6IJeDnogWatgAk3LNAXJWgVLaFomziRrFYzgAXqZd/xzJWsV0A50Ae+S3KcCPtkNwjLP2c8YzOHo8fyW + sQo6sIL4zXnmHWeS1QUD2MAd+LXX0Pd45h1nzDCbFJRwhfCbv2G2jAuqaJirigtqNcxRS8HvXPEEp3w/ + tQHvKFEAAAAASUVORK5CYII= + + + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAydEVYdFRpdGxlAEN1c3RvbWVyO0VtcGxveWVlO1Bl + cnNvbjtDb250YWN0O1VzZXI7Q2xpZW50fhE26AAAAfhJREFUWEfF1rFLVWEYx3FBFweHwGhVamnIvdUQ + CmwI+mOiIUIXwV10cQ8aGoVcbFWCiIYgAiVHsWgwSDj+fofzHN7nvV+vDt7r8Fne87zP99x7HZxomuZW + DRw8X9m5jmV5J7/kf+dY3ssLoTtJ9FLcaLiyIc0VtoXu9qKX4kbDhadCQfJSaEcreiluNFzw104x8kFo + Ryt6KW40XPguFCM/hHa0opfiRsOFv0Ix8ltoRyt6KW40XKDQZf4J7WhFL8WNhjuLQqFhfId29b0UNxru + bApFhvEd2tX3UtxouLMmFBnGd2hX30txo+HOfTkRChHP+g7t6nspbjRceCMUI6+EdrSil+JGw4VHQjHi + WdrRil6KGw1XPgoFS7tCd3vRS3Gj4cqCnAmFzc88Q3d70Utxo2HwTE6ljv8RP6M7SfRS3Gj4Enfltfgn + +SRv5Z7Q7IDopbjRcGUSzmpTcJZEL8WNhguP5bM8KM5q/uv/Ip6l563opbjB8JysyDeJ33pPpqWenZED + iTnfWZV5SbPRS3Erhu7Ilvj/vVhY2pcn4q/bluSr0Kx3eJd3XusFHspPoWW18w49q3mnd/e9FDc9nJVD + oQU3wbtno0cvsF4Mj8p69OgFRvnpw2H06AXowo2LHr3AUT08AkfRG3iBccPDccLDccLD8WkmLgAKdExB + J+0x6AAAAABJRU5ErkJggg== + + + + Über + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAALdEVYdFRpdGxlAEluZm87bRIthgAAAJxJREFUOE+t + k+ENQDAUhDuKafyzlN9MYQkbWEdiAO5rNEEOlZJ8Cb17l77XCk07XqlFLyYx7/DOGtrJf/yoRCcWsd6A + hgfvKYCFQbgiB94YkgJIdcYnqIkB9GW3rSeA0wQ1NSLDcYa3AOgRmbATc5gI4JicmLOD+ZeA2xYyAmIL + xUMsPkYoukhQfJVTCKm2nR00PLEYjgGJD7/zGDZMp1TRLvGgqwAAAABJRU5ErkJggg== + + + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAALdEVYdFRpdGxlAEluZm87bRIthgAAAahJREFUWEfN + lz1SwzAQhcMRSMXkCpyFPkeggg5aJjWTmqNQ5AoU3CC3yFCZ/TzejGQ/WZKNxxRfxuPs232RVj/ZNE2z + Ku3Hw+GzhJ2xN47GyTgblw6eecd3xBCrckSUGrg33oxvoymEWDRoVc6WnIEb49H4MlSREtCSg1yDGmMG + 7ox3QyWdArnIGdVJGSDww1CJ5kDOyIQywFCV/PIf48nYGrfdM+9UbAi5r9OhDDBfStjnGV2IvXvtxaSg + hjRAx5Y23DYs3uVgNFRsH2q0qwNdaIBlowSKOQaAWpEBNo6ada6m4KUXMwa1duhczO6lAlN4E9KANU0Y + sg8NsIWqoCU5hgbYx1XQkpxCAxwmKigJuhAVk+GMzsWcaCooiRd2VEyGC7p/Y2D1KahuQi/sqJgMURNW + L0Mv7KiYDNEyrN2ITDbbQLQR1W7FJptlYLAVQ81hZLJZBgaHEdQcxyabbCB5HEPphcRkkw0kLyRQeiWb + SvZKBqteSh0C/3IkyBUVhzEDwFAxX8WNKUBLjuuwh+QMOHQsy6ZmnyAWTdvtKUoNOMv9OV2PZvMLsfKg + vDjYoZ0AAAAASUVORK5CYII= + + + + BarButtonItem1 + + + BarStaticItem1 + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAydEVYdFRpdGxlAEN1c3RvbWVyO0VtcGxveWVlO1Bl + cnNvbjtDb250YWN0O1VzZXI7Q2xpZW50fhE26AAAAM1JREFUOE+l0TEOQUEUBdBfiN4ySDQqKvTfGuxF + pbEIi5DoRcIa/gqovwKRca/MvMw8/zGhODKZd98NpnDO/eX1MVtstSHs4eIdYAxJzipowQmccoY2SNYq + 6IJeDnogWatgAk3LNAXJWgVLaFomziRrFYzgAXqZd/xzJWsV0A50Ae+S3KcCPtkNwjLP2c8YzOHo8fyW + sQo6sIL4zXnmHWeS1QUD2MAd+LXX0Pd45h1nzDCbFJRwhfCbv2G2jAuqaJirigtqNcxRS8HvXPEEp3w/ + tQHvKFEAAAAASUVORK5CYII= + + + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAydEVYdFRpdGxlAEN1c3RvbWVyO0VtcGxveWVlO1Bl + cnNvbjtDb250YWN0O1VzZXI7Q2xpZW50fhE26AAAAfhJREFUWEfF1rFLVWEYx3FBFweHwGhVamnIvdUQ + CmwI+mOiIUIXwV10cQ8aGoVcbFWCiIYgAiVHsWgwSDj+fofzHN7nvV+vDt7r8Fne87zP99x7HZxomuZW + DRw8X9m5jmV5J7/kf+dY3ssLoTtJ9FLcaLiyIc0VtoXu9qKX4kbDhadCQfJSaEcreiluNFzw104x8kFo + Ryt6KW40XPguFCM/hHa0opfiRsOFv0Ix8ltoRyt6KW40XKDQZf4J7WhFL8WNhjuLQqFhfId29b0UNxru + bApFhvEd2tX3UtxouLMmFBnGd2hX30txo+HOfTkRChHP+g7t6nspbjRceCMUI6+EdrSil+JGw4VHQjHi + WdrRil6KGw1XPgoFS7tCd3vRS3Gj4cqCnAmFzc88Q3d70Utxo2HwTE6ljv8RP6M7SfRS3Gj4Enfltfgn + +SRv5Z7Q7IDopbjRcGUSzmpTcJZEL8WNhguP5bM8KM5q/uv/Ip6l563opbjB8JysyDeJ33pPpqWenZED + iTnfWZV5SbPRS3Erhu7Ilvj/vVhY2pcn4q/bluSr0Kx3eJd3XusFHspPoWW18w49q3mnd/e9FDc9nJVD + oQU3wbtno0cvsF4Mj8p69OgFRvnpw2H06AXowo2LHr3AUT08AkfRG3iBccPDccLDccLD8WkmLgAKdExB + J+0x6AAAAABJRU5ErkJggg== + + + + BarStaticItem2 + + + BarStaticItem3 + + + BarStaticItem4 + + + No Sync so far + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAWdEVYdFRpdGxlAFRpbWU7Q2xvY2s7V2F0Y2hviDio + AAAAyklEQVQ4T62TzRGCQAxGaYM+KIES6MCDZchhO6ERmnDGJjjYgDFvJ2EChoPi4TG7yeOb/YFGRE5R + H49LH+mUUZmVxWBMjd7qZgFX5a7IAfRw0gAaT+WlTMqgtAZjavRwakgMYGmkI9yoQSlFwOf0zMHtqHmD + /bHEyWXYBwCOuSNzL3JIFIcoHwSwHdyZuRc5aYptlD0gBuGYuzD/W0C6hQwcczdbSA8xA8fczSGm17iH + njkf1winPqQYQjpLzKBXX4YsAL7/mX5Hmjfh6HbzAvf6qQAAAABJRU5ErkJggg== + + + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAWdEVYdFRpdGxlAFRpbWU7Q2xvY2s7V2F0Y2hviDio + AAAByElEQVRYR8WWsW0DMQxFPYEHSenKTbqMkA3SGJnA6T1EJgjgxgNkEm+RykC6C59BGhQpn9lEVzzA + R/3/xTtJd15N07Qo3eJIusWRdIsjSYXz28scW2EvnISzcFH4TY0xND3vlThfKvRMwrPwKfwI0wPQoMWT + suJ8qdAxvQvcYW+yOfDgbfLifKkQDB/Cr2ChPO6jsBM2wlrhNzXG0JgeLxm3zDhfKjgx3fvJv4XXqI+g + Ua1v4vYkoj4VQISsn3/sX8JT1B0Oh0lp6mjVY36yrnvC6yAVQIRsIjNzN2lyuNcA4FGv5ZCZdKkgIo6R + 7XbW8+5jn2sA8GoGWWRuo6a5ABFxlq3rYxz3PGoAyHB5+zjeXICIeKGYYRfHPcUGOB2Wd4rjzQWIyG++ + TRz3FBvgiFreOY43FyAif47XcdzjGmjwGjJc3sWPQXMBiJxhkQbKS1CBDJdXWoLyJqxAhssrbcLyMaxA + hssrHcPyi+gReDWDrPKLCEqv4jnwqNdyyq9iKH2M7oFWPeavf4wQKct8jk2oLPqHxKB7vxxV8Nzu3Ijz + pUI0KKwfm8hOxxxo0F7XPBLnS4WeyfH/f8tH0y2OpFscSbc4jmn1Bw8VkFVeTnsNAAAAAElFTkSuQmCC + + + + BarStaticItem1 + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAA4dEVYdFRpdGxlAEhpZ2g7TG93O0Nsb3NlO0NoYXJ0 + O1N0b2NrO1NoYXJlO09wZW47Q2FuZGxlO1N0aWNr36bPbQAAAGtJREFUOE/NztENgCAMBFAWdB0HcAlH + cAW3O1vCNZTyIYFEP14CZ3uYAEzphiNCsB03RMj364QIeQiWF5RFh9+UHcpiy16uyPgXBZz7dwHlRVpV + 4HBH2YFYwLssUP4TVc+7i5ouGNUN30N6AFQmr8/EPoHpAAAAAElFTkSuQmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAA4dEVYdFRpdGxlAEhpZ2g7TG93O0Nsb3NlO0NoYXJ0 + O1N0b2NrO1NoYXJlO09wZW47Q2FuZGxlO1N0aWNr36bPbQAAAN5JREFUWEft0MsRwjAMhOE0SDsUQBOU + QAt0Z2SPl6zNn9xQcsjhG4aV9ZgspZRDYZgJw0wYZsIwE4bu9niXgLX761kC1vb6HIbuOoAG9cWz4U3G + AfVXvgf09wPvnWHo+pAh00JzzAH03xeL3hEMXR8yZNcBKQfQoNBq1wFnOWC22aeZBMOKBoVWq8u6tli2 + +jSTYFjRoNBqtvSYA0QHeAY9Ea/1GYYVDQrDm38fIG2x+Bs6QLyP6oJhpWYfVPmbjS/w0+f1GYZOg6h2 + ygNkr89hmAnDTBhmwjAThnnK8gHwijMDX2l9pwAAAABJRU5ErkJggg== + + + + BarStaticItem1 + + + 0, 0 + + + Allgemein + + + Funktionen + + + Verwaltung + + + Grundeinstellungen + + + Funktionen + + + 1023, 158 + + + 0, 503 + + + 1023, 24 + + + RibbonStatusBar1 + + + DevExpress.XtraBars.Ribbon.RibbonStatusBar, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + $this + + + 4 + + + RibbonControl1 + + + DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + $this + + + 5 + + + RibbonPage2 + + + 199, 173 True @@ -1517,7 +1634,7 @@ Tahoma, 12pt - + AAABAAEAMDAAAAEAIACoJQAAFgAAACgAAAAwAAAAYAAAAAEAIAAAAAAAgCUAABMLAAATCwAAAAAAAAAA AAAxJKXfMSSl8jEkpe4uIqHuMCSk7lhC3e5eSOfuWELe7llD3+5ZQ9/uWUPf7llD3+5ZQ9/uWUPf7llD @@ -1722,96 +1839,6 @@ DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null - - ToolStripButton2 - - - 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 - - - ToolStripSeparator1 - - - System.Windows.Forms.ToolStripSeparator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - tsbtnrefresh - - - System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - tsddConfig - - - System.Windows.Forms.ToolStripDropDownButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - ProfileUndBasisToolStripMenuItem - - - System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - KonfigurationenToolStripMenuItem - - - System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - tsbtnMonitoring - - - System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - tsstlblUser - - - System.Windows.Forms.ToolStripStatusLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - tslblLicenses - - - System.Windows.Forms.ToolStripStatusLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - tslblUserLoggedin - - - System.Windows.Forms.ToolStripStatusLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - tslblVersion - - - System.Windows.Forms.ToolStripStatusLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - tsslblLastSysnc - - - System.Windows.Forms.ToolStripStatusLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - tslblmessage - - - System.Windows.Forms.ToolStripStatusLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - tsslblDEBUG_LOG - - - System.Windows.Forms.ToolStripStatusLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - CMGroupStart @@ -2040,10 +2067,136 @@ System.Windows.Forms.ToolTip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + bbtniRefresh + + + DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bbtniMonitor + + + DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bbiProfilverwaltung + + + DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bbiKonfiguration + + + DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bbtniGrundeinstellung + + + DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bbtnitemInfo + + + DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + BarButtonItem1 + + + DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bsiUser + + + DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bsiLicenses + + + DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bsiUserLoggedIn + + + DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bsiVersion + + + DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bsilastsync + + + DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bsiDebug + + + DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bsiMessage + + + DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + RibbonPage1 + + + DevExpress.XtraBars.Ribbon.RibbonPage, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + RibbonPageGroup1 + + + DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + RibbonPageGroup2 + + + DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + RibbonPageGroup3 + + + DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + RibbonPageGroup4 + + + DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + RibbonPage2 + + + DevExpress.XtraBars.Ribbon.RibbonPage, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + ApplicationMenu1 + + + DevExpress.XtraBars.Ribbon.ApplicationMenu, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + frmMain - System.Windows.Forms.Form, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + DevExpress.XtraBars.Ribbon.RibbonForm, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a \ No newline at end of file diff --git a/app/DD_PM_WINDREAM/frmMain.vb b/app/DD_PM_WINDREAM/frmMain.vb index 442572a..556bba9 100644 --- a/app/DD_PM_WINDREAM/frmMain.vb +++ b/app/DD_PM_WINDREAM/frmMain.vb @@ -16,7 +16,7 @@ Public Class frmMain 'Private _windreamPM As ClassPMWindream Private UserLoggedin As Integer = 0 Private CURR_DT_VWPM_PROFILE_ACTIVE As DataTable - Private CURR_DT_PROFILEGRID As DataTable + Private CURR_DT_OVERVIEW As DataTable Private RedDocuments As Integer = 0 Private YellowDocuments As Integer = 0 @@ -32,6 +32,7 @@ Public Class frmMain Private formopenClose As Boolean = False Private formShown As Boolean = False 'Private _windream As New ClassWindream_allgemein + Private allgFunk As New ClassAllgemeineFunktionen Private Sub frmMain_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing Try @@ -53,17 +54,14 @@ Public Class frmMain Catch ex As Exception End Try - + End If Try ClassAllgemeineFunktionen.LoginOut("LOGOUT") - LOGGER.Info("## ProcessManager beendet - " & Now, False) - LOGGER.Info("", False) + LOGGER.Info("ProcessManager closed - " & Now, False) Catch ex As Exception LOGGER.Error(ex) - LOGGER.Info("### Fehler bei LogOut") - LOGGER.Info("### Fehler: " & ex.Message) End Try End Sub @@ -82,7 +80,7 @@ Public Class frmMain ' Create helper to save/load expanded GroupColumns at runtime RefreshHelper = New RefreshHelper(GridView_Docs, "GUID") - tslblVersion.Text = String.Format("Version {0}", My.Application.Info.Version.ToString) + bsiVersion.Caption = String.Format("Version {0}", My.Application.Info.Version.ToString) If ERROR_STATE = "NO DB-CONNECTION" Or ERROR_STATE = "FAILED DBCONNECTION" Then MsgBox("Bitte hinterlegen Sie die Datenbankverbindung in der Konfiguration!", MsgBoxStyle.Critical, "Fehlende Konfiguration:") frmKonfig.ShowDialog() @@ -100,7 +98,7 @@ Public Class frmMain End Try If Refresh_ConnectionString() = True Then Try - tslblLicenses.Text = "Anzahl Lizenzen: " & LICENSE_COUNT + bsiLicenses.Caption = "Anzahl Lizenzen: " & LICENSE_COUNT LOGGER.Debug("Initializing MainForm....") If ERROR_STATE = "NO USER" Then Dim oDT As DataTable = ClassAllgemeineFunktionen.GUI_LANGUAGE_INFO("No Userconfig") @@ -113,7 +111,7 @@ Public Class frmMain Me.Close() End If Else - LOGGER.Info(">> Username: " & USER_USERNAME, False) + LOGGER.Info("Username: " & USER_USERNAME, False) 'Wenn license abgelaufen und der User nicht admin ist! If LICENSE_EXPIRED = True Then If USER_IS_ADMIN = False Then @@ -122,20 +120,20 @@ Public Class frmMain End If End If If USER_IS_ADMIN = True Then - tsddConfig.Visible = True + RibbonPageGroup3.Visible = True Else - tsddConfig.Visible = False + RibbonPageGroup3.Visible = False End If If MONITORING_ACTIVE = False Then - tsbtnMonitoring.Visible = False + RibbonPageGroup2.Visible = False Else - tsbtnMonitoring.Visible = True + RibbonPageGroup2.Visible = True End If 'Anzahl der eingeloggten User If USER_LANGUAGE <> "de-DE" Then - tslblUserLoggedin.Text = "License Count: " & USERCOUNT_LOGGED_IN + bsiUserLoggedIn.Caption = "License Count: " & USERCOUNT_LOGGED_IN Else - tslblUserLoggedin.Text = "Lizenz-Zähler: " & USERCOUNT_LOGGED_IN + bsiUserLoggedIn.Caption = "Lizenz-Zähler: " & USERCOUNT_LOGGED_IN End If @@ -145,7 +143,7 @@ Public Class frmMain LOGGER.Error(ex) MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Fehler bei User Check:") End Try - tsstlblUser.Text = USER_USERNAME + bsiUser.Caption = USER_USERNAME Try @@ -177,7 +175,8 @@ Public Class frmMain Check_Timer_Notification() formShown = True Restore_Form_Position() - If IDB_ACTIVE = False Then + + If IDB_ACTIVE = False And ERROR_STATE = "" Then Try WINDREAM = New ClassPMWindream WINDREAM.Start_WMCC_andCo() @@ -301,8 +300,20 @@ Public Class frmMain Try Dim xml As String = GetXML_OverviewLayoutName() IO.File.Delete(xml) + Try + GridView_Docs.Columns.Clear() + Catch ex As Exception + If IsNothing(GridView_Docs) Then + LOGGER.Warn("Somehow GridView_Docs is nothing....") + Else + If IsNothing(GridView_Docs.Columns) Then + LOGGER.Warn("Somehow GridView_Docs.Columns is nothing....") + + End If + End If + Exit Sub + End Try - GridView_Docs.Columns.Clear() GridView_Docs.PopulateColumns() If GridView_Docs.Columns.Count > 0 Then GridView_Docs.Columns.Item("PROFILE_ID").Visible = False @@ -314,8 +325,14 @@ Public Class frmMain 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" + Try + GridView_Docs.Columns("Last edited").DisplayFormat.FormatType = FormatType.DateTime + GridView_Docs.Columns("Last edited").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss" + Catch ex As Exception + GridView_Docs.Columns("Zuletzt bearbeitetd").DisplayFormat.FormatType = FormatType.DateTime + GridView_Docs.Columns("Zuletzt bearbeitet").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss" + End Try + Try GridView_Docs.Columns.Item("GROUP_TEXT").Visible = False GridView_Docs.Columns.Item("GROUP_COLOR").Visible = False @@ -642,8 +659,8 @@ Public Class frmMain sql = sql.Replace("@MACHINE_NAME", Environment.MachineName) sql = sql.Replace("@DATE", Now.ToShortDateString) sql = sql.Replace("@PROFILE_ID", CURRENT_CLICKED_PROFILE_ID) - CURR_DT_PROFILEGRID = ClassDatabase.Return_Datatable(sql, True) - If CURR_DT_PROFILEGRID.Rows.Count = 0 Then + CURR_DT_OVERVIEW = ClassDatabase.Return_Datatable(sql, True) + If CURR_DT_OVERVIEW.Rows.Count = 0 Then NO_WORKFLOWITEMS = True Else NO_WORKFLOWITEMS = False @@ -661,71 +678,83 @@ Public Class frmMain End Sub Sub Create_Basic_View() - - GridControl_Docs.DataSource = Nothing Try - GridView_Docs.Columns.Clear() + GridControl_Docs.DataSource = Nothing + Try + GridView_Docs.Columns.Clear() + Catch ex As Exception + LOGGER.Error(ex) + LOGGER.Warn("Could not clear GridView_Docs.Columns") + End Try + + ' Spalte für Status Icon erstellen + Dim columnStateIcon As New DataColumn() + columnStateIcon.DataType = GetType(Image) + columnStateIcon.ColumnName = "ICON" + columnStateIcon.Caption = "" + CURR_DT_OVERVIEW.Columns.Add(columnStateIcon) + + RedDocuments = 0 + YellowDocuments = 0 + GreenDocuments = 0 + + For Each row As DataRow In CURR_DT_OVERVIEW.Rows + Dim State As Integer = row.Item("TL_STATE") + Select Case State + Case 1 + RedDocuments += 1 + row.Item("ICON") = My.Resources.ampel_rot + Case 2 + YellowDocuments += 1 + row.Item("ICON") = My.Resources.ampel_gelb + Case 3 + GreenDocuments += 1 + row.Item("ICON") = My.Resources.ampel_gruen + End Select + Next + + bindsourcegrid.DataSource = CURR_DT_OVERVIEW + GridControl_Docs.DataSource = bindsourcegrid + + 'GridControlDocRow.ForceInitialize() + + RestoreLayout() + + 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("DocID").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 + Try + GridView_Docs.Columns("Last edited").DisplayFormat.FormatType = FormatType.DateTime + GridView_Docs.Columns("Last edited").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss" + Catch ex As Exception + GridView_Docs.Columns("Zuletzt bearbeitet").DisplayFormat.FormatType = FormatType.DateTime + GridView_Docs.Columns("Zuletzt bearbeitet").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss" + End Try + + LOGGER.Debug("All columns in CreateBasicView created") + Try + GridView_Docs.Columns.Item("GROUP_TEXT").Visible = False + GridView_Docs.Columns.Item("GROUP_COLOR").Visible = False + Catch ex As Exception + + End Try + LOGGER.Debug("All columns in CreateBasicView created") Catch ex As Exception LOGGER.Error(ex) - End Try - ' Spalte für Status Icon erstellen - Dim columnStateIcon As New DataColumn() - columnStateIcon.DataType = GetType(Image) - columnStateIcon.ColumnName = "ICON" - columnStateIcon.Caption = "" - CURR_DT_PROFILEGRID.Columns.Add(columnStateIcon) - - RedDocuments = 0 - YellowDocuments = 0 - GreenDocuments = 0 - - For Each row As DataRow In CURR_DT_PROFILEGRID.Rows - Dim State As Integer = row.Item("TL_STATE") - Select Case State - Case 1 - RedDocuments += 1 - row.Item("ICON") = My.Resources.ampel_rot - Case 2 - YellowDocuments += 1 - row.Item("ICON") = My.Resources.ampel_gelb - Case 3 - GreenDocuments += 1 - row.Item("ICON") = My.Resources.ampel_gruen - End Select - Next - - bindsourcegrid.DataSource = CURR_DT_PROFILEGRID - GridControl_Docs.DataSource = bindsourcegrid - - 'GridControlDocRow.ForceInitialize() - - RestoreLayout() - - 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("DocID").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" - Try - GridView_Docs.Columns.Item("GROUP_TEXT").Visible = False - GridView_Docs.Columns.Item("GROUP_COLOR").Visible = False - Catch ex As Exception - - End Try End Sub Private Function GridLayoutChanged() As Boolean Try - For Each oViewColumn As DataColumn In CURR_DT_PROFILEGRID.Columns + For Each oViewColumn As DataColumn In CURR_DT_OVERVIEW.Columns If oViewColumn.Caption = "" Then Continue For End If @@ -758,7 +787,7 @@ Public Class frmMain End If Dim oGridColumn_exists As Boolean = False Dim oGridDXFieldName = oActGridColumn.FieldName - For Each oViewColumn As DataColumn In CURR_DT_PROFILEGRID.Columns + For Each oViewColumn As DataColumn In CURR_DT_OVERVIEW.Columns If oViewColumn.Caption = oGridDXFieldName Then oGridColumn_exists = True End If @@ -775,97 +804,6 @@ Public Class frmMain End Try End Function - 'Sub LoadProfile_PM() - ' Try - ' If Me.Visible = True And frmAdministration.Visible = False Then - ' Load_Profiles_for_User() - - ' PROFILE_COUNT = 0 - ' ClassInit.InitBasics() - ' Dim sql = CURRENT_DT_CONFIG.Rows(0).Item("SQL_PROFILE_MAIN_VIEW") - - ' sql = clsPatterns.ReplaceInternalValues(sql) - ' sql = clsPatterns.ReplaceUserValues(sql, USER_PRENAME, USER_SURNAME, USER_SHORTNAME,USER_LANGUAGE, USER_EMAIL, USER_ID, CURRENT_CLICKED_PROFILE_ID) - - ' ' this needs to stay for backwards compatibility - ' sql = sql.Replace("@USER_ID", USER_ID) - ' sql = sql.Replace("@USERNAME", USER_USERNAME) '{#INT#USERNAME} - ' sql = sql.Replace("@MACHINE_NAME", Environment.MachineName) '{#INT#machineName} - ' sql = sql.Replace("@DATE", Now.ToShortDateString) - ' sql = sql.Replace("@PROFILE_ID", CURRENT_CLICKED_PROFILE_ID) - - ' 'String.Format("SELECT '1' TL_STATE,T.PROFIL_ID,T1.TITLE, T.DocID, T.FILE_PATH, T.DMS_ERSTELLT_DATE,[dbo].[FNPM_LAST_WORKUSER_DOC] (T.PROFIL_ID,T.DocID) AS 'Last User',[dbo].[FNPM_LAST_EDITED_DOC] (T.PROFIL_ID,T.DocID) as 'Last edited' FROM TBPM_PROFILE_FILES T, VWPM_PROFILE_USER T1 " & - ' ' "WHERE T.PROFIL_ID = T1.PROFIL_ID " & - ' ' "AND T1.ACTIVE = 1 And (UPPER(T1.USERNAME) = UPPER('{0}')) Order By T1.PRIORITY", USER_USERNAME) - ' CURR_DT_PROFILEGRID = ClassDatabase.Return_Datatable(sql, True) - - ' If Not IsNothing(CURR_DT_PROFILEGRID) Then - ' If CURR_DT_PROFILEGRID.Rows.Count = 0 Then - ' NO_WORKFLOWITEMS = True - ' Else - ' NO_WORKFLOWITEMS = False - ' End If - ' Create_Basic_View() - - ' Try - ' Try - ' GridView_Docs.Columns.Item("GROUP_TEXT").GroupIndex = 0 - ' GridView_Docs.Columns.Item("GROUP_TEXT").Visible = False - ' GridView_Docs.Columns.Item("GROUP_COLOR").Visible = False - ' Catch ex As Exception - - ' End Try - - ' 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") - ' Next - - ' 'GridView_Docs.OptionsBehavior.AutoExpandAllGroups = False - ' 'GridView_Docs.OptionsView.ShowGroupedColumns = False - ' Catch ex As Exception - ' LOGGER.Error(ex) - ' LOGGER.Info("Unexpected Error in Formatting Grid: " & ex.Message) - ' End Try - - ' Dim Columns_Removed = GridView_CheckInvalidColumns() - ' RestoreLayout() - - ' If GridView_Docs.Columns.Count <= 2 Then - ' LOGGER.Info("GridView_Docs.Columns.Count <= 2 - Reset_Gridlayout will be forced...", False) - ' Reset_GridLayout() - ' End If - - ' Else - ' GridControl_Docs.DataSource = Nothing - ' Try - ' GridView_Docs.Columns.Clear() - ' Catch ex As Exception - ' LOGGER.Error(ex) - - ' End Try - ' End If - ' End If - ' Catch ex As Exception - ' LOGGER.Error(ex) - ' LOGGER.Info("LoadProfile_PM - Fehler: " & ex.Message) - ' MsgBox("Fehler LoadProfile_PM - Fehler: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Achtung:") - ' End Try - - 'End Sub - Private Sub ToolStripButton1_Click(sender As System.Object, e As System.EventArgs) Handles ToolStripButton1.Click - Try - frmKonfig.ShowDialog() - Refresh_ConnectionString() - ' Load_Profil() - Check_Timer_Notification() - Catch ex As Exception - LOGGER.Error(ex) - MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Laden Grundeinstellungen:") - End Try - - End Sub Private Sub NotifyIcon1_MouseDoubleClick(sender As System.Object, e As MouseEventArgs) Handles NotifyIcon1.MouseDoubleClick ShowMonitor() @@ -878,14 +816,25 @@ Public Class frmMain If TimerRefresh.Enabled = False Then Exit Sub End If + If GridControl_Docs.Visible = True And formopenClose = False Then RefreshHelper.SaveViewInfo() + 'If Not Application.OpenForms().OfType(Of frmValidator).Any Then + ' Dim oUpdate = "Not Defined" + ' Try + ' oUpdate = $"UPDATE TBPM_PROFILE_FILES SET IN_WORK = 0, WORK_USER = NULL, IN_WORK_WHEN = NULL where UPPER(WORK_USER) = UPPER('{USER_USERNAME}')" + ' ClassDatabase.Execute_non_Query(oUpdate) + ' Catch ex As Exception + ' LOGGER.Warn($"Unexpected Error in freefileforUser [{oUpdate}] - {ex.Message}") + ' End Try + + 'End If SaveGridLayout() Load_Profile_items() Decide_Load() If USER_LANGUAGE <> "de-DE" Then - tsslblLastSysnc.Text = "Last Client-Sync: " & Now.ToLongTimeString + bsilastsync.Caption = "Last Client-Sync: " & Now.ToLongTimeString Else - tsslblLastSysnc.Text = "Letzte Synchronisation: " & Now.ToLongTimeString + bsilastsync.Caption = "Letzte Synchronisation: " & Now.ToLongTimeString End If If GridControl_Docs.Visible = True And formopenClose = False Then RefreshHelper.LoadViewInfo() @@ -931,25 +880,10 @@ Public Class frmMain End Sub - Private Sub ToolStripButton2_Click_1(sender As Object, e As EventArgs) Handles tsbtnrefresh.Click - If GridControl_Docs.Visible = True And formopenClose = False Then - RefreshHelper.SaveViewInfo() - SaveGridLayout() - End If - - Load_Profile_items() - Decide_Load() - If GridControl_Docs.Visible = True And formopenClose = False Then RefreshHelper.LoadViewInfo() - End Sub - Private Sub ToolStripButton2_Click_2(sender As Object, e As EventArgs) frmAdminPasswort.ShowDialog() End Sub - Private Sub ToolStripButton2_Click_3(sender As Object, e As EventArgs) Handles ToolStripButton2.Click - frmAbout.ShowDialog() - End Sub - Public Sub New() Dim splash As New frmSplash() Try @@ -989,46 +923,65 @@ Public Class frmMain End Sub - Sub Load_Profil_from_Grid(ID As Integer) + Sub Load_Profil_from_Grid(pProfilID As Integer) Try 'Me.Visible = False - CURRENT_ProfilGUID = ID - CURRENT_ProfilName = ClassDatabase.Execute_Scalar("SELECT NAME FROM TBPM_PROFILE WHERE GUID = " & CURRENT_ProfilGUID, CONNECTION_STRING) + CURRENT_ProfilGUID = pProfilID + ' CURRENT_ProfilName = ClassDatabase.Execute_Scalar("SELECT NAME FROM TBPM_PROFILE WHERE GUID = " & CURRENT_ProfilGUID, CONNECTION_STRING) CURRENT_DT_PROFILE = ClassDatabase.Return_Datatable(String.Format("select * from TBPM_PROFILE where GUID = {0}", CURRENT_ProfilGUID)) + CURRENT_ProfilName = CURRENT_DT_PROFILE.Rows(0).Item("NAME") CURRENT_DT_PROFILE_SEARCHES_DOC = ClassDatabase.Return_Datatable(String.Format("select * from TBPM_PROFILE_SEARCH where PROFILE_ID = {0} AND TYPE = 'DOC' AND ACTIVE = 1 ORDER BY TAB_INDEX", CURRENT_ProfilGUID)) CURRENT_DT_PROFILE_SEARCHES_SQL = ClassDatabase.Return_Datatable(String.Format("select * from TBPM_PROFILE_SEARCH where PROFILE_ID = {0} AND TYPE = 'SQL' AND ACTIVE = 1 ORDER BY TAB_INDEX", CURRENT_ProfilGUID)) My.Settings.Save() - + Dim omsg = "Es ist bereits ein Workflow geöffnet!" + Dim omsgTitle = "Achtung:" + If USER_LANGUAGE <> "de-DE" Then + omsg = "There is already a workflow active!" + omsgTitle = "Attention:" + End If If TimerRefresh.Enabled Then TimerRefresh.Stop() End If - Dim th As System.Threading.Thread + ' Dim th As System.Threading.Thread If Not Application.OpenForms().OfType(Of frmValidator).Any Then - th = New Threading.Thread(AddressOf Task_A) - th.SetApartmentState(ApartmentState.STA) - th.Start() + frmValidator.Show() + + Decide_Load() + TimerRefresh.Enabled = True + TimerRefresh.Start() + Dim iterateIndex As Integer = 0 + Dim oNewDataTable As DataTable = CURR_DT_OVERVIEW.Copy + For Each row As DataRow In oNewDataTable.Rows + If row("GUID") = CURRENT_DOC_GUID Then + CURR_DT_OVERVIEW.Rows.RemoveAt(iterateIndex) + Exit For + Else + iterateIndex += 1 + End If + Next + ' th = New Threading.Thread(AddressOf Task_A) + ' th.SetApartmentState(ApartmentState.STA) + ' th.Start() Else LOGGER.Debug("Validator is already open...") - Exit Sub + MsgBox(omsg, MsgBoxStyle.Exclamation, omsgTitle) + End If - ' frmValidator.ShowDialog() - Do While th.IsAlive - Loop - LOGGER.Debug("th has ended!") + Catch ex As Exception LOGGER.Error(ex) MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Load_Profil_from_Grid: ") End Try - ' Me.Visible = True - Decide_Load() + 'Me.Visible = True + 'Decide_Load() End Sub - Public Sub Task_A() - Dim frmA = New frmValidator() ' Must be created on this thread! - Application.Run(frmA) - End Sub + 'Public Sub Task_A() + ' Dim frmA = New frmValidator() ' Must be created on this thread! + ' Application.Run(frmA) + 'End Sub Private Sub ContextMenuGrid_Opening(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles ContextMenuGrid.Opening CMFileStart.Enabled = False CMGroupStart.Enabled = False @@ -1061,23 +1014,44 @@ Public Class frmMain End Sub Private Sub Item_Scope(startedFrom As String) Try + Dim OItemScopeInfo = "No Item so far" 'GridView_Docs.EndSelection() CURRENT_JUMP_DOC_GUID = 0 Dim hitInfo As GridHitInfo = GridView_Docs.CalcHitInfo(GridCursorLocation) Dim groupRowText - Dim PROFIL_ID + Dim oHitProfilID If hitInfo.InGroupRow Then GridViewItem_Clicked = "GROUP" + LOGGER.Debug($"Item_Scope: InGroupRow") + OItemScopeInfo = "InGroupRow" groupRowText = GridView_Docs.GetGroupRowDisplayText(hitInfo.RowHandle) - PROFIL_ID = GridView_Docs.GetRowCellValue(GridView_Docs.GetDataRowHandleByGroupRowHandle(hitInfo.RowHandle), GridView_Docs.Columns("PROFILE_ID")) + OItemScopeInfo = $"groupRowText {groupRowText}" + LOGGER.Debug($"Item_Scope: groupRowText {groupRowText}") + oHitProfilID = GridView_Docs.GetRowCellValue(GridView_Docs.GetDataRowHandleByGroupRowHandle(hitInfo.RowHandle), GridView_Docs.Columns("PROFILE_ID")) + ElseIf hitInfo.InDataRow Then GridViewItem_Clicked = "ROW" + OItemScopeInfo = "InDataRow" + LOGGER.Debug($"Item_Scope: InDataRow") If GRID_LOAD_TYPE = "OVERVIEW" Then + OItemScopeInfo = $"GRID_LOAD_TYPE = OVERVIEW" + LOGGER.Debug($"Item_Scope: GRID_LOAD_TYPE = OVERVIEW") groupRowText = GridView_Docs.GetGroupRowDisplayText(GridView_Docs.GetParentRowHandle(hitInfo.RowHandle)) - PROFIL_ID = GridView_Docs.GetRowCellValue(GridView_Docs.GetDataRowHandleByGroupRowHandle(GridView_Docs.GetParentRowHandle(hitInfo.RowHandle)), GridView_Docs.Columns("PROFILE_ID")) + OItemScopeInfo = $"OVERVIEWgroupRowText {groupRowText}" + LOGGER.Debug($"Item_Scope: OVERVIEWgroupRowText {groupRowText}") + oHitProfilID = GridView_Docs.GetRowCellValue(GridView_Docs.GetDataRowHandleByGroupRowHandle(GridView_Docs.GetParentRowHandle(hitInfo.RowHandle)), GridView_Docs.Columns("PROFILE_ID")) Else - PROFIL_ID = CURRENT_CLICKED_PROFILE_ID + OItemScopeInfo = $"NOT GRID_LOAD_TYPE = OVERVIEW" + LOGGER.Debug($"Item_Scope: NOT GRID_LOAD_TYPE = OVERVIEW") + If IsNothing(CURRENT_CLICKED_PROFILE_ID) = False Then + LOGGER.Debug($"Item_Scope: CURRENT_CLICKED_PROFILE_ID [{CURRENT_CLICKED_PROFILE_ID}]") + oHitProfilID = CURRENT_CLICKED_PROFILE_ID + Else + LOGGER.Warn("In ItemScope: CURRENT_CLICKED_PROFILE_ID is nothing!!!") + Exit Sub + End If + End If Else @@ -1099,28 +1073,37 @@ Public Class frmMain End If - If Not IsNothing(PROFIL_ID) And IsNumeric(PROFIL_ID) Then - + If Not IsNothing(oHitProfilID) And IsNumeric(oHitProfilID) Then + LOGGER.Debug($"Item_Scope: Not IsNothing(PROFIL_ID) And IsNumeric(PROFIL_ID)") Dim expression As String - expression = "PROFILE_ID = " & PROFIL_ID + expression = "PROFILE_ID = " & oHitProfilID If hitInfo.InGroupRow Or (startedFrom = "CMGROUP" And hitInfo.InDataRow) Then CURRENT_JUMP_DOC_GUID = 0 CURRENT_DOC_GUID = 0 - CURRENT_ProfilGUID = PROFIL_ID + CURRENT_ProfilGUID = oHitProfilID - Load_Profil_from_Grid(PROFIL_ID) + Load_Profil_from_Grid(oHitProfilID) ElseIf hitInfo.InDataRow Then - Dim DOC_GUID = GridView_Docs.GetFocusedRowCellValue(GridView_Docs.Columns("GUID")) - Dim DocID = GridView_Docs.GetFocusedRowCellValue(GridView_Docs.Columns("DocID")) - If IsNothing(DocID) Then Exit Sub + LOGGER.Debug($"Item_Scope: hitInfo.InDataRow...") + Dim oFocusedDocGUID = GridView_Docs.GetFocusedRowCellValue(GridView_Docs.Columns("GUID")) + Dim oFocusedDocID = GridView_Docs.GetFocusedRowCellValue(GridView_Docs.Columns("DocID")) + If IsNothing(oFocusedDocID) Then + LOGGER.Warn("In hitInfo.InDataRow: DocID is nothing!!!") + Exit Sub + End If + LOGGER.Debug($"Item_Scope: GotDocID {oFocusedDocID} and DocGUID {oFocusedDocGUID}") Dim DOC_PATH = GridView_Docs.GetFocusedRowCellValue(GridView_Docs.Columns("FULL_FILE_PATH")) + If IsNothing(DOC_PATH) Then + LOGGER.Warn("In hitInfo.InDataRow: DOC_PATH is nothing!!!") + Exit Sub + End If DOC_PATH = DOC_PATH.Replace("W:", "\\windream\objects") DOC_PATH = DOC_PATH.Replace("K:", "\\windream\objects") 'Checking if table really contains one record with profile-id and docid - expression = expression & " AND DocID = " & DocID - Dim TEMP_TABLE = CURR_DT_PROFILEGRID + expression = expression & " AND DocID = " & oFocusedDocID + Dim TEMP_TABLE = CURR_DT_OVERVIEW Dim foundRows() As DataRow foundRows = TEMP_TABLE.Select(expression) Dim result = 0 @@ -1128,11 +1111,28 @@ Public Class frmMain result += 1 Next If result = 1 Then - CURRENT_DOC_ID = DocID - CURRENT_JUMP_DOC_GUID = DOC_GUID + CURRENT_DOC_ID = oFocusedDocID + CURRENT_JUMP_DOC_GUID = oFocusedDocGUID CURRENT_DOC_GUID = CURRENT_JUMP_DOC_GUID CURRENT_DOC_PATH = DOC_PATH - Load_Profil_from_Grid(PROFIL_ID) + Dim oSQL = $"SELECT [dbo].[FNPM_CHECK_DocGUID_Valid] ({CURRENT_DOC_GUID})" + Dim oResult = ClassDatabase.Execute_Scalar(oSQL, CONNECTION_STRING) + Try + If CBool(oResult) = True Then + Load_Profil_from_Grid(oHitProfilID) + Else + Dim omsg As String = "Achtung: der gewählte Beleg ist durch einen anderen Benutzer bereits in Bearbeitung oder anderweitig gesperrt" + Dim otitle = "Achtung:" + If USER_LANGUAGE <> "de-DE" Then + omsg = "Attention: the chosen item is in work from another user or locked!" + otitle = "Attention:" + End If + MsgBox(omsg, MsgBoxStyle.Exclamation, otitle) + End If + Catch ex As Exception + LOGGER.Warn($"Uenxpected error in Checking freefile - sql so far: {oSQL} - ") + End Try + Else Exit Sub End If @@ -1144,7 +1144,8 @@ Public Class frmMain End If Catch ex As Exception LOGGER.Error(ex) - MsgBox("Unexpected error in Item_Scope: " & ex.Message, MsgBoxStyle.Critical) + allgFunk.Insert_LogEntry($"{ex.Message} - Stack: [{ex.StackTrace}]") + MsgBox("Unexpected error in Item_Scope: " & ex.Message & vbNewLine & "Choose file again!", MsgBoxStyle.Information) End Try End Sub Private Function Init_IDB() @@ -1155,7 +1156,7 @@ Public Class frmMain Catch ex As Exception LOGGER.Error(ex) MsgBox("Error Init_IDB:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Attention:") - LOGGER.Info(">> Unexpected error in Init_IDB: " & ex.Message, True) + LOGGER.Info("Unexpected error in Init_IDB: " & ex.Message, True) Return False End Try End Function @@ -1173,7 +1174,7 @@ Public Class frmMain Catch ex As Exception LOGGER.Error(ex) MsgBox("Error Init_windream:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Attention:") - LOGGER.Info(">> Unexpected error in Init_windream: " & ex.Message, True) + LOGGER.Info("Unexpected error in Init_windream: " & ex.Message, True) Return False End Try End Function @@ -1229,12 +1230,12 @@ Public Class frmMain For Each oRowHandle As Integer In oSelectedRows - Dim DocID = GridView_Docs.GetRowCellValue(oRowHandle, "DocID") - If IsNothing(DocID) Then + Dim oDocID = GridView_Docs.GetRowCellValue(oRowHandle, "DocID") + If IsNothing(oDocID) Then Continue For End If Dim R As DataRow = NewDatatable.NewRow - CURRENT_DOC_ID = DocID + CURRENT_DOC_ID = oDocID Dim DOC_PATH = GridView_Docs.GetRowCellValue(oRowHandle, "FULL_FILE_PATH") CURRENT_DOC_PATH = DOC_PATH CURRENT_DOC_GUID = GridView_Docs.GetRowCellValue(oRowHandle, "GUID") @@ -1283,17 +1284,20 @@ Public Class frmMain Layout_Single_Profile() GRID_LOAD_TYPE = "OVERVIEW" CURRENT_CLICKED_PROFILE_ID = 0 - ToolStripLabelViewTape.Text = "Gesamtübersicht" - + If USER_LANGUAGE = "de-DE" Then + ToolStripLabelViewTape.Text = "Gesamtübersicht" + Else + ToolStripLabelViewTape.Text = "Overview" + End If Try Dim sel = String.Format("SELECT * FROM VWPM_PROFILE_USER WHERE USER_ID ={0}", USER_ID) - CURRENT_DT_VW_PROFILE_USER = ClassDatabase.Return_Datatable(sel, True) - tslblmessage.Text = "" + CURRENT_DT_VW_PROFILE_USER = ClassDatabase.Return_Datatable(sel) + bsiMessage.Caption = "" If CURRENT_DT_VW_PROFILE_USER.Rows.Count = 0 Then - LOGGER.Info(" >> no profiles for user: '" & USER_USERNAME & "' configured!", False) + LOGGER.Info("no profiles for user: '" & USER_USERNAME & "' configured!", False) NO_WORKFLOWITEMS = True - tslblmessage.Text = "Keine Profile für Ihren User hinterlegt" + bsiMessage.Caption = "Keine Profile für Ihren User hinterlegt" Exit Sub End If @@ -1304,7 +1308,7 @@ Public Class frmMain If IsDBNull(oSQLOverview) Then - tslblmessage.Text = "No GROUP-CONFIG (SQL_PROFILE_MAIN_VIEW) in Baseconfig" + bsiMessage.Caption = "No GROUP-CONFIG (SQL_PROFILE_MAIN_VIEW) in Baseconfig" Exit Sub End If @@ -1320,19 +1324,22 @@ Public Class frmMain 'String.Format("SELECT '1' TL_STATE,T.PROFIL_ID,T1.TITLE, T.DocID, T.FILE_PATH, T.DMS_ERSTELLT_DATE,[dbo].[FNPM_LAST_WORKUSER_DOC] (T.PROFIL_ID,T.DocID) AS 'Last User',[dbo].[FNPM_LAST_EDITED_DOC] (T.PROFIL_ID,T.DocID) as 'Last edited' FROM TBPM_PROFILE_FILES T, VWPM_PROFILE_USER T1 " & ' "WHERE T.PROFIL_ID = T1.PROFIL_ID " & ' "AND T1.ACTIVE = 1 And (UPPER(T1.USERNAME) = UPPER('{0}')) Order By T1.PRIORITY", USER_USERNAME) - CURR_DT_PROFILEGRID = ClassDatabase.Return_Datatable(oSQLOverview, True) + CURR_DT_OVERVIEW = ClassDatabase.Return_Datatable(oSQLOverview) + + Dim DTGRID_GROUPS As DataTable Try - DTGRID_GROUPS = ClassDatabase.Return_Datatable($"SELECT * FROM TBPM_MAIN_VIEW_GROUPS WHERE ACTIVE = 1", True) + DTGRID_GROUPS = ClassDatabase.Return_Datatable($"SELECT * FROM TBPM_MAIN_VIEW_GROUPS WHERE ACTIVE = 1") Catch ex As Exception LOGGER.Error(ex) LOGGER.Info(ex.Message) End Try - If Not IsNothing(CURR_DT_PROFILEGRID) Then + If Not IsNothing(CURR_DT_OVERVIEW) Then + LOGGER.Debug($"Datatable CURR_DT_OVERVIEW loaded: {CURR_DT_OVERVIEW.Rows.Count} rows") NO_WORKFLOWITEMS = False - If CURR_DT_PROFILEGRID.Rows.Count = 0 Then + If CURR_DT_OVERVIEW.Rows.Count = 0 Then ToolStripLabelViewTape.Text = "Aktuell keine Workflowdaten vorhanden!" NO_WORKFLOWITEMS = True @@ -1362,13 +1369,13 @@ Public Class frmMain columnStateIcon.DataType = GetType(Image) columnStateIcon.ColumnName = "ICON" columnStateIcon.Caption = "" - CURR_DT_PROFILEGRID.Columns.Add(columnStateIcon) + CURR_DT_OVERVIEW.Columns.Add(columnStateIcon) RedDocuments = 0 YellowDocuments = 0 GreenDocuments = 0 - For Each row As DataRow In CURR_DT_PROFILEGRID.Rows + For Each row As DataRow In CURR_DT_OVERVIEW.Rows Dim State As Integer = row.Item("TL_STATE") Select Case State Case 1 @@ -1382,10 +1389,14 @@ Public Class frmMain row.Item("ICON") = My.Resources.ampel_gruen End Select Next - bindsourcegrid.DataSource = CURR_DT_PROFILEGRID + bindsourcegrid.DataSource = CURR_DT_OVERVIEW GridControl_Docs.DataSource = bindsourcegrid + If USER_LANGUAGE = "de-DE" Then + ToolStripLabelViewTape.Text = "Gesamtübersicht" + Else + ToolStripLabelViewTape.Text = "Overview" + End If - ToolStripLabelViewTape.Text = "Gesamtübersicht" 'GridControlDocRow.ForceInitialize() ' GridControl1.DataSource = CURR_DT_PROFILEGRID @@ -1398,6 +1409,7 @@ Public Class frmMain Try + LOGGER.Debug("Now Working on Groups..") 'GridView_Docs.OptionsBehavior.AutoExpandAllGroups = False 'GridView_Docs.OptionsView.ShowGroupedColumns = False GridView_Docs.OptionsView.ShowGroupPanel = False @@ -1414,18 +1426,14 @@ Public Class frmMain GridView_Docs.Columns.Item("GROUP_TEXT").Visible = False GridView_Docs.Columns.Item("GROUP_COLOR").Visible = False Catch ex As Exception - End Try - - For index = 0 To GridView_Docs.GroupCount - 1 Dim v = GridView_Docs.GroupedColumns(index).ToString LOGGER.Debug($"Addig tag [{GridView_Docs.Columns.Item("PROFILE_ID")}] for group...") Dim sd = GridView_Docs.GroupedColumns(index).GetTextCaption GridView_Docs.GroupedColumns(index).Tag = GridView_Docs.Columns.Item("PROFILE_ID") - Next - + LOGGER.Debug("finished Grouping!") GridView_Docs.Columns.Item("PROFILE_ID").Visible = False GridView_Docs.Columns.Item("GUID").Visible = False GridView_Docs.Columns.Item("FULL_FILE_PATH").Visible = False @@ -1435,24 +1443,25 @@ Public Class frmMain GridView_Docs.Columns.Item("ICON").MinWidth = 24 GridView_Docs.Columns.Item("ICON").AppearanceCell.BackColor = Color.White GridView_Docs.Columns.Item("ICON").Fixed = DevExpress.XtraGrid.Columns.FixedStyle.Left - GridView_Docs.Columns("Last edited").DisplayFormat.FormatType = FormatType.DateTime - GridView_Docs.Columns("Last edited").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss" + Try + GridView_Docs.Columns("Last edited").DisplayFormat.FormatType = FormatType.DateTime + GridView_Docs.Columns("Last edited").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss" + Catch ex As Exception + GridView_Docs.Columns("Zuletzt bearbeitet").DisplayFormat.FormatType = FormatType.DateTime + GridView_Docs.Columns("Zuletzt bearbeitet").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss" + End Try + + LOGGER.Debug("finished Formatting Grid!") Catch ex As Exception LOGGER.Error(ex) LOGGER.Info("Unexpected Error in Formatting Grid: " & ex.Message) End Try - - SaveGridLayout() If GridView_Docs.Columns.Count <= 2 Then LOGGER.Info("GridView_Docs.Columns.Count <= 2 - Reset_Gridlayout will be forced...", False) Reset_GridLayout() End If - - - Else - NO_WORKFLOWITEMS = True GridControl_Docs.Visible = False BindingNavigator1.Visible = False @@ -1463,15 +1472,12 @@ Public Class frmMain GridView_Docs.Columns.Clear() Catch ex As Exception LOGGER.Error(ex) - End Try End If Catch ex As Exception LOGGER.Error(ex) LOGGER.Info("Load_Grid_Overview - Fehler: " & ex.Message) - MsgBox("Fehler Load_Grid_Overview - Fehler: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Achtung:") End Try - End Sub Private Sub tsmiValidationProfil_Click(sender As Object, e As EventArgs) Handles tsmiValidationProfil.Click @@ -1629,13 +1635,13 @@ Public Class frmMain Sub Handling_DEBUG_USER() If USER_DEBUG_LOG = True Then If USER_LANGUAGE = "de-DE" Then - tsslblDEBUG_LOG.Text = "ACHTUNG: UserDebugMode ist eingeschaltet!" + bsiDebug.Caption = "ACHTUNG: UserDebugMode ist eingeschaltet!" Else - tsslblDEBUG_LOG.Text = "ATTENTION: UserDebugMode activated!" + bsiDebug.Caption = "ATTENTION: UserDebugMode activated!" End If - tsslblDEBUG_LOG.Visible = True + bsiDebug.Visibility = DevExpress.XtraBars.BarItemVisibility.Always Else - tsslblDEBUG_LOG.Visible = False + bsiDebug.Visibility = DevExpress.XtraBars.BarItemVisibility.Never End If End Sub Private Sub Timer5Mins_Tick(sender As Object, e As EventArgs) Handles Timer5Mins.Tick @@ -1644,44 +1650,50 @@ Public Class frmMain ClassParamRefresh.Refresh_Params(DT_CHECKUSER_MODULE) If USER_LANGUAGE = "de-DE" Then - tslblUserLoggedin.Text = "License Count: " & USERCOUNT_LOGGED_IN + bsiUserLoggedIn.Caption = "License Count: " & USERCOUNT_LOGGED_IN Else - tslblUserLoggedin.Text = "Lizenz-Zähler: " & USERCOUNT_LOGGED_IN + bsiUserLoggedIn.Caption = "Lizenz-Zähler: " & USERCOUNT_LOGGED_IN End If + If USER_DEBUG_LOG = True Then + ' 'Jetzt de rinsert der Inhalte + If Not IsNothing(LOGCONFIG.Logs) Then + If LOGCONFIG.Logs.Count > 0 Then + ' Dim odel = $"delete from TBPM_LOG_DEBUG where userid = {USER_ID}" + ' ClassDatabase.Execute_non_Query(odel) + Dim thread As New Thread(AddressOf DebuglogBackgroundthread) + thread.Start() - 'If USER_DEBUG_LOG = True Then - ' 'Jetzt de rinsert der Inhalte - ' If Not IsNothing(LOGCONFIG.Logs) Then - ' If LOGCONFIG.Logs.Count > 0 Then - ' Dim odel = $"delete from TBPM_LOG_DEBUG where userid = {USER_ID}" - ' ClassDatabase.Execute_non_Query(odel) + End If - ' Dim thread As New Thread(AddressOf DebuglogBackgroundthread) - ' thread.Start() - - ' End If - - ' End If - 'End If + End If + End If End Sub - 'Sub DebuglogBackgroundthread() - ' For Each oSLogstring As String In LOGCONFIG.Logs - ' Dim oLogSplit As String() - ' oLogSplit = oSLogstring.Split("|") - ' 'Console.WriteLine(oLogSplit(2)) - ' Dim omsg = oLogSplit(2).Replace("'", "''") - ' omsg = omsg.Replace("\\n", "") - ' omsg = omsg.Replace(Chr(10), "") - ' omsg = omsg.Replace(Chr(13), "") - ' Dim odatetime As Date = CDate(oLogSplit(0)) - ' Dim oSQL As String = $"INSERT INTO [dbo].[TBPM_LOG_DEBUG] ([USERID] , [LOGMSG], [ADDED_WHEN]) VALUES({USER_ID},'{omsg}','{odatetime}')" - ' ClassDatabase.Execute_non_Query(oSQL) - ' Next - 'End Sub - Private Sub tsslblDEBUG_LOG_MouseHover(sender As Object, e As EventArgs) Handles tsslblDEBUG_LOG.MouseHover + Sub DebuglogBackgroundthread() + Dim oSQL As String = "None" + Try + For Each oSLogstring As String In LOGCONFIG.Logs + Dim oLogSplit As String() + oLogSplit = oSLogstring.Split("|") + 'Console.WriteLine(oLogSplit(2)) + Dim omsg = oLogSplit(2).Replace("'", "''") + omsg = omsg.Replace("\\n", "") + omsg = omsg.Replace(Chr(10), "") + omsg = omsg.Replace(Chr(13), "") + Dim odatetime As Date = CDate(oLogSplit(0)) + oSQL = $"INSERT INTO [dbo].[TBPM_LOG_DEBUG] ([USERID] , [LOGMSG], [ADDED_WHEN]) VALUES({USER_ID},'{omsg}','{odatetime}')" + ClassDatabase.Execute_non_Query(oSQL) + Next + LOGCONFIG.ClearLogs() + Catch ex As Exception + LOGGER.Error(ex) + LOGGER.Warn($"oSQL so far [{oSQL}]") + End Try + + End Sub + Private Sub tsslblDEBUG_LOG_MouseHover(sender As Object, e As EventArgs) MsgBox("UserDebugMode is activated remotely. Debugdata will be transferred to database and will be deleted after 10 days!!", MsgBoxStyle.Information) End Sub @@ -1690,19 +1702,6 @@ Public Class frmMain End Sub - Private Sub ProfileUndBasisToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ProfileUndBasisToolStripMenuItem.Click - Dim AdminSecurity As Boolean = False - AdminSecurity = TBPM_KONFIGURATIONTableAdapter.cmdGetAdminSecurity() - If AdminSecurity = True Then - frmLoginAdmin.ShowDialog() - Else - frmAdministration.ShowDialog() - End If - Decide_Load() - End Sub - Private Sub KonfigurationenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles KonfigurationenToolStripMenuItem.Click - frmAdmin2.ShowDialog() - End Sub Private Sub LöscheAlleFilterToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles LöscheAlleFilterToolStripMenuItem.Click Try @@ -1751,8 +1750,52 @@ Public Class frmMain End If My.Settings.Save() End Sub + Private Sub BarButtonItem3_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbtniGrundeinstellung.ItemClick + Try + frmKonfig.ShowDialog() + Refresh_ConnectionString() + ' Load_Profil() + Check_Timer_Notification() + Catch ex As Exception + LOGGER.Error(ex) + MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Laden Grundeinstellungen:") + End Try + End Sub - Private Sub tsbtnMonitoring_Click(sender As Object, e As EventArgs) Handles tsbtnMonitoring.Click - frmMonitor.ShowDialog() + Private Sub bbtnitemInfo_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbtnitemInfo.ItemClick + frmAbout.ShowDialog() + End Sub + + Private Sub bbtniRefresh_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbtniRefresh.ItemClick + If GridControl_Docs.Visible = True And formopenClose = False Then + RefreshHelper.SaveViewInfo() + SaveGridLayout() + End If + + Load_Profile_items() + Decide_Load() + If GridControl_Docs.Visible = True And formopenClose = False Then RefreshHelper.LoadViewInfo() + End Sub + + Private Sub bbtniMonitor_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbtniMonitor.ItemClick + If Not Application.OpenForms().OfType(Of frmMonitor).Any Then + frmMonitor.Show() + End If + + End Sub + + Private Sub bbiProfilverwaltung_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbiProfilverwaltung.ItemClick + Dim AdminSecurity As Boolean = False + AdminSecurity = TBPM_KONFIGURATIONTableAdapter.cmdGetAdminSecurity() + If AdminSecurity = True Then + frmLoginAdmin.ShowDialog() + Else + frmAdministration.ShowDialog() + End If + Decide_Load() + End Sub + + Private Sub bbiKonfiguration_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbiKonfiguration.ItemClick + frmAdmin2.ShowDialog() End Sub End Class \ No newline at end of file diff --git a/app/DD_PM_WINDREAM/frmMonitor.Designer.vb b/app/DD_PM_WINDREAM/frmMonitor.Designer.vb index 1c63f64..027c5ac 100644 --- a/app/DD_PM_WINDREAM/frmMonitor.Designer.vb +++ b/app/DD_PM_WINDREAM/frmMonitor.Designer.vb @@ -27,6 +27,9 @@ Partial Class frmMonitor Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem() Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem() Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem() + Me.BarButtonItem4 = New DevExpress.XtraBars.BarButtonItem() + Me.BarStaticItemInfoDoc = New DevExpress.XtraBars.BarStaticItem() + Me.BarStaticItemInfo = New DevExpress.XtraBars.BarStaticItem() Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage() Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar() @@ -43,7 +46,8 @@ Partial Class frmMonitor Me.GridControl4 = New DevExpress.XtraGrid.GridControl() Me.GridView4 = New DevExpress.XtraGrid.Views.Grid.GridView() Me.XtraSaveFileDialog1 = New System.Windows.Forms.SaveFileDialog() - Me.BarButtonItem4 = New DevExpress.XtraBars.BarButtonItem() + Me.SplitContainerControlMain = New DevExpress.XtraEditors.SplitContainerControl() + Me.DocumentViewerMonitor = New DigitalData.Controls.DocumentViewer.DocumentViewer() CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).BeginInit() Me.SplitContainerControl1.SuspendLayout() @@ -59,15 +63,17 @@ Partial Class frmMonitor CType(Me.GridView3, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.GridControl4, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.GridView4, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.SplitContainerControlMain, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SplitContainerControlMain.SuspendLayout() Me.SuspendLayout() ' 'RibbonControl1 ' Me.RibbonControl1.AutoHideEmptyItems = True Me.RibbonControl1.ExpandCollapseItem.Id = 0 - Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4}) + Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarStaticItemInfoDoc, Me.BarStaticItemInfo}) Me.RibbonControl1.Location = New System.Drawing.Point(0, 0) - Me.RibbonControl1.MaxItemId = 5 + Me.RibbonControl1.MaxItemId = 7 Me.RibbonControl1.Name = "RibbonControl1" Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1}) Me.RibbonControl1.Size = New System.Drawing.Size(1202, 158) @@ -96,6 +102,31 @@ Partial Class frmMonitor Me.BarButtonItem3.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem3.ImageOptions.LargeImage"), System.Drawing.Image) Me.BarButtonItem3.Name = "BarButtonItem3" ' + 'BarButtonItem4 + ' + Me.BarButtonItem4.Caption = "Layouts zurücksetzen" + Me.BarButtonItem4.Id = 4 + Me.BarButtonItem4.ImageOptions.Image = CType(resources.GetObject("BarButtonItem4.ImageOptions.Image"), System.Drawing.Image) + Me.BarButtonItem4.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem4.ImageOptions.LargeImage"), System.Drawing.Image) + Me.BarButtonItem4.Name = "BarButtonItem4" + ' + 'BarStaticItemInfoDoc + ' + Me.BarStaticItemInfoDoc.Caption = "No Row Selected" + Me.BarStaticItemInfoDoc.Id = 5 + Me.BarStaticItemInfoDoc.Name = "BarStaticItemInfoDoc" + ' + 'BarStaticItemInfo + ' + Me.BarStaticItemInfo.Caption = "BarStaticItemInfo" + Me.BarStaticItemInfo.Id = 6 + Me.BarStaticItemInfo.ItemAppearance.Normal.BackColor = System.Drawing.Color.OrangeRed + Me.BarStaticItemInfo.ItemAppearance.Normal.ForeColor = System.Drawing.Color.Black + Me.BarStaticItemInfo.ItemAppearance.Normal.Options.UseBackColor = True + Me.BarStaticItemInfo.ItemAppearance.Normal.Options.UseForeColor = True + Me.BarStaticItemInfo.Name = "BarStaticItemInfo" + Me.BarStaticItemInfo.Visibility = DevExpress.XtraBars.BarItemVisibility.Never + ' 'RibbonPage1 ' Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1}) @@ -112,6 +143,8 @@ Partial Class frmMonitor ' 'RibbonStatusBar1 ' + Me.RibbonStatusBar1.ItemLinks.Add(Me.BarStaticItemInfoDoc) + Me.RibbonStatusBar1.ItemLinks.Add(Me.BarStaticItemInfo) Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 673) Me.RibbonStatusBar1.Name = "RibbonStatusBar1" Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1 @@ -125,13 +158,13 @@ Partial Class frmMonitor 'SplitContainerControl1 ' Me.SplitContainerControl1.Dock = System.Windows.Forms.DockStyle.Fill - Me.SplitContainerControl1.Location = New System.Drawing.Point(0, 158) + Me.SplitContainerControl1.Location = New System.Drawing.Point(0, 0) Me.SplitContainerControl1.Name = "SplitContainerControl1" Me.SplitContainerControl1.Panel1.Controls.Add(Me.GridControl1) Me.SplitContainerControl1.Panel1.Text = "Panel1" Me.SplitContainerControl1.Panel2.Controls.Add(Me.SplitContainerControl2) Me.SplitContainerControl1.Panel2.Text = "Panel2" - Me.SplitContainerControl1.Size = New System.Drawing.Size(1202, 515) + Me.SplitContainerControl1.Size = New System.Drawing.Size(866, 515) Me.SplitContainerControl1.SplitterPosition = 510 Me.SplitContainerControl1.TabIndex = 2 ' @@ -154,6 +187,9 @@ Partial Class frmMonitor Me.GridView1.Name = "GridView1" Me.GridView1.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False] Me.GridView1.OptionsBehavior.AllowDeleteRows = DevExpress.Utils.DefaultBoolean.[False] + Me.GridView1.OptionsBehavior.Editable = False + Me.GridView1.OptionsBehavior.ReadOnly = True + Me.GridView1.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False] Me.GridView1.OptionsView.EnableAppearanceEvenRow = True Me.GridView1.OptionsView.ShowAutoFilterRow = True Me.GridView1.OptionsView.ShowViewCaption = True @@ -170,7 +206,7 @@ Partial Class frmMonitor Me.SplitContainerControl2.Panel1.Text = "Panel1" Me.SplitContainerControl2.Panel2.Controls.Add(Me.SplitContainerControl3) Me.SplitContainerControl2.Panel2.Text = "Panel2" - Me.SplitContainerControl2.Size = New System.Drawing.Size(682, 515) + Me.SplitContainerControl2.Size = New System.Drawing.Size(346, 515) Me.SplitContainerControl2.SplitterPosition = 270 Me.SplitContainerControl2.TabIndex = 0 ' @@ -181,7 +217,7 @@ Partial Class frmMonitor Me.GridControl2.MainView = Me.GridView2 Me.GridControl2.MenuManager = Me.RibbonControl1 Me.GridControl2.Name = "GridControl2" - Me.GridControl2.Size = New System.Drawing.Size(682, 270) + Me.GridControl2.Size = New System.Drawing.Size(346, 270) Me.GridControl2.TabIndex = 1 Me.GridControl2.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView2}) ' @@ -193,6 +229,9 @@ Partial Class frmMonitor Me.GridView2.Name = "GridView2" Me.GridView2.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False] Me.GridView2.OptionsBehavior.AllowDeleteRows = DevExpress.Utils.DefaultBoolean.[False] + Me.GridView2.OptionsBehavior.Editable = False + Me.GridView2.OptionsBehavior.ReadOnly = True + Me.GridView2.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False] Me.GridView2.OptionsView.EnableAppearanceEvenRow = True Me.GridView2.OptionsView.ShowAutoFilterRow = True Me.GridView2.OptionsView.ShowViewCaption = True @@ -208,7 +247,7 @@ Partial Class frmMonitor Me.SplitContainerControl3.Panel1.Text = "Panel1" Me.SplitContainerControl3.Panel2.Controls.Add(Me.GridControl4) Me.SplitContainerControl3.Panel2.Text = "Panel2" - Me.SplitContainerControl3.Size = New System.Drawing.Size(682, 235) + Me.SplitContainerControl3.Size = New System.Drawing.Size(346, 235) Me.SplitContainerControl3.SplitterPosition = 400 Me.SplitContainerControl3.TabIndex = 0 ' @@ -219,7 +258,7 @@ Partial Class frmMonitor Me.GridControl3.MainView = Me.GridView3 Me.GridControl3.MenuManager = Me.RibbonControl1 Me.GridControl3.Name = "GridControl3" - Me.GridControl3.Size = New System.Drawing.Size(400, 235) + Me.GridControl3.Size = New System.Drawing.Size(336, 235) Me.GridControl3.TabIndex = 2 Me.GridControl3.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView3}) ' @@ -231,6 +270,9 @@ Partial Class frmMonitor Me.GridView3.Name = "GridView3" Me.GridView3.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False] Me.GridView3.OptionsBehavior.AllowDeleteRows = DevExpress.Utils.DefaultBoolean.[False] + Me.GridView3.OptionsBehavior.Editable = False + Me.GridView3.OptionsBehavior.ReadOnly = True + Me.GridView3.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False] Me.GridView3.OptionsView.EnableAppearanceEvenRow = True Me.GridView3.OptionsView.ShowAutoFilterRow = True Me.GridView3.OptionsView.ShowViewCaption = True @@ -243,7 +285,7 @@ Partial Class frmMonitor Me.GridControl4.MainView = Me.GridView4 Me.GridControl4.MenuManager = Me.RibbonControl1 Me.GridControl4.Name = "GridControl4" - Me.GridControl4.Size = New System.Drawing.Size(272, 235) + Me.GridControl4.Size = New System.Drawing.Size(0, 0) Me.GridControl4.TabIndex = 3 Me.GridControl4.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView4}) ' @@ -264,20 +306,34 @@ Partial Class frmMonitor ' Me.XtraSaveFileDialog1.Filter = """xlsx-Dateien|*.xlsx""" ' - 'BarButtonItem4 + 'SplitContainerControlMain ' - Me.BarButtonItem4.Caption = "Layouts zurücksetzen" - Me.BarButtonItem4.Id = 4 - Me.BarButtonItem4.ImageOptions.Image = CType(resources.GetObject("BarButtonItem4.ImageOptions.Image"), System.Drawing.Image) - Me.BarButtonItem4.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem4.ImageOptions.LargeImage"), System.Drawing.Image) - Me.BarButtonItem4.Name = "BarButtonItem4" + Me.SplitContainerControlMain.CollapsePanel = DevExpress.XtraEditors.SplitCollapsePanel.Panel1 + Me.SplitContainerControlMain.Dock = System.Windows.Forms.DockStyle.Fill + Me.SplitContainerControlMain.Location = New System.Drawing.Point(0, 158) + Me.SplitContainerControlMain.Name = "SplitContainerControlMain" + Me.SplitContainerControlMain.Panel1.Controls.Add(Me.DocumentViewerMonitor) + Me.SplitContainerControlMain.Panel1.Text = "Panel1" + Me.SplitContainerControlMain.Panel2.Controls.Add(Me.SplitContainerControl1) + Me.SplitContainerControlMain.Panel2.Text = "Panel2" + Me.SplitContainerControlMain.Size = New System.Drawing.Size(1202, 515) + Me.SplitContainerControlMain.SplitterPosition = 326 + Me.SplitContainerControlMain.TabIndex = 5 + ' + 'DocumentViewerMonitor + ' + Me.DocumentViewerMonitor.Dock = System.Windows.Forms.DockStyle.Fill + Me.DocumentViewerMonitor.Location = New System.Drawing.Point(0, 0) + Me.DocumentViewerMonitor.Name = "DocumentViewerMonitor" + Me.DocumentViewerMonitor.Size = New System.Drawing.Size(326, 515) + Me.DocumentViewerMonitor.TabIndex = 0 ' 'frmMonitor ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(1202, 697) - Me.Controls.Add(Me.SplitContainerControl1) + Me.Controls.Add(Me.SplitContainerControlMain) Me.Controls.Add(Me.RibbonStatusBar1) Me.Controls.Add(Me.RibbonControl1) Me.Name = "frmMonitor" @@ -299,6 +355,8 @@ Partial Class frmMonitor CType(Me.GridView3, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.GridControl4, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.GridView4, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.SplitContainerControlMain, System.ComponentModel.ISupportInitialize).EndInit() + Me.SplitContainerControlMain.ResumeLayout(False) Me.ResumeLayout(False) Me.PerformLayout() @@ -325,4 +383,8 @@ Partial Class frmMonitor Friend WithEvents XtraSaveFileDialog1 As SaveFileDialog Friend WithEvents BarButtonItem3 As DevExpress.XtraBars.BarButtonItem Friend WithEvents BarButtonItem4 As DevExpress.XtraBars.BarButtonItem + Friend WithEvents SplitContainerControlMain As DevExpress.XtraEditors.SplitContainerControl + Friend WithEvents BarStaticItemInfoDoc As DevExpress.XtraBars.BarStaticItem + Friend WithEvents BarStaticItemInfo As DevExpress.XtraBars.BarStaticItem + Friend WithEvents DocumentViewerMonitor As DigitalData.Controls.DocumentViewer.DocumentViewer End Class diff --git a/app/DD_PM_WINDREAM/frmMonitor.resx b/app/DD_PM_WINDREAM/frmMonitor.resx index 5cece43..3b5db8d 100644 --- a/app/DD_PM_WINDREAM/frmMonitor.resx +++ b/app/DD_PM_WINDREAM/frmMonitor.resx @@ -170,25 +170,23 @@ - iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 - YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAAJXRFWHRUaXRsZQBDbGVhcjtF - cmFzZTtSZW1vdmU7QmFycztSaWJib247h4CDcwAAAIxJREFUOE+lkNsNgCAQBO3JFvylCjuxKkuxm5Ml - d3jAggY/Jr52JsFFRH5BX1775gkRUXBfbIsHAyPFyzRSiAYGOqxlI0caGeiAiZ6A7aycwH5aBixAhx3a - I5BRj+cnhuNcI4KrfmCCJ8nAApCNt0iWAQuMIo1cH2EUKWTgA92IjUZYgEbqMYO+/I4sN6ixgsCcjQTu - AAAAAElFTkSuQmCC + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAldEVYdFRpdGxlAENsZWFyO0VyYXNlO1JlbW92ZTtC + YXJzO1JpYmJvbjuHgINzAAAAjElEQVQ4T6WQ2w2AIBAE7ckW/KUKO7EqS7GbkyV3eMCCBj8mvnYmwUVE + fkFfXvvmCRFRcF9siwcDI8XLNFKIBgY6rGUjRxoZ6ICJnoDtrJzAfloGLECHHdojkFGP5yeG41wjgqt+ + YIInycACkI23SJYBC4wijVwfYRQpZOAD3YiNRliARuoxg778jiw3qLGCwJyNBO4AAAAASUVORK5CYII= - iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 - YQUAAAAZdEVYdFNvZnR3YXJlAEFkb2JlIEltYWdlUmVhZHlxyWU8AAAAJXRFWHRUaXRsZQBDbGVhcjtF - cmFzZTtSZW1vdmU7QmFycztSaWJib247h4CDcwAAATVJREFUWEfFkdFtwzAMRLNTV+ivp+gmnaqjZBtV - Z+gEkj7ZkiU4Hw+xCfLeIX6llD6KHD6JHFreP98jbJlUwLPMtMihBSGdWHl3CTm0IKADJSd7iQjznUyh - jgNncnIowXwnU8TDQI+cuBLMdzKFPQqMyEktwXwnU/AgcEdO9hLMdzIFlgMzcrIx/yCM5OXV8h3mH4SR - vLxcDph/EEby8nJ5ZugTLJdnar6TRcqyCrnLLgd0OKGlLKuQu1Q5oMdJLeVoFVIO3IulHK7AyYH1uJft - 9+8rk/BbDlXgCAc5sE4lJ7MlpBy0Clj5bImmHIwUAKMlTuWgVSB+AktviUs5aBWYLdElB2cF7pboloOr - AqMlhuSgp8BlCRsyQ33IoYpmCd7NUh9yaAtVYv0/8Cnk8Enk8DnS6x9vj+lSV2uHuAAAAABJRU5ErkJg - gg== + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAldEVYdFRpdGxlAENsZWFyO0VyYXNlO1JlbW92ZTtC + YXJzO1JpYmJvbjuHgINzAAABNUlEQVRYR8WR0W3DMAxEs1NX6K+n6CadqqNkG1Vn6ASSPtmSJTgfD7EJ + 8t4hfqWUPoocPokcWt4/3yNsmVTAs8y0yKEFIZ1YeXcJObQgoAMlJ3uJCPOdTKGOA2dycijBfCdTxMNA + j5y4Esx3MoU9CozISS3BfCdT8CBwR072Esx3MgWWAzNysjH/IIzk5dXyHeYfhJG8vFwOmH8QRvLycnlm + 6BMsl2dqvpNFyrIKucsuB3Q4oaUsq5C7VDmgx0kt5WgVUg7ci6UcrsDJgfW4l+337yuT8FsOVeAIBzmw + TiUnsyWkHLQKWPlsiaYcjBQAoyVO5aBVIH4CS2+JSzloFZgt0SUHZwXuluiWg6sCoyWG5KCnwGUJGzJD + fcihimYJ3s1SH3JoC1Vi/T/wKeTwSeTwOdLrH2+P6VJXa4e4AAAAAElFTkSuQmCC diff --git a/app/DD_PM_WINDREAM/frmMonitor.vb b/app/DD_PM_WINDREAM/frmMonitor.vb index 0b805e8..f347768 100644 --- a/app/DD_PM_WINDREAM/frmMonitor.vb +++ b/app/DD_PM_WINDREAM/frmMonitor.vb @@ -14,7 +14,7 @@ Public Class frmMonitor Dim GRID4_TITLE As String Dim GRID4_SQL As String Private _ActiveGrid As GridControl = Nothing - Private _frmDocView As frmDocView 'You need a reference to Form1 + ' Private _frmDocView As frmDocView 'You need a reference to Form1 Dim FormShown As Boolean = False Private Sub GridView1_FocusedRowChanged(sender As Object, e As DevExpress.XtraGrid.Views.Base.FocusedRowChangedEventArgs) Handles GridView1.FocusedRowChanged If FormShown = False Then Exit Sub @@ -32,58 +32,96 @@ Public Class frmMonitor oDocPath = GridView1.GetFocusedRowCellValue(GridView1.Columns("FULL_FILE_PATH")) Catch ex As Exception LOGGER.Warn($"Error getting DocPath in Monitor: {ex.Message}") + oDocPath = String.Empty End Try + BarStaticItemInfoDoc.Caption = $"DocID: {oDocID} - Docpath: {oDocPath}" Dim oDetailSQL = GRID2_SQL oDetailSQL = oDetailSQL.Replace("@DocID", oDocID) - oDetailSQL = oDetailSQL.ToLower.Replace("@idbobjid", oDocID) + oDetailSQL = oDetailSQL.Replace("@IDBOBJID", oDocID) oDetailSQL = oDetailSQL.Replace("@UserID", USER_ID) oDetailSQL = oDetailSQL.Replace("@UserName", USER_USERNAME) Dim oDT2 As DataTable = ClassDatabase.Return_Datatable(oDetailSQL) If Not IsNothing(oDT2) Then + LOGGER.Debug($"Found {oDT2.Rows.Count} rows for GridView2") GridView2.Columns.Clear() GridControl2.DataSource = oDT2 + Try + GridView2.Columns("Wann").DisplayFormat.FormatType = FormatType.DateTime + GridView2.Columns("Wann").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss" + Catch ex As Exception + GridView2.Columns("When").DisplayFormat.FormatType = FormatType.DateTime + GridView2.Columns("When").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss" + End Try + End If If DT_MONITOR_KONFIG.Rows.Count > 2 Then oDetailSQL = GRID3_SQL oDetailSQL = oDetailSQL.Replace("@DocID", oDocID) - oDetailSQL = oDetailSQL.ToLower.Replace("@idbobjid", oDocID) + oDetailSQL = oDetailSQL.Replace("@IDBOBJID", oDocID) oDetailSQL = oDetailSQL.Replace("@UserID", USER_ID) oDetailSQL = oDetailSQL.Replace("@UserName", USER_USERNAME) Dim oDT3 As DataTable = ClassDatabase.Return_Datatable(oDetailSQL) If Not IsNothing(oDT3) Then + LOGGER.Debug($"Found {oDT3.Rows.Count} rows for GridView3") GridView3.Columns.Clear() GridControl3.DataSource = oDT3 End If If DT_MONITOR_KONFIG.Rows.Count = 4 Then oDetailSQL = GRID4_SQL oDetailSQL = oDetailSQL.Replace("@DocID", oDocID) - oDetailSQL = oDetailSQL.ToLower.Replace("@idbobjid", oDocID) + oDetailSQL = oDetailSQL.Replace("@IDBOBJID", oDocID) oDetailSQL = oDetailSQL.Replace("@UserID", USER_ID) oDetailSQL = oDetailSQL.Replace("@UserName", USER_USERNAME) Dim oDT4 As DataTable = ClassDatabase.Return_Datatable(oDetailSQL) If Not IsNothing(oDT4) Then + LOGGER.Debug($"Found {oDT4.Rows.Count} rows for GridView4") GridView4.Columns.Clear() GridControl4.DataSource = oDT4 + Try + GridView4.Columns("Geändert wann").DisplayFormat.FormatType = FormatType.DateTime + GridView4.Columns("Geändert wann").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss" + Catch ex As Exception + GridView4.Columns("Changed when").DisplayFormat.FormatType = FormatType.DateTime + GridView4.Columns("Changed when").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss" + End Try End If End If End If - - If BarButtonItem3.Caption <> "DocView aktivieren" And oDocPath <> "" Then - If Not Application.OpenForms().OfType(Of frmValidator).Any Then - frmDocView.Show() - _frmDocView = frmDocView - End If - _frmDocView.LoadFile(oDocPath) - - End If - + Load_Doc(oDocPath) Catch ex As Exception MsgBox(ex.Message, MsgBoxStyle.Critical, "Error GridView1.FocusedRowChanged:") End Try End Sub + Sub Load_Doc(oDocPath As String) + Try + If SplitContainerControlMain.Collapsed = False And oDocPath <> String.Empty Then + 'If Not Application.OpenForms().OfType(Of frmValidator).Any Then + ' frmDocView.Show() + ' _frmDocView = frmDocView + 'End If + '_frmDocView.LoadFile(oDocPath) + + If File.Exists(oDocPath) Then + DocumentViewerMonitor.LoadFile(oDocPath) + BarStaticItemInfo.Visibility = DevExpress.XtraBars.BarItemVisibility.Never + DocumentViewerMonitor.Visible = True + Else + BarStaticItemInfo.Visibility = DevExpress.XtraBars.BarItemVisibility.Always + BarStaticItemInfo.Caption = $"File is not existing or accessible!" + DocumentViewerMonitor.Visible = False + End If + + + End If + Catch ex As Exception + LOGGER.Error(ex.Message) + MsgBox(ex.Message, MsgBoxStyle.Critical, "Error in LoadDoc:") + End Try + End Sub Private Sub frmMonitor_Load(sender As Object, e As EventArgs) Handles Me.Load + SplitContainerControlMain.Collapsed = True Load_Grid_Data() Select Case DT_MONITOR_KONFIG.Rows.Count @@ -106,7 +144,11 @@ Public Class frmMonitor SplitContainerControl2.SplitterPosition = CONFIG.Config.MonitorSplitter2_Distance SplitContainerControl3.SplitterPosition = CONFIG.Config.MonitorSplitter3_Distance End Select - + Try + DocumentViewerMonitor.Init(LOGCONFIG, GDPICTURE_LICENSE) + Catch ex As Exception + LOGGER.Error(ex) + End Try End Sub Sub Load_Grid_Data() Try @@ -146,8 +188,8 @@ Public Class frmMonitor GRID3_SQL = DT_MONITOR_KONFIG.Rows(2).Item("GRID_SQL") GridView3.ViewCaption = GRID3_TITLE Case 4 - GRID3_TITLE = DT_MONITOR_KONFIG.Rows(3).Item("GRID_TITLE") - GRID3_SQL = DT_MONITOR_KONFIG.Rows(3).Item("GRID_SQL") + GRID3_TITLE = DT_MONITOR_KONFIG.Rows(2).Item("GRID_TITLE") + GRID3_SQL = DT_MONITOR_KONFIG.Rows(2).Item("GRID_SQL") GridView3.ViewCaption = GRID3_TITLE GRID4_TITLE = DT_MONITOR_KONFIG.Rows(3).Item("GRID_TITLE") GRID4_SQL = DT_MONITOR_KONFIG.Rows(3).Item("GRID_SQL") @@ -318,9 +360,10 @@ Public Class frmMonitor End Select CONFIG.Save() Try - _frmDocView.Close() + DocumentViewerMonitor.Done() + '_frmDocView.Close() Catch ex As Exception - + LOGGER.Error(ex) End Try End Sub @@ -365,25 +408,43 @@ Public Class frmMonitor End Sub Private Sub BarButtonItem3_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem3.ItemClick - If BarButtonItem3.Caption = "DocView aktivieren" Then - BarButtonItem3.Caption = "DocView deaktivieren" + If SplitContainerControlMain.Collapsed = True Then + SplitContainerControlMain.Collapsed = False + + If USER_LANGUAGE = "de-DE" Then + BarButtonItem3.Caption = "DocView deaktivieren" + Else + BarButtonItem3.Caption = "Deactivate DocView" + End If + BarButtonItem3.Down = True Dim oDocPath Try oDocPath = GridView1.GetFocusedRowCellValue(GridView1.Columns("FULL_FILE_PATH")) + + Catch ex As Exception LOGGER.Warn($"Error getting DocPath in Monitor: {ex.Message}") + Exit Sub End Try - If oDocPath <> "" Then - If Not Application.OpenForms().OfType(Of frmValidator).Any Then - frmDocView.Show() - _frmDocView = frmDocView - End If - _frmDocView.LoadFile(oDocPath) - Me.SendToBack() - End If + DocumentViewerMonitor?.LoadFile(oDocPath) + + 'If oDocPath <> "" Then + ' If Not Application.OpenForms().OfType(Of frmValidator).Any Then + ' frmDocView.Show() + ' _frmDocView = frmDocView + ' End If + ' _frmDocView.LoadFile(oDocPath) + ' Me.SendToBack() + 'End If Else - BarButtonItem3.Caption = "DocView aktivieren" + SplitContainerControlMain.Collapsed = True + + If USER_LANGUAGE = "de-DE" Then + BarButtonItem3.Caption = "DocView aktivieren" + Else + BarButtonItem3.Caption = "Activate DocView" + End If BarButtonItem3.Down = False End If diff --git a/app/DD_PM_WINDREAM/frmValidator.Designer.vb b/app/DD_PM_WINDREAM/frmValidator.Designer.vb index 228b03e..1df6f16 100644 --- a/app/DD_PM_WINDREAM/frmValidator.Designer.vb +++ b/app/DD_PM_WINDREAM/frmValidator.Designer.vb @@ -1,6 +1,6 @@  Partial Class frmValidator - Inherits System.Windows.Forms.Form + Inherits DevExpress.XtraBars.Ribbon.RibbonForm 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. @@ -30,15 +30,9 @@ Partial Class frmValidator Me.btnSave = New System.Windows.Forms.Button() Me.DESCRIPTIONLabel = New System.Windows.Forms.Label() Me.pnldesigner = New System.Windows.Forms.Panel() - Me.DocumentViewer1 = New DigitalData.Controls.DocumentViewer.DocumentViewer() Me.BarAndDockingController3 = New DevExpress.XtraBars.BarAndDockingController(Me.components) Me.BarAndDockingController2 = New DevExpress.XtraBars.BarAndDockingController(Me.components) Me.BarAndDockingController1 = New DevExpress.XtraBars.BarAndDockingController(Me.components) - Me.StatusStrip1 = New System.Windows.Forms.StatusStrip() - Me.tstrplblError = New System.Windows.Forms.ToolStripStatusLabel() - Me.tstrlbl_Info = New System.Windows.Forms.ToolStripStatusLabel() - Me.tsslblDocID = New System.Windows.Forms.ToolStripStatusLabel() - Me.tsslbl_State = New System.Windows.Forms.ToolStripStatusLabel() Me.DD_DMSLiteDataSet = New DD_PM_WINDREAM.DD_DMSLiteDataSet() Me.TableAdapterManager = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager() Me.TBDD_CONNECTIONTableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter() @@ -82,20 +76,31 @@ Partial Class frmValidator Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem() Me.PdfBarController1 = New DevExpress.XtraPdfViewer.Bars.PdfBarController(Me.components) Me.PdfBarController2 = New DevExpress.XtraPdfViewer.Bars.PdfBarController(Me.components) - Me.ToolStrip1 = New System.Windows.Forms.ToolStrip() - Me.ToolStripDropDownButton2 = New System.Windows.Forms.ToolStripDropDownButton() - Me.DateiÖffnenToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() - Me.InfoToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.EigenschaftenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() - Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton() - Me.ToolStripButtonSearchesReload = New System.Windows.Forms.ToolStripButton() - Me.ToolStripButtonJumpFile = New System.Windows.Forms.ToolStripButton() - Me.ToolStripButtonDeleteFile = New System.Windows.Forms.ToolStripButton() - Me.ToolStripButtonAnnotation = New System.Windows.Forms.ToolStripButton() Me.FinalIndexDataSet = New DD_PM_WINDREAM.FinalIndexDataSet() Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = New DD_PM_WINDREAM.FinalIndexDataSetTableAdapters.TBPM_PROFILE_FINAL_INDEXINGTableAdapter() Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components) + Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl() + Me.bsiError = New DevExpress.XtraBars.BarStaticItem() + Me.bsiInformation = New DevExpress.XtraBars.BarStaticItem() + Me.bsiDocID = New DevExpress.XtraBars.BarStaticItem() + Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem() + Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem() + Me.BarButtonItem4 = New DevExpress.XtraBars.BarButtonItem() + Me.bbtniRefresh = New DevExpress.XtraBars.BarButtonItem() + Me.bbtniRefreshSearches = New DevExpress.XtraBars.BarButtonItem() + Me.bbtniNext = New DevExpress.XtraBars.BarButtonItem() + Me.bbtniDelete = New DevExpress.XtraBars.BarButtonItem() + Me.bbtniAnnotation = New DevExpress.XtraBars.BarButtonItem() + Me.bsiInfo1 = New DevExpress.XtraBars.BarStaticItem() + Me.bsiInfo2 = New DevExpress.XtraBars.BarStaticItem() + Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage() + Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() + Me.RibbonPageGroup3 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() + Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() + Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar() + Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage() + Me.DocumentViewerValidator = New DigitalData.Controls.DocumentViewer.DocumentViewer() CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).BeginInit() Me.SplitContainer1.Panel1.SuspendLayout() Me.SplitContainer1.Panel2.SuspendLayout() @@ -104,7 +109,6 @@ Partial Class frmValidator CType(Me.BarAndDockingController3, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.BarAndDockingController2, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.BarAndDockingController1, System.ComponentModel.ISupportInitialize).BeginInit() - Me.StatusStrip1.SuspendLayout() CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBPM_PROFILE_FILESBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() @@ -114,9 +118,9 @@ Partial Class frmValidator CType(Me.BarManager1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PdfBarController1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PdfBarController2, System.ComponentModel.ISupportInitialize).BeginInit() - Me.ToolStrip1.SuspendLayout() CType(Me.FinalIndexDataSet, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'SplitContainer1 @@ -126,34 +130,27 @@ Partial Class frmValidator ' 'SplitContainer1.Panel1 ' - resources.ApplyResources(Me.SplitContainer1.Panel1, "SplitContainer1.Panel1") Me.SplitContainer1.Panel1.Controls.Add(Me.Panel1) - Me.ToolTip1.SetToolTip(Me.SplitContainer1.Panel1, resources.GetString("SplitContainer1.Panel1.ToolTip")) ' 'SplitContainer1.Panel2 ' - resources.ApplyResources(Me.SplitContainer1.Panel2, "SplitContainer1.Panel2") - Me.SplitContainer1.Panel2.Controls.Add(Me.DocumentViewer1) - Me.ToolTip1.SetToolTip(Me.SplitContainer1.Panel2, resources.GetString("SplitContainer1.Panel2.ToolTip")) + Me.SplitContainer1.Panel2.Controls.Add(Me.DocumentViewerValidator) Me.SplitContainer1.TabStop = False - Me.ToolTip1.SetToolTip(Me.SplitContainer1, resources.GetString("SplitContainer1.ToolTip")) ' 'Panel1 ' - resources.ApplyResources(Me.Panel1, "Panel1") Me.Panel1.BackColor = System.Drawing.SystemColors.ControlLight Me.Panel1.Controls.Add(Me.TITLELabel1) Me.Panel1.Controls.Add(Me.btnSave) Me.Panel1.Controls.Add(Me.DESCRIPTIONLabel) Me.Panel1.Controls.Add(Me.pnldesigner) + resources.ApplyResources(Me.Panel1, "Panel1") Me.Panel1.Name = "Panel1" - Me.ToolTip1.SetToolTip(Me.Panel1, resources.GetString("Panel1.ToolTip")) ' 'TITLELabel1 ' resources.ApplyResources(Me.TITLELabel1, "TITLELabel1") Me.TITLELabel1.Name = "TITLELabel1" - Me.ToolTip1.SetToolTip(Me.TITLELabel1, resources.GetString("TITLELabel1.ToolTip")) ' 'btnSave ' @@ -161,27 +158,18 @@ Partial Class frmValidator Me.btnSave.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.flag_pink Me.btnSave.Name = "btnSave" Me.btnSave.TabStop = False - Me.ToolTip1.SetToolTip(Me.btnSave, resources.GetString("btnSave.ToolTip")) Me.btnSave.UseVisualStyleBackColor = True ' 'DESCRIPTIONLabel ' resources.ApplyResources(Me.DESCRIPTIONLabel, "DESCRIPTIONLabel") Me.DESCRIPTIONLabel.Name = "DESCRIPTIONLabel" - Me.ToolTip1.SetToolTip(Me.DESCRIPTIONLabel, resources.GetString("DESCRIPTIONLabel.ToolTip")) ' 'pnldesigner ' resources.ApplyResources(Me.pnldesigner, "pnldesigner") Me.pnldesigner.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.pnldesigner.Name = "pnldesigner" - Me.ToolTip1.SetToolTip(Me.pnldesigner, resources.GetString("pnldesigner.ToolTip")) - ' - 'DocumentViewer1 - ' - resources.ApplyResources(Me.DocumentViewer1, "DocumentViewer1") - Me.DocumentViewer1.Name = "DocumentViewer1" - Me.ToolTip1.SetToolTip(Me.DocumentViewer1, resources.GetString("DocumentViewer1.ToolTip")) ' 'BarAndDockingController3 ' @@ -198,35 +186,6 @@ Partial Class frmValidator Me.BarAndDockingController1.PropertiesBar.AllowLinkLighting = False Me.BarAndDockingController1.PropertiesDocking.ViewStyle = DevExpress.XtraBars.Docking2010.Views.DockingViewStyle.Classic ' - 'StatusStrip1 - ' - resources.ApplyResources(Me.StatusStrip1, "StatusStrip1") - Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tstrplblError, Me.tstrlbl_Info, Me.tsslblDocID, Me.tsslbl_State}) - Me.StatusStrip1.Name = "StatusStrip1" - Me.ToolTip1.SetToolTip(Me.StatusStrip1, resources.GetString("StatusStrip1.ToolTip")) - ' - 'tstrplblError - ' - resources.ApplyResources(Me.tstrplblError, "tstrplblError") - Me.tstrplblError.ForeColor = System.Drawing.Color.Red - Me.tstrplblError.Name = "tstrplblError" - ' - 'tstrlbl_Info - ' - resources.ApplyResources(Me.tstrlbl_Info, "tstrlbl_Info") - Me.tstrlbl_Info.Name = "tstrlbl_Info" - ' - 'tsslblDocID - ' - resources.ApplyResources(Me.tsslblDocID, "tsslblDocID") - Me.tsslblDocID.Name = "tsslblDocID" - ' - 'tsslbl_State - ' - resources.ApplyResources(Me.tsslbl_State, "tsslbl_State") - Me.tsslbl_State.BackColor = System.Drawing.Color.Yellow - Me.tsslbl_State.Name = "tsslbl_State" - ' 'DD_DMSLiteDataSet ' Me.DD_DMSLiteDataSet.DataSetName = "DD_DMSLiteDataSet" @@ -307,40 +266,33 @@ Partial Class frmValidator ' 'barDockControlTop ' - resources.ApplyResources(Me.barDockControlTop, "barDockControlTop") Me.barDockControlTop.CausesValidation = False + resources.ApplyResources(Me.barDockControlTop, "barDockControlTop") Me.barDockControlTop.Manager = Me.BarManager1 - Me.ToolTip1.SetToolTip(Me.barDockControlTop, resources.GetString("barDockControlTop.ToolTip")) ' 'barDockControlBottom ' - resources.ApplyResources(Me.barDockControlBottom, "barDockControlBottom") Me.barDockControlBottom.CausesValidation = False + resources.ApplyResources(Me.barDockControlBottom, "barDockControlBottom") Me.barDockControlBottom.Manager = Me.BarManager1 - Me.ToolTip1.SetToolTip(Me.barDockControlBottom, resources.GetString("barDockControlBottom.ToolTip")) ' 'barDockControlLeft ' - resources.ApplyResources(Me.barDockControlLeft, "barDockControlLeft") Me.barDockControlLeft.CausesValidation = False + resources.ApplyResources(Me.barDockControlLeft, "barDockControlLeft") Me.barDockControlLeft.Manager = Me.BarManager1 - Me.ToolTip1.SetToolTip(Me.barDockControlLeft, resources.GetString("barDockControlLeft.ToolTip")) ' 'barDockControlRight ' - resources.ApplyResources(Me.barDockControlRight, "barDockControlRight") Me.barDockControlRight.CausesValidation = False + resources.ApplyResources(Me.barDockControlRight, "barDockControlRight") Me.barDockControlRight.Manager = Me.BarManager1 - Me.ToolTip1.SetToolTip(Me.barDockControlRight, resources.GetString("barDockControlRight.ToolTip")) ' 'PdfFileOpenBarItem1 ' resources.ApplyResources(Me.PdfFileOpenBarItem1, "PdfFileOpenBarItem1") Me.PdfFileOpenBarItem1.Enabled = False Me.PdfFileOpenBarItem1.Id = 1 - Me.PdfFileOpenBarItem1.ImageOptions.ImageIndex = CType(resources.GetObject("PdfFileOpenBarItem1.ImageOptions.ImageIndex"), Integer) - Me.PdfFileOpenBarItem1.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfFileOpenBarItem1.ImageOptions.LargeImageIndex"), Integer) - Me.PdfFileOpenBarItem1.ImageOptions.SvgImage = CType(resources.GetObject("PdfFileOpenBarItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfFileOpenBarItem1.ItemShortcut = New DevExpress.XtraBars.BarShortcut((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.O)) Me.PdfFileOpenBarItem1.Name = "PdfFileOpenBarItem1" ' @@ -349,9 +301,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfFileSaveAsBarItem1, "PdfFileSaveAsBarItem1") Me.PdfFileSaveAsBarItem1.Enabled = False Me.PdfFileSaveAsBarItem1.Id = 2 - Me.PdfFileSaveAsBarItem1.ImageOptions.ImageIndex = CType(resources.GetObject("PdfFileSaveAsBarItem1.ImageOptions.ImageIndex"), Integer) - Me.PdfFileSaveAsBarItem1.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfFileSaveAsBarItem1.ImageOptions.LargeImageIndex"), Integer) - Me.PdfFileSaveAsBarItem1.ImageOptions.SvgImage = CType(resources.GetObject("PdfFileSaveAsBarItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfFileSaveAsBarItem1.ItemShortcut = New DevExpress.XtraBars.BarShortcut((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.S)) Me.PdfFileSaveAsBarItem1.Name = "PdfFileSaveAsBarItem1" ' @@ -360,9 +309,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfFilePrintBarItem2, "PdfFilePrintBarItem2") Me.PdfFilePrintBarItem2.Enabled = False Me.PdfFilePrintBarItem2.Id = 3 - Me.PdfFilePrintBarItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfFilePrintBarItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfFilePrintBarItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfFilePrintBarItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfFilePrintBarItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfFilePrintBarItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfFilePrintBarItem2.ItemShortcut = New DevExpress.XtraBars.BarShortcut((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.P)) Me.PdfFilePrintBarItem2.Name = "PdfFilePrintBarItem2" ' @@ -371,9 +317,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfPreviousPageBarItem2, "PdfPreviousPageBarItem2") Me.PdfPreviousPageBarItem2.Enabled = False Me.PdfPreviousPageBarItem2.Id = 4 - Me.PdfPreviousPageBarItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfPreviousPageBarItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfPreviousPageBarItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfPreviousPageBarItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfPreviousPageBarItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfPreviousPageBarItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfPreviousPageBarItem2.Name = "PdfPreviousPageBarItem2" ' 'PdfNextPageBarItem2 @@ -381,9 +324,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfNextPageBarItem2, "PdfNextPageBarItem2") Me.PdfNextPageBarItem2.Enabled = False Me.PdfNextPageBarItem2.Id = 5 - Me.PdfNextPageBarItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfNextPageBarItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfNextPageBarItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfNextPageBarItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfNextPageBarItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfNextPageBarItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfNextPageBarItem2.Name = "PdfNextPageBarItem2" ' 'PdfFindTextBarItem2 @@ -391,9 +331,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfFindTextBarItem2, "PdfFindTextBarItem2") Me.PdfFindTextBarItem2.Enabled = False Me.PdfFindTextBarItem2.Id = 6 - Me.PdfFindTextBarItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfFindTextBarItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfFindTextBarItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfFindTextBarItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfFindTextBarItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfFindTextBarItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfFindTextBarItem2.ItemShortcut = New DevExpress.XtraBars.BarShortcut((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.F)) Me.PdfFindTextBarItem2.Name = "PdfFindTextBarItem2" ' @@ -402,9 +339,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfZoomOutBarItem2, "PdfZoomOutBarItem2") Me.PdfZoomOutBarItem2.Enabled = False Me.PdfZoomOutBarItem2.Id = 7 - Me.PdfZoomOutBarItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoomOutBarItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfZoomOutBarItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoomOutBarItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfZoomOutBarItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoomOutBarItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfZoomOutBarItem2.Name = "PdfZoomOutBarItem2" ' 'PdfZoomInBarItem2 @@ -412,9 +346,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfZoomInBarItem2, "PdfZoomInBarItem2") Me.PdfZoomInBarItem2.Enabled = False Me.PdfZoomInBarItem2.Id = 8 - Me.PdfZoomInBarItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoomInBarItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfZoomInBarItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoomInBarItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfZoomInBarItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoomInBarItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfZoomInBarItem2.Name = "PdfZoomInBarItem2" ' 'PdfExactZoomListBarSubItem2 @@ -422,9 +353,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfExactZoomListBarSubItem2, "PdfExactZoomListBarSubItem2") Me.PdfExactZoomListBarSubItem2.Enabled = False Me.PdfExactZoomListBarSubItem2.Id = 9 - Me.PdfExactZoomListBarSubItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfExactZoomListBarSubItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfExactZoomListBarSubItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfExactZoomListBarSubItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfExactZoomListBarSubItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfExactZoomListBarSubItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfExactZoomListBarSubItem2.LinksPersistInfo.AddRange(New DevExpress.XtraBars.LinkPersistInfo() {New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom10CheckItem2, True), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom25CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom50CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom75CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom100CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom125CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom150CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom200CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom400CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom500CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetActualSizeZoomModeCheckItem2, True), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetPageLevelZoomModeCheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetFitWidthZoomModeCheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetFitVisibleZoomModeCheckItem2)}) Me.PdfExactZoomListBarSubItem2.Name = "PdfExactZoomListBarSubItem2" Me.PdfExactZoomListBarSubItem2.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionInMenu @@ -434,9 +362,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfZoom10CheckItem2, "PdfZoom10CheckItem2") Me.PdfZoom10CheckItem2.Enabled = False Me.PdfZoom10CheckItem2.Id = 10 - Me.PdfZoom10CheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoom10CheckItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfZoom10CheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoom10CheckItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfZoom10CheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoom10CheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfZoom10CheckItem2.Name = "PdfZoom10CheckItem2" ' 'PdfZoom25CheckItem2 @@ -444,9 +369,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfZoom25CheckItem2, "PdfZoom25CheckItem2") Me.PdfZoom25CheckItem2.Enabled = False Me.PdfZoom25CheckItem2.Id = 11 - Me.PdfZoom25CheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoom25CheckItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfZoom25CheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoom25CheckItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfZoom25CheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoom25CheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfZoom25CheckItem2.Name = "PdfZoom25CheckItem2" ' 'PdfZoom50CheckItem2 @@ -454,9 +376,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfZoom50CheckItem2, "PdfZoom50CheckItem2") Me.PdfZoom50CheckItem2.Enabled = False Me.PdfZoom50CheckItem2.Id = 12 - Me.PdfZoom50CheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoom50CheckItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfZoom50CheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoom50CheckItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfZoom50CheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoom50CheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfZoom50CheckItem2.Name = "PdfZoom50CheckItem2" ' 'PdfZoom75CheckItem2 @@ -464,9 +383,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfZoom75CheckItem2, "PdfZoom75CheckItem2") Me.PdfZoom75CheckItem2.Enabled = False Me.PdfZoom75CheckItem2.Id = 13 - Me.PdfZoom75CheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoom75CheckItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfZoom75CheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoom75CheckItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfZoom75CheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoom75CheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfZoom75CheckItem2.Name = "PdfZoom75CheckItem2" ' 'PdfZoom100CheckItem2 @@ -474,9 +390,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfZoom100CheckItem2, "PdfZoom100CheckItem2") Me.PdfZoom100CheckItem2.Enabled = False Me.PdfZoom100CheckItem2.Id = 14 - Me.PdfZoom100CheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoom100CheckItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfZoom100CheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoom100CheckItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfZoom100CheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoom100CheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfZoom100CheckItem2.Name = "PdfZoom100CheckItem2" ' 'PdfZoom125CheckItem2 @@ -484,9 +397,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfZoom125CheckItem2, "PdfZoom125CheckItem2") Me.PdfZoom125CheckItem2.Enabled = False Me.PdfZoom125CheckItem2.Id = 15 - Me.PdfZoom125CheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoom125CheckItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfZoom125CheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoom125CheckItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfZoom125CheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoom125CheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfZoom125CheckItem2.Name = "PdfZoom125CheckItem2" ' 'PdfZoom150CheckItem2 @@ -494,9 +404,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfZoom150CheckItem2, "PdfZoom150CheckItem2") Me.PdfZoom150CheckItem2.Enabled = False Me.PdfZoom150CheckItem2.Id = 16 - Me.PdfZoom150CheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoom150CheckItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfZoom150CheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoom150CheckItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfZoom150CheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoom150CheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfZoom150CheckItem2.Name = "PdfZoom150CheckItem2" ' 'PdfZoom200CheckItem2 @@ -504,9 +411,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfZoom200CheckItem2, "PdfZoom200CheckItem2") Me.PdfZoom200CheckItem2.Enabled = False Me.PdfZoom200CheckItem2.Id = 17 - Me.PdfZoom200CheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoom200CheckItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfZoom200CheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoom200CheckItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfZoom200CheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoom200CheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfZoom200CheckItem2.Name = "PdfZoom200CheckItem2" ' 'PdfZoom400CheckItem2 @@ -514,9 +418,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfZoom400CheckItem2, "PdfZoom400CheckItem2") Me.PdfZoom400CheckItem2.Enabled = False Me.PdfZoom400CheckItem2.Id = 18 - Me.PdfZoom400CheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoom400CheckItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfZoom400CheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoom400CheckItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfZoom400CheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoom400CheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfZoom400CheckItem2.Name = "PdfZoom400CheckItem2" ' 'PdfZoom500CheckItem2 @@ -524,9 +425,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfZoom500CheckItem2, "PdfZoom500CheckItem2") Me.PdfZoom500CheckItem2.Enabled = False Me.PdfZoom500CheckItem2.Id = 19 - Me.PdfZoom500CheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoom500CheckItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfZoom500CheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoom500CheckItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfZoom500CheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoom500CheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfZoom500CheckItem2.Name = "PdfZoom500CheckItem2" ' 'PdfSetActualSizeZoomModeCheckItem2 @@ -534,9 +432,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfSetActualSizeZoomModeCheckItem2, "PdfSetActualSizeZoomModeCheckItem2") Me.PdfSetActualSizeZoomModeCheckItem2.Enabled = False Me.PdfSetActualSizeZoomModeCheckItem2.Id = 20 - Me.PdfSetActualSizeZoomModeCheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfSetActualSizeZoomModeCheckItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfSetActualSizeZoomModeCheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfSetActualSizeZoomModeCheckItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfSetActualSizeZoomModeCheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfSetActualSizeZoomModeCheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfSetActualSizeZoomModeCheckItem2.Name = "PdfSetActualSizeZoomModeCheckItem2" ' 'PdfSetPageLevelZoomModeCheckItem2 @@ -544,9 +439,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfSetPageLevelZoomModeCheckItem2, "PdfSetPageLevelZoomModeCheckItem2") Me.PdfSetPageLevelZoomModeCheckItem2.Enabled = False Me.PdfSetPageLevelZoomModeCheckItem2.Id = 21 - Me.PdfSetPageLevelZoomModeCheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfSetPageLevelZoomModeCheckItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfSetPageLevelZoomModeCheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfSetPageLevelZoomModeCheckItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfSetPageLevelZoomModeCheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfSetPageLevelZoomModeCheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfSetPageLevelZoomModeCheckItem2.Name = "PdfSetPageLevelZoomModeCheckItem2" ' 'PdfSetFitWidthZoomModeCheckItem2 @@ -554,9 +446,6 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfSetFitWidthZoomModeCheckItem2, "PdfSetFitWidthZoomModeCheckItem2") Me.PdfSetFitWidthZoomModeCheckItem2.Enabled = False Me.PdfSetFitWidthZoomModeCheckItem2.Id = 22 - Me.PdfSetFitWidthZoomModeCheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfSetFitWidthZoomModeCheckItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfSetFitWidthZoomModeCheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfSetFitWidthZoomModeCheckItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfSetFitWidthZoomModeCheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfSetFitWidthZoomModeCheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfSetFitWidthZoomModeCheckItem2.Name = "PdfSetFitWidthZoomModeCheckItem2" ' 'PdfSetFitVisibleZoomModeCheckItem2 @@ -564,18 +453,12 @@ Partial Class frmValidator resources.ApplyResources(Me.PdfSetFitVisibleZoomModeCheckItem2, "PdfSetFitVisibleZoomModeCheckItem2") Me.PdfSetFitVisibleZoomModeCheckItem2.Enabled = False Me.PdfSetFitVisibleZoomModeCheckItem2.Id = 23 - Me.PdfSetFitVisibleZoomModeCheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfSetFitVisibleZoomModeCheckItem2.ImageOptions.ImageIndex"), Integer) - Me.PdfSetFitVisibleZoomModeCheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfSetFitVisibleZoomModeCheckItem2.ImageOptions.LargeImageIndex"), Integer) - Me.PdfSetFitVisibleZoomModeCheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfSetFitVisibleZoomModeCheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.PdfSetFitVisibleZoomModeCheckItem2.Name = "PdfSetFitVisibleZoomModeCheckItem2" ' 'BarButtonItem1 ' resources.ApplyResources(Me.BarButtonItem1, "BarButtonItem1") Me.BarButtonItem1.Id = 0 - Me.BarButtonItem1.ImageOptions.ImageIndex = CType(resources.GetObject("BarButtonItem1.ImageOptions.ImageIndex"), Integer) - Me.BarButtonItem1.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarButtonItem1.ImageOptions.LargeImageIndex"), Integer) - Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.BarButtonItem1.Name = "BarButtonItem1" ' 'PdfBarController2 @@ -604,68 +487,6 @@ Partial Class frmValidator Me.PdfBarController2.BarItems.Add(Me.PdfSetFitWidthZoomModeCheckItem2) Me.PdfBarController2.BarItems.Add(Me.PdfSetFitVisibleZoomModeCheckItem2) ' - 'ToolStrip1 - ' - resources.ApplyResources(Me.ToolStrip1, "ToolStrip1") - Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripDropDownButton2, Me.ToolStripButton1, Me.ToolStripButtonSearchesReload, Me.ToolStripButtonJumpFile, Me.ToolStripButtonDeleteFile, Me.ToolStripButtonAnnotation}) - Me.ToolStrip1.Name = "ToolStrip1" - Me.ToolTip1.SetToolTip(Me.ToolStrip1, resources.GetString("ToolStrip1.ToolTip")) - ' - 'ToolStripDropDownButton2 - ' - resources.ApplyResources(Me.ToolStripDropDownButton2, "ToolStripDropDownButton2") - Me.ToolStripDropDownButton2.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.DateiÖffnenToolStripMenuItem1, Me.InfoToolStripMenuItem, Me.EigenschaftenToolStripMenuItem}) - Me.ToolStripDropDownButton2.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.Files_7954 - Me.ToolStripDropDownButton2.Name = "ToolStripDropDownButton2" - ' - 'DateiÖffnenToolStripMenuItem1 - ' - resources.ApplyResources(Me.DateiÖffnenToolStripMenuItem1, "DateiÖffnenToolStripMenuItem1") - Me.DateiÖffnenToolStripMenuItem1.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.Open_6296 - Me.DateiÖffnenToolStripMenuItem1.Name = "DateiÖffnenToolStripMenuItem1" - ' - 'InfoToolStripMenuItem - ' - resources.ApplyResources(Me.InfoToolStripMenuItem, "InfoToolStripMenuItem") - Me.InfoToolStripMenuItem.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.information - Me.InfoToolStripMenuItem.Name = "InfoToolStripMenuItem" - ' - 'EigenschaftenToolStripMenuItem - ' - resources.ApplyResources(Me.EigenschaftenToolStripMenuItem, "EigenschaftenToolStripMenuItem") - Me.EigenschaftenToolStripMenuItem.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.properties_16xLG - Me.EigenschaftenToolStripMenuItem.Name = "EigenschaftenToolStripMenuItem" - ' - 'ToolStripButton1 - ' - resources.ApplyResources(Me.ToolStripButton1, "ToolStripButton1") - Me.ToolStripButton1.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.refresh_16xMD - Me.ToolStripButton1.Name = "ToolStripButton1" - ' - 'ToolStripButtonSearchesReload - ' - resources.ApplyResources(Me.ToolStripButtonSearchesReload, "ToolStripButtonSearchesReload") - Me.ToolStripButtonSearchesReload.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.refresh_16xMD - Me.ToolStripButtonSearchesReload.Name = "ToolStripButtonSearchesReload" - ' - 'ToolStripButtonJumpFile - ' - resources.ApplyResources(Me.ToolStripButtonJumpFile, "ToolStripButtonJumpFile") - Me.ToolStripButtonJumpFile.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.Nextrequest_10302 - Me.ToolStripButtonJumpFile.Name = "ToolStripButtonJumpFile" - ' - 'ToolStripButtonDeleteFile - ' - resources.ApplyResources(Me.ToolStripButtonDeleteFile, "ToolStripButtonDeleteFile") - Me.ToolStripButtonDeleteFile.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.delete_12x12 - Me.ToolStripButtonDeleteFile.Name = "ToolStripButtonDeleteFile" - ' - 'ToolStripButtonAnnotation - ' - resources.ApplyResources(Me.ToolStripButtonAnnotation, "ToolStripButtonAnnotation") - Me.ToolStripButtonAnnotation.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.flag_orange - Me.ToolStripButtonAnnotation.Name = "ToolStripButtonAnnotation" - ' 'FinalIndexDataSet ' Me.FinalIndexDataSet.DataSetName = "FinalIndexDataSet" @@ -680,21 +501,202 @@ Partial Class frmValidator ' Me.TBPM_PROFILE_FINAL_INDEXINGTableAdapter.ClearBeforeFill = True ' + 'RibbonControl1 + ' + Me.RibbonControl1.ExpandCollapseItem.Id = 0 + Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bsiError, Me.bsiInformation, Me.bsiDocID, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.bbtniRefresh, Me.bbtniRefreshSearches, Me.bbtniNext, Me.bbtniDelete, Me.bbtniAnnotation, Me.bsiInfo1, Me.bsiInfo2}) + resources.ApplyResources(Me.RibbonControl1, "RibbonControl1") + Me.RibbonControl1.MaxItemId = 16 + Me.RibbonControl1.Name = "RibbonControl1" + Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1}) + Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False] + Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1 + ' + 'bsiError + ' + Me.bsiError.Id = 1 + Me.bsiError.ItemAppearance.Normal.Font = CType(resources.GetObject("bsiError.ItemAppearance.Normal.Font"), System.Drawing.Font) + Me.bsiError.ItemAppearance.Normal.ForeColor = System.Drawing.Color.Red + Me.bsiError.ItemAppearance.Normal.Options.UseFont = True + Me.bsiError.ItemAppearance.Normal.Options.UseForeColor = True + Me.bsiError.Name = "bsiError" + ' + 'bsiInformation + ' + resources.ApplyResources(Me.bsiInformation, "bsiInformation") + Me.bsiInformation.Id = 2 + Me.bsiInformation.Name = "bsiInformation" + ' + 'bsiDocID + ' + resources.ApplyResources(Me.bsiDocID, "bsiDocID") + Me.bsiDocID.Id = 3 + Me.bsiDocID.Name = "bsiDocID" + ' + 'BarButtonItem2 + ' + resources.ApplyResources(Me.BarButtonItem2, "BarButtonItem2") + Me.BarButtonItem2.Id = 4 + Me.BarButtonItem2.ImageOptions.Image = CType(resources.GetObject("BarButtonItem2.ImageOptions.Image"), System.Drawing.Image) + Me.BarButtonItem2.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.LargeImage"), System.Drawing.Image) + Me.BarButtonItem2.Name = "BarButtonItem2" + ' + 'BarButtonItem3 + ' + resources.ApplyResources(Me.BarButtonItem3, "BarButtonItem3") + Me.BarButtonItem3.Id = 5 + Me.BarButtonItem3.ImageOptions.Image = CType(resources.GetObject("BarButtonItem3.ImageOptions.Image"), System.Drawing.Image) + Me.BarButtonItem3.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem3.ImageOptions.LargeImage"), System.Drawing.Image) + Me.BarButtonItem3.Name = "BarButtonItem3" + Me.BarButtonItem3.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.SmallWithText + ' + 'BarButtonItem4 + ' + resources.ApplyResources(Me.BarButtonItem4, "BarButtonItem4") + Me.BarButtonItem4.Id = 6 + Me.BarButtonItem4.ImageOptions.Image = CType(resources.GetObject("BarButtonItem4.ImageOptions.Image"), System.Drawing.Image) + Me.BarButtonItem4.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem4.ImageOptions.LargeImage"), System.Drawing.Image) + Me.BarButtonItem4.Name = "BarButtonItem4" + Me.BarButtonItem4.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.SmallWithText + ' + 'bbtniRefresh + ' + resources.ApplyResources(Me.bbtniRefresh, "bbtniRefresh") + Me.bbtniRefresh.Id = 7 + Me.bbtniRefresh.ImageOptions.Image = CType(resources.GetObject("bbtniRefresh.ImageOptions.Image"), System.Drawing.Image) + Me.bbtniRefresh.ImageOptions.LargeImage = CType(resources.GetObject("bbtniRefresh.ImageOptions.LargeImage"), System.Drawing.Image) + Me.bbtniRefresh.Name = "bbtniRefresh" + ' + 'bbtniRefreshSearches + ' + resources.ApplyResources(Me.bbtniRefreshSearches, "bbtniRefreshSearches") + Me.bbtniRefreshSearches.Id = 8 + Me.bbtniRefreshSearches.ImageOptions.Image = CType(resources.GetObject("bbtniRefreshSearches.ImageOptions.Image"), System.Drawing.Image) + Me.bbtniRefreshSearches.ImageOptions.LargeImage = CType(resources.GetObject("bbtniRefreshSearches.ImageOptions.LargeImage"), System.Drawing.Image) + Me.bbtniRefreshSearches.Name = "bbtniRefreshSearches" + ' + 'bbtniNext + ' + resources.ApplyResources(Me.bbtniNext, "bbtniNext") + Me.bbtniNext.Id = 9 + Me.bbtniNext.ImageOptions.Image = CType(resources.GetObject("bbtniNext.ImageOptions.Image"), System.Drawing.Image) + Me.bbtniNext.ImageOptions.LargeImage = CType(resources.GetObject("bbtniNext.ImageOptions.LargeImage"), System.Drawing.Image) + Me.bbtniNext.Name = "bbtniNext" + ' + 'bbtniDelete + ' + resources.ApplyResources(Me.bbtniDelete, "bbtniDelete") + Me.bbtniDelete.Id = 10 + Me.bbtniDelete.ImageOptions.Image = CType(resources.GetObject("bbtniDelete.ImageOptions.Image"), System.Drawing.Image) + Me.bbtniDelete.ImageOptions.LargeImage = CType(resources.GetObject("bbtniDelete.ImageOptions.LargeImage"), System.Drawing.Image) + Me.bbtniDelete.Name = "bbtniDelete" + Me.bbtniDelete.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing + ' + 'bbtniAnnotation + ' + resources.ApplyResources(Me.bbtniAnnotation, "bbtniAnnotation") + Me.bbtniAnnotation.Id = 11 + Me.bbtniAnnotation.ImageOptions.Image = CType(resources.GetObject("bbtniAnnotation.ImageOptions.Image"), System.Drawing.Image) + Me.bbtniAnnotation.ImageOptions.LargeImage = CType(resources.GetObject("bbtniAnnotation.ImageOptions.LargeImage"), System.Drawing.Image) + Me.bbtniAnnotation.Name = "bbtniAnnotation" + Me.bbtniAnnotation.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing + ' + 'bsiInfo1 + ' + resources.ApplyResources(Me.bsiInfo1, "bsiInfo1") + Me.bsiInfo1.Id = 14 + Me.bsiInfo1.ImageOptions.Image = CType(resources.GetObject("bsiInfo1.ImageOptions.Image"), System.Drawing.Image) + Me.bsiInfo1.ImageOptions.LargeImage = CType(resources.GetObject("bsiInfo1.ImageOptions.LargeImage"), System.Drawing.Image) + Me.bsiInfo1.ItemAppearance.Normal.Font = CType(resources.GetObject("bsiInfo1.ItemAppearance.Normal.Font"), System.Drawing.Font) + Me.bsiInfo1.ItemAppearance.Normal.ForeColor = System.Drawing.Color.Red + Me.bsiInfo1.ItemAppearance.Normal.Options.UseFont = True + Me.bsiInfo1.ItemAppearance.Normal.Options.UseForeColor = True + Me.bsiInfo1.Name = "bsiInfo1" + Me.bsiInfo1.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph + ' + 'bsiInfo2 + ' + resources.ApplyResources(Me.bsiInfo2, "bsiInfo2") + Me.bsiInfo2.Id = 15 + Me.bsiInfo2.ImageOptions.Image = CType(resources.GetObject("bsiInfo2.ImageOptions.Image"), System.Drawing.Image) + Me.bsiInfo2.ImageOptions.LargeImage = CType(resources.GetObject("bsiInfo2.ImageOptions.LargeImage"), System.Drawing.Image) + Me.bsiInfo2.ItemAppearance.Normal.Font = CType(resources.GetObject("bsiInfo2.ItemAppearance.Normal.Font"), System.Drawing.Font) + Me.bsiInfo2.ItemAppearance.Normal.Options.UseFont = True + Me.bsiInfo2.Name = "bsiInfo2" + Me.bsiInfo2.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph + ' + 'RibbonPage1 + ' + Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup3, Me.RibbonPageGroup2}) + Me.RibbonPage1.Name = "RibbonPage1" + resources.ApplyResources(Me.RibbonPage1, "RibbonPage1") + ' + 'RibbonPageGroup1 + ' + Me.RibbonPageGroup1.Alignment = DevExpress.XtraBars.Ribbon.RibbonPageGroupAlignment.Far + Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem2) + Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem3) + Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem4) + Me.RibbonPageGroup1.Name = "RibbonPageGroup1" + resources.ApplyResources(Me.RibbonPageGroup1, "RibbonPageGroup1") + ' + 'RibbonPageGroup3 + ' + Me.RibbonPageGroup3.ItemLinks.Add(Me.bbtniRefresh) + Me.RibbonPageGroup3.ItemLinks.Add(Me.bbtniRefreshSearches) + Me.RibbonPageGroup3.ItemLinks.Add(Me.bbtniNext) + Me.RibbonPageGroup3.ItemLinks.Add(Me.bbtniDelete) + Me.RibbonPageGroup3.ItemLinks.Add(Me.bbtniAnnotation) + Me.RibbonPageGroup3.Name = "RibbonPageGroup3" + resources.ApplyResources(Me.RibbonPageGroup3, "RibbonPageGroup3") + ' + 'RibbonPageGroup2 + ' + Me.RibbonPageGroup2.CaptionButtonVisible = DevExpress.Utils.DefaultBoolean.[True] + Me.RibbonPageGroup2.ImageOptions.Image = CType(resources.GetObject("RibbonPageGroup2.ImageOptions.Image"), System.Drawing.Image) + Me.RibbonPageGroup2.ItemLinks.Add(Me.bsiInfo1) + Me.RibbonPageGroup2.ItemLinks.Add(Me.bsiInfo2) + Me.RibbonPageGroup2.Name = "RibbonPageGroup2" + resources.ApplyResources(Me.RibbonPageGroup2, "RibbonPageGroup2") + Me.RibbonPageGroup2.Visible = False + ' + 'RibbonStatusBar1 + ' + Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiError) + Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiInformation) + Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiDocID) + resources.ApplyResources(Me.RibbonStatusBar1, "RibbonStatusBar1") + Me.RibbonStatusBar1.Name = "RibbonStatusBar1" + Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1 + ' + 'RibbonPage2 + ' + Me.RibbonPage2.Name = "RibbonPage2" + resources.ApplyResources(Me.RibbonPage2, "RibbonPage2") + ' + 'DocumentViewerValidator + ' + resources.ApplyResources(Me.DocumentViewerValidator, "DocumentViewerValidator") + Me.DocumentViewerValidator.Name = "DocumentViewerValidator" + ' 'frmValidator ' + Me.Appearance.Options.UseFont = True resources.ApplyResources(Me, "$this") Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font - Me.Controls.Add(Me.ToolStrip1) Me.Controls.Add(Me.SplitContainer1) - Me.Controls.Add(Me.StatusStrip1) + Me.Controls.Add(Me.RibbonControl1) + Me.Controls.Add(Me.RibbonStatusBar1) Me.Controls.Add(Me.barDockControlLeft) Me.Controls.Add(Me.barDockControlRight) Me.Controls.Add(Me.barDockControlBottom) Me.Controls.Add(Me.barDockControlTop) + Me.IconOptions.Icon = CType(resources.GetObject("frmValidator.IconOptions.Icon"), System.Drawing.Icon) + Me.IconOptions.LargeImage = CType(resources.GetObject("frmValidator.IconOptions.LargeImage"), System.Drawing.Image) Me.KeyPreview = True Me.Name = "frmValidator" - Me.ToolTip1.SetToolTip(Me, resources.GetString("$this.ToolTip")) - Me.TopMost = True + Me.Ribbon = Me.RibbonControl1 + Me.StatusBar = Me.RibbonStatusBar1 Me.SplitContainer1.Panel1.ResumeLayout(False) Me.SplitContainer1.Panel2.ResumeLayout(False) CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).EndInit() @@ -703,8 +705,6 @@ Partial Class frmValidator CType(Me.BarAndDockingController3, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.BarAndDockingController2, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.BarAndDockingController1, System.ComponentModel.ISupportInitialize).EndInit() - Me.StatusStrip1.ResumeLayout(False) - Me.StatusStrip1.PerformLayout() CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBPM_PROFILE_FILESBindingSource, System.ComponentModel.ISupportInitialize).EndInit() @@ -714,18 +714,13 @@ Partial Class frmValidator CType(Me.BarManager1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PdfBarController1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PdfBarController2, System.ComponentModel.ISupportInitialize).EndInit() - Me.ToolStrip1.ResumeLayout(False) - Me.ToolStrip1.PerformLayout() CType(Me.FinalIndexDataSet, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub - Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip - Friend WithEvents tstrplblError As System.Windows.Forms.ToolStripStatusLabel - Friend WithEvents tstrlbl_Info As System.Windows.Forms.ToolStripStatusLabel - Friend WithEvents tsslblDocID As System.Windows.Forms.ToolStripStatusLabel Friend WithEvents Panel1 As System.Windows.Forms.Panel Friend WithEvents TITLELabel1 As System.Windows.Forms.Label Friend WithEvents btnSave As System.Windows.Forms.Button @@ -778,20 +773,29 @@ Partial Class frmValidator Friend WithEvents BarAndDockingController2 As DevExpress.XtraBars.BarAndDockingController Friend WithEvents BarAndDockingController3 As DevExpress.XtraBars.BarAndDockingController Friend WithEvents SplitContainer1 As System.Windows.Forms.SplitContainer - Friend WithEvents ToolStrip1 As ToolStrip - Friend WithEvents ToolStripButtonJumpFile As ToolStripButton - Friend WithEvents ToolStripButtonDeleteFile As ToolStripButton - Friend WithEvents ToolStripButtonAnnotation As ToolStripButton Friend WithEvents FinalIndexDataSet As FinalIndexDataSet Friend WithEvents TBPM_PROFILE_FINAL_INDEXINGBindingSource As BindingSource Friend WithEvents TBPM_PROFILE_FINAL_INDEXINGTableAdapter As FinalIndexDataSetTableAdapters.TBPM_PROFILE_FINAL_INDEXINGTableAdapter - Friend WithEvents ToolStripDropDownButton2 As ToolStripDropDownButton - Friend WithEvents DateiÖffnenToolStripMenuItem1 As ToolStripMenuItem - Friend WithEvents InfoToolStripMenuItem As ToolStripMenuItem - Friend WithEvents EigenschaftenToolStripMenuItem As ToolStripMenuItem - Friend WithEvents ToolStripButtonSearchesReload As ToolStripButton Friend WithEvents ToolTip1 As ToolTip - Friend WithEvents DocumentViewer1 As DigitalData.Controls.DocumentViewer.DocumentViewer - Friend WithEvents ToolStripButton1 As ToolStripButton - Friend WithEvents tsslbl_State As ToolStripStatusLabel + Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl + Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage + Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup + Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar + Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage + Friend WithEvents bsiError As DevExpress.XtraBars.BarStaticItem + Friend WithEvents bsiInformation As DevExpress.XtraBars.BarStaticItem + Friend WithEvents bsiDocID As DevExpress.XtraBars.BarStaticItem + Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem + Friend WithEvents BarButtonItem3 As DevExpress.XtraBars.BarButtonItem + Friend WithEvents BarButtonItem4 As DevExpress.XtraBars.BarButtonItem + Friend WithEvents RibbonPageGroup3 As DevExpress.XtraBars.Ribbon.RibbonPageGroup + Friend WithEvents bbtniRefresh As DevExpress.XtraBars.BarButtonItem + Friend WithEvents bbtniRefreshSearches As DevExpress.XtraBars.BarButtonItem + Friend WithEvents bbtniNext As DevExpress.XtraBars.BarButtonItem + Friend WithEvents bbtniDelete As DevExpress.XtraBars.BarButtonItem + Friend WithEvents bbtniAnnotation As DevExpress.XtraBars.BarButtonItem + Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup + Friend WithEvents bsiInfo1 As DevExpress.XtraBars.BarStaticItem + Friend WithEvents bsiInfo2 As DevExpress.XtraBars.BarStaticItem + Friend WithEvents DocumentViewerValidator As DigitalData.Controls.DocumentViewer.DocumentViewer End Class diff --git a/app/DD_PM_WINDREAM/frmValidator.resx b/app/DD_PM_WINDREAM/frmValidator.resx index 241f7fe..f0b7eb3 100644 --- a/app/DD_PM_WINDREAM/frmValidator.resx +++ b/app/DD_PM_WINDREAM/frmValidator.resx @@ -117,503 +117,797 @@ System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - 0, 17 - - - barDockControlBottom - - - 400 % - - - ToolStripButtonAnnotation - - - barDockControlTop - - - Top, Left, Right - - - - - AAEAAAD/////AQAAAAAAAAAMAgAAAFpEZXZFeHByZXNzLlV0aWxzLnYxOS4yLCBWZXJzaW9uPTE5LjIu - My4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI4OGQxNzU0ZDcwMGU0OWEMAwAAAFlE - ZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4zLjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVi - bGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29s - VGlwBwAAAA1BbGxvd0h0bWxUZXh0EUZpeGVkVG9vbFRpcFdpZHRoCkl0ZW1zQ291bnQJaXRlbVR5cGUw - BWl0ZW0wCWl0ZW1UeXBlMQVpdGVtMQQAAAQEBAQfRGV2RXhwcmVzcy5VdGlscy5EZWZhdWx0Qm9vbGVh - bgMAAAABCCVEZXZFeHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAgAAACFEZXZFeHByZXNz - LlV0aWxzLlRvb2xUaXBUaXRsZUl0ZW0CAAAAJURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29sVGlwSXRl - bVR5cGUCAAAAHERldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEl0ZW0CAAAAAgAAAAX8////H0RldkV4cHJl - c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4BAAAAB3ZhbHVlX18ACAMAAAACAAAAAAIAAAAF+////yVEZXZF - eHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAQAAAAd2YWx1ZV9fAAgCAAAAAQAAAAkGAAAA - Afn////7////AAAAAAkIAAAADAkAAABRU3lzdGVtLkRyYXdpbmcsIFZlcnNpb249NC4wLjAuMCwgQ3Vs - dHVyZT1uZXV0cmFsLCBQdWJsaWNLZXlUb2tlbj1iMDNmNWY3ZjExZDUwYTNhBQYAAAAhRGV2RXhwcmVz - cy5VdGlscy5Ub29sVGlwVGl0bGVJdGVtBwAAAA1BbGxvd0h0bWxUZXh0BEljb24MSW1hZ2VPcHRpb25z - CkxlZnRJbmRlbnQITWF4V2lkdGgST3duZXJBbGxvd0h0bWxUZXh0BFRleHQEBAQAAAABH0RldkV4cHJl - c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4DAAAAE1N5c3RlbS5EcmF3aW5nLkljb24JAAAAKERldkV4cHJl - c3MuVXRpbHMuVG9vbFRpcEl0ZW1JbWFnZU9wdGlvbnMCAAAACAgBAgAAAAH2/////P///wIAAAAKCQsA - AAAAAAAAPAEAAAAGDAAAAARab29tBQgAAAAcRGV2RXhwcmVzcy5VdGlscy5Ub29sVGlwSXRlbQcAAAAN - QWxsb3dIdG1sVGV4dARJY29uDEltYWdlT3B0aW9ucwpMZWZ0SW5kZW50CE1heFdpZHRoEk93bmVyQWxs - b3dIdG1sVGV4dARUZXh0BAQEAAAAAR9EZXZFeHByZXNzLlV0aWxzLkRlZmF1bHRCb29sZWFuAwAAABNT - eXN0ZW0uRHJhd2luZy5JY29uCQAAAChEZXZFeHByZXNzLlV0aWxzLlRvb2xUaXBJdGVtSW1hZ2VPcHRp - b25zAgAAAAgIAQIAAAAB8/////z///8CAAAACgkOAAAAAAAAADwBAAAABg8AAAApw4RuZGVybiBkZXIg - Wm9vbS1TdHVmZSBkZXMgUERGLURva3VtZW50cy4FCwAAAChEZXZFeHByZXNzLlV0aWxzLlRvb2xUaXBJ - dGVtSW1hZ2VPcHRpb25zBQAAAAhJbWFnZVVyaQxTdmdJbWFnZVNpemUJQWxpZ25tZW50CkltYWdlSW5k - ZXgTSW1hZ2VUb1RleHREaXN0YW5jZQEEBAAAE1N5c3RlbS5EcmF3aW5nLlNpemUJAAAAJkRldkV4cHJl - c3MuVXRpbHMuVG9vbFRpcEltYWdlQWxpZ25tZW50AgAAAAgIAgAAAAYQAAAAAAXv////E1N5c3RlbS5E - cmF3aW5nLlNpemUCAAAABXdpZHRoBmhlaWdodAAACAgJAAAAAAAAAAAAAAAF7v///yZEZXZFeHByZXNz - LlV0aWxzLlRvb2xUaXBJbWFnZUFsaWdubWVudAEAAAAHdmFsdWVfXwAIAgAAAAAAAAD/////DgAAAAEO - AAAACwAAAAkQAAAAAe3////v////AAAAAAAAAAAB7P///+7///8AAAAA/////w4AAAAL - - - - - - - PdfZoom10CheckItem2 - - - PdfPreviousPageBarItem2 - - - InfoToolStripMenuItem - - - DevExpress.XtraPdfViewer.Bars.PdfSetPageLevelZoomModeCheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - 100 % - - - - -1 - - - - AAEAAAD/////AQAAAAAAAAAMAgAAAFpEZXZFeHByZXNzLlV0aWxzLnYxOS4yLCBWZXJzaW9uPTE5LjIu - My4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI4OGQxNzU0ZDcwMGU0OWEMAwAAAFlE - ZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4zLjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVi - bGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29s - VGlwBwAAAA1BbGxvd0h0bWxUZXh0EUZpeGVkVG9vbFRpcFdpZHRoCkl0ZW1zQ291bnQJaXRlbVR5cGUw - BWl0ZW0wCWl0ZW1UeXBlMQVpdGVtMQQAAAQEBAQfRGV2RXhwcmVzcy5VdGlscy5EZWZhdWx0Qm9vbGVh - bgMAAAABCCVEZXZFeHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAgAAACFEZXZFeHByZXNz - LlV0aWxzLlRvb2xUaXBUaXRsZUl0ZW0CAAAAJURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29sVGlwSXRl - bVR5cGUCAAAAHERldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEl0ZW0CAAAAAgAAAAX8////H0RldkV4cHJl - c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4BAAAAB3ZhbHVlX18ACAMAAAACAAAAAAIAAAAF+////yVEZXZF - eHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAQAAAAd2YWx1ZV9fAAgCAAAAAQAAAAkGAAAA - Afn////7////AAAAAAkIAAAADAkAAABRU3lzdGVtLkRyYXdpbmcsIFZlcnNpb249NC4wLjAuMCwgQ3Vs - dHVyZT1uZXV0cmFsLCBQdWJsaWNLZXlUb2tlbj1iMDNmNWY3ZjExZDUwYTNhBQYAAAAhRGV2RXhwcmVz - cy5VdGlscy5Ub29sVGlwVGl0bGVJdGVtBwAAAA1BbGxvd0h0bWxUZXh0BEljb24MSW1hZ2VPcHRpb25z - CkxlZnRJbmRlbnQITWF4V2lkdGgST3duZXJBbGxvd0h0bWxUZXh0BFRleHQEBAQAAAABH0RldkV4cHJl - c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4DAAAAE1N5c3RlbS5EcmF3aW5nLkljb24JAAAAKERldkV4cHJl - c3MuVXRpbHMuVG9vbFRpcEl0ZW1JbWFnZU9wdGlvbnMCAAAACAgBAgAAAAH2/////P///wIAAAAKCQsA - AAAAAAAAPAEAAAAGDAAAABZTcGVpY2hlcm4gYWxzIChTdHJnK1MpBQgAAAAcRGV2RXhwcmVzcy5VdGls - cy5Ub29sVGlwSXRlbQcAAAANQWxsb3dIdG1sVGV4dARJY29uDEltYWdlT3B0aW9ucwpMZWZ0SW5kZW50 - CE1heFdpZHRoEk93bmVyQWxsb3dIdG1sVGV4dARUZXh0BAQEAAAAAR9EZXZFeHByZXNzLlV0aWxzLkRl - ZmF1bHRCb29sZWFuAwAAABNTeXN0ZW0uRHJhd2luZy5JY29uCQAAAChEZXZFeHByZXNzLlV0aWxzLlRv - b2xUaXBJdGVtSW1hZ2VPcHRpb25zAgAAAAgIAQIAAAAB8/////z///8CAAAACgkOAAAAAAAAADwBAAAA - Bg8AAAAYU3BlaWNoZXJuIGRlciBQREYtRGF0ZWkuBQsAAAAoRGV2RXhwcmVzcy5VdGlscy5Ub29sVGlw - SXRlbUltYWdlT3B0aW9ucwUAAAAISW1hZ2VVcmkMU3ZnSW1hZ2VTaXplCUFsaWdubWVudApJbWFnZUlu - ZGV4E0ltYWdlVG9UZXh0RGlzdGFuY2UBBAQAABNTeXN0ZW0uRHJhd2luZy5TaXplCQAAACZEZXZFeHBy - ZXNzLlV0aWxzLlRvb2xUaXBJbWFnZUFsaWdubWVudAIAAAAICAIAAAAGEAAAAAAF7////xNTeXN0ZW0u - RHJhd2luZy5TaXplAgAAAAV3aWR0aAZoZWlnaHQAAAgICQAAAAAAAAAAAAAABe7///8mRGV2RXhwcmVz - cy5VdGlscy5Ub29sVGlwSW1hZ2VBbGlnbm1lbnQBAAAAB3ZhbHVlX18ACAIAAAAAAAAA/////w4AAAAB - DgAAAAsAAAAJEAAAAAHt////7////wAAAAAAAAAAAez////u////AAAAAP////8OAAAACw== - - - - Left - - - Panel1 - - - 962, 643 - - - False - - - DigitalData.Controls.DocumentViewer.DocumentViewer, DigitalData.Controls.DocumentViewer, Version=1.0.0.0, Culture=neutral, PublicKeyToken=null - - - -1 - - - $this - - - System.Windows.Forms.SplitterPanel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - - - - ToolStrip1 - - - tstrplblError - - - 24 - - - 1, 0, 16, 0 - - - FinalIndexDataSet - - - - AAEAAAD/////AQAAAAAAAAAMAgAAAFpEZXZFeHByZXNzLlV0aWxzLnYxOS4yLCBWZXJzaW9uPTE5LjIu - My4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI4OGQxNzU0ZDcwMGU0OWEMAwAAAFlE - ZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4zLjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVi - bGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29s - VGlwBwAAAA1BbGxvd0h0bWxUZXh0EUZpeGVkVG9vbFRpcFdpZHRoCkl0ZW1zQ291bnQJaXRlbVR5cGUw - BWl0ZW0wCWl0ZW1UeXBlMQVpdGVtMQQAAAQEBAQfRGV2RXhwcmVzcy5VdGlscy5EZWZhdWx0Qm9vbGVh - bgMAAAABCCVEZXZFeHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAgAAACFEZXZFeHByZXNz - LlV0aWxzLlRvb2xUaXBUaXRsZUl0ZW0CAAAAJURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29sVGlwSXRl - bVR5cGUCAAAAHERldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEl0ZW0CAAAAAgAAAAX8////H0RldkV4cHJl - c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4BAAAAB3ZhbHVlX18ACAMAAAACAAAAAAIAAAAF+////yVEZXZF - eHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAQAAAAd2YWx1ZV9fAAgCAAAAAQAAAAkGAAAA - Afn////7////AAAAAAkIAAAADAkAAABRU3lzdGVtLkRyYXdpbmcsIFZlcnNpb249NC4wLjAuMCwgQ3Vs - dHVyZT1uZXV0cmFsLCBQdWJsaWNLZXlUb2tlbj1iMDNmNWY3ZjExZDUwYTNhBQYAAAAhRGV2RXhwcmVz - cy5VdGlscy5Ub29sVGlwVGl0bGVJdGVtBwAAAA1BbGxvd0h0bWxUZXh0BEljb24MSW1hZ2VPcHRpb25z - CkxlZnRJbmRlbnQITWF4V2lkdGgST3duZXJBbGxvd0h0bWxUZXh0BFRleHQEBAQAAAABH0RldkV4cHJl - c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4DAAAAE1N5c3RlbS5EcmF3aW5nLkljb24JAAAAKERldkV4cHJl - c3MuVXRpbHMuVG9vbFRpcEl0ZW1JbWFnZU9wdGlvbnMCAAAACAgBAgAAAAH2/////P///wIAAAAKCQsA - AAAAAAAAPAEAAAAGDAAAAAhOw6RjaHN0ZQUIAAAAHERldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEl0ZW0H - AAAADUFsbG93SHRtbFRleHQESWNvbgxJbWFnZU9wdGlvbnMKTGVmdEluZGVudAhNYXhXaWR0aBJPd25l - ckFsbG93SHRtbFRleHQEVGV4dAQEBAAAAAEfRGV2RXhwcmVzcy5VdGlscy5EZWZhdWx0Qm9vbGVhbgMA - AAATU3lzdGVtLkRyYXdpbmcuSWNvbgkAAAAoRGV2RXhwcmVzcy5VdGlscy5Ub29sVGlwSXRlbUltYWdl - T3B0aW9ucwIAAAAICAECAAAAAfP////8////AgAAAAoJDgAAAAAAAAA8AQAAAAYPAAAAF07DpGNoc3Rl - IFNlaXRlIGFuemVpZ2VuBQsAAAAoRGV2RXhwcmVzcy5VdGlscy5Ub29sVGlwSXRlbUltYWdlT3B0aW9u - cwUAAAAISW1hZ2VVcmkMU3ZnSW1hZ2VTaXplCUFsaWdubWVudApJbWFnZUluZGV4E0ltYWdlVG9UZXh0 - RGlzdGFuY2UBBAQAABNTeXN0ZW0uRHJhd2luZy5TaXplCQAAACZEZXZFeHByZXNzLlV0aWxzLlRvb2xU - aXBJbWFnZUFsaWdubWVudAIAAAAICAIAAAAGEAAAAAAF7////xNTeXN0ZW0uRHJhd2luZy5TaXplAgAA - AAV3aWR0aAZoZWlnaHQAAAgICQAAAAAAAAAAAAAABe7///8mRGV2RXhwcmVzcy5VdGlscy5Ub29sVGlw - SW1hZ2VBbGlnbm1lbnQBAAAAB3ZhbHVlX18ACAIAAAAAAAAA/////w4AAAABDgAAAAsAAAAJEAAAAAHt - ////7////wAAAAAAAAAAAez////u////AAAAAP////8OAAAACw== - - - - 212, 22 - - - - AAEAAAD/////AQAAAAAAAAAMAgAAAFpEZXZFeHByZXNzLlV0aWxzLnYxOS4yLCBWZXJzaW9uPTE5LjIu - My4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI4OGQxNzU0ZDcwMGU0OWEMAwAAAFlE - ZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4zLjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVi - bGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29s - VGlwBwAAAA1BbGxvd0h0bWxUZXh0EUZpeGVkVG9vbFRpcFdpZHRoCkl0ZW1zQ291bnQJaXRlbVR5cGUw - BWl0ZW0wCWl0ZW1UeXBlMQVpdGVtMQQAAAQEBAQfRGV2RXhwcmVzcy5VdGlscy5EZWZhdWx0Qm9vbGVh - bgMAAAABCCVEZXZFeHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAgAAACFEZXZFeHByZXNz - LlV0aWxzLlRvb2xUaXBUaXRsZUl0ZW0CAAAAJURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29sVGlwSXRl - bVR5cGUCAAAAHERldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEl0ZW0CAAAAAgAAAAX8////H0RldkV4cHJl - c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4BAAAAB3ZhbHVlX18ACAMAAAACAAAAAAIAAAAF+////yVEZXZF - eHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAQAAAAd2YWx1ZV9fAAgCAAAAAQAAAAkGAAAA - Afn////7////AAAAAAkIAAAADAkAAABRU3lzdGVtLkRyYXdpbmcsIFZlcnNpb249NC4wLjAuMCwgQ3Vs - dHVyZT1uZXV0cmFsLCBQdWJsaWNLZXlUb2tlbj1iMDNmNWY3ZjExZDUwYTNhBQYAAAAhRGV2RXhwcmVz - cy5VdGlscy5Ub29sVGlwVGl0bGVJdGVtBwAAAA1BbGxvd0h0bWxUZXh0BEljb24MSW1hZ2VPcHRpb25z - CkxlZnRJbmRlbnQITWF4V2lkdGgST3duZXJBbGxvd0h0bWxUZXh0BFRleHQEBAQAAAABH0RldkV4cHJl - c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4DAAAAE1N5c3RlbS5EcmF3aW5nLkljb24JAAAAKERldkV4cHJl - c3MuVXRpbHMuVG9vbFRpcEl0ZW1JbWFnZU9wdGlvbnMCAAAACAgBAgAAAAH2/////P///wIAAAAKCQsA - AAAAAAAAPAEAAAAGDAAAABBEcnVja2VuIChTdHJnK1ApBQgAAAAcRGV2RXhwcmVzcy5VdGlscy5Ub29s - VGlwSXRlbQcAAAANQWxsb3dIdG1sVGV4dARJY29uDEltYWdlT3B0aW9ucwpMZWZ0SW5kZW50CE1heFdp - ZHRoEk93bmVyQWxsb3dIdG1sVGV4dARUZXh0BAQEAAAAAR9EZXZFeHByZXNzLlV0aWxzLkRlZmF1bHRC - b29sZWFuAwAAABNTeXN0ZW0uRHJhd2luZy5JY29uCQAAAChEZXZFeHByZXNzLlV0aWxzLlRvb2xUaXBJ - dGVtSW1hZ2VPcHRpb25zAgAAAAgIAQIAAAAB8/////z///8CAAAACgkOAAAAAAAAADwBAAAABg8AAAAN - RGF0ZWkgZHJ1Y2tlbgULAAAAKERldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEl0ZW1JbWFnZU9wdGlvbnMF - AAAACEltYWdlVXJpDFN2Z0ltYWdlU2l6ZQlBbGlnbm1lbnQKSW1hZ2VJbmRleBNJbWFnZVRvVGV4dERp - c3RhbmNlAQQEAAATU3lzdGVtLkRyYXdpbmcuU2l6ZQkAAAAmRGV2RXhwcmVzcy5VdGlscy5Ub29sVGlw - SW1hZ2VBbGlnbm1lbnQCAAAACAgCAAAABhAAAAAABe////8TU3lzdGVtLkRyYXdpbmcuU2l6ZQIAAAAF - d2lkdGgGaGVpZ2h0AAAICAkAAAAAAAAAAAAAAAXu////JkRldkV4cHJlc3MuVXRpbHMuVG9vbFRpcElt - YWdlQWxpZ25tZW50AQAAAAd2YWx1ZV9fAAgCAAAAAAAAAP////8OAAAAAQ4AAAALAAAACRAAAAAB7f// - /+////8AAAAAAAAAAAHs////7v///wAAAAD/////DgAAAAs= - - - - 477 - - - - - - MiddleLeft - - - BarManager1 - - - TBPM_PROFILE_FILESTableAdapter - - - -1 - - - -1 - - - PdfFileSaveAsBarItem1 - - - ToolStripButtonSearchesReload - - - 962, 22 - - - - - + Fill - - TBPM_KONFIGURATIONBindingSource + + + 0, 158 - - 156, 22 - - - 22, 17 + + Top, Left, Right Segoe UI Symbol, 12pt, style=Bold - + + 3, 4 + + + No + + + 455, 29 + + + + 1 + + + Label1 + + + MiddleLeft + + + TITLELabel1 + + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + Panel1 + + + 0 + + + Bottom, Left, Right + + + Tahoma, 9.75pt + + + MiddleLeft + + + 7, 404 + + + 3, 4, 3, 4 + + + 467, 50 + + + 11 + + + Validierung speichern - Nächstes Dokument + + + btnSave + + + System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + Panel1 + + + 1 + + + Top, Left, Right + + + 5, 33 + + + 469, 48 + + + 1 + + + Label3 + + + DESCRIPTIONLabel + + + System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + Panel1 + + + 2 + + + Top, Bottom, Left, Right + + + True + + + 8, 85 + + + 3, 4, 3, 4 + + + 466, 311 + + + 18 + + + pnldesigner + + + System.Windows.Forms.Panel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + Panel1 + + + 3 + + + Fill + + + 0, 0 + + + 3, 4, 3, 4 + + + 477, 461 + + + 24 + + + Panel1 + + + System.Windows.Forms.Panel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + SplitContainer1.Panel1 + + + 0 + + + SplitContainer1.Panel1 + + + System.Windows.Forms.SplitterPanel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + SplitContainer1 + + + 0 + + + Fill + + + 0, 0 + + + 3, 4, 3, 4 + + + 481, 461 + + + 0 + + + DocumentViewerValidator + + + DigitalData.Controls.DocumentViewer.DocumentViewer, DigitalData.Controls.DocumentViewer, Version=1.0.0.0, Culture=neutral, PublicKeyToken=null + + + SplitContainer1.Panel2 + + + 0 + + + SplitContainer1.Panel2 + + + System.Windows.Forms.SplitterPanel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + SplitContainer1 + + + 1 + + + 962, 461 + + + 477 + + + 37 + + + SplitContainer1 + + + System.Windows.Forms.SplitContainer, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + $this + + + 0 + + + 17, 17 + + + 214, 17 + + + 411, 17 + + + 725, 17 + + + 887, 17 + + + 813, 56 + + + 278, 134 + + + 938, 95 + + + 17, 95 + + + 469, 95 + + + 569, 56 + + + 1051, 56 + + + 257, 95 + + + 675, 95 + + + 17, 134 + + + 681, 134 + + + Top + + + 0, 0 + + + 962, 0 + + + barDockControlTop + + DevExpress.XtraBars.BarDockControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a $this - - PdfZoom500CheckItem2 + + 6 - - SplitContainer1 + + Bottom - - DevExpress.XtraPdfViewer.Bars.PdfZoomOutBarItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + 0, 643 - - - - - - - + 962, 0 - - DevExpress.XtraPdfViewer.Bars.PdfSetActualSizeZoomModeCheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + barDockControlBottom - - -1 + + DevExpress.XtraBars.BarDockControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - ToolStripDropDownButton2 + + $this - - PdfFindTextBarItem2 + + 5 - - Magenta + + Left - - DevExpress.XtraPdfViewer.Bars.PdfZoom125CheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + 0, 0 0, 643 - - Info + + barDockControlLeft - - frmValidator + + DevExpress.XtraBars.BarDockControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - -1 - - - 1 - - - - AAEAAAD/////AQAAAAAAAAAMAgAAAFpEZXZFeHByZXNzLlV0aWxzLnYxOS4yLCBWZXJzaW9uPTE5LjIu - My4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI4OGQxNzU0ZDcwMGU0OWEMAwAAAFlE - ZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4zLjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVi - bGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29s - VGlwBwAAAA1BbGxvd0h0bWxUZXh0EUZpeGVkVG9vbFRpcFdpZHRoCkl0ZW1zQ291bnQJaXRlbVR5cGUw - BWl0ZW0wCWl0ZW1UeXBlMQVpdGVtMQQAAAQEBAQfRGV2RXhwcmVzcy5VdGlscy5EZWZhdWx0Qm9vbGVh - bgMAAAABCCVEZXZFeHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAgAAACFEZXZFeHByZXNz - LlV0aWxzLlRvb2xUaXBUaXRsZUl0ZW0CAAAAJURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29sVGlwSXRl - bVR5cGUCAAAAHERldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEl0ZW0CAAAAAgAAAAX8////H0RldkV4cHJl - c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4BAAAAB3ZhbHVlX18ACAMAAAACAAAAAAIAAAAF+////yVEZXZF - eHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAQAAAAd2YWx1ZV9fAAgCAAAAAQAAAAkGAAAA - Afn////7////AAAAAAkIAAAADAkAAABRU3lzdGVtLkRyYXdpbmcsIFZlcnNpb249NC4wLjAuMCwgQ3Vs - dHVyZT1uZXV0cmFsLCBQdWJsaWNLZXlUb2tlbj1iMDNmNWY3ZjExZDUwYTNhBQYAAAAhRGV2RXhwcmVz - cy5VdGlscy5Ub29sVGlwVGl0bGVJdGVtBwAAAA1BbGxvd0h0bWxUZXh0BEljb24MSW1hZ2VPcHRpb25z - CkxlZnRJbmRlbnQITWF4V2lkdGgST3duZXJBbGxvd0h0bWxUZXh0BFRleHQEBAQAAAABH0RldkV4cHJl - c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4DAAAAE1N5c3RlbS5EcmF3aW5nLkljb24JAAAAKERldkV4cHJl - c3MuVXRpbHMuVG9vbFRpcEl0ZW1JbWFnZU9wdGlvbnMCAAAACAgBAgAAAAH2/////P///wIAAAAKCQsA - AAAAAAAAPAEAAAAGDAAAAA9GaW5kZW4gKFN0cmcrRikFCAAAABxEZXZFeHByZXNzLlV0aWxzLlRvb2xU - aXBJdGVtBwAAAA1BbGxvd0h0bWxUZXh0BEljb24MSW1hZ2VPcHRpb25zCkxlZnRJbmRlbnQITWF4V2lk - dGgST3duZXJBbGxvd0h0bWxUZXh0BFRleHQEBAQAAAABH0RldkV4cHJlc3MuVXRpbHMuRGVmYXVsdEJv - b2xlYW4DAAAAE1N5c3RlbS5EcmF3aW5nLkljb24JAAAAKERldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEl0 - ZW1JbWFnZU9wdGlvbnMCAAAACAgBAgAAAAHz/////P///wIAAAAKCQ4AAAAAAAAAPAEAAAAGDwAAAAtU - ZXh0IHN1Y2hlbgULAAAAKERldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEl0ZW1JbWFnZU9wdGlvbnMFAAAA - CEltYWdlVXJpDFN2Z0ltYWdlU2l6ZQlBbGlnbm1lbnQKSW1hZ2VJbmRleBNJbWFnZVRvVGV4dERpc3Rh - bmNlAQQEAAATU3lzdGVtLkRyYXdpbmcuU2l6ZQkAAAAmRGV2RXhwcmVzcy5VdGlscy5Ub29sVGlwSW1h - Z2VBbGlnbm1lbnQCAAAACAgCAAAABhAAAAAABe////8TU3lzdGVtLkRyYXdpbmcuU2l6ZQIAAAAFd2lk - dGgGaGVpZ2h0AAAICAkAAAAAAAAAAAAAAAXu////JkRldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEltYWdl - QWxpZ25tZW50AQAAAAd2YWx1ZV9fAAgCAAAAAAAAAP////8OAAAAAQ4AAAALAAAACRAAAAAB7f///+// - //8AAAAAAAAAAAHs////7v///wAAAAD/////DgAAAAs= - - - - Magenta - - - Anzahl Dateien: - - - 0, 0 - - - DevExpress.XtraPdfViewer.Bars.PdfZoom150CheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_FILESTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null - - - System.Windows.Forms.Panel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - -1 - - - DevExpress.XtraPdfViewer.Bars.PdfZoom200CheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - PdfZoom25CheckItem2 - - - Verkleinern - - - tsslbl_State - - - PdfSetActualSizeZoomModeCheckItem2 - - - Right - - - Top - - - System.Windows.Forms.SplitContainer, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - Top, Left, Right - - - -1 - - - Eigenschaften - - - System.Windows.Forms.StatusStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - -1 - - - ToolStrip1 - - - DevExpress.XtraBars.BarAndDockingController, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - Magenta - - - Zusätzliche Suchen aktualisieren - - - 3 + + $this 3 - - 481, 593 + + Right - - Finden + + 962, 0 - - SplitContainer1.Panel2 + + 0, 643 - - -1 + + barDockControlRight - - SplitContainer1 + + DevExpress.XtraBars.BarDockControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - DevExpress.XtraBars.BarAndDockingController, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + $this - - + + 4 - - TBPM_PROFILE_FINAL_INDEXINGTableAdapter + + True + + + 46 + + + 7, 17 - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 962, 643 - - + + Tahoma, 8.25pt, style=Bold - - + + BarStaticItem1 - - -1 + + BarStaticItem1 - - TBPM_PROFILE_FILESBindingSource + + Datei öffnen - - PdfFilePrintBarItem2 + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABV0RVh0VGl0 + bGUAVmlld01lcmdlZERhdGE7shxIswAAAkJJREFUOE+lkl9Ik2EUxjdnYg4Z6IUX0Y1dBEUQdrOQpEYy + K9LEQpTFxD+oTXMbXkT7xoKyzaitVrJkW0RXQbJagU5rG5ulEYEXgUIkmNYHBl4krWB/ejrv15avK696 + 4Afn/TjPc97348gA/BcbxYbkREEWBVFIbMvCavmWASZfJGLyR2H0RTDgDeP86Av03X2Oc54p9IyE0OkK + xqmtaKuAAqM/QuXfymQySKfTaHcGWaOK9RLSTfgABZuaL2acDMdhc9zE6bZ+1Ld2xk6caeulfvYkOR9Q + 2E9XZroXFeENf4YntIQLtwIwX3LiYWgWn9a+IxyfgUmwJ2sbWvqYhw8oYm/llUwmYR0i88QsyCvp7eJX + 3A9Oo/aUbpo8JXxAMftRTJ6pFdweX8K1sXk06Q3SZKYv335iZHIZLz+sU8DZH+RR8QHbu9zjUmNOiUQC + g8JlhGOvsErmOTEN98RH3HkUQc2xptf5Acp21zPJ6Hy6CPvYAmzeKIbMvTBevAL/4xhi79dhdgWgM1hS + VdVHLWwoH1Cqv/5ECkilUlgVVxBymREUmmGs16KjZwCaBh0Oak6+268+bKP+MkLBB6h0w4GseZnMJgSt + zXAcV+NNLApRFHHE4GKNVYSSmSUfF6BsFPwzLVbfn8l2MtfpLdAOjhJ+HOoanqO+ipwnP4DtffmNDu3V + B911EKp3r+0rL22lb3uIXUQlUUH8e5Wlw+8VVXXv3enQ7CirobqEkFsOVMp4Nnn4g7tRnQspJqRVzTdv + DoDsF67YQEGpdtFTAAAAAElFTkSuQmCC + - - DevExpress.XtraPdfViewer.Bars.PdfBarController, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABV0RVh0VGl0 + bGUAVmlld01lcmdlZERhdGE7shxIswAABztJREFUWEedVwlMFGcUXvG+UOuBtba2sYfapDVpjCZNrVdU + FOuNVSmKqAgKaiyVxqgoHhiV+1LwaD2qFFCJqICCoiiHnCr3oSCLVEBYXGDPr+8NOwLLrqIv+XZ3dmbe + 973jf/+MBEA76FkXIzAxgK5vAZ/n+zrydfijxUQSvrkbobsOPQg9dehF6K1DH0JfQj8d+hNMdeDffJ79 + dOnA1+6g1Uw2h2THbT7xCE6MkEdwDMmGY3AWNhE2Hiccy4KDgEzYB2VgAyMwA3YB6VjP8E/DWobfQ6z2 + vH+XfLJADqg9Z7uDFuPouzHx+5pWBH1odFDTwRqfVHY+iP2yf7rknQK6O1HE72MisUiupg+1VgOVWgMb + nxR2PoT9sn+69J0CejgGdz4DHcjph1qthYoOFCRgtbcgYCj7Zf90+TsF9HQMbp+B03cqceq2VMCJ+AqE + xFUg+NZzHI8tR1BMGQKiy+B//Rl8r5XCJ6oUShKgVGnQrNJitVcyOx9G6JQA7v5em/QE6Jt+1BqOmtNO + ESs1BPpm8ialBtaegoDhhM4L4E43ZiJ57fVpqDwpQUWwBGXHJSgJkqDAX4Kn4dPQrNSiUaGBXKHGbx5J + 7PxjQqcF9HbQE3AiToqQW5T2m89xjNLOAqQhfFtHy/KQoJEiZ/LXzWpYHRUEjCDw/OAStxpdb0hAX17f + bU2MujXlQFXUbJQESJDvJ0GOtwTZnhKkH5UgN3TWG3JZkxorjz5g558QOiWAh0U/Hi6idSRvqTd3uYqa + TcHQ1buiqgZXYxPg7hMCB+c92LBtF5ZvcYeFpc3eqRZLv9b5bxVBvg0J6M+TjU0kPxYjdvsz+Om63ftq + CbwiS+BxpQhHLhVh7+l7cHINRNDZCMRnPkVaWSOyK5pwP7sY/qdCscR6Y5TFsjWTdRwtIphYhM74pKld + YLrBqIXIdVHzUmumpdakVFPk1fAI/AthMfeRUKpCaoUGj/9To6hajfJ6NQoq5Th3JRYLrDZETZ696Csd + TxdDAnhcmvIsb0teY6TjS8OnUq1ViIy+jaAzEbhbpsJDgVyLghotymVavGjQIPNZAx5XKnDA9yRmLbbe + QRy8mZkYEzCQBTC5GPXbOr5eroD9Di8h7alSIq/SorAGeFqnxXOZBoWUhWuZL/GgrAnnbqTAfInNHeIY + IHCRD0MCBq31S2uX8hdGOv7JxVmobWiGvfNuPKSaP35B6a7R4Okrir5ei9xqDZLLlDiZUIHreXJEpFdh + 7jLbWuIwI/QwJuAjW9pGxS7nWnOXt9Sb17cGr2mZNdASq5crUV0vx/qtO6nh5EK05ULkLeSJVJLYoiZ4 + UOOGZjfgXFIl5i5d84o4RhJ6GhLAO9Zg3kKFeS6Qa+ARWYyj1O2HLxXiUEQ+Dobl40BoHtz+eYLdZzKw + xtkdidTt3HBccxaSRJHHFikQmdOIfZdLcDZNBt+wREyftyKZON4qYIgNCeComZyjbp1sGshowNRT9HWN + KlQ3KCCtluHUhcvCUpPK1JR+FTKlSsQXNwvkF7Ia4BpRhBMp9di61weTpll4EweXoLsxAUN5C20SyYlY + SDtPNiYn4jq5imqvQGXtaxSUluPMfgc42PyK87TUHlG3J1HDRec14l9KO0e+M6wIewIuYsocy+RRX46b + QRzchF31BfBwYAHDVnmRACLlyDnqQ+Gc9jzsD83Fvou52HP+EXb+nYE//G/C224mwl1mwu/3xbCzWiIs + tbPU7dxwXHNO+9Y9PphsviR97PiJ68g/b0wtY9mAAN6xzFZ5JQlRyylibjae6Rz5KyHtzZDWNCA7KxNn + t85A8hlnxAfY4pTdD/BwssTOA56wdfwTi6wdsNDKDjOW2mP8pKmhIz4bvZB8c+35IZX3nA6TUBQw3Jq2 + UKHTOe1EKpBT2qtlVHMif5yTj/PbZqLwpi9yovbh0g7KgPVERMXEIyE1G3eSsxB7NxXRCSmY7nSanU8l + MDk/RTO5wVEslsDMigTUUI2rZc14Saiqo6hr5Xj2og5ZucU45/wLnkS6ozjOEzEH58N35fcIjbiCu+l5 + eJj/HGkFUqTkliPpSRnm7brOzscR+BGdR3Cr6QlgEyah5f6bCSuP3McKwvLDiQKWud/BItcbcLG1ROKx + DSi4sR/X3ObCbcG3MF93CHNcwjDfNQYL3OKxkLBgbxzmu8XB3CX8Afnk5wHhgYTQam0F6ERwerhB+DGa + m+VTwijC54QxVhMGO13cMgk5V1wQsX0KXKcPLTTr19Wazv1I+I4wlvBNG4wmsJ837wXtzIAANhbBmWDF + 4lsQN84Qj/kjk+8FWuPk6nHYPnlwtGlPk5/o/y8Igwn8VsTXtQXXnP20bsFtTV+ACJ3xDSLYQR+LcaYT + DpmbpViNH7CJjscQ+HGbBYoExmDYDJEbAhk74axwlEzKLxr8m5vW5MDPAyX66JQZIjMGMhbBkTKpQKz7 + 78PNENG7QCaktc3xB5pE8j85qMlvq3bZ3AAAAABJRU5ErkJggg== + - - DocumentViewer1 + + Info - - 125 % + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAALdEVYdFRpdGxlAEluZm87bRIthgAAAJxJREFUOE+t + k+ENQDAUhDuKafyzlN9MYQkbWEdiAO5rNEEOlZJ8Cb17l77XCk07XqlFLyYx7/DOGtrJf/yoRCcWsd6A + hgfvKYCFQbgiB94YkgJIdcYnqIkB9GW3rSeA0wQ1NSLDcYa3AOgRmbATc5gI4JicmLOD+ZeA2xYyAmIL + xUMsPkYoukhQfJVTCKm2nR00PLEYjgGJD7/zGDZMp1TRLvGgqwAAAABJRU5ErkJggg== + - - PdfZoomOutBarItem2 + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAALdEVYdFRpdGxlAEluZm87bRIthgAAAahJREFUWEfN + lz1SwzAQhcMRSMXkCpyFPkeggg5aJjWTmqNQ5AoU3CC3yFCZ/TzejGQ/WZKNxxRfxuPs232RVj/ZNE2z + Ku3Hw+GzhJ2xN47GyTgblw6eecd3xBCrckSUGrg33oxvoymEWDRoVc6WnIEb49H4MlSREtCSg1yDGmMG + 7ox3QyWdArnIGdVJGSDww1CJ5kDOyIQywFCV/PIf48nYGrfdM+9UbAi5r9OhDDBfStjnGV2IvXvtxaSg + hjRAx5Y23DYs3uVgNFRsH2q0qwNdaIBlowSKOQaAWpEBNo6ada6m4KUXMwa1duhczO6lAlN4E9KANU0Y + sg8NsIWqoCU5hgbYx1XQkpxCAxwmKigJuhAVk+GMzsWcaCooiRd2VEyGC7p/Y2D1KahuQi/sqJgMURNW + L0Mv7KiYDNEyrN2ITDbbQLQR1W7FJptlYLAVQ81hZLJZBgaHEdQcxyabbCB5HEPphcRkkw0kLyRQeiWb + SvZKBqteSh0C/3IkyBUVhzEDwFAxX8WNKUBLjuuwh+QMOHQsy6ZmnyAWTdvtKUoNOMv9OV2PZvMLsfKg + vDjYoZ0AAAAASUVORK5CYII= + - - 0, 28 + + Eigenschaften - - TBPM_CONTROL_TABLETableAdapter + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAACR0RVh0VGl0 + bGUARG9jdW1lbnRQcm9wZXJ0aWVzO1Byb3BlcnRpZXM7NlalgwAAA0ZJREFUOE99k3swlFEYxpdNlExT + f6UyI11UpIyprXamErVUssoyXWwtacvSWrdBtN00iq66mJiRpi1DSozRVkqUxUZiEmLQRsUOacOS3adz + rOqf6pl55n3nzPd7zjnv932M/8iI2JiYOd7/W/HJdxmHk3Jo+wsyDj92gx916jYiT8hwKD59D1mjQb9s + JI5PZ4hi0khrkJE3P9IiKkH2LOL4TZng0Gm70KMZ+XXvOvCmoR0hcWkFPEGMXVD0tVtBMamKleu8plFG + GHXVQBMZhx/PLG5s7YSytgUnL+XqxNIMnVb7A739AxDFXtdJk2SjL5XvxgL3SS6UEsbEX3zRQBMxQ+LS + s5VvWqAZ1EIzoEXHxx78GNVB3atBfeMHaIdHMDA0jAJ5BTjbJXmEMfELSjbQREyeINZBmpyl6/8+CHWf + Bt2938bqp56v6OruI7UP7Z1q7Bae1C1jeawizETiseEy9wYn7QmQXCgURlzWq7rU+Kz+iuLSGggOJiAw + JBGlijq0fVSj8nUTdgSe0nH5cXJ37zCB9TxHMxpgui88BVU1TfimGcTg0Ag6yY4evlFwYvvwWM47ffwO + JqLrSx+Uda0oq2rEg4cKeO46AsJOoQFme0POQvGqEZ2fe9He1YNWVTd8/aVY7eLHX+sewBdGpJAT9KCk + ogHF5fVIk8mx2TeaBljQgAlr3AJFazcfeOwTkKCvICd526xC0dNq+IvPQRh5GfKSWtSTtdyiCqxzDwLL + 2a/UgeUlIawpDaCDMHVie67YH3p+tI3sXl7djDJyovomFZrbP6G2oQPysjoUPKmGu3eo3srGyZkwk4np + RzcmUzdeWM6deyV4+16FR+Th2/efo6jkNQqf1iAj+wnuyauQ+7AS0tMZWOzokU+YybZLtxhoIjPOtrDK + PLkCSVeywPEMhitXos97VIXswnKw1gv0HK5IH5uQjsSULNgu2aQkjPlce46BJmLOmG0703mLSGG3nFsw + y3rZBvbGgBepmYU4cyUHS5ZzX1paObgtsN/4YL69W43FVEsbwkyYs8jVQK/fKqaF/iT0XtTmjqt5Yjbn + ANiuQsy1cwkla/SVmY9XE2Ij64XjAX8RHewk4unjpv3vgf0Rg/ETmVy1UwLUO6MAAAAASUVORK5CYII= + - + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO + wgAADsIBFShKgAAAACR0RVh0VGl0bGUARG9jdW1lbnRQcm9wZXJ0aWVzO1Byb3BlcnRpZXM7NlalgwAA + BvdJREFUWEfFVwlQlVUU/jG1xcqWmZpsWqZSc6tsGaeccbIMsXRwIZeyKVHDjfGhQGApiOCugPtOqJip + gErIIhiyC4qKSSwuIILLez6W93grj69z7uP9vPI30GmmM/PNPe/w3vm+e8+991wkAP8r7g60mUsrOhEe + ugc6K4Dj/Lt/NZnPmVwEyNZF56ZH7s4FjYhkROVgXZR9jCDYx2xE7MpG+M5srKVx7c4sgeA1x0IoBQth + 4S4hkWlSSESqtJjgbDKfM7kIkDFpe2Y2W6E3mFHfYMAtTSMqq7UoLL6O9JwKBCyLX0JpuhCEiJLym3Ju + h/FnEXM4coAsIjqHXMBqa4HVaqPRBou1RcBMnxkGoxW6JjO0DUbcUOtwqeoOVm0/iZYW4GhaCVTBB0Mp + VVeCEOHI7TD+LGIORw6Q8dKyWYiI4SA1W0iAxQZTKwxGMxr1ZqjvNOFylRqhG9OEAJ3BivjUPzAjcG8Y + pXuYcNe+kPkcjhwgC6dasjGhhYjs5HZSMZptMFIJTK1l0NQbUFGlwcLVx4QAA/2dRRxKPA9Pn11LKeUj + hL+JkPkcjhwgW9MqwJmQfSOPreQMA8NkxR3aBxVX1fANOywEcKn4uzpDM/YfLcLXszbfJULmczhygGw1 + 1ZKNZ8jgZEaLnVQQE6kDepMFdY1GlF/VwHvRQfE7FtFsIyHNLKQZ++ILMH5aJItw7Ik2PocjB8hWbbML + +NtMSYSd1CJGndFCMzQTLGIjXqnR4qeVR/H9DzGY5rcX03z3Yup8xh4qxVkqTxInf4zAq9DG53DkANmK + rRnkkgCnmYpVuAc09XrU3G5AGZWhqOQ6Tp2vRF5RJTILruBEXgUy8y85BDxBaF/Ass2/k0ubiYj1LKB1 + tg1NJkUBjOparYxrtXXiXrh8TYuyK2o6IRosWJHIyZ8k8CXVxudw5ABZ2KZ0UBkFuZ7IlQjvB7c0OgSs + SODk3QlCgGxKAkLXt55nIm+kGislvR9o6ZT4hwkBTxHaFxASeVwIUEr2IGjQGeG75DAnf5rQOTHMTTq5 + cqjgUhQQHJ7y3wrQmzB/SRwnf4bQ2XXsIulYyDDBpSggaG0SCbBfJg8Cg6kZTdQr9FQ+9rln+ATHcvJn + CV2GjQmSRo4PElyKAvjI3K8ABykj93Q5/Jfug9+SGGQVlNIe0MN74a+c/HkCX0Yubh7ctcmUBATSkbF1 + UAAT8ybbtPs4dh/KpCN3C1v2Hkfxn1U4X1KJTdHJuFhWidmBO+Hlv+F0v4FDniOKTm4eiwWXooCA5b/B + Rq1YifCf4Blv/DkZpZdrUHjuEkLXxUIVFAUTHWFtQxPmLNiG4NUxyCn8UwiaqgrPIoquHhMDBZeiAP+l + RzosgOu8PSYNhecv0WVlonqbUHVdDSs1A41Whwul16ifWEioGQkp+XAdO/coUXQ95P2+4FIU4Bcaf18C + ymj2Qav30243QFOnw21toxhvqOtRe7uORroZazSY7BVq6/+u6xCi4DeCvTUrCZi3OI66WfsCmPxEdjHW + bImHl+8GuoY1uKmpR3pmEabMDMN07+XIzCvG1esanDpbhknTl9rcJy847jZO5fnqGwO5PSsLUAXFdkhA + faMB0+avR0FRGRp1BtEzamjGoyb4IzElB8dSc/HNzOWovVVH78XL4kQcSc6D+9eLmOhxQaYgwGXuwkMd + ElBHm+w77zXIO12KmptaVNZS46m+jQmeQTiSmImE5GxamfW0Ampk5JcgPfcC7ZcUfDEhgIm4MyoLmPPT + AbGJlEidwRfMr3HpUAWGY/zUMOTTSlwsr0bSiTPwnLsWXn4bkJJxDhcoFpuUj49HzMKgod9kvjVojA/x + 8D5QFjArsGMC+A7gMpw5VwovnwhcpdnnnilHFq3IhbJqlFfewLmSKqRkFSMh7QxGeKhaXnrtPW4C/DAR + LyMlAdKMgF/oOWV/ATWJlmwHvwkaadZ11Fzu1DdBTTu9+gY9RpftwC9xGbhYUY1UItsXfxJJGWeReKII + UQfSEJdSgNjkUwhaEYW+A0fxMWQBbC6KArz89yV97x+D6X4EX3piEab67hFPLE96YnnO202v3WhMIUye + sw0jJ/6Iwyl5WLVxP4a7z8Gw0T44nFqAA4m5GPTJFAwfPRsLwnZg+fr96D3g80Ki6CaI7iXAyfistofO + z/fo+eLQkbPz+n0wOqHHK2+7fvSZZ86W6ESs3HgQAz4YnfPiywNG9OrveqRnf7eiJ7q/8Br/Rv79PwXc + C86266u+0s5JfaUdE/pIHw3+lkP8zuNlZXR750MP1eDhMzB4mBde7/epimJ85HjWPPK/bG0TUCJTgrNt + H99H2vblm9LWcb2lrWN7SZvHENx7SZvce/KfOfGjBG693P/Z76SQi74nSX8BeVG3UOpFZ3YAAAAASUVO + RK5CYII= + + + + Neu laden + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAA1dEVYdFRpdGxlAEFycm93O1JlY3VycmVuY2U7UmVm + cmVzaDtVcGRhdGU7UmVsb2FkO0V4Y2hhbmdlhrRdSAAAALlJREFUOE+lksENgzAMRVkEdQhOSJmnZyZg + pt56ZIwee2cJ93/LRiQ4kIpID4y//RXidCJyizD5D1uQUnJ6MIE3WA3GzFHzujkyGMELSAVqrJn5XRrQ + 3ZsX8AQPgzFz1D72Phhwi948eN40MoAv0GZCTQtqqzDQbe/ZDK6Imgk1LziIQE/5Cn1EzSAvDFbNgAfF + A8sMLOeTmDxfGviIzsbIUfeRAbfdepG0b2+g/2w0XeXM4A5hsh3pfngbEtI9NQFmAAAAAElFTkSuQmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAA1dEVYdFRpdGxlAEFycm93O1JlY3VycmVuY2U7UmVm + cmVzaDtVcGRhdGU7UmVsb2FkO0V4Y2hhbmdlhrRdSAAAAbFJREFUWEfFljFOw0AQRXMAJK6TwtwkJ6Ak + TWhyDk5BlQJuQscRqJDozH/W2poZj2MLm03xJO/4//mOd7PeXdu2NyUt1iQt1iQt1mRUaJrmGntxEq/i + Q3wXuKbGPTSZtyPmjQqZSTyIF/El2hnQoMWT9TrbPBcOieFR8AuzsGvgwWt7nYVilj/As/gRWcAS8NJj + CAeb58KhiIGnz8LfxZNgru8LXFPjXtTT42JrNs+FgwTA/MXX/imO4i56erhXNGit12E9rgFIACwia6Lh + IWoj0vQcisf2GLAe1wAk4HXG1X6MugzpLG/C9hiwHtcAJOC/bA3M6+Rrt0jXMyy4DOtxDdai5rPhYD2u + wVrUfDYcrMc1uAVpsSZukL2uBLeXr8UNkrAIc+w8a3GDEBbpwsF6ppCOXTFuzaeoc4MgtrCpdOFgPVNI + x5Zse7C57aPODYLB0m3FYtEDFG3citneR1o3CIYIDf/6MeLD1h1QoscNjAH4hG71OR4OJjYP3KAYoF9w + Wx5IFj/AsNoLWx7JXB64gQQxvGezQ6nNg1EhMxmY6/89ltcmLdYkLdYkLdaj3f0Cj5M+ApfcyL4AAAAA + SUVORK5CYII= + + + + Suchen aktualisieren + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAndEVYdFRpdGxlAFJlZnJlc2g7UmVwZWF0O0JhcnM7 + UmliYm9uO1JlbG9hZM1N9ukAAADSSURBVDhPpZKxDcJAEASNRAE0YNGBc4qwyEjIHSJHkNMEJZCSmYx+ + aOLZff2eTugegQlGOu3e7b9936SU/iIUf8GK/nwXLRjBBJ4F1tTo5b5awAIcQKpwAxsQBqxADxhyAgNY + F1g/gELaKGBfGhhiuvM7oJBRukwO6Zo5RA0e6LwJ/UlaNCwsJPCMjyaHj9fLEnX1EH89roriIM3D5uLb + MHXfwD3T4I/qpDvfh9jn+QY+Eq5IIe9r3AGF2JwPIHwkConYgtxbCyDznvJcQvF7UvMC/+yHWnrFMzsA + AAAASUVORK5CYII= + + + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAndEVYdFRpdGxlAFJlZnJlc2g7UmVwZWF0O0JhcnM7 + UmliYm9uO1JlbG9hZM1N9ukAAAHOSURBVFhHxZY9TsNQEIRTBJp0SBQoFBQg5QTQJSfwVVLSJkJCHAFu + 4APQcIB01KkoKLgCvZlB3mjfZl7sEPFSfEo8b3Z35L/nQdM0R0WKJZFiSaRYEimWRIo5qoe3CZiDGqzB + dwv/U+PaRNXmkGIETcdgCT5A0wE99I5Vr4gUPWh0C15BHNQFa6aqp0eKBhqQC/AJ1JAuVmBnCCkSFJKq + /b0CFuIdLMAMnLXwPzWuxRA8E9nLIUWCIg5nAx/iEdwoP+EaeAExxFL5yZZwXz8PUWDDDQtxEv0ReEYg + huCNKZ+O5ADDz2GMw43Ke3cBL89EvBxz5U0OYMoNN/YJwXvC19bKt/kDQ9dwo1cI+Hhj+rq18pm573Aj + CcHjsN6X6qDiA0P81m8aeLDId7s3z5QvAt/el3GrCYGBG4svWCifAt6uEMmZS4oNmLir+SI+UtkXUATe + XIiKj7r3JoUGjNx2487Hl8tI+T3wnAIVgsOH0Z8ceFDALdU3IAzR9Sp+AtfAh0hOu0eKBEX8BlDbcJ/N + 6Av4EHIGkaKBwinglhpD9IEhLoHsbUjRgwYM8dcPkjvV0yPFCBod75PMg6bH+Sj9T6RYEimWRIolkWI5 + msEP/+Ty+jngCqIAAAAASUVORK5CYII= + + + + Datei überspringen + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAASdEVYdFRpdGxlAEZvcndhcmQ7TmV4dOtv9uEAAAEC + SURBVDhPpZMhDsJAEEXrQVUgICEYBDcgmKLquAIG7kGCBo9HcgEsqkFxAxwkGFIJqvxHts10KSQN4iXT + /X9+d2fbYLLc+8RiLRKROqhZQyv57UNPrMRBLEQkQgc1a2h48JYCWNiKjehnWRZUgeY8eN8heQCpCI2q + Rgse56XnHcC52FrxZtUz8RCZOIqWF8JO6Il5YDgLa3CmobgIQs5i4OnMZE3BhCMrGlPb6YTcxdhoDDah + 4JpCI2D+xlNMnY/bSesGMJePgF9H6AiGSPNNjIxWHOHbEEfiKmg+ia6nF0Osusa5yK9xJ5pec+ka4a8P + Cf7+lPMQUtla7Z/JUuN33gcvikpCVBUd29sAAAAASUVORK5CYII= + + + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAASdEVYdFRpdGxlAEZvcndhcmQ7TmV4dOtv9uEAAAJm + SURBVFhHxZe/Sh1BFMa1EkvRoAjp7OxSpksZ0CZIkKSwSSApLHwCg7VY+wq+gaBvIOYfhJAiYGdhkSIQ + SdBsvt8yX5i7OXvvZC/eLX6Xu+d858zszpkzu1NVVfVK/bO+d1zCstgUB+JUXIjrBP+x4UODNsoxQOkE + VsUb8UFUhaAlhtgoZ82oCUyLV+JckPS3OBG7Yk2siNkE/7HhQ4OWGGLJQa5/xhg2gSWxL3xHR+IJ2hLQ + phjHk4ucA+OgdUAOwkNB4FexI2byAUogJsWSg1zkHJgEOosNj8p3/k5s5Em7QI6Uy0/i73Lgt8iwXr7z + sQc35Eo5yc0Y4QSoWBfcTp4gR7774kvSmZ9iPdIb+VkOtIxR7w7sdgLbBgHFM3TN5Weff076fBKthSof + NeHCZKzabicJ2btsn6Jql25RfBL5JH6Jp5Ee5GN3MAZjLWOzg+5FgpM8YBTS3xPvU6y5Ec8iPchHn0C3 + ybWNtFCMu7m4BMXMi7cpPp/EVoueZoXmgGsb6eMY13JxKYqbE2cph7kVLwItHRP/Kdc2cphgXGmI84Rd + YL1fN3LStvFdcG0jJxrG2YY4T9YVJrGd5eTswH7N9SQmQD28zHKGE7irJWDw542c4RKMW4TRTggbk2xh + EY67DX3YmB/icYs+3IZdG9GCaA7+XTyK9CBf2Ii6tOKoC34TDyM9yNfaiuF/DqNo8CvxINKDfEMPIyg9 + jhn8Y9KZS7Ea6Y38I49j6PWFBHp/JYNeX0oNQj8JoHgm9lpueFSslwuT7TOxD5McKpZtw971HY0CLTF1 + tbdROgFzdx+n/VFN/QGBB9aBYCiYpwAAAABJRU5ErkJggg== + + + + Löschen + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAApdEVYdFRpdGxlAFJlbW92ZTtEZWxldGU7QmFycztS + aWJib247U3RhbmRhcmQ7Y1ZIMAAAAMJJREFUOE+Nk0sKAjEQRHM4YVZ6CS8gfhBGHK/pSRRXbRWkJOlO + q4sHSf0YBlLMrNy3qzWYef4HZC/s8KzyCxi4+rAHmVvNsrOhcKqCSEfgqSz2Ms7OCCPQfPlIvQ2kIzgP + y+QzUIN+ZAFpmXQDBAE/0tKVSXcRCI5GQpkEgSDsP5sso2wQEByVRRjpLgj48gGEH9t2vpYbLx35WRbQ + hiM0+DBaI5QFPD8yU5zAowppWSCjkSeYJHJk58MZyPIBTmZW3tJAnMwmSptiAAAAAElFTkSuQmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAApdEVYdFRpdGxlAFJlbW92ZTtEZWxldGU7QmFycztS + aWJib247U3RhbmRhcmQ7Y1ZIMAAAAW5JREFUWEfFlk1KBDEUhGfmAg56JTcuHEGP4FFFFMVZz1Vcxaom + D57pek1ehLj4FilSP9Dd0LtSyr8ixZlIcSZSvDzf/okm6+DPLVKsQVfgBdzVczcu5x68gqPP90gRBpZ/ + gAK+QWpEzWA5vcz4BHLESsDFA+BqGo3sCF9uMHPf9v06GLj4BNqA3hGqnOcH1bUSCC6Tx2psg7ZGpMqJ + FGEwMiPS5USKMHl6RgyVEynC2LI1YricSBFmRTRiuJxIEQERaoQnVU6kiJAtohFLOZCZEVJkyAbqmduA + 5cVUmRFSZEhAVG4sI1RmhBQRoojedqV1j5AiAnrL+czDT1Rlt0gR5t5yuzM8QoowZsqNoRFShIlE5Sfg + iz3pEVKEYaTcSI1YCbi4B2/V6AN6yg014h10/5Bcg69qzJZbhh9xBjdtD1kJBJcJR3B1qpy4HI5ghiwn + UrQgwP9Df+6iycr/ls9EijOR4kykOBMpzqPsfgDZ5w1jF/MagwAAAABJRU5ErkJggg== + + + + Annotationen + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAASdEVYdFRpdGxlAFN0YXR1cztGbGFnO4MAHmMAAACg + SURBVDhP5c+xCQJBFATQRdNrwMAeBOsQ7MPAzAo29kJLuNwyDosQLMDA0OA7Iztyfw8WdlODxx2fmYEN + ZubEGO00XAJcYZ3+Z5R3ZZoM8PuCIyzTrXpAbrCF5gF6wxk6+OVdmQoDcoed8i0DD9grXzPAJ/TQ9IQR + NsD7l/KuTNnAEw6wSLeqgQFWKuSUd2WaDBQp78rEgfxWMjv83YCFD5Unnnyt/ObUAAAAAElFTkSuQmCC + + + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAASdEVYdFRpdGxlAFN0YXR1cztGbGFnO4MAHmMAAAEL + SURBVFhH7daxTcNAGMVxFyg1BVMwSVrWSItETeEBaKKMkBFQBqFiBAoGoDi+J/nQ093flh0gp0gufkr0 + indPzkVJl1JqCsNLwtD1fZ/k6Xjowmu4H94vQt2CoSsG6PUr7MPdkM1C3YKhgwHZZ3gMm1AdWKJuwdBN + DMjew0OoDnXULRi6GQOyUxi9H9QtGLoFA2T0flC3YOgWDsiq+0HdgqE7c0D2cz+oWzB0vxyQPVO3YOiu + 9Qk0uwNNvwWTvxPULRi6GQPewjZUhzrqFgzdxICPsAs3oTqwRN2CoYMB+pxfwu2QzULdgqErBjT/P3A2 + 6hYMXR5Q5n8FQ7cOWAesA9YBzQf8NwwvJ3XffqLn3Fz4CFYAAAAASUVORK5CYII= + + + + BarStaticItem1 + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAALdEVYdFRpdGxlAEluZm87bRIthgAAAJlJREFUOE+t + k9EJgDAQQzuKg/Tb6XQKh3EdwQE0r7SgErVShQe2yQXvWkOM8UovRjGLJcM7e2gn/3HRiUGsYrsBDQ/e + UwAbk3BFDrwppASQ6oxPUJMC6Mt+tp4AThPU9IgMxxneAmBEZMJOrAmYETkmJ9YELL8E3LZQQWqheYjN + xwhNFwmar3IJIdW2k0HDk4rhGFD48DvHsANkuY1Mp0kAqQAAAABJRU5ErkJggg== + + + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAALdEVYdFRpdGxlAEluZm87bRIthgAAAVxJREFUWEfF + l7FxwzAMRT2Bq4yjPp1nyAAZxNu4dZkt0rnLCm4ZPF+gg5LPCLJko3h3Ovn/T5gCSWnXWitF3nwm48Uw + DHPsjYNxNM7Gxbj+wDX3+A0NWpUxsqSAF+Pd+DBaErR48KrMdAGvxslQg2TAS8af7EwBb8anoYKXQAZZ + k/y5AjB8GSrwHsiaFPFfAUzZFv/8N2SOj6NXAE2z5pnPQfatMXsF0LnKuCWMIQtg7aaXmvuCX+oEjLF3 + XwxgA1EGifuCX+o6HNwXA9jFlFjivuCXug5H98UAtlIllrgv+KWuw9l9MYD9XIkl7gt+qetwcV8M4FBR + Yon7gl/qOlzdFwPKCyh/BOVNWL4MF21EK5EbUflWDOnDyH3BL3WC7mEE5ccxlL6QOKWvZA6GLWaCjMng + kCkAmLI1PYF3nPZItgCgaejc9BI10OK5NZxiSQHOYz/NqpA3n0fbfQM/tJcKTygMggAAAABJRU5ErkJg + gg== + + + + Tahoma, 11.25pt + + + BarStaticItem2 + + + + iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAALdEVYdFRpdGxlAEluZm87bRIthgAAAJxJREFUOE+t + k+ENQDAUhDuKafyzlN9MYQkbWEdiAO5rNEEOlZJ8Cb17l77XCk07XqlFLyYx7/DOGtrJf/yoRCcWsd6A + hgfvKYCFQbgiB94YkgJIdcYnqIkB9GW3rSeA0wQ1NSLDcYa3AOgRmbATc5gI4JicmLOD+ZeA2xYyAmIL + xUMsPkYoukhQfJVTCKm2nR00PLEYjgGJD7/zGDZMp1TRLvGgqwAAAABJRU5ErkJggg== + + + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAALdEVYdFRpdGxlAEluZm87bRIthgAAAahJREFUWEfN + lz1SwzAQhcMRSMXkCpyFPkeggg5aJjWTmqNQ5AoU3CC3yFCZ/TzejGQ/WZKNxxRfxuPs232RVj/ZNE2z + Ku3Hw+GzhJ2xN47GyTgblw6eecd3xBCrckSUGrg33oxvoymEWDRoVc6WnIEb49H4MlSREtCSg1yDGmMG + 7ox3QyWdArnIGdVJGSDww1CJ5kDOyIQywFCV/PIf48nYGrfdM+9UbAi5r9OhDDBfStjnGV2IvXvtxaSg + hjRAx5Y23DYs3uVgNFRsH2q0qwNdaIBlowSKOQaAWpEBNo6ada6m4KUXMwa1duhczO6lAlN4E9KANU0Y + sg8NsIWqoCU5hgbYx1XQkpxCAxwmKigJuhAVk+GMzsWcaCooiRd2VEyGC7p/Y2D1KahuQi/sqJgMURNW + L0Mv7KiYDNEyrN2ITDbbQLQR1W7FJptlYLAVQ81hZLJZBgaHEdQcxyabbCB5HEPphcRkkw0kLyRQeiWb + SvZKBqteSh0C/3IkyBUVhzEDwFAxX8WNKUBLjuuwh+QMOHQsy6ZmnyAWTdvtKUoNOMv9OV2PZvMLsfKg + vDjYoZ0AAAAASUVORK5CYII= + + + + Tahoma, 9.75pt + + + 0, 0 + + + Datei + + + Aktionen + + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAALdEVYdFRpdGxlAEluZm87bRIthgAAAVxJREFUWEfF + l7FxwzAMRT2Bq4yjPp1nyAAZxNu4dZkt0rnLCm4ZPF+gg5LPCLJko3h3Ovn/T5gCSWnXWitF3nwm48Uw + DHPsjYNxNM7Gxbj+wDX3+A0NWpUxsqSAF+Pd+DBaErR48KrMdAGvxslQg2TAS8af7EwBb8anoYKXQAZZ + k/y5AjB8GSrwHsiaFPFfAUzZFv/8N2SOj6NXAE2z5pnPQfatMXsF0LnKuCWMIQtg7aaXmvuCX+oEjLF3 + XwxgA1EGifuCX+o6HNwXA9jFlFjivuCXug5H98UAtlIllrgv+KWuw9l9MYD9XIkl7gt+qetwcV8M4FBR + Yon7gl/qOlzdFwPKCyh/BOVNWL4MF21EK5EbUflWDOnDyH3BL3WC7mEE5ccxlL6QOKWvZA6GLWaCjMng + kCkAmLI1PYF3nPZItgCgaejc9BI10OK5NZxiSQHOYz/NqpA3n0fbfQM/tJcKTygMggAAAABJRU5ErkJg + gg== + + + + Information + + + Menü + + + 962, 158 + + + 0, 619 + + + 962, 24 + + + RibbonStatusBar1 + + + DevExpress.XtraBars.Ribbon.RibbonStatusBar, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + $this + + + 2 + + + RibbonControl1 + + + DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + $this + + + 1 + + + Segoe UI, 9.75pt + + AAABAAEAMDAAAAEAIACoJQAAFgAAACgAAAAwAAAAYAAAAAEAIAAAAAAAgCUAABMLAAATCwAAAAAAAAAA AAAxJKXfMSSl8jEkpe4uIqHuMCSk7lhC3e5eSOfuWELe7llD3+5ZQ9/uWUPf7llD3+5ZQ9/uWUPf7llD @@ -779,54 +1073,561 @@ AAA= - - 106, 22 - - - PdfBarController2 - - - DevExpress.XtraPdfViewer.Bars.PdfZoom75CheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - - - - -1 - - - 105, 22 - - - -1 - - - 2 - - - -1 - - - Panel1 - - - System.Windows.Forms.Form, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - - - - DevExpress.XtraPdfViewer.Bars.PdfZoom100CheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAALdEVYdFRpdGxlAFVzZXI7l1sKAgAACYlJREFUWEeV + lws4lPkex4fCmWEMI3etyyRyiaYwIrq4VC65RDW5hEIqSkgXIYq2k00qGykpkVS7hlLKNas2RaStPau1 + zhabki3ptJ2e7/7fKe1k37PnnN/zfJ5n5ve8v9/3+/u/7/uf/zAA/CWps9iMFHs2Y/tMNmPrTLb+FgE7 + NtFGoTjeWqGVIs5a4RhhLoFBQdfjr6BNSkKJ99wsZWyxZa/OdNNH2TZv1OVGo/1sGtrKU3F5fyT2LLFA + zHSFnJgZCgwq6Pr8J2iTo1AhntyW7XkkYta7vhsF+Kl+H+6f24SOk+G4lb8MbflC3CoMx95Aa0RZykeQ + EmmCFFVL13MstMlRqCDiqmlOmsM9dYfwfWUyru12Rl2aPa4kCXB5izUqEvgojDDBgaDJWD1V/m24Gasz + 2JgZTkrHU/V0fSWhTY5CxWaBQnzp5kV4WPN31GfMRRURPL/WFGXhhigM0sP+xVrI8NBEghMPqS4aOOg/ + EWv5bCzmMf1J+Ti6vpLQJkehgjxwHbdKtuL2sQicXWeKo0Jd5HhpIHO+CtKdlBBvy8GOxXy0lm5HrI0S + cjxUsc5SHn68v1WSciZdX0lok6OQkIq3YY98V5mJis12yPbWQtJsJay3YiNyKguBU1jYH+mEX67n4unN + L1EY547oaQqImCJHDDCfkHolur6S0CZHISEdZ6Pw6PrxRBwS6iNpDheZAY44nugP0d5VuFeVgcHbR4h4 + Lp5cz8bPtZlIXzIDAZPk4MtjviX1anR9JaFNjkIZ2Gil0FiRGYJMD23si3DHyM8tGLpbgud3CsXiz8jk + T1qy0d+0B4+upqEmJxRCU6XfvPSZb0i9Jl1fSWiTo1AGYqbLbz200gHxdhPwXfMFDP94BUMdJzDY9qn4 + 49p0/FiViIaDAVhprfHO/TPmI1KvQddXEtrkKCSk5urKqcYKuI9iZnDQ29WCl93VGGw/9nHZxZPXpuGf + l7ah6/QaiHYuQhBffWi2ltxRUs+h6ysJbXKUDzFeOIUVuMFaGd9WncCL7st4div//eSNn38U76mMR2tB + EArXz4afifIdUmdA1dL1lYQ2KQkJalfjRE3n9BQmr8ZwTwOZ/jCZnBJPF4v/VBmHeyURqP/CB7uWmMPZ + QOEkqeHS9RsLbVISsg9QJuS8zVRDkvztn7RXF+JpawEe1+38IB6PB6cj8c0hP5zYYI9QK/UhS3W5IFLz + X/cACtrkWEhQq6DkY6H+5f6YJWir+AK9NTvxw9exuFMUhuYcP5QlOiLBWR92mrIl5FoNgjRdr7HQJscS + FBTEMDQ0lJslsI5JXDAZ6YFzUZy8HNVZyyFK88CBlTMQ46iDQPMJ0NFQS2SxWMy1c3WlVs+ZGBDhoHNm + 5Uytx6ECjcdBVqpnlvFVAk01mNK+Zhxx7z+JSUJNQZBjKyqqeHp6nlvst3h4b5AVzu0SImmRGVZMU0GA + GQeRAnXEO+sh0s4AFhYWr3R0dCpW2E/cm58SieuV+ejvPI2eht24mBOCXaEO8DFTStNijx9HCXwiWF5e + zkhQ54ohIUNQm8dmBfvaCr4/e/YsiouLkR5kj97a3egsT0Dt/mCUblmI/LWzkL1iBkLsjLBr1y4krg7A + 0fR1+PfLbrz+Rx5e3cvG8J3deNGagp6qNUjxN8F8nnwo6S/9iYGysjLGmdw8SlxWU2a8aYgKp2H3ZANs + nO0oFn/37h1io0JQticCTflr8C35gbqStRSFG12QvNwOy7zc0NHRgShPG7TWifDmcQ0Grmfg3I5FSPG2 + RH1JDp6RTax0sz1c9Fki8ZCSBkpLSylxamn0wicodV4MC0F7aAjOuy1EYGAguQQYGhqCr48vIgIDsD46 + GrErVyLS3R0LXZzR3NyMpqYmBNtp4/lAP0Ye5KP7Qjy2uxtjuo5i3N6QufjtZT+as13grMscIDqKnxgg + QT3t3Ojo6KNZfr7o2LcPbcRAk8MsuPP56OrqwsjICLq7uzFv3jyk7kjFzp074eriimvXronFc3NzIbRS + FxsYvpuNvqsbUZ7kjN3LrdFacQS/dhbg2l5HzJkoN0i0VMcakDEwMBCQJq++StmOvGX+aF8VhkZ7O+ww + N0NCQgL6+/vR2toqNnD37l2cOnUKrvNdUVlZierqari5uWE5eRvut7XgVVcehprW4/nVCDy7FIQBkR96 + SxeiiJwrrNRlbhI9tbEGuOHh4Ufr6+tx83QJtk+3wO2wUDTYzcQFc3PwJ01CQ0MDbG1txeJUZGVlkZW5 + ByurGcjLz4e5phIy1/jh9cBdIh6Lwaur8LQ6EAMVvnhyzg0PjjgijpycjJTHZRG9P24BCWr5DVNTUx/1 + 9vbih5s3sFlPBzcDhKglghfNTJE2iYepxMQCLhfkuo8GqM+zFRXB11UTi7/q78Cv1zZi8MoqDFQJcb9o + IbqOeaF0kw0SPE1gxh1/UVqKwSN64yQNyPH5fJ+CggLxfe7r6cFmbTW0+HjjipUVqkxNIJpijMJJhjhD + TPgqK4uFw8LC4KbIwVY9zQ/id8jkG/CwnOwV3sQsj4X5k5XhxOPAnqeKSVzmFSkphjnRkxXrShhQWrp0 + 6SGRSIQXL17gF3KvN2mooNHVFdX8aaicYoKvjIxwxtAQJTwDFOnpwZPDwQIyeZKuOj4fFW9cj4dnliLJ + iwcPLhMm5E2vqanB1xUVWBcdA0tLy1NES916wvj3uhIGdKKiom60tLTg6dOneHj/Pjapc1HrOBsXLKai + wtgI54h4mYEBThHxY3r6yJs4Edv1/hB/3hiDZ5dD0FngIZ48RJ4Ne1lpdJG9gXqDcg4chJOTUxvR0rVS + eb/6kgYMMzIy3g4MDKCvrw/tDXWIU5+AGoENRGYmOG9Elp7Hwyl9fRTp6qKAiO8w0Hov3teO5/Xr0H16 + CbaRySlxDy4LkSwWXORk0EhWoKn5G4iqqhEQEECdFY3pDKj6+voWHc47AtHFGlTk7EekmgpOmhjjKFny + w7qf4RARzdHWRpamJjI0tbCcr4I3/3pNxNcScX8ibkAeUCaWMVkIZjIRSgy4ysmi+OABXLxUg+TkFAgE + AuoWqNEZoPb+yf7+/jWJiYkIs5yKMC4boRTKbKwgBH8gQIkNIcHfQpmUAs/Ia9aZv0A8uSubCV8OCz6K + 8vDmEBRZ8ORbQigUwsHB4SrRMKa0/mRA/IU8mQRtgiXBmgYbCWY6G7KrvIzZ8DBUEIubqMgcJ3mnMdeN + Mo2gQ5ClxGkN/D+QoPYNyjCHoEagDiHUZ/F/wv8lADB+B3eE88Zb5X+IAAAAAElFTkSuQmCC + 3, 4, 3, 4 - - MiddleLeft + + frmValidator + + + BarAndDockingController3 + + + DevExpress.XtraBars.BarAndDockingController, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + BarAndDockingController2 + + + DevExpress.XtraBars.BarAndDockingController, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + BarAndDockingController1 + + + DevExpress.XtraBars.BarAndDockingController, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + DD_DMSLiteDataSet + + + DD_PM_WINDREAM.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null + + + TableAdapterManager + + + DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null + + + TBDD_CONNECTIONTableAdapter + + + DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null + + + TBPM_CONTROL_TABLETableAdapter + + + DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null TBPM_KONFIGURATIONTableAdapter + + DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null + + + TBPM_PROFILE_FILESTableAdapter + + + DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_FILESTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null + + + TBPM_PROFILETableAdapter + + + DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILETableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null + + + TBDD_CONNECTIONBindingSource + + + System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TBPM_PROFILE_FILESBindingSource + + + System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TBPM_PROFILEBindingSource + + + System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TBPM_KONFIGURATIONBindingSource + + + System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TBPM_CONTROL_TABLEBindingSource + + + System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + BarManager1 + + + DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfFileOpenBarItem1 + + + DevExpress.XtraPdfViewer.Bars.PdfFileOpenBarItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfFileSaveAsBarItem1 + + + DevExpress.XtraPdfViewer.Bars.PdfFileSaveAsBarItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfFilePrintBarItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfFilePrintBarItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfPreviousPageBarItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfPreviousPageBarItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfNextPageBarItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfNextPageBarItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfFindTextBarItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfFindTextBarItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfZoomOutBarItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfZoomOutBarItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfZoomInBarItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfZoomInBarItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfExactZoomListBarSubItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfExactZoomListBarSubItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfZoom10CheckItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfZoom10CheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfZoom25CheckItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfZoom25CheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfZoom50CheckItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfZoom50CheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfZoom75CheckItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfZoom75CheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfZoom100CheckItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfZoom100CheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfZoom125CheckItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfZoom125CheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfZoom150CheckItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfZoom150CheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfZoom200CheckItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfZoom200CheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfZoom400CheckItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfZoom400CheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfZoom500CheckItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfZoom500CheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfSetActualSizeZoomModeCheckItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfSetActualSizeZoomModeCheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfSetPageLevelZoomModeCheckItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfSetPageLevelZoomModeCheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfSetFitWidthZoomModeCheckItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfSetFitWidthZoomModeCheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfSetFitVisibleZoomModeCheckItem2 + + + DevExpress.XtraPdfViewer.Bars.PdfSetFitVisibleZoomModeCheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + BarButtonItem1 + + + DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfBarController1 + + + DevExpress.XtraPdfViewer.Bars.PdfBarController, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + PdfBarController2 + + + DevExpress.XtraPdfViewer.Bars.PdfBarController, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + FinalIndexDataSet + + + DD_PM_WINDREAM.FinalIndexDataSet, FinalIndexDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null + + + TBPM_PROFILE_FINAL_INDEXINGBindingSource + + + System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + TBPM_PROFILE_FINAL_INDEXINGTableAdapter + + + DD_PM_WINDREAM.FinalIndexDataSetTableAdapters.TBPM_PROFILE_FINAL_INDEXINGTableAdapter, FinalIndexDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null + + + ToolTip1 + + + System.Windows.Forms.ToolTip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + bsiError + + + DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bsiInformation + + + DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bsiDocID + + + DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + BarButtonItem2 + + + DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + BarButtonItem3 + + + DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + BarButtonItem4 + + + DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bbtniRefresh + + + DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bbtniRefreshSearches + + + DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bbtniNext + + + DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bbtniDelete + + + DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bbtniAnnotation + + + DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bsiInfo1 + + + DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + bsiInfo2 + + + DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + RibbonPage1 + + + DevExpress.XtraBars.Ribbon.RibbonPage, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + RibbonPageGroup1 + + + DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + RibbonPageGroup3 + + + DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + RibbonPageGroup2 + + + DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + RibbonPage2 + + + DevExpress.XtraBars.Ribbon.RibbonPage, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + frmValidator + + + DevExpress.XtraBars.Ribbon.RibbonForm, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + Öffnen + + + + + AAEAAAD/////AQAAAAAAAAAMAgAAAFpEZXZFeHByZXNzLlV0aWxzLnYxOS4yLCBWZXJzaW9uPTE5LjIu + My4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI4OGQxNzU0ZDcwMGU0OWEMAwAAAFlE + ZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4zLjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVi + bGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29s + VGlwBwAAAA1BbGxvd0h0bWxUZXh0EUZpeGVkVG9vbFRpcFdpZHRoCkl0ZW1zQ291bnQJaXRlbVR5cGUw + BWl0ZW0wCWl0ZW1UeXBlMQVpdGVtMQQAAAQEBAQfRGV2RXhwcmVzcy5VdGlscy5EZWZhdWx0Qm9vbGVh + bgMAAAABCCVEZXZFeHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAgAAACFEZXZFeHByZXNz + LlV0aWxzLlRvb2xUaXBUaXRsZUl0ZW0CAAAAJURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29sVGlwSXRl + bVR5cGUCAAAAHERldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEl0ZW0CAAAAAgAAAAX8////H0RldkV4cHJl + c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4BAAAAB3ZhbHVlX18ACAMAAAACAAAAAAIAAAAF+////yVEZXZF + eHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAQAAAAd2YWx1ZV9fAAgCAAAAAQAAAAkGAAAA + Afn////7////AAAAAAkIAAAADAkAAABRU3lzdGVtLkRyYXdpbmcsIFZlcnNpb249NC4wLjAuMCwgQ3Vs + dHVyZT1uZXV0cmFsLCBQdWJsaWNLZXlUb2tlbj1iMDNmNWY3ZjExZDUwYTNhBQYAAAAhRGV2RXhwcmVz + cy5VdGlscy5Ub29sVGlwVGl0bGVJdGVtBwAAAA1BbGxvd0h0bWxUZXh0BEljb24MSW1hZ2VPcHRpb25z + CkxlZnRJbmRlbnQITWF4V2lkdGgST3duZXJBbGxvd0h0bWxUZXh0BFRleHQEBAQAAAABH0RldkV4cHJl + c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4DAAAAE1N5c3RlbS5EcmF3aW5nLkljb24JAAAAKERldkV4cHJl + c3MuVXRpbHMuVG9vbFRpcEl0ZW1JbWFnZU9wdGlvbnMCAAAACAgBAgAAAAH2/////P///wIAAAAKCQsA + AAAAAAAAPAEAAAAGDAAAABDDlmZmbmVuIChTdHJnK08pBQgAAAAcRGV2RXhwcmVzcy5VdGlscy5Ub29s + VGlwSXRlbQcAAAANQWxsb3dIdG1sVGV4dARJY29uDEltYWdlT3B0aW9ucwpMZWZ0SW5kZW50CE1heFdp + ZHRoEk93bmVyQWxsb3dIdG1sVGV4dARUZXh0BAQEAAAAAR9EZXZFeHByZXNzLlV0aWxzLkRlZmF1bHRC + b29sZWFuAwAAABNTeXN0ZW0uRHJhd2luZy5JY29uCQAAAChEZXZFeHByZXNzLlV0aWxzLlRvb2xUaXBJ + dGVtSW1hZ2VPcHRpb25zAgAAAAgIAQIAAAAB8/////z///8CAAAACgkOAAAAAAAAADwBAAAABg8AAAAb + w5ZmZm5lbiBTaWUgZWluZSBQREYtRGF0ZWkuBQsAAAAoRGV2RXhwcmVzcy5VdGlscy5Ub29sVGlwSXRl + bUltYWdlT3B0aW9ucwUAAAAISW1hZ2VVcmkMU3ZnSW1hZ2VTaXplCUFsaWdubWVudApJbWFnZUluZGV4 + E0ltYWdlVG9UZXh0RGlzdGFuY2UBBAQAABNTeXN0ZW0uRHJhd2luZy5TaXplCQAAACZEZXZFeHByZXNz + LlV0aWxzLlRvb2xUaXBJbWFnZUFsaWdubWVudAIAAAAICAIAAAAGEAAAAAAF7////xNTeXN0ZW0uRHJh + d2luZy5TaXplAgAAAAV3aWR0aAZoZWlnaHQAAAgICQAAAAAAAAAAAAAABe7///8mRGV2RXhwcmVzcy5V + dGlscy5Ub29sVGlwSW1hZ2VBbGlnbm1lbnQBAAAAB3ZhbHVlX18ACAIAAAAAAAAA/////w4AAAABDgAA + AAsAAAAJEAAAAAHt////7////wAAAAAAAAAAAez////u////AAAAAP////8OAAAACw== + + + + Speichern als + + + + AAEAAAD/////AQAAAAAAAAAMAgAAAFpEZXZFeHByZXNzLlV0aWxzLnYxOS4yLCBWZXJzaW9uPTE5LjIu + My4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI4OGQxNzU0ZDcwMGU0OWEMAwAAAFlE + ZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4zLjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVi + bGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29s + VGlwBwAAAA1BbGxvd0h0bWxUZXh0EUZpeGVkVG9vbFRpcFdpZHRoCkl0ZW1zQ291bnQJaXRlbVR5cGUw + BWl0ZW0wCWl0ZW1UeXBlMQVpdGVtMQQAAAQEBAQfRGV2RXhwcmVzcy5VdGlscy5EZWZhdWx0Qm9vbGVh + bgMAAAABCCVEZXZFeHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAgAAACFEZXZFeHByZXNz + LlV0aWxzLlRvb2xUaXBUaXRsZUl0ZW0CAAAAJURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29sVGlwSXRl + bVR5cGUCAAAAHERldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEl0ZW0CAAAAAgAAAAX8////H0RldkV4cHJl + c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4BAAAAB3ZhbHVlX18ACAMAAAACAAAAAAIAAAAF+////yVEZXZF + eHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAQAAAAd2YWx1ZV9fAAgCAAAAAQAAAAkGAAAA + Afn////7////AAAAAAkIAAAADAkAAABRU3lzdGVtLkRyYXdpbmcsIFZlcnNpb249NC4wLjAuMCwgQ3Vs + dHVyZT1uZXV0cmFsLCBQdWJsaWNLZXlUb2tlbj1iMDNmNWY3ZjExZDUwYTNhBQYAAAAhRGV2RXhwcmVz + cy5VdGlscy5Ub29sVGlwVGl0bGVJdGVtBwAAAA1BbGxvd0h0bWxUZXh0BEljb24MSW1hZ2VPcHRpb25z + CkxlZnRJbmRlbnQITWF4V2lkdGgST3duZXJBbGxvd0h0bWxUZXh0BFRleHQEBAQAAAABH0RldkV4cHJl + c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4DAAAAE1N5c3RlbS5EcmF3aW5nLkljb24JAAAAKERldkV4cHJl + c3MuVXRpbHMuVG9vbFRpcEl0ZW1JbWFnZU9wdGlvbnMCAAAACAgBAgAAAAH2/////P///wIAAAAKCQsA + AAAAAAAAPAEAAAAGDAAAABZTcGVpY2hlcm4gYWxzIChTdHJnK1MpBQgAAAAcRGV2RXhwcmVzcy5VdGls + cy5Ub29sVGlwSXRlbQcAAAANQWxsb3dIdG1sVGV4dARJY29uDEltYWdlT3B0aW9ucwpMZWZ0SW5kZW50 + CE1heFdpZHRoEk93bmVyQWxsb3dIdG1sVGV4dARUZXh0BAQEAAAAAR9EZXZFeHByZXNzLlV0aWxzLkRl + ZmF1bHRCb29sZWFuAwAAABNTeXN0ZW0uRHJhd2luZy5JY29uCQAAAChEZXZFeHByZXNzLlV0aWxzLlRv + b2xUaXBJdGVtSW1hZ2VPcHRpb25zAgAAAAgIAQIAAAAB8/////z///8CAAAACgkOAAAAAAAAADwBAAAA + Bg8AAAAYU3BlaWNoZXJuIGRlciBQREYtRGF0ZWkuBQsAAAAoRGV2RXhwcmVzcy5VdGlscy5Ub29sVGlw + SXRlbUltYWdlT3B0aW9ucwUAAAAISW1hZ2VVcmkMU3ZnSW1hZ2VTaXplCUFsaWdubWVudApJbWFnZUlu + ZGV4E0ltYWdlVG9UZXh0RGlzdGFuY2UBBAQAABNTeXN0ZW0uRHJhd2luZy5TaXplCQAAACZEZXZFeHBy + ZXNzLlV0aWxzLlRvb2xUaXBJbWFnZUFsaWdubWVudAIAAAAICAIAAAAGEAAAAAAF7////xNTeXN0ZW0u + RHJhd2luZy5TaXplAgAAAAV3aWR0aAZoZWlnaHQAAAgICQAAAAAAAAAAAAAABe7///8mRGV2RXhwcmVz + cy5VdGlscy5Ub29sVGlwSW1hZ2VBbGlnbm1lbnQBAAAAB3ZhbHVlX18ACAIAAAAAAAAA/////w4AAAAB + DgAAAAsAAAAJEAAAAAHt////7////wAAAAAAAAAAAez////u////AAAAAP////8OAAAACw== + + + + Drucken + + + + AAEAAAD/////AQAAAAAAAAAMAgAAAFpEZXZFeHByZXNzLlV0aWxzLnYxOS4yLCBWZXJzaW9uPTE5LjIu + My4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI4OGQxNzU0ZDcwMGU0OWEMAwAAAFlE + ZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4zLjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVi + bGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29s + VGlwBwAAAA1BbGxvd0h0bWxUZXh0EUZpeGVkVG9vbFRpcFdpZHRoCkl0ZW1zQ291bnQJaXRlbVR5cGUw + BWl0ZW0wCWl0ZW1UeXBlMQVpdGVtMQQAAAQEBAQfRGV2RXhwcmVzcy5VdGlscy5EZWZhdWx0Qm9vbGVh + bgMAAAABCCVEZXZFeHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAgAAACFEZXZFeHByZXNz + LlV0aWxzLlRvb2xUaXBUaXRsZUl0ZW0CAAAAJURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29sVGlwSXRl + bVR5cGUCAAAAHERldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEl0ZW0CAAAAAgAAAAX8////H0RldkV4cHJl + c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4BAAAAB3ZhbHVlX18ACAMAAAACAAAAAAIAAAAF+////yVEZXZF + eHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAQAAAAd2YWx1ZV9fAAgCAAAAAQAAAAkGAAAA + Afn////7////AAAAAAkIAAAADAkAAABRU3lzdGVtLkRyYXdpbmcsIFZlcnNpb249NC4wLjAuMCwgQ3Vs + dHVyZT1uZXV0cmFsLCBQdWJsaWNLZXlUb2tlbj1iMDNmNWY3ZjExZDUwYTNhBQYAAAAhRGV2RXhwcmVz + cy5VdGlscy5Ub29sVGlwVGl0bGVJdGVtBwAAAA1BbGxvd0h0bWxUZXh0BEljb24MSW1hZ2VPcHRpb25z + CkxlZnRJbmRlbnQITWF4V2lkdGgST3duZXJBbGxvd0h0bWxUZXh0BFRleHQEBAQAAAABH0RldkV4cHJl + c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4DAAAAE1N5c3RlbS5EcmF3aW5nLkljb24JAAAAKERldkV4cHJl + c3MuVXRpbHMuVG9vbFRpcEl0ZW1JbWFnZU9wdGlvbnMCAAAACAgBAgAAAAH2/////P///wIAAAAKCQsA + AAAAAAAAPAEAAAAGDAAAABBEcnVja2VuIChTdHJnK1ApBQgAAAAcRGV2RXhwcmVzcy5VdGlscy5Ub29s + VGlwSXRlbQcAAAANQWxsb3dIdG1sVGV4dARJY29uDEltYWdlT3B0aW9ucwpMZWZ0SW5kZW50CE1heFdp + ZHRoEk93bmVyQWxsb3dIdG1sVGV4dARUZXh0BAQEAAAAAR9EZXZFeHByZXNzLlV0aWxzLkRlZmF1bHRC + b29sZWFuAwAAABNTeXN0ZW0uRHJhd2luZy5JY29uCQAAAChEZXZFeHByZXNzLlV0aWxzLlRvb2xUaXBJ + dGVtSW1hZ2VPcHRpb25zAgAAAAgIAQIAAAAB8/////z///8CAAAACgkOAAAAAAAAADwBAAAABg8AAAAN + RGF0ZWkgZHJ1Y2tlbgULAAAAKERldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEl0ZW1JbWFnZU9wdGlvbnMF + AAAACEltYWdlVXJpDFN2Z0ltYWdlU2l6ZQlBbGlnbm1lbnQKSW1hZ2VJbmRleBNJbWFnZVRvVGV4dERp + c3RhbmNlAQQEAAATU3lzdGVtLkRyYXdpbmcuU2l6ZQkAAAAmRGV2RXhwcmVzcy5VdGlscy5Ub29sVGlw + SW1hZ2VBbGlnbm1lbnQCAAAACAgCAAAABhAAAAAABe////8TU3lzdGVtLkRyYXdpbmcuU2l6ZQIAAAAF + d2lkdGgGaGVpZ2h0AAAICAkAAAAAAAAAAAAAAAXu////JkRldkV4cHJlc3MuVXRpbHMuVG9vbFRpcElt + YWdlQWxpZ25tZW50AQAAAAd2YWx1ZV9fAAgCAAAAAAAAAP////8OAAAAAQ4AAAALAAAACRAAAAAB7f// + /+////8AAAAAAAAAAAHs////7v///wAAAAD/////DgAAAAs= + + + + Vorherige + AAEAAAD/////AQAAAAAAAAAMAgAAAFpEZXZFeHByZXNzLlV0aWxzLnYxOS4yLCBWZXJzaW9uPTE5LjIu @@ -860,805 +1661,10 @@ AAHt////7////wAAAAAAAAAAAez////u////AAAAAP////8OAAAACw== - - -1 - - - System.Windows.Forms.ToolStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - No - - - Bottom - - - System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - DevExpress.XtraPdfViewer.Bars.PdfZoom500CheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - DevExpress.XtraPdfViewer.Bars.PdfNextPageBarItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - - - - -1 - - - 1 - - - DevExpress.XtraBars.BarDockControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - - - - PdfZoom200CheckItem2 - - - btnSave - - - pnldesigner - - - PdfFileOpenBarItem1 - - - DESCRIPTIONLabel - - - -1 - - - - - - 0, 0 - - - TBDD_CONNECTIONBindingSource - - - TITLELabel1 - - - Validierung speichern - Nächstes Dokument - - - -1 - - - -1 - - - - - - -1 - - - Magenta - - - 67, 22 - - - - - - DevExpress.XtraPdfViewer.Bars.PdfPreviousPageBarItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - sichtbare einpassen - - - System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - 0 - - - PdfZoom50CheckItem2 - - - 4 - - - 3, 4 - - - DevExpress.XtraPdfViewer.Bars.PdfBarController, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - ToolStripButtonDeleteFile - - - - - - - - - $this - - - -1 - - - 0, 0 - - - 1 - - - DD_PM_WINDREAM.FinalIndexDataSetTableAdapters.TBPM_PROFILE_FINAL_INDEXINGTableAdapter, FinalIndexDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null - - - System.Windows.Forms.ToolStripDropDownButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - 10% - - - -1 - - - - - - System.Windows.Forms.ToolTip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - DevExpress.XtraPdfViewer.Bars.PdfZoom10CheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - DevExpress.XtraPdfViewer.Bars.PdfZoomInBarItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - 200 % - - - 50% - - - DevExpress.XtraPdfViewer.Bars.PdfExactZoomListBarSubItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - DevExpress.XtraPdfViewer.Bars.PdfZoom25CheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - 0, 0 - - - -1 - - - System.Windows.Forms.ToolStripStatusLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - - - - DevExpress.XtraPdfViewer.Bars.PdfSetFitWidthZoomModeCheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - Datei öffnen - - - -1 - - - System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - 0, 643 - - - BarAndDockingController2 - - - DateiÖffnenToolStripMenuItem1 - - - ToolStripButton1 - - - System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TBPM_PROFILETableAdapter - - - Datei - - - System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - - - - DevExpress.XtraPdfViewer.Bars.PdfFileOpenBarItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - 3, 4, 3, 4 - - - DD_DMSLiteDataSet - - - Annotationen - - - BarAndDockingController1 - - - -1 - - - -1 - - - 11 - Nächste - - DD_PM_WINDREAM.FinalIndexDataSet, FinalIndexDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null - - - 18 - - - PdfZoom125CheckItem2 - - - DevExpress.XtraBars.BarDockControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - - - - 962, 25 - - - -1 - - - Magenta - - - 0 - - - 469, 57 - - - ToolStripButtonJumpFile - - - System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - PdfSetFitWidthZoomModeCheckItem2 - - - DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null - - - 2 - - - PdfZoom150CheckItem2 - - - -1 - - - - - - PdfZoom75CheckItem2 - - - barDockControlLeft - - - 477, 593 - - - Panel1 - - - 1 - - - ToolTip1 - - - - - - tstrlbl_Info - - - Label3 - - - PdfZoom100CheckItem2 - - - TBPM_CONTROL_TABLEBindingSource - - - 25% - - - -1 - - - Zoom auf Seitenebene - - - -1 - - - $this - - - Breite anpassen - - - - - - Öffnen - - - 156, 22 - - - DevExpress.XtraPdfViewer.Bars.PdfFilePrintBarItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - System.Windows.Forms.SplitterPanel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null - - - 0 - - - 962, 0 - - - DevExpress.XtraBars.BarDockControl, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - 451, 50 - - - Fill - - - True - - - Label1 - - - 4 - - - Panel1 - - - System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - -1 - - - System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - BarButtonItem1 - - - frmValidator - - - Drucken - - - System.Windows.Forms.ToolStripStatusLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TableAdapterManager - - - Segoe UI, 9.75pt - - - -1 - - - - - - StatusStrip1 - - - 6 - - - -1 - - - TBPM_PROFILEBindingSource - - - System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - 3, 5, 3, 5 - - - PdfExactZoomListBarSubItem2 - - - -1 - - - Speichern als - - - PdfSetPageLevelZoomModeCheckItem2 - - - -1 - - - System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - TBDD_CONNECTIONTableAdapter - - - 0 - - - System.Windows.Forms.Panel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - PdfZoomInBarItem2 - - - DevExpress.XtraPdfViewer.Bars.PdfFileSaveAsBarItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - StatusStrip1 - - - System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - barDockControlRight - - - 34 - - - DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILETableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null - - - Vorherige - - - System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - -1 - - - - - - - - - DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - -1 - - - Magenta - - - -1 - - - 165, 22 - - - Tahoma, 9.75pt - - - DevExpress.XtraPdfViewer.Bars.PdfFindTextBarItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - -1 - - - DD_PM_WINDREAM.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null - - - PdfBarController1 - - - $this - - - Datei löschen - - - $this - - - Bottom, Left, Right - - - - - - -1 - - - DevExpress.XtraPdfViewer.Bars.PdfZoom50CheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - Neu Laden - - - System.Windows.Forms.ToolStripStatusLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null - - - 75% - - - 500 % - - - DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null - - - Tatsächliche Größe - - - System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - 7, 17 - - - DevExpress.XtraBars.BarAndDockingController, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - 450, 426 - - - - - - - - - DevExpress.XtraPdfViewer.Bars.PdfSetFitVisibleZoomModeCheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - -1 - - - SplitContainer1.Panel1 - - - - - - PdfSetFitVisibleZoomModeCheckItem2 - - - 455, 29 - - - TBPM_PROFILE_FINAL_INDEXINGBindingSource - - - SplitContainer1.Panel1 - - - 5 - - - DevExpress.XtraPdfViewer.Bars.PdfZoom400CheckItem, DevExpress.XtraPdfViewer.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - 1 - - - System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - - - - -1 - - - PdfNextPageBarItem2 - - - -1 - - - -1 - - - 8, 102 - - - EigenschaftenToolStripMenuItem - - - 962, 0 - - - tsslblDocID - - - 42 - - - 37 - - - 3, 4, 3, 4 - - - 0, 643 - - - PdfZoom400CheckItem2 - - - $this - - - 89, 17 - - - 91, 22 - - - Vergrößern - - - 3, 4, 3, 4 - - - Panel1 - - - - - - BarButtonItem1 - - - Zoom - - - - - - BarAndDockingController3 - - - -1 - - - 0, 0 - - - Datei überspringen (F4) - - - Document-ID: - - - - - - 5, 33 - - - 0, 621 - - - 82, 17 - - - 7, 536 - - - 150 % - - - - - - Top, Bottom, Left, Right - - - SplitContainer1 - - - sss - - - 0 - - - Segoe UI, 9pt, style=Bold - - - 962, 593 - - - 156, 22 - - - -1 - - - Top, Bottom, Left, Right - - - - - - - - - System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - -1 - - - - - - -1 - - + AAEAAAD/////AQAAAAAAAAAMAgAAAFpEZXZFeHByZXNzLlV0aWxzLnYxOS4yLCBWZXJzaW9uPTE5LjIu My4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI4OGQxNzU0ZDcwMGU0OWEMAwAAAFlE @@ -1677,105 +1683,162 @@ CkxlZnRJbmRlbnQITWF4V2lkdGgST3duZXJBbGxvd0h0bWxUZXh0BFRleHQEBAQAAAABH0RldkV4cHJl c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4DAAAAE1N5c3RlbS5EcmF3aW5nLkljb24JAAAAKERldkV4cHJl c3MuVXRpbHMuVG9vbFRpcEl0ZW1JbWFnZU9wdGlvbnMCAAAACAgBAgAAAAH2/////P///wIAAAAKCQsA - AAAAAAAAPAEAAAAGDAAAABDDlmZmbmVuIChTdHJnK08pBQgAAAAcRGV2RXhwcmVzcy5VdGlscy5Ub29s - VGlwSXRlbQcAAAANQWxsb3dIdG1sVGV4dARJY29uDEltYWdlT3B0aW9ucwpMZWZ0SW5kZW50CE1heFdp - ZHRoEk93bmVyQWxsb3dIdG1sVGV4dARUZXh0BAQEAAAAAR9EZXZFeHByZXNzLlV0aWxzLkRlZmF1bHRC - b29sZWFuAwAAABNTeXN0ZW0uRHJhd2luZy5JY29uCQAAAChEZXZFeHByZXNzLlV0aWxzLlRvb2xUaXBJ - dGVtSW1hZ2VPcHRpb25zAgAAAAgIAQIAAAAB8/////z///8CAAAACgkOAAAAAAAAADwBAAAABg8AAAAb - w5ZmZm5lbiBTaWUgZWluZSBQREYtRGF0ZWkuBQsAAAAoRGV2RXhwcmVzcy5VdGlscy5Ub29sVGlwSXRl - bUltYWdlT3B0aW9ucwUAAAAISW1hZ2VVcmkMU3ZnSW1hZ2VTaXplCUFsaWdubWVudApJbWFnZUluZGV4 - E0ltYWdlVG9UZXh0RGlzdGFuY2UBBAQAABNTeXN0ZW0uRHJhd2luZy5TaXplCQAAACZEZXZFeHByZXNz - LlV0aWxzLlRvb2xUaXBJbWFnZUFsaWdubWVudAIAAAAICAIAAAAGEAAAAAAF7////xNTeXN0ZW0uRHJh - d2luZy5TaXplAgAAAAV3aWR0aAZoZWlnaHQAAAgICQAAAAAAAAAAAAAABe7///8mRGV2RXhwcmVzcy5V - dGlscy5Ub29sVGlwSW1hZ2VBbGlnbm1lbnQBAAAAB3ZhbHVlX18ACAIAAAAAAAAA/////w4AAAABDgAA - AAsAAAAJEAAAAAHt////7////wAAAAAAAAAAAez////u////AAAAAP////8OAAAACw== + AAAAAAAAPAEAAAAGDAAAAAhOw6RjaHN0ZQUIAAAAHERldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEl0ZW0H + AAAADUFsbG93SHRtbFRleHQESWNvbgxJbWFnZU9wdGlvbnMKTGVmdEluZGVudAhNYXhXaWR0aBJPd25l + ckFsbG93SHRtbFRleHQEVGV4dAQEBAAAAAEfRGV2RXhwcmVzcy5VdGlscy5EZWZhdWx0Qm9vbGVhbgMA + AAATU3lzdGVtLkRyYXdpbmcuSWNvbgkAAAAoRGV2RXhwcmVzcy5VdGlscy5Ub29sVGlwSXRlbUltYWdl + T3B0aW9ucwIAAAAICAECAAAAAfP////8////AgAAAAoJDgAAAAAAAAA8AQAAAAYPAAAAF07DpGNoc3Rl + IFNlaXRlIGFuemVpZ2VuBQsAAAAoRGV2RXhwcmVzcy5VdGlscy5Ub29sVGlwSXRlbUltYWdlT3B0aW9u + cwUAAAAISW1hZ2VVcmkMU3ZnSW1hZ2VTaXplCUFsaWdubWVudApJbWFnZUluZGV4E0ltYWdlVG9UZXh0 + RGlzdGFuY2UBBAQAABNTeXN0ZW0uRHJhd2luZy5TaXplCQAAACZEZXZFeHByZXNzLlV0aWxzLlRvb2xU + aXBJbWFnZUFsaWdubWVudAIAAAAICAIAAAAGEAAAAAAF7////xNTeXN0ZW0uRHJhd2luZy5TaXplAgAA + AAV3aWR0aAZoZWlnaHQAAAgICQAAAAAAAAAAAAAABe7///8mRGV2RXhwcmVzcy5VdGlscy5Ub29sVGlw + SW1hZ2VBbGlnbm1lbnQBAAAAB3ZhbHVlX18ACAIAAAAAAAAA/////w4AAAABDgAAAAsAAAAJEAAAAAHt + ////7////wAAAAAAAAAAAez////u////AAAAAP////8OAAAACw== - - Segoe UI, 9.75pt + + Finden - - System.Windows.Forms.ToolStripStatusLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + AAEAAAD/////AQAAAAAAAAAMAgAAAFpEZXZFeHByZXNzLlV0aWxzLnYxOS4yLCBWZXJzaW9uPTE5LjIu + My4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI4OGQxNzU0ZDcwMGU0OWEMAwAAAFlE + ZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4zLjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVi + bGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29s + VGlwBwAAAA1BbGxvd0h0bWxUZXh0EUZpeGVkVG9vbFRpcFdpZHRoCkl0ZW1zQ291bnQJaXRlbVR5cGUw + BWl0ZW0wCWl0ZW1UeXBlMQVpdGVtMQQAAAQEBAQfRGV2RXhwcmVzcy5VdGlscy5EZWZhdWx0Qm9vbGVh + bgMAAAABCCVEZXZFeHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAgAAACFEZXZFeHByZXNz + LlV0aWxzLlRvb2xUaXBUaXRsZUl0ZW0CAAAAJURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29sVGlwSXRl + bVR5cGUCAAAAHERldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEl0ZW0CAAAAAgAAAAX8////H0RldkV4cHJl + c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4BAAAAB3ZhbHVlX18ACAMAAAACAAAAAAIAAAAF+////yVEZXZF + eHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAQAAAAd2YWx1ZV9fAAgCAAAAAQAAAAkGAAAA + Afn////7////AAAAAAkIAAAADAkAAABRU3lzdGVtLkRyYXdpbmcsIFZlcnNpb249NC4wLjAuMCwgQ3Vs + dHVyZT1uZXV0cmFsLCBQdWJsaWNLZXlUb2tlbj1iMDNmNWY3ZjExZDUwYTNhBQYAAAAhRGV2RXhwcmVz + cy5VdGlscy5Ub29sVGlwVGl0bGVJdGVtBwAAAA1BbGxvd0h0bWxUZXh0BEljb24MSW1hZ2VPcHRpb25z + CkxlZnRJbmRlbnQITWF4V2lkdGgST3duZXJBbGxvd0h0bWxUZXh0BFRleHQEBAQAAAABH0RldkV4cHJl + c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4DAAAAE1N5c3RlbS5EcmF3aW5nLkljb24JAAAAKERldkV4cHJl + c3MuVXRpbHMuVG9vbFRpcEl0ZW1JbWFnZU9wdGlvbnMCAAAACAgBAgAAAAH2/////P///wIAAAAKCQsA + AAAAAAAAPAEAAAAGDAAAAA9GaW5kZW4gKFN0cmcrRikFCAAAABxEZXZFeHByZXNzLlV0aWxzLlRvb2xU + aXBJdGVtBwAAAA1BbGxvd0h0bWxUZXh0BEljb24MSW1hZ2VPcHRpb25zCkxlZnRJbmRlbnQITWF4V2lk + dGgST3duZXJBbGxvd0h0bWxUZXh0BFRleHQEBAQAAAABH0RldkV4cHJlc3MuVXRpbHMuRGVmYXVsdEJv + b2xlYW4DAAAAE1N5c3RlbS5EcmF3aW5nLkljb24JAAAAKERldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEl0 + ZW1JbWFnZU9wdGlvbnMCAAAACAgBAgAAAAHz/////P///wIAAAAKCQ4AAAAAAAAAPAEAAAAGDwAAAAtU + ZXh0IHN1Y2hlbgULAAAAKERldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEl0ZW1JbWFnZU9wdGlvbnMFAAAA + CEltYWdlVXJpDFN2Z0ltYWdlU2l6ZQlBbGlnbm1lbnQKSW1hZ2VJbmRleBNJbWFnZVRvVGV4dERpc3Rh + bmNlAQQEAAATU3lzdGVtLkRyYXdpbmcuU2l6ZQkAAAAmRGV2RXhwcmVzcy5VdGlscy5Ub29sVGlwSW1h + Z2VBbGlnbm1lbnQCAAAACAgCAAAABhAAAAAABe////8TU3lzdGVtLkRyYXdpbmcuU2l6ZQIAAAAFd2lk + dGgGaGVpZ2h0AAAICAkAAAAAAAAAAAAAAAXu////JkRldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEltYWdl + QWxpZ25tZW50AQAAAAd2YWx1ZV9fAAgCAAAAAAAAAP////8OAAAAAQ4AAAALAAAACRAAAAAB7f///+// + //8AAAAAAAAAAAHs////7v///wAAAAD/////DgAAAAs= + - - SplitContainer1.Panel2 + + Verkleinern - - 327, 173 - - - 1061, 134 - - - 257, 95 - - - 1051, 56 - - - 17, 17 - - - 214, 17 - - - 675, 95 - - - 17, 95 - - - 278, 134 - - - 411, 17 - - - 938, 95 - - - 608, 17 - - - 17, 134 - - - 725, 17 - - - 469, 95 + + Vergrößern + + + Zoom + + + 10% + + + 25% + + + 50% + + + 75% + + + 100 % + + + 125 % + + + 150 % + + + 200 % + + + 400 % + + + 500 % + + + Tatsächliche Größe + + + Zoom auf Seitenebene + + + Breite anpassen + + + sichtbare einpassen + + + + AAEAAAD/////AQAAAAAAAAAMAgAAAFpEZXZFeHByZXNzLlV0aWxzLnYxOS4yLCBWZXJzaW9uPTE5LjIu + My4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI4OGQxNzU0ZDcwMGU0OWEMAwAAAFlE + ZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4zLjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVi + bGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29s + VGlwBwAAAA1BbGxvd0h0bWxUZXh0EUZpeGVkVG9vbFRpcFdpZHRoCkl0ZW1zQ291bnQJaXRlbVR5cGUw + BWl0ZW0wCWl0ZW1UeXBlMQVpdGVtMQQAAAQEBAQfRGV2RXhwcmVzcy5VdGlscy5EZWZhdWx0Qm9vbGVh + bgMAAAABCCVEZXZFeHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAgAAACFEZXZFeHByZXNz + LlV0aWxzLlRvb2xUaXBUaXRsZUl0ZW0CAAAAJURldkV4cHJlc3MuVXRpbHMuU3VwZXJUb29sVGlwSXRl + bVR5cGUCAAAAHERldkV4cHJlc3MuVXRpbHMuVG9vbFRpcEl0ZW0CAAAAAgAAAAX8////H0RldkV4cHJl + c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4BAAAAB3ZhbHVlX18ACAMAAAACAAAAAAIAAAAF+////yVEZXZF + eHByZXNzLlV0aWxzLlN1cGVyVG9vbFRpcEl0ZW1UeXBlAQAAAAd2YWx1ZV9fAAgCAAAAAQAAAAkGAAAA + Afn////7////AAAAAAkIAAAADAkAAABRU3lzdGVtLkRyYXdpbmcsIFZlcnNpb249NC4wLjAuMCwgQ3Vs + dHVyZT1uZXV0cmFsLCBQdWJsaWNLZXlUb2tlbj1iMDNmNWY3ZjExZDUwYTNhBQYAAAAhRGV2RXhwcmVz + cy5VdGlscy5Ub29sVGlwVGl0bGVJdGVtBwAAAA1BbGxvd0h0bWxUZXh0BEljb24MSW1hZ2VPcHRpb25z + CkxlZnRJbmRlbnQITWF4V2lkdGgST3duZXJBbGxvd0h0bWxUZXh0BFRleHQEBAQAAAABH0RldkV4cHJl + c3MuVXRpbHMuRGVmYXVsdEJvb2xlYW4DAAAAE1N5c3RlbS5EcmF3aW5nLkljb24JAAAAKERldkV4cHJl + c3MuVXRpbHMuVG9vbFRpcEl0ZW1JbWFnZU9wdGlvbnMCAAAACAgBAgAAAAH2/////P///wIAAAAKCQsA + AAAAAAAAPAEAAAAGDAAAAARab29tBQgAAAAcRGV2RXhwcmVzcy5VdGlscy5Ub29sVGlwSXRlbQcAAAAN + QWxsb3dIdG1sVGV4dARJY29uDEltYWdlT3B0aW9ucwpMZWZ0SW5kZW50CE1heFdpZHRoEk93bmVyQWxs + b3dIdG1sVGV4dARUZXh0BAQEAAAAAR9EZXZFeHByZXNzLlV0aWxzLkRlZmF1bHRCb29sZWFuAwAAABNT + eXN0ZW0uRHJhd2luZy5JY29uCQAAAChEZXZFeHByZXNzLlV0aWxzLlRvb2xUaXBJdGVtSW1hZ2VPcHRp + b25zAgAAAAgIAQIAAAAB8/////z///8CAAAACgkOAAAAAAAAADwBAAAABg8AAAApw4RuZGVybiBkZXIg + Wm9vbS1TdHVmZSBkZXMgUERGLURva3VtZW50cy4FCwAAAChEZXZFeHByZXNzLlV0aWxzLlRvb2xUaXBJ + dGVtSW1hZ2VPcHRpb25zBQAAAAhJbWFnZVVyaQxTdmdJbWFnZVNpemUJQWxpZ25tZW50CkltYWdlSW5k + ZXgTSW1hZ2VUb1RleHREaXN0YW5jZQEEBAAAE1N5c3RlbS5EcmF3aW5nLlNpemUJAAAAJkRldkV4cHJl + c3MuVXRpbHMuVG9vbFRpcEltYWdlQWxpZ25tZW50AgAAAAgIAgAAAAYQAAAAAAXv////E1N5c3RlbS5E + cmF3aW5nLlNpemUCAAAABXdpZHRoBmhlaWdodAAACAgJAAAAAAAAAAAAAAAF7v///yZEZXZFeHByZXNz + LlV0aWxzLlRvb2xUaXBJbWFnZUFsaWdubWVudAEAAAAHdmFsdWVfXwAIAgAAAAAAAAD/////DgAAAAEO + AAAACwAAAAkQAAAAAe3////v////AAAAAAAAAAAB7P///+7///8AAAAA/////w4AAAAL + + + + BarButtonItem1 + + + 533, 134 806, 134 - - 632, 173 - - - 681, 134 - - - 46 - - - 533, 134 - - - 813, 56 - - - 954, 134 - - - 887, 17 + + 1061, 134 17, 173 - - 569, 56 + + 327, 173 - - True + + 632, 173 + + RibbonPage2 + \ No newline at end of file diff --git a/app/DD_PM_WINDREAM/frmValidator.vb b/app/DD_PM_WINDREAM/frmValidator.vb index ea3b5e8..b451074 100644 --- a/app/DD_PM_WINDREAM/frmValidator.vb +++ b/app/DD_PM_WINDREAM/frmValidator.vb @@ -15,6 +15,7 @@ Public Class frmValidator Dim strFileList() Dim PROFIL_sortbynewest As Boolean Dim PROFIL_VEKTORINDEX + Dim PROFIL_FINISH_SQL Dim PROFIL_LOGINDEX Dim Delimiter As String @@ -56,8 +57,9 @@ Public Class frmValidator Private _SetControlValue_in_action As Boolean = False Private DTCONTROLS As DataTable Private DTGRID_COLUMNS As DataTable + Private DTGRID_COLUMNS_TEXTBOX As DataTable Private DTVWCONTROL_INDEX As DataTable - Private FormLoaded As Boolean = False + Public FormLoaded As Boolean = False Private ItemWorked As Boolean = False Private Override As Boolean = False Private OverrideAll As Boolean = False @@ -65,31 +67,31 @@ Public Class frmValidator Private ControlHandleStarted As Boolean = False - - Public Shared Function SetForegroundWindow(ByVal hwnd As IntPtr) As Boolean - End Function - Function set_foreground() - Try - Dim hwnd As IntPtr - Dim prc() As Process = Process.GetProcessesByName("DD_PM_WINDREAM") + ' + 'Public Shared Function SetForegroundWindow(ByVal hwnd As IntPtr) As Boolean + 'End Function + 'Function set_foreground() + ' Try + ' Dim hwnd As IntPtr + ' Dim prc() As Process = Process.GetProcessesByName("DD_PM_WINDREAM") - If Not prc Is Nothing AndAlso Not prc.Length = 0 Then - hwnd = prc(0).MainWindowHandle - SetForegroundWindow(hwnd) - Else - prc = Process.GetProcessesByName("DD_PM_WINDREAM.vshost") - If Not prc Is Nothing AndAlso Not prc.Length = 0 Then - hwnd = prc(0).MainWindowHandle - SetForegroundWindow(hwnd) - End If + ' If Not prc Is Nothing AndAlso Not prc.Length = 0 Then + ' hwnd = prc(0).MainWindowHandle + ' SetForegroundWindow(hwnd) + ' Else + ' prc = Process.GetProcessesByName("DD_PM_WINDREAM.vshost") + ' If Not prc Is Nothing AndAlso Not prc.Length = 0 Then + ' hwnd = prc(0).MainWindowHandle + ' SetForegroundWindow(hwnd) + ' End If - End If - Catch ex As Exception - LOGGER.Error(ex) - MsgBox("ERror in set_foreground: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "") - End Try + ' End If + ' Catch ex As Exception + ' LOGGER.Error(ex) + ' MsgBox("ERror in set_foreground: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "") + ' End Try - End Function + 'End Function Private Sub frmValidation_Load(sender As Object, e As System.EventArgs) Handles Me.Load Override = False ItemWorked = False @@ -116,8 +118,7 @@ Public Class frmValidator End If Dim _step = 0 Try - - DocumentViewer1.Init(LOGCONFIG, GDPICTURE_LICENSE) + DocumentViewerValidator.Init(LOGCONFIG, GDPICTURE_LICENSE) Catch ex As Exception LOGGER.Error(ex) End Try @@ -160,13 +161,14 @@ Public Class frmValidator MsgBox("More than 1 profile (" & CURRENT_DT_PROFILE.Rows.Count & ") returned!!", MsgBoxStyle.Critical, "Attention:") Else If CURRENT_DT_PROFILE.Rows.Count = 1 Then - For Each dr As DataRow In CURRENT_DT_PROFILE.Rows - PROFIL_VEKTORINDEX = dr.Item("PM_VEKTOR_INDEX") - PROFIL_LOGINDEX = dr.Item("LOG_INDEX") - Me.Text = "Process Manager - " & dr.Item("TITLE") + For Each oProfileRow As DataRow In CURRENT_DT_PROFILE.Rows + PROFIL_FINISH_SQL = oProfileRow.Item("SQL_BTN_FINISH") + PROFIL_VEKTORINDEX = oProfileRow.Item("PM_VEKTOR_INDEX") + PROFIL_LOGINDEX = oProfileRow.Item("LOG_INDEX") + Me.Text = "Process Manager - " & oProfileRow.Item("TITLE") - TITLELabel1.Text = dr.Item("TITLE") - DESCRIPTIONLabel.Text = IIf(IsDBNull(dr.Item("DESCRIPTION")), "", dr.Item("DESCRIPTION")) + TITLELabel1.Text = oProfileRow.Item("TITLE") + DESCRIPTIONLabel.Text = IIf(IsDBNull(oProfileRow.Item("DESCRIPTION")), "", oProfileRow.Item("DESCRIPTION")) If PROFIL_VEKTORINDEX.GetType.ToString.ToLower = "system.dbnull" Then PROFIL_VEKTORINDEX = "" End If @@ -174,13 +176,13 @@ Public Class frmValidator PROFIL_LOGINDEX = "" End If - WD_Search = dr.Item("WD_SEARCH") - finalProfile = dr.Item("FINAL_PROFILE") - Move2Folder = IIf(IsDBNull(dr.Item("MOVE2Folder")), "", dr.Item("MOVE2Folder")) + WD_Search = oProfileRow.Item("WD_SEARCH") + finalProfile = oProfileRow.Item("FINAL_PROFILE") + Move2Folder = IIf(IsDBNull(oProfileRow.Item("MOVE2Folder")), "", oProfileRow.Item("MOVE2Folder")) Try If finalProfile = True Then - Dim text As String = IIf(IsDBNull(dr.Item("FINAL_TEXT")), "", dr.Item("FINAL_TEXT") & (" (F2)")) + Dim text As String = IIf(IsDBNull(oProfileRow.Item("FINAL_TEXT")), "", oProfileRow.Item("FINAL_TEXT") & (" (F2)")) If text <> "" Then btnSave.Text = text Else @@ -195,9 +197,9 @@ Public Class frmValidator MsgBox("Error loading final profile text:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Attention:") LOGGER.Info(">> Error loading final profile text: " & ex.Message, True) End Try - ToolStripButtonJumpFile.Visible = True + bbtniNext.Visibility = DevExpress.XtraBars.BarItemVisibility.Always If CURRENT_JUMP_DOC_GUID <> 0 Then - ToolStripButtonJumpFile.Visible = False + bbtniNext.Visibility = DevExpress.XtraBars.BarItemVisibility.Never Anzahl_ValDoks = 1 Else @@ -217,14 +219,15 @@ Public Class frmValidator LOGGER.Debug("PROFIL_sortbynewest: " & PROFIL_sortbynewest.ToString) 'Delete Button anzeigen ja/nein If USER_RIGHT_FILE_DELETE = True Then - ToolStripButtonDeleteFile.Enabled = True + bbtniDelete.Visibility = DevExpress.XtraBars.BarItemVisibility.Always Else - ToolStripButtonDeleteFile.Enabled = False + bbtniDelete.Visibility = DevExpress.XtraBars.BarItemVisibility.Never End If + If CBool(CURRENT_DT_PROFILE.Rows(0).Item("ANNOTATE_WORK_HISTORY_ENTRY")) = True Then - ToolStripButtonAnnotation.Visible = True + bbtniAnnotation.Visibility = DevExpress.XtraBars.BarItemVisibility.Always Else - ToolStripButtonAnnotation.Visible = False + bbtniAnnotation.Visibility = DevExpress.XtraBars.BarItemVisibility.Never End If LOGGER.Debug("Right_Delete: " & USER_RIGHT_FILE_DELETE.ToString) Create_Controls() @@ -232,6 +235,7 @@ Public Class frmValidator End If End If + LOGGER.Debug("frmValidation_Load finished!") Catch ex As Exception LOGGER.Error(ex) MsgBox("Error LOADING Profile-Data1:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Attention:") @@ -262,6 +266,7 @@ Public Class frmValidator Catch ex As Exception LOGGER.Error(ex) + End Try Try Dim oDel = $"DELETE FROM TBPM_FILES_USER_NOT_INDEXED WHERE UPPER(USR_NAME) = UPPER('{USER_USERNAME}')" @@ -280,61 +285,15 @@ Public Class frmValidator LOGGER.Error(ex) End Try End If - DocumentViewer1.Done() - 'If VIEWER_ALL = "docview" Then - ' If IDB_ACTIVE = False Then - ' CloseWDDocview() - ' End If - - 'End If - - 'If VIEWER_PDF = "system" Then - ' Kill_PDFAcrobat() - 'Else - ' If pdfxchange = True Or sumatra = True Then - ' Close_PDF_Viewer(WMDocPathWindows) - ' End If - ' KillU_Viewer() - 'End If - + Try + DocumentViewerValidator.Done() + Catch ex As Exception + LOGGER.Warn($"Unexpected error in DocumentViewerValidator.Done: {ex.Message}") + End Try End Sub - Private Function process_User_exists(processname As String, Status As String) - Dim fi = New FileInfo(processname) - Dim filename As String = fi.Name.Replace(fi.Extension, "") - - Try - If Process.GetProcessesByName(filename).Length > 0 Then - Return True - Else - Return False - End If - Catch ex As Exception - LOGGER.Error(ex) - LOGGER.Info(">> error in process_User_exists: " & ex.Message, True) - Return False - End Try - End Function - 'Private Function process_terminate(processname As String) - ' Try - ' Dim selectQuery As SelectQuery = New SelectQuery("Win32_Process") - ' Dim searcher As ManagementObjectSearcher = New ManagementObjectSearcher(selectQuery) - ' For Each proc As ManagementObject In searcher.Get - ' If proc("Name").ToString = processname Then - ' Dim s(1) As String - ' proc.InvokeMethod("GetOwner", CType(s, Object())) - ' If CStr(s(0)).ToLower.Contains(USER_USERNAME.ToLower) Then - ' proc.InvokeMethod("Terminate", Nothing) - ' End If - ' End If - ' Next - ' Return False - ' Catch ex As Exception - ' LOGGER.Info(">> error in process_terminate: " & ex.Message, True) - ' End Try - 'End Function Private Function Init_IDB() Try IDBData = New ClassIDBData @@ -399,9 +358,8 @@ Public Class frmValidator End If If oDataResultsExist = True Or oDocResultsExist = True Then - ToolStripButtonSearchesReload.Visible = True - frmValidatorSearch.Show() - _frmValidatorSearch = frmValidatorSearch + bbtniRefreshSearches.Visibility = DevExpress.XtraBars.BarItemVisibility.Always + _frmValidatorSearch.Show() Dim oPnl1Collapsed As Boolean = True Dim oPnl2Collapsed As Boolean = True If oDataResultsExist = True Then @@ -434,11 +392,11 @@ Public Class frmValidator End If Else LOGGER.Info("Not loading AdditionalSearches...!") - ToolStripButtonSearchesReload.Visible = False + bbtniRefreshSearches.Visibility = DevExpress.XtraBars.BarItemVisibility.Never End If Else LOGGER.Info("Not loading AdditionalSearches...!") - ToolStripButtonSearchesReload.Visible = False + bbtniRefreshSearches.Visibility = DevExpress.XtraBars.BarItemVisibility.Never End If End Sub Sub LoadSQLData(control As Control, controlId As Integer) @@ -574,8 +532,12 @@ Public Class frmValidator pnldesigner.Controls.Clear() Dim oSQL = $"SELECT [dbo].[FNPM_LANGUAGE_CONTROL_TEXT] (NAME,'{USER_LANGUAGE}',CTRL_TYPE,CTRL_TEXT) CTRL_CAPTION_LANG, * FROM TBPM_PROFILE_CONTROLS WHERE PROFIL_ID = {CURRENT_ProfilGUID} ORDER BY Y_LOC, X_LOC" DTCONTROLS = ClassDatabase.Return_Datatable(oSQL) - oSQL = $"SELECT T1.GUID As CONTROL_ID, T1.PROFIL_ID, T.SQL_COMMAND, T.SPALTENNAME from TBPM_CONTROL_TABLE T, TBPM_PROFILE_CONTROLS T1 WHERE T.CONTROL_ID = T1.GUID AND T1.PROFIL_ID = {CURRENT_ProfilGUID} AND LEN(T.SQL_COMMAND) > 0" + oSQL = $"SELECT T1.GUID As CONTROL_ID, T1.PROFIL_ID, T.SQL_COMMAND, T.SPALTENNAME from TBPM_CONTROL_TABLE T, TBPM_PROFILE_CONTROLS T1 WHERE T.CONTROL_ID = T1.GUID AND T1.PROFIL_ID = {CURRENT_ProfilGUID} AND LEN(T.SQL_COMMAND) > 0 AND T.LOAD_AFT_LOAD_CONTROL = 0" DTGRID_COLUMNS = ClassDatabase.Return_Datatable(oSQL) + + oSQL = $"SELECT T1.GUID As CONTROL_ID, T1.PROFIL_ID, T.SQL_COMMAND, T.SPALTENNAME from TBPM_CONTROL_TABLE T, TBPM_PROFILE_CONTROLS T1 WHERE T.CONTROL_ID = T1.GUID AND T1.PROFIL_ID = {CURRENT_ProfilGUID} AND LEN(T.SQL_COMMAND) > 0 AND T.LOAD_AFT_LOAD_CONTROL = 1" + DTGRID_COLUMNS_TEXTBOX = ClassDatabase.Return_Datatable(oSQL) + Dim oCount As Integer = 0 For Each oControlRow As DataRow In DTCONTROLS.Rows @@ -639,7 +601,7 @@ Public Class frmValidator LOGGER.Debug("ConID <> String.Empty") If oCONID > 0 And commandsql <> String.Empty Then LOGGER.Debug("ConID > 0 And commandsql <> String.Empty") - Dim connectionString As String + Dim oConnectionString As String TBDD_CONNECTIONTableAdapter.FillByID(DD_DMSLiteDataSet.TBDD_CONNECTION, oCONID) Dim DTConnection As DataTable = DD_DMSLiteDataSet.TBDD_CONNECTION @@ -647,11 +609,11 @@ Public Class frmValidator Select Case drConnection.Item("SQL_PROVIDER").ToString.ToLower Case "ms-sql" If drConnection.Item("USERNAME") = "WINAUTH" Then - connectionString = "Data Source=" & drConnection.Item("SERVER") & ";Initial Catalog=" & drConnection.Item("DATENBANK") & ";Trusted_Connection=True;" + oConnectionString = "Data Source=" & drConnection.Item("SERVER") & ";Initial Catalog=" & drConnection.Item("DATENBANK") & ";Trusted_Connection=True;" Else - connectionString = "Data Source=" & drConnection.Item("SERVER") & ";Initial Catalog= " & drConnection.Item("DATENBANK") & ";User Id=" & drConnection.Item("USERNAME") & ";Password=" & drConnection.Item("PASSWORD") & ";" + oConnectionString = "Data Source=" & drConnection.Item("SERVER") & ";Initial Catalog= " & drConnection.Item("DATENBANK") & ";User Id=" & drConnection.Item("USERNAME") & ";Password=" & drConnection.Item("PASSWORD") & ";" End If - LOGGER.Debug("ConnString Sql-Server: " & connectionString) + LOGGER.Debug("ConnString Sql-Server: " & oConnectionString) Case "oracle" Dim conn As New OracleConnectionStringBuilder Dim connstr As String @@ -667,13 +629,13 @@ Public Class frmValidator connstr = conn.ConnectionString End If - connectionString = connstr + oConnectionString = connstr Case Else LOGGER.Info(" - ConnectionType nicht integriert") MsgBox("ConnectionType nicht integriert", MsgBoxStyle.Critical, "Bitte Konfiguration Connection überprüfen!") End Select Next - If connectionString Is Nothing = False Then + If oConnectionString Is Nothing = False Then Try Dim sqlCnn As SqlClient.SqlConnection Dim sqlCmd As SqlClient.SqlCommand @@ -692,7 +654,7 @@ Public Class frmValidator sql = clsPatterns.ReplaceInternalValues(sql) sql = clsPatterns.ReplaceControlValues(sql, pnldesigner) LOGGER.Debug(">>> sql after HasOnlySimplePatterns: " & sql) - sqlCnn = New SqlClient.SqlConnection(connectionString) + sqlCnn = New SqlClient.SqlConnection(oConnectionString) ' Try sqlCnn.Open() sqlCmd = New SqlClient.SqlCommand(sql, sqlCnn) @@ -887,6 +849,9 @@ Public Class frmValidator Next LOGGER.Debug("Create_Controls finished!") + + + Catch ex As Exception Dim st As New StackTrace(True) st = New StackTrace(ex, True) @@ -917,7 +882,7 @@ Public Class frmValidator End Select Next - set_foreground() + 'set_foreground() If first_control Is Nothing = False Then first_control.Focus() End If @@ -968,7 +933,7 @@ Public Class frmValidator sql_Statement = clsPatterns.ReplaceAllValues(sql_Statement, pnldesigner, CURRENT_WMFILE, USER_PRENAME, USER_SURNAME, USER_SHORTNAME, USER_LANGUAGE, USER_EMAIL, USER_ID, CURRENT_CLICKED_PROFILE_ID) - LOGGER.Debug(">>> sql after ReplaceAllValues: " & sql) + '' Regulären Ausdruck zum Auslesen der Indexe definieren 'Dim preg As String = "\[%{1}[a-zA-Z0-9\!\$\&\/\(\)\=\?\,\.\-\;\:_öÖüÜäÄ\#\'\+\*\~\{\}\@\€\<\>\ ]+]{1}" '' einen Regulären Ausdruck laden @@ -1089,14 +1054,14 @@ Public Class frmValidator OverrideAll = False End Try If OverrideAll = True Then - LOGGER.Warn($"OverrideAll will be in Action!") + LOGGER.Info($"CURRENT_DOC_ID: {CURRENT_DOC_ID} - OverrideAll will be in Action!") End If - Select Case oAction - Case "SetButton" + Select Case oAction.ToString.ToUpper + Case "SetButton".ToUpper btnSave.Text = oCaption & " (F2)" btnSave.BackColor = oColor - Case "Override_Question" + Case "Override_Question".ToUpper If oQuestion <> "" Then Dim result As MsgBoxResult result = MessageBox.Show(oQuestion, oTitle, MessageBoxButtons.YesNo, MessageBoxIcon.Exclamation) @@ -1105,7 +1070,7 @@ Public Class frmValidator Finish_WFStep() End If End If - Case "Update_Single_Control" + Case "Update_Single_Control".ToUpper Dim oResult1 As Boolean = True If oQuestion <> "" Then Dim result As MsgBoxResult @@ -1127,7 +1092,7 @@ Public Class frmValidator MsgBox("Unexpected error in Button Refresh_Controls - Check Your log!", MsgBoxStyle.Exclamation) End If End If - Case "Update_Controls" + Case "Update_Controls".ToUpper If oQuestion <> "" Then Dim result As MsgBoxResult result = MessageBox.Show(oQuestion, oTitle, MessageBoxButtons.YesNo, MessageBoxIcon.Exclamation) @@ -1145,11 +1110,12 @@ Public Class frmValidator End If End If - Case "Override_Direct" + Case "Override_Direct".ToUpper Override = True Finish_WFStep() Case Else - MsgBox($"No configured action provided [{oAction}]", MsgBoxStyle.Exclamation, "") + MsgBox($"No configured action provided for onCustomButtonClick [{oAction}]", MsgBoxStyle.Exclamation, "") + LOGGER.Warn($"No configured action provided for onCustomButtonClick [{oAction}]") End Select @@ -1160,7 +1126,7 @@ Public Class frmValidator Try Dim CONTROL_ID = DirectCast(dgv.Tag, ClassControlCreator.ControlMetadata).Guid ' VWPM_CONTROL_INDEXTableAdapter.cmdGetControlID(CURRENT_ProfilGUID, dgv.Name) Dim sql = String.Format("select NAME,CONNECTION_ID,SQL_UEBERPRUEFUNG FROM TBPM_PROFILE_CONTROLS WHERE PROFIL_ID = {0} And SQL_UEBERPRUEFUNG Like '%{1}%'", CURRENT_ProfilGUID, dgv.Name) - Dim DT As DataTable = ClassDatabase.Return_Datatable(sql) + Dim DT As DataTable = ClassDatabase.Return_Datatable(sql) If Not IsNothing(DT) And DT.Rows.Count > 0 Then For Each ROW As DataRow In DT.Rows Try @@ -1485,7 +1451,7 @@ Public Class frmValidator Exit Sub End If oSqlCommand = clsPatterns.ReplaceAllValues(oSqlCommand, pnldesigner, CURRENT_WMFILE, USER_PRENAME, USER_SURNAME, USER_SHORTNAME, USER_LANGUAGE, USER_EMAIL, USER_ID, CURRENT_CLICKED_PROFILE_ID) - LOGGER.Debug(">>> sql after ReplaceAllValues: " & oSqlCommand) + _dependingColumn_in_action = True Try Dim oDTDEPENDING_RESULT As DataTable = ClassDatabase.Return_Datatable(oSqlCommand) @@ -1530,7 +1496,7 @@ Public Class frmValidator sql_Statement = clsPatterns.ReplaceAllValues(sql_Statement, pnldesigner, CURRENT_WMFILE, USER_PRENAME, USER_SURNAME, USER_SHORTNAME, USER_LANGUAGE, USER_EMAIL, USER_ID, CURRENT_CLICKED_PROFILE_ID) _Step = 3 - LOGGER.Debug(">>> sql after ReplaceAllValues: " & sql) + '' Regulären Ausdruck zum Auslesen der Indexe definieren 'Dim preg As String = "\[%{1}[a-zA-Z0-9\!\$\&\/\(\)\=\?\,\.\-\;\:_öÖüÜäÄ\#\'\+\*\~\{\}\@\€\<\>\ ]+]{1}" '' einen Regulären Ausdruck laden @@ -1736,24 +1702,7 @@ Public Class frmValidator End Function - 'Sub Close_document_viewer() - ' 'Vorherige Datei Schliessen - ' If CURRENT_HTML_DOC <> "" Then - ' If File.Exists(CURRENT_HTML_DOC) Then - ' File.Delete(CURRENT_HTML_DOC) - ' End If - ' End If - ' If pdfxchange = True Or sumatra = True Or VIEWER_PDF = "system" Then - ' Close_PDF_Viewer(WMDocPathWindows) - ' End If - ' If CURRENT_WMFILE Is Nothing = False Then - ' If CURRENT_WMFILE.aLocked Then - ' CURRENT_WMFILE.Save() - ' ' unlock the windream object - ' CURRENT_WMFILE.unlock() - ' End If - ' End If - 'End Sub + Private Function CreateWMObject() As String LOGGER.Debug($"in GetWMDocFileString...'") Dim oWMRELPATH As String = CURRENT_DT_CONFIG.Rows.Item(0).Item("WM_REL_PATH") @@ -1869,7 +1818,7 @@ Public Class frmValidator LOGGER.Debug("Dokument-GUID: '" & CURRENT_DOC_GUID.ToString & "'") If CURRENT_DOC_GUID > 0 Then If GetWMDocPathWindows(0) = False Then - MsgBox("Could not acces the file! Check the log!", MsgBoxStyle.Critical, "") + MsgBox("Could not access the file! Check the log!", MsgBoxStyle.Critical, "") Exit Sub End If If IDB_ACTIVE = False Then @@ -1891,11 +1840,10 @@ Public Class frmValidator ClassDatabase.Execute_non_Query(sql) ' ############ Infos eintragen ################# - tsslblDocID.Text = "Document-ID: " & CURRENT_DOC_ID & " - DocGUID: " & CURRENT_DOC_GUID ' txtDateipfad.Text = Document_Path - tstrlbl_Info.Text = "Datei " & docCounter.ToString & " von " & Anzahl_ValDoks.ToString + bsiInformation.Caption = "Datei " & docCounter.ToString & " von " & Anzahl_ValDoks.ToString LOGGER.Info(">> Validierung für Dokument '" & WMDocPathWindows & "' gestartet") - tsslblDocID.Text = "Document-ID: " & CURRENT_DOC_ID & " - GUID: " & CURRENT_DOC_GUID + bsiDocID.Caption = "Document-ID: " & CURRENT_DOC_ID & " - GUID: " & CURRENT_DOC_GUID LOGGER.Debug("AllDocInfo created...") If IDB_ACTIVE = False Then @@ -1910,10 +1858,8 @@ Public Class frmValidator load_viewer() LOGGER.Debug("Viewer loaded!") - If WMDocPathWindows.ToLower.EndsWith(".pdf") Then - ToolStripButtonAnnotation.Visible = True - Else - ToolStripButtonAnnotation.Visible = False + If WMDocPathWindows.ToLower.EndsWith(".pdf") = False Then + bbtniAnnotation.Visibility = DevExpress.XtraBars.BarItemVisibility.Never End If @@ -1927,7 +1873,6 @@ Public Class frmValidator Next LOGGER.Debug("Indexmask loaded") - LOGGER.Debug("") 'Nun im Vektoprindex loggen das das Profil geladen wurde 'If PROFIL_VEKTORINDEX <> "" Then @@ -1947,6 +1892,7 @@ Public Class frmValidator If IDB_ACTIVE = False Then WMIndexVectofield(oLogString, PROFIL_LOGINDEX) Else + oLogString = $"PMProfile loaded: [{CURRENT_ProfilGUID}-{CURRENT_ProfilName}]" IDBData.SetVariableValue(PROFIL_LOGINDEX, oLogString) 'LOGGER.Debug("Profilname erfolgreich in Vektorfeld LOG geschrieben") 'Else @@ -1959,7 +1905,6 @@ Public Class frmValidator End If End If activate_controls(True) - Me.BringToFront() Else errormessage = oErrorMessage frmError.ShowDialog() @@ -1984,7 +1929,7 @@ Public Class frmValidator Me.Close() End If End If - + LOGGER.Debug("frmValidator: LoadNextDocument finished!") Catch ex As Exception LOGGER.Error(ex) allgFunk.Insert_LogEntry($"ERROR LoadNextDocument >> {ex.Message}") @@ -1995,7 +1940,7 @@ Public Class frmValidator End Try End Sub Sub load_viewer() - DocumentViewer1.LoadFile(WMDocPathWindows) + DocumentViewerValidator.LoadFile(WMDocPathWindows) SplitContainer1.Panel2Collapsed = False End Sub @@ -2949,8 +2894,110 @@ Public Class frmValidator End Select oCount += 1 Next - set_foreground() + ' set_foreground() If first_control Is Nothing = False Then first_control.Focus() + Try + For Each oRow As DataRow In DTGRID_COLUMNS_TEXTBOX.Rows + Dim oDEPENDING_GUID = oRow.Item("CONTROL_ID") + Dim oDEPENDING_COLUMN = oRow.Item("SPALTENNAME") + Dim oSqlCommand = oRow.Item("SQL_COMMAND") + oSqlCommand = clsPatterns.ReplaceAllValues(oSqlCommand, pnldesigner, CURRENT_WMFILE, USER_PRENAME, USER_SURNAME, USER_SHORTNAME, USER_LANGUAGE, USER_EMAIL, USER_ID, CURRENT_CLICKED_PROFILE_ID) + + + Try + Dim oDTDEPENDING_RESULT As DataTable = ClassDatabase.Return_Datatable(oSqlCommand) + If Not IsNothing(oDTDEPENDING_RESULT) Then + For Each oControl As Control In pnldesigner.Controls + If DirectCast(oControl.Tag, ClassControlCreator.ControlMetadata).Guid = oDEPENDING_GUID Then + ClassControlCreator.GridTables.Add(oDEPENDING_COLUMN, oDTDEPENDING_RESULT) + + Exit For + End If + Next + End If + + Catch ex As Exception + LOGGER.Warn($"Unexpected error in creating dropdown for oDEPENDING_GUID {oDEPENDING_GUID} an Column {oDEPENDING_COLUMN} " & ex.Message) + + End Try + Next + Catch ex As Exception + LOGGER.Warn($"Unexpected error in creating dropdown for Grid: " & ex.Message) + End Try + + + + If IDB_ACTIVE = True Then + Try + Dim oSQL = $"select Attribut, TERM_VALUE from VWIDB_VALUE_TEXT WHERE LANG_CODE = '{USER_LANGUAGE}' AND IDB_OBJ_ID = {CURRENT_DOC_ID} AND Attribut in ('PM_Info1','PM_Info2') ORDER BY Attribut" + Dim oDTINFO As DataTable = ClassDatabase.Return_Datatable_ConStr(oSQL, CONNECTION_STRING_IDB) + If Not IsNothing(oDTINFO) Then + Dim oColor As System.Drawing.Color + If oDTINFO.Rows.Count > 0 Then + Dim oColumns As String() + If oDTINFO.Rows.Count = 1 Then + oColumns = Split(oDTINFO.Rows(0).Item("TERM_VALUE"), "#") + If oColumns.Length = 1 Then + bsiInfo1.Caption = oDTINFO.Rows(0).Item("TERM_VALUE") + ElseIf oColumns.Length = 2 Then + bsiInfo1.Caption = oColumns(0) + Try + oColor = System.Drawing.Color.FromName(oColumns(1)) + bsiInfo1.ItemAppearance.Normal.ForeColor = oColor + Catch ex As Exception + + End Try + End If + + bsiInfo2.Visibility = DevExpress.XtraBars.BarItemVisibility.Never + ElseIf oDTINFO.Rows.Count = 2 Then + 'ITEM 1 + oColumns = Split(oDTINFO.Rows(0).Item("TERM_VALUE"), "#") + If oColumns.Length = 1 Then + bsiInfo1.Caption = oDTINFO.Rows(0).Item("TERM_VALUE") + ElseIf oColumns.Length = 2 Then + bsiInfo1.Caption = oColumns(0) + Try + oColor = System.Drawing.Color.FromName(oColumns(1)) + bsiInfo1.ItemAppearance.Normal.ForeColor = oColor + Catch ex As Exception + + End Try + End If + 'ITEM 1 + oColumns = Split(oDTINFO.Rows(1).Item("TERM_VALUE"), "#") + If oColumns.Length = 1 Then + bsiInfo2.Caption = oDTINFO.Rows(1).Item("TERM_VALUE") + ElseIf oColumns.Length = 2 Then + bsiInfo2.Caption = oColumns(0) + Try + oColor = System.Drawing.Color.FromName(oColumns(1)) + bsiInfo2.ItemAppearance.Normal.ForeColor = oColor + Catch ex As Exception + + End Try + End If + bsiInfo2.Visibility = DevExpress.XtraBars.BarItemVisibility.Always + End If + RibbonPageGroup2.Visible = True + Else + LOGGER.Debug($"No PM_Info-Configuration!!") + RibbonPageGroup2.Visible = False + End If + Else + LOGGER.Warn($"oDTINFO is nothing!!") + RibbonPageGroup2.Visible = False + End If + Catch ex As Exception + LOGGER.Warn($"Unexpected error in Setting PMINFO - ERROR: {ex.Message}") + RibbonPageGroup2.Visible = False + End Try + + Else + RibbonPageGroup2.Visible = False + End If + + 'Flag setzen das Indexe geladen sind _Indexe_Loaded = True Load_Additional_Searches() @@ -2975,14 +3022,77 @@ Public Class frmValidator _dependingColumn_in_action = False BringToFront() FormLoaded = True + LOGGER.Debug("frmValidation_Shown finished!") End Sub Private Sub btnSave_Click(sender As System.Object, e As System.EventArgs) Handles btnSave.Click btnSave.Enabled = False Finish_WFStep() btnSave.Enabled = True End Sub - Sub Finish_WFStep() + Private Function btnFinish_continue() + Try + Dim oSQL = PROFIL_FINISH_SQL + oSQL = clsPatterns.ReplaceAllValues(oSQL, pnldesigner, CURRENT_WMFILE, USER_PRENAME, USER_SURNAME, USER_SHORTNAME, USER_LANGUAGE, USER_EMAIL, USER_ID, CURRENT_CLICKED_PROFILE_ID) + Dim oDT_ACTIONS As DataTable = ClassDatabase.Return_Datatable(oSQL) + If IsNothing(oDT_ACTIONS) Then + MsgBox("Something went wrong in btnFinish_continue - Please check Your log and inform the workflow-team!", MsgBoxStyle.Exclamation) + Return False + ElseIf oDT_ACTIONS.Rows.Count = 0 Then + MsgBox("Something went wrong in btnFinish_continue (No row) - Please check Your log and inform the workflow-team!", MsgBoxStyle.Exclamation) + Return False + End If + 'Select Case'Override' as Action_Type, 'Sind Sie sicher dass Sie nicht zuständig sind?' as Question,'Nicht Zuständig' as Caption,'Red' as Color + Dim oMsgType + Dim oQuestion + Dim oTitle + + Try + oMsgType = oDT_ACTIONS?.Rows(0).Item("MsgType") + Catch ex As Exception + oMsgType = "" + End Try + + Try + oQuestion = oDT_ACTIONS?.Rows(0).Item("Question") + Catch ex As Exception + oQuestion = "" + End Try + Try + oTitle = oDT_ACTIONS?.Rows(0).Item("Title") + Catch ex As Exception + oTitle = "" + End Try + + Select Case oMsgType.ToString.ToUpper + + Case "MsgboxResult".ToUpper + If oQuestion <> "" Then + Dim result As MsgBoxResult + result = MessageBox.Show(oQuestion, oTitle, MessageBoxButtons.YesNo, MessageBoxIcon.Exclamation) + If result = MsgBoxResult.Yes Then + Return True + Else + Return False + End If + End If + Case "Msgbox".ToUpper + MessageBox.Show(oQuestion, oTitle, MessageBoxButtons.OK, MessageBoxIcon.Exclamation) + Return True + Case "Continue".ToUpper + Return True + Case Else + MsgBox($"No valid action provided [{oMsgType}] in btnFinishContinue - Check Your log and inform the WorkflowTeam", MsgBoxStyle.Exclamation, "") + LOGGER.Warn($"No valid action provided [{oMsgType}] in btnFinishContinue - Check Your log and inform the WorkflowTeam") + Return False + End Select + Catch ex As Exception + LOGGER.Error(ex) + MsgBox("An unhandled exeception occured in btnFinish Procedure! Please inform Your WorkflowTeam and Check Your log!" & vbNewLine & ex.Message, MsgBoxStyle.Critical) + Return False + End Try + End Function + Sub Finish_WFStep() btnSave.Enabled = False LOGGER.Debug("Abschluss für Dok: " & CURRENT_DOC_PATH & " gestartet") ItemWorked = True @@ -2990,12 +3100,18 @@ Public Class frmValidator If OverrideAll = False Then 'Eingaben auf Form überprüfen If Check_UpdateIndexe() = False Then + If PROFIL_FINISH_SQL <> String.Empty Then + If btnFinish_continue() = False Then + Exit Sub + + End If + End If 'lblerror.Visible = False Try TBPM_PROFILE_FINAL_INDEXINGTableAdapter.Fill(FinalIndexDataSet.TBPM_PROFILE_FINAL_INDEXING, CURRENT_ProfilName) Dim oDTFinalIndexes As DataTable = FinalIndexDataSet.TBPM_PROFILE_FINAL_INDEXING - If oDTFinalIndexes.Rows.Count > 0 Then + If oDTFinalIndexes?.Rows.Count > 0 Then 'Jetzt finale Indexe setzen LOGGER.Debug("FINAL INDEXING STARTING...") For Each oFinalIndexRow As DataRow In oDTFinalIndexes.Rows @@ -3301,7 +3417,7 @@ Public Class frmValidator 'Das nächste Dokument laden Load_Next_Document(False) - set_foreground() + ' set_foreground() If first_control Is Nothing = False Then first_control.Focus() End If @@ -3412,6 +3528,7 @@ Public Class frmValidator 'Den Indexnamen auslesen Dim oIndexName As String = dr.Item("INDEX_NAME") + Dim oIsRequired As Boolean = CBool(dr.Item("VALIDATION")) Dim oSQLCheckCommand As String = IIf(IsDBNull(dr.Item("SQL_UEBERPRUEFUNG")), "", dr.Item("SQL_UEBERPRUEFUNG")) Dim oIsReadOnly As Boolean = CBool(dr.Item("READ_ONLY")) @@ -4078,11 +4195,17 @@ Public Class frmValidator Dim exists = False Select Case oControlType Case "TABLE" + Dim oRowValue = row.Item(0) + If IsNothing(oRowValue) Then + oRowValue = String.Empty + ElseIf IsDBNull(oRowValue) Then + oRowValue = String.Empty + End If ' MsgBox(row.Cells(0).Value.GetType.ToString) Dim str As String = String.Empty - If row.Item(0) <> String.Empty Then - 'Das Array anpassen - ReDim Preserve myVektorArr(ZeilenGrid) + 'If oRowValue <> String.Empty Then + 'Das Array anpassen + ReDim Preserve myVektorArr(ZeilenGrid) Dim oValueList As New List(Of String) @@ -4097,8 +4220,8 @@ Public Class frmValidator 'Den Wert im Array speichern myVektorArr(ZeilenGrid) = str ZeilenGrid += 1 - End If - Case Else + 'End If + Case Else ' MsgBox(row.Cells(0).Value.GetType.ToString) If row.Item(0) Is Nothing = False Then 'Das Array anpassen @@ -4121,7 +4244,7 @@ Public Class frmValidator Else Dim oMyDT = DT_FOR_ARRAY(myVektorArr) If oMyDT.Rows.Count > 0 Then - If IDBData.SetVariableValue(oIndexName, oMyDT, True) = False Then + If IDBData.SetVariableValue(oIndexName, oMyDT, True, oIDBTyp) = False Then oMissing = True oErrorMessage = $"Error while indexing table IDB (1) {dgv.Name} - ERROR: " & idxerr_message Exit For @@ -4213,7 +4336,7 @@ Public Class frmValidator End Sub Function GetConnectionString(id As Integer) Try - Dim connectionString As String + Dim oConnectionString As String Dim DTConnection As DataTable DTConnection = DD_DMSLiteDataSet.TBDD_CONNECTION Dim drConnection As DataRow @@ -4221,10 +4344,10 @@ Public Class frmValidator If drConnection.Item("GUID") = id Then Select Case drConnection.Item("SQL_PROVIDER") Case "SqlClient.SqlConnection" - connectionString = "%MSData Source=" & drConnection.Item("SERVER") & ";Initial Catalog= " & drConnection.Item("DATENBANK") & ";User Id=" & drConnection.Item("USERNAME") & ";Password=" & drConnection.Item("PASSWORD") & ";" + oConnectionString = "%MSData Source=" & drConnection.Item("SERVER") & ";Initial Catalog= " & drConnection.Item("DATENBANK") & ";User Id=" & drConnection.Item("USERNAME") & ";Password=" & drConnection.Item("PASSWORD") & ";" Case "Oracle" - connectionString = "%ORProvider=OraOLEDB.Oracle;Data Source=" & drConnection.Item("SERVER") & ";User Id=" & drConnection.Item("USERNAME") & ";Password=" & drConnection.Item("PASSWORD") & ";OLEDB.NET=True;" + oConnectionString = "%ORProvider=OraOLEDB.Oracle;Data Source=" & drConnection.Item("SERVER") & ";User Id=" & drConnection.Item("USERNAME") & ";Password=" & drConnection.Item("PASSWORD") & ";OLEDB.NET=True;" ' connectionString = "%ORData Source=" & drConnection.Item("SERVER") & ";Persist Security Info=True;User Id=" & drConnection.Item("USERNAME") & ";Password=" & drConnection.Item("PASSWORD") & ";Unicode=True" Case Else LOGGER.Info(" - ConnectionType '" & drConnection.Item("SQL_PROVIDER") & "' nicht integriert") @@ -4233,7 +4356,7 @@ Public Class frmValidator End Select End If Next - Return connectionString + Return oConnectionString Catch ex As Exception LOGGER.Error(ex) LOGGER.Info(" -Unexpected error in GetConnectionString - Fehler: " & vbNewLine & ex.Message) @@ -4354,8 +4477,8 @@ Public Class frmValidator MyBase.New ' Dieser Aufruf ist für den Designer erforderlich. InitializeComponent() + _frmValidatorSearch = New frmValidatorSearch ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu. - _frmValidatorSearch = frmValidatorSearch End Sub @@ -4400,24 +4523,6 @@ Public Class frmValidator End Sub - Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButtonJumpFile.Click - Datei_ueberspringen() - End Sub - - Private Sub ToolStripButtonDeleteFile_Click(sender As Object, e As EventArgs) Handles ToolStripButtonDeleteFile.Click - delete_active_File() - End Sub - - Private Sub ToolStripButtonAnnotation_Click(sender As Object, e As EventArgs) Handles ToolStripButtonAnnotation.Click - 'PdfViewer1.CloseDocument() - 'Close_PDF_Viewer(WMDocPathWindows) - Application.DoEvents() - - frmAnnotations.ShowDialog() - - load_viewer() - End Sub - Private Sub frmValidator_Closing(sender As Object, e As CancelEventArgs) Handles Me.Closing End Sub @@ -4434,48 +4539,6 @@ Public Class frmValidator End If My.Settings.Save() End Sub - - Private Sub InfoToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles InfoToolStripMenuItem.Click - frmFileInfo.ShowDialog() - End Sub - - Private Sub EigenschaftenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles EigenschaftenToolStripMenuItem.Click - If WMDocPathWindows <> "" Then - Cursor = Cursors.WaitCursor - Dim oShellExecuteInfo As New SHELLEXECUTEINFO - oShellExecuteInfo.cbSize = Marshal.SizeOf(oShellExecuteInfo) - oShellExecuteInfo.lpVerb = "properties" - oShellExecuteInfo.lpFile = WMDocPathWindows - oShellExecuteInfo.nShow = SW_SHOW - oShellExecuteInfo.fMask = SEE_MASK_INVOKEIDLIST - If Not ShellExecuteEx(oShellExecuteInfo) Then - Dim ex As New System.ComponentModel.Win32Exception(System.Runtime.InteropServices.Marshal.GetLastWin32Error()) - MsgBox("error in Datei-Eigenschaften öffnen:" & vbNewLine & ex.Message, MsgBoxStyle.Critical) - End If - End If - Cursor = Cursors.Default - - End Sub - - Private Sub DateiÖffnenToolStripMenuItem1_Click(sender As Object, e As EventArgs) Handles DateiÖffnenToolStripMenuItem1.Click - Try - Dim Proc As New System.Diagnostics.Process - Dim psi As New ProcessStartInfo(WMDocPathWindows) - Proc.EnableRaisingEvents = True - Proc.StartInfo = psi - Proc.Start() - LOGGER.Info(" - Datei wurde geöffnet!") - Catch ex As Exception - LOGGER.Error(ex) - MsgBox("Fehler bei Datei öffnen:" & vbNewLine & ex.Message, MsgBoxStyle.Critical) - LOGGER.Info("Fehler bei Datei öffnen: " & ex.Message, True) - End Try - End Sub - - Private Sub ToolStripButtonSearchesReload_Click(sender As Object, e As EventArgs) Handles ToolStripButtonSearchesReload.Click - Load_Additional_Searches() - End Sub - Private Sub btnSave_MouseHover(sender As Object, e As EventArgs) Handles btnSave.MouseHover Dim msg = "F2 für Speichern" If USER_LANGUAGE <> "de-DE" Then @@ -4496,11 +4559,79 @@ Public Class frmValidator FillIndexValues(False) End Sub - Private Sub ToolStripButton1_Click_1(sender As Object, e As EventArgs) Handles ToolStripButton1.Click - Reload_Controls("") - StatusLabel("Controls refreshed") - End Sub + Sub StatusLabel(infotext As String) - tsslbl_State.Text = infotext & " " & Now.ToString + bsiInformation.Caption = infotext & " " & Now.ToString + End Sub + + Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick + Try + Dim Proc As New System.Diagnostics.Process + Dim psi As New ProcessStartInfo(WMDocPathWindows) + Proc.EnableRaisingEvents = True + Proc.StartInfo = psi + Proc.Start() + LOGGER.Info(" - Datei wurde geöffnet!") + Catch ex As Exception + LOGGER.Error(ex) + MsgBox("Fehler bei Datei öffnen:" & vbNewLine & ex.Message, MsgBoxStyle.Critical) + LOGGER.Info("Fehler bei Datei öffnen: " & ex.Message, True) + End Try + End Sub + + Private Sub BarButtonItem3_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem3.ItemClick + frmFileInfo.ShowDialog() + End Sub + + Private Sub BarButtonItem4_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem4.ItemClick + If WMDocPathWindows <> "" Then + Try + Cursor = Cursors.WaitCursor + Dim oShellExecuteInfo As New SHELLEXECUTEINFO + oShellExecuteInfo.cbSize = Marshal.SizeOf(oShellExecuteInfo) + oShellExecuteInfo.lpVerb = "properties" + oShellExecuteInfo.lpFile = WMDocPathWindows + oShellExecuteInfo.nShow = SW_SHOW + oShellExecuteInfo.fMask = SEE_MASK_INVOKEIDLIST + If Not ShellExecuteEx(oShellExecuteInfo) Then + Dim ex As New System.ComponentModel.Win32Exception(System.Runtime.InteropServices.Marshal.GetLastWin32Error()) + MsgBox("error in Datei-Eigenschaften öffnen:" & vbNewLine & ex.Message, MsgBoxStyle.Critical) + End If + Catch ex As Exception + End Try + Cursor = Cursors.Default + End If + + End Sub + + Private Sub BarButtonItem6_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbtniRefreshSearches.ItemClick + Load_Additional_Searches() + End Sub + + Private Sub bbtniRefresh_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbtniRefresh.ItemClick + Reload_Controls("") + Try + btnSave.Text = ClassAllgemeineFunktionen.GUI_LANGUAGE_INFO("frmValidator.ValidationButton") + Catch ex As Exception + + End Try + + StatusLabel("All Data refreshed") + End Sub + + Private Sub bbtniNext_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbtniNext.ItemClick + Datei_ueberspringen() + End Sub + + Private Sub bbtniDelete_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbtniDelete.ItemClick + delete_active_File() + End Sub + + Private Sub bbtniAnnotation_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbtniAnnotation.ItemClick + Application.DoEvents() + + frmAnnotations.ShowDialog() + + load_viewer() End Sub End Class \ No newline at end of file diff --git a/app/DD_PM_WINDREAM/frmValidatorSearch.Designer.vb b/app/DD_PM_WINDREAM/frmValidatorSearch.Designer.vb index ce6089d..541fe2c 100644 --- a/app/DD_PM_WINDREAM/frmValidatorSearch.Designer.vb +++ b/app/DD_PM_WINDREAM/frmValidatorSearch.Designer.vb @@ -24,19 +24,34 @@ Partial Class frmValidatorSearch Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmValidatorSearch)) + Dim GridLevelNode7 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode() Dim GridLevelNode1 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode() Dim GridLevelNode2 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode() Dim GridLevelNode3 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode() Dim GridLevelNode4 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode() Dim GridLevelNode5 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode() - Dim GridLevelNode6 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode() + Me.SplitContainerControlDoc = New DevExpress.XtraEditors.SplitContainerControl() + Me.XtraTabControlDocs = New DevExpress.XtraTab.XtraTabControl() + Me.XtraTabPageDoc1 = New DevExpress.XtraTab.XtraTabPage() + Me.GridControlDocSearch1 = New DevExpress.XtraGrid.GridControl() + Me.GridViewDocSearch1 = New DevExpress.XtraGrid.Views.Grid.GridView() + Me.XtraTabPageDoc2 = New DevExpress.XtraTab.XtraTabPage() + Me.GridControlDocSearch2 = New DevExpress.XtraGrid.GridControl() + Me.GridViewDocSearch2 = New DevExpress.XtraGrid.Views.Grid.GridView() + Me.XtraTabPageDoc3 = New DevExpress.XtraTab.XtraTabPage() + Me.GridControlDocSearch3 = New DevExpress.XtraGrid.GridControl() + Me.GridViewDocSearch3 = New DevExpress.XtraGrid.Views.Grid.GridView() + Me.XtraTabPageDoc4 = New DevExpress.XtraTab.XtraTabPage() + Me.GridControlDocSearch4 = New DevExpress.XtraGrid.GridControl() + Me.GridViewDocSearch4 = New DevExpress.XtraGrid.Views.Grid.GridView() + Me.XtraTabPageDoc5 = New DevExpress.XtraTab.XtraTabPage() + Me.GridControlDocSearch5 = New DevExpress.XtraGrid.GridControl() + Me.GridViewDocSearch5 = New DevExpress.XtraGrid.Views.Grid.GridView() Me.ToolStrip1 = New System.Windows.Forms.ToolStrip() Me.ToolStripDropDownButtonFile = New System.Windows.Forms.ToolStripDropDownButton() Me.DateiÖffnenToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() Me.EigenschaftenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ToolStripButtonRefreshSearches = New System.Windows.Forms.ToolStripButton() - Me.GridControlDocSearch1 = New DevExpress.XtraGrid.GridControl() - Me.GridViewDocSearch1 = New DevExpress.XtraGrid.Views.Grid.GridView() Me.SplitContainerSearches = New System.Windows.Forms.SplitContainer() Me.XtraTabControlSQL = New DevExpress.XtraTab.XtraTabControl() Me.XtraTabPageSearch1 = New DevExpress.XtraTab.XtraTabPage() @@ -56,20 +71,6 @@ Partial Class frmValidatorSearch Me.GridViewSearch5 = New DevExpress.XtraGrid.Views.Grid.GridView() Me.StatusStrip1 = New System.Windows.Forms.StatusStrip() Me.tsslblSQL = New System.Windows.Forms.ToolStripStatusLabel() - Me.XtraTabControlDocs = New DevExpress.XtraTab.XtraTabControl() - Me.XtraTabPageDoc1 = New DevExpress.XtraTab.XtraTabPage() - Me.XtraTabPageDoc2 = New DevExpress.XtraTab.XtraTabPage() - Me.GridControlDocSearch2 = New DevExpress.XtraGrid.GridControl() - Me.GridViewDocSearch2 = New DevExpress.XtraGrid.Views.Grid.GridView() - Me.XtraTabPageDoc3 = New DevExpress.XtraTab.XtraTabPage() - Me.GridControlDocSearch3 = New DevExpress.XtraGrid.GridControl() - Me.GridViewDocSearch3 = New DevExpress.XtraGrid.Views.Grid.GridView() - Me.XtraTabPageDoc4 = New DevExpress.XtraTab.XtraTabPage() - Me.GridControlDocSearch4 = New DevExpress.XtraGrid.GridControl() - Me.GridViewDocSearch4 = New DevExpress.XtraGrid.Views.Grid.GridView() - Me.XtraTabPageDoc5 = New DevExpress.XtraTab.XtraTabPage() - Me.GridControlDocSearch5 = New DevExpress.XtraGrid.GridControl() - Me.GridViewDocSearch5 = New DevExpress.XtraGrid.Views.Grid.GridView() Me.ToolStrip2 = New System.Windows.Forms.ToolStrip() Me.tslblDocID = New System.Windows.Forms.ToolStripLabel() Me.tslblState = New System.Windows.Forms.ToolStripLabel() @@ -82,9 +83,27 @@ Partial Class frmValidatorSearch Me.ContextMenuStripSQL = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator() Me.ToolStripMenuItem4 = New System.Windows.Forms.ToolStripMenuItem() - Me.ToolStrip1.SuspendLayout() + Me.DocumentViewer1 = New DigitalData.Controls.DocumentViewer.DocumentViewer() + CType(Me.SplitContainerControlDoc, System.ComponentModel.ISupportInitialize).BeginInit() + Me.SplitContainerControlDoc.SuspendLayout() + CType(Me.XtraTabControlDocs, System.ComponentModel.ISupportInitialize).BeginInit() + Me.XtraTabControlDocs.SuspendLayout() + Me.XtraTabPageDoc1.SuspendLayout() CType(Me.GridControlDocSearch1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.GridViewDocSearch1, System.ComponentModel.ISupportInitialize).BeginInit() + Me.XtraTabPageDoc2.SuspendLayout() + CType(Me.GridControlDocSearch2, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.GridViewDocSearch2, System.ComponentModel.ISupportInitialize).BeginInit() + Me.XtraTabPageDoc3.SuspendLayout() + CType(Me.GridControlDocSearch3, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.GridViewDocSearch3, System.ComponentModel.ISupportInitialize).BeginInit() + Me.XtraTabPageDoc4.SuspendLayout() + CType(Me.GridControlDocSearch4, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.GridViewDocSearch4, System.ComponentModel.ISupportInitialize).BeginInit() + Me.XtraTabPageDoc5.SuspendLayout() + CType(Me.GridControlDocSearch5, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.GridViewDocSearch5, System.ComponentModel.ISupportInitialize).BeginInit() + Me.ToolStrip1.SuspendLayout() CType(Me.SplitContainerSearches, System.ComponentModel.ISupportInitialize).BeginInit() Me.SplitContainerSearches.Panel1.SuspendLayout() Me.SplitContainerSearches.Panel2.SuspendLayout() @@ -107,26 +126,180 @@ Partial Class frmValidatorSearch CType(Me.GridControlSearch5, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.GridViewSearch5, System.ComponentModel.ISupportInitialize).BeginInit() Me.StatusStrip1.SuspendLayout() - CType(Me.XtraTabControlDocs, System.ComponentModel.ISupportInitialize).BeginInit() - Me.XtraTabControlDocs.SuspendLayout() - Me.XtraTabPageDoc1.SuspendLayout() - Me.XtraTabPageDoc2.SuspendLayout() - CType(Me.GridControlDocSearch2, System.ComponentModel.ISupportInitialize).BeginInit() - CType(Me.GridViewDocSearch2, System.ComponentModel.ISupportInitialize).BeginInit() - Me.XtraTabPageDoc3.SuspendLayout() - CType(Me.GridControlDocSearch3, System.ComponentModel.ISupportInitialize).BeginInit() - CType(Me.GridViewDocSearch3, System.ComponentModel.ISupportInitialize).BeginInit() - Me.XtraTabPageDoc4.SuspendLayout() - CType(Me.GridControlDocSearch4, System.ComponentModel.ISupportInitialize).BeginInit() - CType(Me.GridViewDocSearch4, System.ComponentModel.ISupportInitialize).BeginInit() - Me.XtraTabPageDoc5.SuspendLayout() - CType(Me.GridControlDocSearch5, System.ComponentModel.ISupportInitialize).BeginInit() - CType(Me.GridViewDocSearch5, System.ComponentModel.ISupportInitialize).BeginInit() Me.ToolStrip2.SuspendLayout() Me.ContextMenuStripWMFile.SuspendLayout() Me.ContextMenuStripSQL.SuspendLayout() Me.SuspendLayout() ' + 'SplitContainerControlDoc + ' + resources.ApplyResources(Me.SplitContainerControlDoc, "SplitContainerControlDoc") + Me.SplitContainerControlDoc.Name = "SplitContainerControlDoc" + Me.SplitContainerControlDoc.Panel1.Controls.Add(Me.XtraTabControlDocs) + resources.ApplyResources(Me.SplitContainerControlDoc.Panel1, "SplitContainerControlDoc.Panel1") + Me.SplitContainerControlDoc.Panel2.Controls.Add(Me.DocumentViewer1) + resources.ApplyResources(Me.SplitContainerControlDoc.Panel2, "SplitContainerControlDoc.Panel2") + Me.SplitContainerControlDoc.SplitterPosition = 351 + ' + 'XtraTabControlDocs + ' + resources.ApplyResources(Me.XtraTabControlDocs, "XtraTabControlDocs") + Me.XtraTabControlDocs.Name = "XtraTabControlDocs" + Me.XtraTabControlDocs.SelectedTabPage = Me.XtraTabPageDoc1 + Me.XtraTabControlDocs.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPageDoc1, Me.XtraTabPageDoc2, Me.XtraTabPageDoc3, Me.XtraTabPageDoc4, Me.XtraTabPageDoc5}) + ' + 'XtraTabPageDoc1 + ' + Me.XtraTabPageDoc1.Controls.Add(Me.GridControlDocSearch1) + Me.XtraTabPageDoc1.Name = "XtraTabPageDoc1" + resources.ApplyResources(Me.XtraTabPageDoc1, "XtraTabPageDoc1") + ' + 'GridControlDocSearch1 + ' + resources.ApplyResources(Me.GridControlDocSearch1, "GridControlDocSearch1") + GridLevelNode7.RelationName = "Level1" + Me.GridControlDocSearch1.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode7}) + Me.GridControlDocSearch1.MainView = Me.GridViewDocSearch1 + Me.GridControlDocSearch1.Name = "GridControlDocSearch1" + Me.GridControlDocSearch1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewDocSearch1}) + ' + 'GridViewDocSearch1 + ' + Me.GridViewDocSearch1.Appearance.EvenRow.BackColor = System.Drawing.Color.Aqua + Me.GridViewDocSearch1.Appearance.EvenRow.Options.UseBackColor = True + Me.GridViewDocSearch1.Appearance.SelectedRow.BackColor = System.Drawing.Color.Lime + Me.GridViewDocSearch1.Appearance.SelectedRow.Options.UseBackColor = True + Me.GridViewDocSearch1.GridControl = Me.GridControlDocSearch1 + Me.GridViewDocSearch1.Name = "GridViewDocSearch1" + Me.GridViewDocSearch1.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False] + Me.GridViewDocSearch1.OptionsFind.AlwaysVisible = True + Me.GridViewDocSearch1.OptionsSelection.EnableAppearanceFocusedCell = False + Me.GridViewDocSearch1.OptionsSelection.EnableAppearanceHideSelection = False + Me.GridViewDocSearch1.OptionsSelection.MultiSelect = True + Me.GridViewDocSearch1.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CellSelect + Me.GridViewDocSearch1.OptionsView.EnableAppearanceEvenRow = True + Me.GridViewDocSearch1.OptionsView.ShowAutoFilterRow = True + ' + 'XtraTabPageDoc2 + ' + Me.XtraTabPageDoc2.Controls.Add(Me.GridControlDocSearch2) + Me.XtraTabPageDoc2.Name = "XtraTabPageDoc2" + resources.ApplyResources(Me.XtraTabPageDoc2, "XtraTabPageDoc2") + ' + 'GridControlDocSearch2 + ' + resources.ApplyResources(Me.GridControlDocSearch2, "GridControlDocSearch2") + Me.GridControlDocSearch2.MainView = Me.GridViewDocSearch2 + Me.GridControlDocSearch2.Name = "GridControlDocSearch2" + Me.GridControlDocSearch2.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewDocSearch2}) + ' + 'GridViewDocSearch2 + ' + Me.GridViewDocSearch2.Appearance.EvenRow.BackColor = System.Drawing.Color.Aqua + Me.GridViewDocSearch2.Appearance.EvenRow.Options.UseBackColor = True + Me.GridViewDocSearch2.Appearance.SelectedRow.BackColor = System.Drawing.Color.Lime + Me.GridViewDocSearch2.Appearance.SelectedRow.Options.UseBackColor = True + Me.GridViewDocSearch2.GridControl = Me.GridControlDocSearch2 + Me.GridViewDocSearch2.Name = "GridViewDocSearch2" + Me.GridViewDocSearch2.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False] + Me.GridViewDocSearch2.OptionsFind.AlwaysVisible = True + Me.GridViewDocSearch2.OptionsSelection.EnableAppearanceFocusedCell = False + Me.GridViewDocSearch2.OptionsSelection.EnableAppearanceHideSelection = False + Me.GridViewDocSearch2.OptionsSelection.MultiSelect = True + Me.GridViewDocSearch2.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CellSelect + Me.GridViewDocSearch2.OptionsView.EnableAppearanceEvenRow = True + Me.GridViewDocSearch2.OptionsView.ShowAutoFilterRow = True + ' + 'XtraTabPageDoc3 + ' + Me.XtraTabPageDoc3.Controls.Add(Me.GridControlDocSearch3) + Me.XtraTabPageDoc3.Name = "XtraTabPageDoc3" + resources.ApplyResources(Me.XtraTabPageDoc3, "XtraTabPageDoc3") + ' + 'GridControlDocSearch3 + ' + resources.ApplyResources(Me.GridControlDocSearch3, "GridControlDocSearch3") + Me.GridControlDocSearch3.MainView = Me.GridViewDocSearch3 + Me.GridControlDocSearch3.Name = "GridControlDocSearch3" + Me.GridControlDocSearch3.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewDocSearch3}) + ' + 'GridViewDocSearch3 + ' + Me.GridViewDocSearch3.Appearance.EvenRow.BackColor = System.Drawing.Color.Aqua + Me.GridViewDocSearch3.Appearance.EvenRow.Options.UseBackColor = True + Me.GridViewDocSearch3.Appearance.SelectedRow.BackColor = System.Drawing.Color.Lime + Me.GridViewDocSearch3.Appearance.SelectedRow.Options.UseBackColor = True + Me.GridViewDocSearch3.GridControl = Me.GridControlDocSearch3 + Me.GridViewDocSearch3.Name = "GridViewDocSearch3" + Me.GridViewDocSearch3.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False] + Me.GridViewDocSearch3.OptionsFind.AlwaysVisible = True + Me.GridViewDocSearch3.OptionsSelection.EnableAppearanceFocusedCell = False + Me.GridViewDocSearch3.OptionsSelection.EnableAppearanceHideSelection = False + Me.GridViewDocSearch3.OptionsSelection.MultiSelect = True + Me.GridViewDocSearch3.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CellSelect + Me.GridViewDocSearch3.OptionsView.EnableAppearanceEvenRow = True + Me.GridViewDocSearch3.OptionsView.ShowAutoFilterRow = True + ' + 'XtraTabPageDoc4 + ' + Me.XtraTabPageDoc4.Controls.Add(Me.GridControlDocSearch4) + Me.XtraTabPageDoc4.Name = "XtraTabPageDoc4" + resources.ApplyResources(Me.XtraTabPageDoc4, "XtraTabPageDoc4") + ' + 'GridControlDocSearch4 + ' + resources.ApplyResources(Me.GridControlDocSearch4, "GridControlDocSearch4") + Me.GridControlDocSearch4.MainView = Me.GridViewDocSearch4 + Me.GridControlDocSearch4.Name = "GridControlDocSearch4" + Me.GridControlDocSearch4.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewDocSearch4}) + ' + 'GridViewDocSearch4 + ' + Me.GridViewDocSearch4.Appearance.EvenRow.BackColor = System.Drawing.Color.Aqua + Me.GridViewDocSearch4.Appearance.EvenRow.Options.UseBackColor = True + Me.GridViewDocSearch4.Appearance.SelectedRow.BackColor = System.Drawing.Color.Lime + Me.GridViewDocSearch4.Appearance.SelectedRow.Options.UseBackColor = True + Me.GridViewDocSearch4.GridControl = Me.GridControlDocSearch4 + Me.GridViewDocSearch4.Name = "GridViewDocSearch4" + Me.GridViewDocSearch4.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False] + Me.GridViewDocSearch4.OptionsFind.AlwaysVisible = True + Me.GridViewDocSearch4.OptionsSelection.EnableAppearanceFocusedCell = False + Me.GridViewDocSearch4.OptionsSelection.EnableAppearanceHideSelection = False + Me.GridViewDocSearch4.OptionsSelection.MultiSelect = True + Me.GridViewDocSearch4.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CellSelect + Me.GridViewDocSearch4.OptionsView.EnableAppearanceEvenRow = True + Me.GridViewDocSearch4.OptionsView.ShowAutoFilterRow = True + ' + 'XtraTabPageDoc5 + ' + Me.XtraTabPageDoc5.Controls.Add(Me.GridControlDocSearch5) + Me.XtraTabPageDoc5.Name = "XtraTabPageDoc5" + resources.ApplyResources(Me.XtraTabPageDoc5, "XtraTabPageDoc5") + ' + 'GridControlDocSearch5 + ' + resources.ApplyResources(Me.GridControlDocSearch5, "GridControlDocSearch5") + Me.GridControlDocSearch5.MainView = Me.GridViewDocSearch5 + Me.GridControlDocSearch5.Name = "GridControlDocSearch5" + Me.GridControlDocSearch5.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewDocSearch5}) + ' + 'GridViewDocSearch5 + ' + Me.GridViewDocSearch5.Appearance.EvenRow.BackColor = System.Drawing.Color.Aqua + Me.GridViewDocSearch5.Appearance.EvenRow.Options.UseBackColor = True + Me.GridViewDocSearch5.Appearance.SelectedRow.BackColor = System.Drawing.Color.Lime + Me.GridViewDocSearch5.Appearance.SelectedRow.Options.UseBackColor = True + Me.GridViewDocSearch5.GridControl = Me.GridControlDocSearch5 + Me.GridViewDocSearch5.Name = "GridViewDocSearch5" + Me.GridViewDocSearch5.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False] + Me.GridViewDocSearch5.OptionsFind.AlwaysVisible = True + Me.GridViewDocSearch5.OptionsSelection.EnableAppearanceFocusedCell = False + Me.GridViewDocSearch5.OptionsSelection.EnableAppearanceHideSelection = False + Me.GridViewDocSearch5.OptionsSelection.MultiSelect = True + Me.GridViewDocSearch5.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CellSelect + Me.GridViewDocSearch5.OptionsView.EnableAppearanceEvenRow = True + Me.GridViewDocSearch5.OptionsView.ShowAutoFilterRow = True + ' 'ToolStrip1 ' Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripDropDownButtonFile, Me.ToolStripButtonRefreshSearches}) @@ -159,32 +332,6 @@ Partial Class frmValidatorSearch resources.ApplyResources(Me.ToolStripButtonRefreshSearches, "ToolStripButtonRefreshSearches") Me.ToolStripButtonRefreshSearches.Name = "ToolStripButtonRefreshSearches" ' - 'GridControlDocSearch1 - ' - resources.ApplyResources(Me.GridControlDocSearch1, "GridControlDocSearch1") - GridLevelNode1.RelationName = "Level1" - Me.GridControlDocSearch1.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode1}) - Me.GridControlDocSearch1.MainView = Me.GridViewDocSearch1 - Me.GridControlDocSearch1.Name = "GridControlDocSearch1" - Me.GridControlDocSearch1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewDocSearch1}) - ' - 'GridViewDocSearch1 - ' - Me.GridViewDocSearch1.Appearance.EvenRow.BackColor = CType(resources.GetObject("GridViewDocSearch1.Appearance.EvenRow.BackColor"), System.Drawing.Color) - Me.GridViewDocSearch1.Appearance.EvenRow.Options.UseBackColor = True - Me.GridViewDocSearch1.Appearance.SelectedRow.BackColor = CType(resources.GetObject("GridViewDocSearch1.Appearance.SelectedRow.BackColor"), System.Drawing.Color) - Me.GridViewDocSearch1.Appearance.SelectedRow.Options.UseBackColor = True - Me.GridViewDocSearch1.GridControl = Me.GridControlDocSearch1 - Me.GridViewDocSearch1.Name = "GridViewDocSearch1" - Me.GridViewDocSearch1.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False] - Me.GridViewDocSearch1.OptionsFind.AlwaysVisible = True - Me.GridViewDocSearch1.OptionsSelection.EnableAppearanceFocusedCell = False - Me.GridViewDocSearch1.OptionsSelection.EnableAppearanceHideSelection = False - Me.GridViewDocSearch1.OptionsSelection.MultiSelect = True - Me.GridViewDocSearch1.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CellSelect - Me.GridViewDocSearch1.OptionsView.EnableAppearanceEvenRow = True - Me.GridViewDocSearch1.OptionsView.ShowAutoFilterRow = True - ' 'SplitContainerSearches ' Me.SplitContainerSearches.DataBindings.Add(New System.Windows.Forms.Binding("SplitterDistance", Global.DD_PM_WINDREAM.My.MySettings.Default, "frmValSearchSplitterDistance", True, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged)) @@ -198,7 +345,7 @@ Partial Class frmValidatorSearch ' 'SplitContainerSearches.Panel2 ' - Me.SplitContainerSearches.Panel2.Controls.Add(Me.XtraTabControlDocs) + Me.SplitContainerSearches.Panel2.Controls.Add(Me.SplitContainerControlDoc) Me.SplitContainerSearches.Panel2.Controls.Add(Me.ToolStrip2) Me.SplitContainerSearches.SplitterDistance = Global.DD_PM_WINDREAM.My.MySettings.Default.frmValSearchSplitterDistance ' @@ -218,17 +365,17 @@ Partial Class frmValidatorSearch 'GridControlSearch1 ' resources.ApplyResources(Me.GridControlSearch1, "GridControlSearch1") - GridLevelNode2.RelationName = "Level1" - Me.GridControlSearch1.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode2}) + GridLevelNode1.RelationName = "Level1" + Me.GridControlSearch1.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode1}) Me.GridControlSearch1.MainView = Me.GridViewSearch1 Me.GridControlSearch1.Name = "GridControlSearch1" Me.GridControlSearch1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewSearch1}) ' 'GridViewSearch1 ' - Me.GridViewSearch1.Appearance.EvenRow.BackColor = CType(resources.GetObject("GridViewSearch1.Appearance.EvenRow.BackColor"), System.Drawing.Color) + Me.GridViewSearch1.Appearance.EvenRow.BackColor = System.Drawing.Color.LightBlue Me.GridViewSearch1.Appearance.EvenRow.Options.UseBackColor = True - Me.GridViewSearch1.Appearance.SelectedRow.BackColor = CType(resources.GetObject("GridViewSearch1.Appearance.SelectedRow.BackColor"), System.Drawing.Color) + Me.GridViewSearch1.Appearance.SelectedRow.BackColor = System.Drawing.Color.Lime Me.GridViewSearch1.Appearance.SelectedRow.Options.UseBackColor = True Me.GridViewSearch1.GridControl = Me.GridControlSearch1 Me.GridViewSearch1.Name = "GridViewSearch1" @@ -250,17 +397,17 @@ Partial Class frmValidatorSearch 'GridControlSearch2 ' resources.ApplyResources(Me.GridControlSearch2, "GridControlSearch2") - GridLevelNode3.RelationName = "Level1" - Me.GridControlSearch2.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode3}) + GridLevelNode2.RelationName = "Level1" + Me.GridControlSearch2.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode2}) Me.GridControlSearch2.MainView = Me.GridViewSearch2 Me.GridControlSearch2.Name = "GridControlSearch2" Me.GridControlSearch2.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewSearch2}) ' 'GridViewSearch2 ' - Me.GridViewSearch2.Appearance.EvenRow.BackColor = CType(resources.GetObject("GridViewSearch2.Appearance.EvenRow.BackColor"), System.Drawing.Color) + Me.GridViewSearch2.Appearance.EvenRow.BackColor = System.Drawing.Color.LightBlue Me.GridViewSearch2.Appearance.EvenRow.Options.UseBackColor = True - Me.GridViewSearch2.Appearance.SelectedRow.BackColor = CType(resources.GetObject("GridViewSearch2.Appearance.SelectedRow.BackColor"), System.Drawing.Color) + Me.GridViewSearch2.Appearance.SelectedRow.BackColor = System.Drawing.Color.Lime Me.GridViewSearch2.Appearance.SelectedRow.Options.UseBackColor = True Me.GridViewSearch2.GridControl = Me.GridControlSearch2 Me.GridViewSearch2.Name = "GridViewSearch2" @@ -282,17 +429,17 @@ Partial Class frmValidatorSearch 'GridControlSearch3 ' resources.ApplyResources(Me.GridControlSearch3, "GridControlSearch3") - GridLevelNode4.RelationName = "Level1" - Me.GridControlSearch3.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode4}) + GridLevelNode3.RelationName = "Level1" + Me.GridControlSearch3.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode3}) Me.GridControlSearch3.MainView = Me.GridViewSearch3 Me.GridControlSearch3.Name = "GridControlSearch3" Me.GridControlSearch3.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewSearch3}) ' 'GridViewSearch3 ' - Me.GridViewSearch3.Appearance.EvenRow.BackColor = CType(resources.GetObject("GridViewSearch3.Appearance.EvenRow.BackColor"), System.Drawing.Color) + Me.GridViewSearch3.Appearance.EvenRow.BackColor = System.Drawing.Color.LightBlue Me.GridViewSearch3.Appearance.EvenRow.Options.UseBackColor = True - Me.GridViewSearch3.Appearance.SelectedRow.BackColor = CType(resources.GetObject("GridViewSearch3.Appearance.SelectedRow.BackColor"), System.Drawing.Color) + Me.GridViewSearch3.Appearance.SelectedRow.BackColor = System.Drawing.Color.Lime Me.GridViewSearch3.Appearance.SelectedRow.Options.UseBackColor = True Me.GridViewSearch3.GridControl = Me.GridControlSearch3 Me.GridViewSearch3.Name = "GridViewSearch3" @@ -314,17 +461,17 @@ Partial Class frmValidatorSearch 'GridControlSearch4 ' resources.ApplyResources(Me.GridControlSearch4, "GridControlSearch4") - GridLevelNode5.RelationName = "Level1" - Me.GridControlSearch4.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode5}) + GridLevelNode4.RelationName = "Level1" + Me.GridControlSearch4.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode4}) Me.GridControlSearch4.MainView = Me.GridViewSearch4 Me.GridControlSearch4.Name = "GridControlSearch4" Me.GridControlSearch4.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewSearch4}) ' 'GridViewSearch4 ' - Me.GridViewSearch4.Appearance.EvenRow.BackColor = CType(resources.GetObject("GridViewSearch4.Appearance.EvenRow.BackColor"), System.Drawing.Color) + Me.GridViewSearch4.Appearance.EvenRow.BackColor = System.Drawing.Color.LightBlue Me.GridViewSearch4.Appearance.EvenRow.Options.UseBackColor = True - Me.GridViewSearch4.Appearance.SelectedRow.BackColor = CType(resources.GetObject("GridViewSearch4.Appearance.SelectedRow.BackColor"), System.Drawing.Color) + Me.GridViewSearch4.Appearance.SelectedRow.BackColor = System.Drawing.Color.Lime Me.GridViewSearch4.Appearance.SelectedRow.Options.UseBackColor = True Me.GridViewSearch4.GridControl = Me.GridControlSearch4 Me.GridViewSearch4.Name = "GridViewSearch4" @@ -346,17 +493,17 @@ Partial Class frmValidatorSearch 'GridControlSearch5 ' resources.ApplyResources(Me.GridControlSearch5, "GridControlSearch5") - GridLevelNode6.RelationName = "Level1" - Me.GridControlSearch5.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode6}) + GridLevelNode5.RelationName = "Level1" + Me.GridControlSearch5.LevelTree.Nodes.AddRange(New DevExpress.XtraGrid.GridLevelNode() {GridLevelNode5}) Me.GridControlSearch5.MainView = Me.GridViewSearch5 Me.GridControlSearch5.Name = "GridControlSearch5" Me.GridControlSearch5.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewSearch5}) ' 'GridViewSearch5 ' - Me.GridViewSearch5.Appearance.EvenRow.BackColor = CType(resources.GetObject("GridViewSearch5.Appearance.EvenRow.BackColor"), System.Drawing.Color) + Me.GridViewSearch5.Appearance.EvenRow.BackColor = System.Drawing.Color.LightBlue Me.GridViewSearch5.Appearance.EvenRow.Options.UseBackColor = True - Me.GridViewSearch5.Appearance.SelectedRow.BackColor = CType(resources.GetObject("GridViewSearch5.Appearance.SelectedRow.BackColor"), System.Drawing.Color) + Me.GridViewSearch5.Appearance.SelectedRow.BackColor = System.Drawing.Color.Lime Me.GridViewSearch5.Appearance.SelectedRow.Options.UseBackColor = True Me.GridViewSearch5.GridControl = Me.GridControlSearch5 Me.GridViewSearch5.Name = "GridViewSearch5" @@ -380,139 +527,6 @@ Partial Class frmValidatorSearch Me.tsslblSQL.Name = "tsslblSQL" resources.ApplyResources(Me.tsslblSQL, "tsslblSQL") ' - 'XtraTabControlDocs - ' - resources.ApplyResources(Me.XtraTabControlDocs, "XtraTabControlDocs") - Me.XtraTabControlDocs.Name = "XtraTabControlDocs" - Me.XtraTabControlDocs.SelectedTabPage = Me.XtraTabPageDoc1 - Me.XtraTabControlDocs.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPageDoc1, Me.XtraTabPageDoc2, Me.XtraTabPageDoc3, Me.XtraTabPageDoc4, Me.XtraTabPageDoc5}) - ' - 'XtraTabPageDoc1 - ' - Me.XtraTabPageDoc1.Controls.Add(Me.GridControlDocSearch1) - Me.XtraTabPageDoc1.Name = "XtraTabPageDoc1" - resources.ApplyResources(Me.XtraTabPageDoc1, "XtraTabPageDoc1") - ' - 'XtraTabPageDoc2 - ' - Me.XtraTabPageDoc2.Controls.Add(Me.GridControlDocSearch2) - Me.XtraTabPageDoc2.Name = "XtraTabPageDoc2" - resources.ApplyResources(Me.XtraTabPageDoc2, "XtraTabPageDoc2") - ' - 'GridControlDocSearch2 - ' - resources.ApplyResources(Me.GridControlDocSearch2, "GridControlDocSearch2") - Me.GridControlDocSearch2.MainView = Me.GridViewDocSearch2 - Me.GridControlDocSearch2.Name = "GridControlDocSearch2" - Me.GridControlDocSearch2.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewDocSearch2}) - ' - 'GridViewDocSearch2 - ' - Me.GridViewDocSearch2.Appearance.EvenRow.BackColor = CType(resources.GetObject("GridViewDocSearch2.Appearance.EvenRow.BackColor"), System.Drawing.Color) - Me.GridViewDocSearch2.Appearance.EvenRow.Options.UseBackColor = True - Me.GridViewDocSearch2.Appearance.SelectedRow.BackColor = CType(resources.GetObject("GridViewDocSearch2.Appearance.SelectedRow.BackColor"), System.Drawing.Color) - Me.GridViewDocSearch2.Appearance.SelectedRow.Options.UseBackColor = True - Me.GridViewDocSearch2.GridControl = Me.GridControlDocSearch2 - Me.GridViewDocSearch2.Name = "GridViewDocSearch2" - Me.GridViewDocSearch2.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False] - Me.GridViewDocSearch2.OptionsFind.AlwaysVisible = True - Me.GridViewDocSearch2.OptionsSelection.EnableAppearanceFocusedCell = False - Me.GridViewDocSearch2.OptionsSelection.EnableAppearanceHideSelection = False - Me.GridViewDocSearch2.OptionsSelection.MultiSelect = True - Me.GridViewDocSearch2.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CellSelect - Me.GridViewDocSearch2.OptionsView.EnableAppearanceEvenRow = True - Me.GridViewDocSearch2.OptionsView.ShowAutoFilterRow = True - ' - 'XtraTabPageDoc3 - ' - Me.XtraTabPageDoc3.Controls.Add(Me.GridControlDocSearch3) - Me.XtraTabPageDoc3.Name = "XtraTabPageDoc3" - resources.ApplyResources(Me.XtraTabPageDoc3, "XtraTabPageDoc3") - ' - 'GridControlDocSearch3 - ' - resources.ApplyResources(Me.GridControlDocSearch3, "GridControlDocSearch3") - Me.GridControlDocSearch3.MainView = Me.GridViewDocSearch3 - Me.GridControlDocSearch3.Name = "GridControlDocSearch3" - Me.GridControlDocSearch3.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewDocSearch3}) - ' - 'GridViewDocSearch3 - ' - Me.GridViewDocSearch3.Appearance.EvenRow.BackColor = CType(resources.GetObject("GridViewDocSearch3.Appearance.EvenRow.BackColor"), System.Drawing.Color) - Me.GridViewDocSearch3.Appearance.EvenRow.Options.UseBackColor = True - Me.GridViewDocSearch3.Appearance.SelectedRow.BackColor = CType(resources.GetObject("GridViewDocSearch3.Appearance.SelectedRow.BackColor"), System.Drawing.Color) - Me.GridViewDocSearch3.Appearance.SelectedRow.Options.UseBackColor = True - Me.GridViewDocSearch3.GridControl = Me.GridControlDocSearch3 - Me.GridViewDocSearch3.Name = "GridViewDocSearch3" - Me.GridViewDocSearch3.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False] - Me.GridViewDocSearch3.OptionsFind.AlwaysVisible = True - Me.GridViewDocSearch3.OptionsSelection.EnableAppearanceFocusedCell = False - Me.GridViewDocSearch3.OptionsSelection.EnableAppearanceHideSelection = False - Me.GridViewDocSearch3.OptionsSelection.MultiSelect = True - Me.GridViewDocSearch3.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CellSelect - Me.GridViewDocSearch3.OptionsView.EnableAppearanceEvenRow = True - Me.GridViewDocSearch3.OptionsView.ShowAutoFilterRow = True - ' - 'XtraTabPageDoc4 - ' - Me.XtraTabPageDoc4.Controls.Add(Me.GridControlDocSearch4) - Me.XtraTabPageDoc4.Name = "XtraTabPageDoc4" - resources.ApplyResources(Me.XtraTabPageDoc4, "XtraTabPageDoc4") - ' - 'GridControlDocSearch4 - ' - resources.ApplyResources(Me.GridControlDocSearch4, "GridControlDocSearch4") - Me.GridControlDocSearch4.MainView = Me.GridViewDocSearch4 - Me.GridControlDocSearch4.Name = "GridControlDocSearch4" - Me.GridControlDocSearch4.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewDocSearch4}) - ' - 'GridViewDocSearch4 - ' - Me.GridViewDocSearch4.Appearance.EvenRow.BackColor = CType(resources.GetObject("GridViewDocSearch4.Appearance.EvenRow.BackColor"), System.Drawing.Color) - Me.GridViewDocSearch4.Appearance.EvenRow.Options.UseBackColor = True - Me.GridViewDocSearch4.Appearance.SelectedRow.BackColor = CType(resources.GetObject("GridViewDocSearch4.Appearance.SelectedRow.BackColor"), System.Drawing.Color) - Me.GridViewDocSearch4.Appearance.SelectedRow.Options.UseBackColor = True - Me.GridViewDocSearch4.GridControl = Me.GridControlDocSearch4 - Me.GridViewDocSearch4.Name = "GridViewDocSearch4" - Me.GridViewDocSearch4.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False] - Me.GridViewDocSearch4.OptionsFind.AlwaysVisible = True - Me.GridViewDocSearch4.OptionsSelection.EnableAppearanceFocusedCell = False - Me.GridViewDocSearch4.OptionsSelection.EnableAppearanceHideSelection = False - Me.GridViewDocSearch4.OptionsSelection.MultiSelect = True - Me.GridViewDocSearch4.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CellSelect - Me.GridViewDocSearch4.OptionsView.EnableAppearanceEvenRow = True - Me.GridViewDocSearch4.OptionsView.ShowAutoFilterRow = True - ' - 'XtraTabPageDoc5 - ' - Me.XtraTabPageDoc5.Controls.Add(Me.GridControlDocSearch5) - Me.XtraTabPageDoc5.Name = "XtraTabPageDoc5" - resources.ApplyResources(Me.XtraTabPageDoc5, "XtraTabPageDoc5") - ' - 'GridControlDocSearch5 - ' - resources.ApplyResources(Me.GridControlDocSearch5, "GridControlDocSearch5") - Me.GridControlDocSearch5.MainView = Me.GridViewDocSearch5 - Me.GridControlDocSearch5.Name = "GridControlDocSearch5" - Me.GridControlDocSearch5.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewDocSearch5}) - ' - 'GridViewDocSearch5 - ' - Me.GridViewDocSearch5.Appearance.EvenRow.BackColor = CType(resources.GetObject("GridViewDocSearch5.Appearance.EvenRow.BackColor"), System.Drawing.Color) - Me.GridViewDocSearch5.Appearance.EvenRow.Options.UseBackColor = True - Me.GridViewDocSearch5.Appearance.SelectedRow.BackColor = CType(resources.GetObject("GridViewDocSearch5.Appearance.SelectedRow.BackColor"), System.Drawing.Color) - Me.GridViewDocSearch5.Appearance.SelectedRow.Options.UseBackColor = True - Me.GridViewDocSearch5.GridControl = Me.GridControlDocSearch5 - Me.GridViewDocSearch5.Name = "GridViewDocSearch5" - Me.GridViewDocSearch5.OptionsClipboard.CopyColumnHeaders = DevExpress.Utils.DefaultBoolean.[False] - Me.GridViewDocSearch5.OptionsFind.AlwaysVisible = True - Me.GridViewDocSearch5.OptionsSelection.EnableAppearanceFocusedCell = False - Me.GridViewDocSearch5.OptionsSelection.EnableAppearanceHideSelection = False - Me.GridViewDocSearch5.OptionsSelection.MultiSelect = True - Me.GridViewDocSearch5.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CellSelect - Me.GridViewDocSearch5.OptionsView.EnableAppearanceEvenRow = True - Me.GridViewDocSearch5.OptionsView.ShowAutoFilterRow = True - ' 'ToolStrip2 ' resources.ApplyResources(Me.ToolStrip2, "ToolStrip2") @@ -579,19 +593,40 @@ Partial Class frmValidatorSearch Me.ToolStripMenuItem4.Name = "ToolStripMenuItem4" resources.ApplyResources(Me.ToolStripMenuItem4, "ToolStripMenuItem4") ' + 'DocumentViewer1 + ' + resources.ApplyResources(Me.DocumentViewer1, "DocumentViewer1") + Me.DocumentViewer1.Name = "DocumentViewer1" + ' 'frmValidatorSearch ' resources.ApplyResources(Me, "$this") Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.Controls.Add(Me.SplitContainerSearches) Me.Controls.Add(Me.ToolStrip1) - Me.MaximizeBox = False Me.MinimizeBox = False Me.Name = "frmValidatorSearch" - Me.ToolStrip1.ResumeLayout(False) - Me.ToolStrip1.PerformLayout() + CType(Me.SplitContainerControlDoc, System.ComponentModel.ISupportInitialize).EndInit() + Me.SplitContainerControlDoc.ResumeLayout(False) + CType(Me.XtraTabControlDocs, System.ComponentModel.ISupportInitialize).EndInit() + Me.XtraTabControlDocs.ResumeLayout(False) + Me.XtraTabPageDoc1.ResumeLayout(False) CType(Me.GridControlDocSearch1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.GridViewDocSearch1, System.ComponentModel.ISupportInitialize).EndInit() + Me.XtraTabPageDoc2.ResumeLayout(False) + CType(Me.GridControlDocSearch2, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.GridViewDocSearch2, System.ComponentModel.ISupportInitialize).EndInit() + Me.XtraTabPageDoc3.ResumeLayout(False) + CType(Me.GridControlDocSearch3, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.GridViewDocSearch3, System.ComponentModel.ISupportInitialize).EndInit() + Me.XtraTabPageDoc4.ResumeLayout(False) + CType(Me.GridControlDocSearch4, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.GridViewDocSearch4, System.ComponentModel.ISupportInitialize).EndInit() + Me.XtraTabPageDoc5.ResumeLayout(False) + CType(Me.GridControlDocSearch5, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.GridViewDocSearch5, System.ComponentModel.ISupportInitialize).EndInit() + Me.ToolStrip1.ResumeLayout(False) + Me.ToolStrip1.PerformLayout() Me.SplitContainerSearches.Panel1.ResumeLayout(False) Me.SplitContainerSearches.Panel1.PerformLayout() Me.SplitContainerSearches.Panel2.ResumeLayout(False) @@ -617,21 +652,6 @@ Partial Class frmValidatorSearch CType(Me.GridViewSearch5, System.ComponentModel.ISupportInitialize).EndInit() Me.StatusStrip1.ResumeLayout(False) Me.StatusStrip1.PerformLayout() - CType(Me.XtraTabControlDocs, System.ComponentModel.ISupportInitialize).EndInit() - Me.XtraTabControlDocs.ResumeLayout(False) - Me.XtraTabPageDoc1.ResumeLayout(False) - Me.XtraTabPageDoc2.ResumeLayout(False) - CType(Me.GridControlDocSearch2, System.ComponentModel.ISupportInitialize).EndInit() - CType(Me.GridViewDocSearch2, System.ComponentModel.ISupportInitialize).EndInit() - Me.XtraTabPageDoc3.ResumeLayout(False) - CType(Me.GridControlDocSearch3, System.ComponentModel.ISupportInitialize).EndInit() - CType(Me.GridViewDocSearch3, System.ComponentModel.ISupportInitialize).EndInit() - Me.XtraTabPageDoc4.ResumeLayout(False) - CType(Me.GridControlDocSearch4, System.ComponentModel.ISupportInitialize).EndInit() - CType(Me.GridViewDocSearch4, System.ComponentModel.ISupportInitialize).EndInit() - Me.XtraTabPageDoc5.ResumeLayout(False) - CType(Me.GridControlDocSearch5, System.ComponentModel.ISupportInitialize).EndInit() - CType(Me.GridViewDocSearch5, System.ComponentModel.ISupportInitialize).EndInit() Me.ToolStrip2.ResumeLayout(False) Me.ToolStrip2.PerformLayout() Me.ContextMenuStripWMFile.ResumeLayout(False) @@ -693,4 +713,6 @@ Partial Class frmValidatorSearch Friend WithEvents ToolStripMenuItem4 As ToolStripMenuItem Friend WithEvents StatusStrip1 As StatusStrip Friend WithEvents tsslblSQL As ToolStripStatusLabel + Friend WithEvents SplitContainerControlDoc As DevExpress.XtraEditors.SplitContainerControl + Friend WithEvents DocumentViewer1 As DigitalData.Controls.DocumentViewer.DocumentViewer End Class diff --git a/app/DD_PM_WINDREAM/frmValidatorSearch.resx b/app/DD_PM_WINDREAM/frmValidatorSearch.resx index 4233999..400a76d 100644 --- a/app/DD_PM_WINDREAM/frmValidatorSearch.resx +++ b/app/DD_PM_WINDREAM/frmValidatorSearch.resx @@ -117,47 +117,366 @@ System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + Fill + + + + 0, 0 + + + Fill + + + 0, 0 + + + GridControlDocSearch1 + + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabPageDoc1 + + + 0 + + + 349, 557 + + + XtraTabPage1 + + + XtraTabPageDoc1 + + + DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabControlDocs + + + 0 + + + 351, 582 + + + + 4 + + + GridControlDocSearch2 + + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabPageDoc2 + + + 0 + + + 349, 557 + + + XtraTabPage2 + + + XtraTabPageDoc2 + + + DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabControlDocs + + + 1 + + + GridControlDocSearch3 + + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabPageDoc3 + + + 0 + + + 349, 557 + + + XtraTabPage1 + + + XtraTabPageDoc3 + + + DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabControlDocs + + + 2 + + + GridControlDocSearch4 + + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabPageDoc4 + + + 0 + + + 349, 557 + + + XtraTabPage2 + + + XtraTabPageDoc4 + + + DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabControlDocs + + + 3 + + + GridControlDocSearch5 + + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabPageDoc5 + + + 0 + + + 349, 557 + + + XtraTabPage3 + + + XtraTabPageDoc5 + + + DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabControlDocs + + + 4 + + + XtraTabControlDocs + + + DevExpress.XtraTab.XtraTabControl, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + SplitContainerControlDoc.Panel1 + + + 0 + + + Panel1 + + + Fill + + + 0, 0 + + + 286, 582 + + + 0 + + + DocumentViewer1 + + + DigitalData.Controls.DocumentViewer.DocumentViewer, DigitalData.Controls.DocumentViewer, Version=1.0.0.0, Culture=neutral, PublicKeyToken=null + + + SplitContainerControlDoc.Panel2 + + + 0 + + + Panel2 + + + 647, 582 + + + 6 + + + SplitContainerControlDoc + + + DevExpress.XtraEditors.SplitContainerControl, DevExpress.Utils.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + SplitContainerSearches.Panel2 + + + 0 + + + Fill + + + 0, 0 + + + 349, 557 + + + 0 + + + GridControlDocSearch1 + + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabPageDoc1 + + + 0 + + + Fill + + + 0, 0 + + + 349, 557 + + + 1 + + + GridControlDocSearch2 + + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabPageDoc2 + + + 0 + + + Fill + + + 0, 0 + + + 349, 557 + + + 1 + + + GridControlDocSearch3 + + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabPageDoc3 + + + 0 + + + Fill + + + 0, 0 + + + 349, 557 + + + 1 + + + GridControlDocSearch4 + + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabPageDoc4 + + + 0 + + + Fill + + + 0, 0 + + + 349, 557 + + + 1 + + + GridControlDocSearch5 + + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabPageDoc5 + + + 0 + 17, 17 - - - 148, 22 - - - Öffnen - - - 148, 22 - - - Eigenschaften - - - Magenta - - - 63, 22 - - - Datei - - - Magenta - - - 131, 22 - - - Aktualisiere Ansicht - 0, 0 - 1203, 25 + 1214, 25 - 0 @@ -176,36 +495,35 @@ 3 - - - Fill + + Magenta - - 0, 0 + + 63, 22 - - Aqua + + Datei - - Lime + + 148, 22 - - 635, 372 + + Öffnen - - 0 + + 148, 22 - - GridControlDocSearch1 + + Eigenschaften - - DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + Magenta - - XtraTabPageDoc1 + + 131, 22 - - 0 + + Aktualisiere Ansicht Fill @@ -219,24 +537,6 @@ 0, 0 - - Fill - - - 0, 0 - - - LightBlue - - - Lime - - - 552, 375 - - - 1 - GridControlSearch1 @@ -250,7 +550,7 @@ 0 - 552, 375 + 561, 560 Search1 @@ -268,29 +568,11 @@ 0 - 558, 403 + 563, 585 4 - - Fill - - - 0, 0 - - - LightBlue - - - Lime - - - 552, 375 - - - 2 - GridControlSearch2 @@ -304,7 +586,7 @@ 0 - 552, 375 + 561, 560 Search2 @@ -321,24 +603,6 @@ 1 - - Fill - - - 0, 0 - - - LightBlue - - - Lime - - - 552, 375 - - - 2 - GridControlSearch3 @@ -352,7 +616,7 @@ 0 - 552, 375 + 561, 560 XtraTabPage1 @@ -369,24 +633,6 @@ 2 - - Fill - - - 0, 0 - - - LightBlue - - - Lime - - - 552, 375 - - - 2 - GridControlSearch4 @@ -400,7 +646,7 @@ 0 - 552, 375 + 561, 560 XtraTabPage2 @@ -417,24 +663,6 @@ 3 - - Fill - - - 0, 0 - - - LightBlue - - - Lime - - - 552, 375 - - - 2 - GridControlSearch5 @@ -448,7 +676,7 @@ 0 - 552, 375 + 561, 560 XtraTabPage3 @@ -478,19 +706,13 @@ 0 - 712, 17 + 595, 17 - - 91, 17 - - - No action so far - - 0, 403 + 0, 585 - 558, 22 + 563, 22 5 @@ -522,263 +744,17 @@ 0 - - Fill - - - 0, 0 - - - 635, 372 - - - XtraTabPage1 - - - XtraTabPageDoc1 - - - DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - XtraTabControlDocs - - - 0 - - - 641, 400 - - - 4 - - - Fill - - - 0, 0 - - - Aqua - - - Lime - - - 635, 372 - - - 1 - - - GridControlDocSearch2 - - - DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - XtraTabPageDoc2 - - - 0 - - - 635, 372 - - - XtraTabPage2 - - - XtraTabPageDoc2 - - - DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - XtraTabControlDocs - - - 1 - - - Fill - - - 0, 0 - - - Aqua - - - Lime - - - 635, 372 - - - 1 - - - GridControlDocSearch3 - - - DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - XtraTabPageDoc3 - - - 0 - - - 635, 372 - - - XtraTabPage1 - - - XtraTabPageDoc3 - - - DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - XtraTabControlDocs - - - 2 - - - Fill - - - 0, 0 - - - Aqua - - - Lime - - - 635, 372 - - - 1 - - - GridControlDocSearch4 - - - DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - XtraTabPageDoc4 - - - 0 - - - 635, 372 - - - XtraTabPage2 - - - XtraTabPageDoc4 - - - DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - XtraTabControlDocs - - - 3 - - - Fill - - - 0, 0 - - - Aqua - - - Lime - - - 635, 372 - - - 1 - - - GridControlDocSearch5 - - - DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - XtraTabPageDoc5 - - - 0 - - - 635, 372 - - - XtraTabPage3 - - - XtraTabPageDoc5 - - - DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - XtraTabControlDocs - - - 4 - - - XtraTabControlDocs - - - DevExpress.XtraTab.XtraTabControl, DevExpress.XtraEditors.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - SplitContainerSearches.Panel2 - - - 0 - - 433, 17 + 316, 17 Bottom - - 61, 22 - - - tslblDocID - - - 91, 22 - - - No action so far - - 0, 400 + 0, 582 - 641, 25 + 647, 25 3 @@ -811,7 +787,7 @@ 1 - 1203, 425 + 1214, 607 3 @@ -828,9 +804,156 @@ 2 + + Fill + + + 0, 0 + + + 561, 560 + + + 1 + + + GridControlSearch1 + + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabPageSearch1 + + + 0 + + + Fill + + + 0, 0 + + + 561, 560 + + + 2 + + + GridControlSearch2 + + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabPageSearch2 + + + 0 + + + Fill + + + 0, 0 + + + 561, 560 + + + 2 + + + GridControlSearch3 + + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabPageSearch3 + + + 0 + + + Fill + + + 0, 0 + + + 561, 560 + + + 2 + + + GridControlSearch4 + + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabPageSearch4 + + + 0 + + + Fill + + + 0, 0 + + + 561, 560 + + + 2 + + + GridControlSearch5 + + + DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + XtraTabPageSearch5 + + + 0 + + + 91, 17 + + + No action so far + + + 61, 22 + + + tslblDocID + + + 91, 22 + + + No action so far + - 241, 17 + 124, 17 + + 182, 98 + + + ContextMenuStripWMFile + + + System.Windows.Forms.ContextMenuStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + iVBORw0KGgoAAAANSUhEUgAAACAAAAAZCAYAAABQDyyRAAAABGdBTUEAALGOfPtRkwAAACBjSFJNAAB6 @@ -933,27 +1056,9 @@ Layout zurücksetzen - - 182, 120 - - - ContextMenuStripWMFile - - - System.Windows.Forms.ContextMenuStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - 540, 17 + 423, 17 - - 139, 6 - - - 142, 22 - - - Aktualisieren - 143, 32 @@ -963,17 +1068,26 @@ System.Windows.Forms.ContextMenuStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + 139, 6 + + + 142, 22 + + + Aktualisieren + True - 167 + 81 6, 13 - 1203, 450 + 1214, 632 Tahoma, 8.25pt @@ -1014,6 +1128,36 @@ Zusätzliche Suchen + + GridViewDocSearch1 + + + DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + GridViewDocSearch2 + + + DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + GridViewDocSearch3 + + + DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + GridViewDocSearch4 + + + DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + + + GridViewDocSearch5 + + + DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a + ToolStripDropDownButtonFile @@ -1038,12 +1182,6 @@ System.Windows.Forms.ToolStripButton, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - GridViewDocSearch1 - - - DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - GridViewSearch1 @@ -1080,30 +1218,6 @@ System.Windows.Forms.ToolStripStatusLabel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - GridViewDocSearch2 - - - DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - GridViewDocSearch3 - - - DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - GridViewDocSearch4 - - - DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - - - GridViewDocSearch5 - - - DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a - tslblDocID diff --git a/app/DD_PM_WINDREAM/frmValidatorSearch.vb b/app/DD_PM_WINDREAM/frmValidatorSearch.vb index d8f3eb0..070a996 100644 --- a/app/DD_PM_WINDREAM/frmValidatorSearch.vb +++ b/app/DD_PM_WINDREAM/frmValidatorSearch.vb @@ -78,12 +78,13 @@ Public Class frmValidatorSearch End If XtraTabControlDocs.TabPages(p).Text = DTDOC.Rows(p).Item("TAB_TITLE") Next + End If End If Catch ex As Exception - + LOGGER.Error(ex) End Try End Sub @@ -367,6 +368,11 @@ Public Class frmValidatorSearch End Try End Function Private Sub frmValidatorSearch_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing + Try + DocumentViewer1.Done() + Catch ex As Exception + LOGGER.Warn($"Unexpected error in DocumentViewerValSearch.Done: {ex.Message}") + End Try Try ' Position und Größe speichern My.Settings.frmValidatorSearchSize = Me.Size @@ -377,9 +383,15 @@ Public Class frmValidatorSearch LOGGER.Error(ex) LOGGER.Info("Error in Save FormLayout: " & ex.Message) End Try + End Sub Private Sub frmValidatorSearch_Load(sender As Object, e As EventArgs) Handles Me.Load + Try + DocumentViewer1.Init(LOGCONFIG, GDPICTURE_LICENSE) + Catch ex As Exception + LOGGER.Warn("Error initializing DocViewDocsValdiatorSearch: " & ex.Message) + End Try SplitContainerSearches.Panel1Collapsed = True If My.Settings.frmValidatorSearchPosition.IsEmpty = False Then If My.Settings.frmValidatorSearchPosition.X > 0 And My.Settings.frmValidatorSearchPosition.Y > 0 Then @@ -454,8 +466,14 @@ Public Class frmValidatorSearch Dim msg = "Doc-ID: " & clsWMDocGrid.SELECTED_DOC_ID.ToString tslblDocID.Text = msg ToolStripDropDownButtonFile.Enabled = True - Else - tslblDocID.Text = "DocRow not selected" + If Not IsNothing(clsWMDocGrid.SELECTED_DOC_PATH) And Not IsNothing(DocumentViewer1) Then + If clsWMDocGrid.SELECTED_DOC_PATH <> "" Then + DocumentViewer1.LoadFile(clsWMDocGrid.SELECTED_DOC_PATH) + End If + End If + + Else + tslblDocID.Text = "DocRow not selected" ToolStripDropDownButtonFile.Enabled = False End If End Sub @@ -499,13 +517,11 @@ Public Class frmValidatorSearch End Sub Sub FileShow() Try - If IsNothing(clsWMDocGrid.DTDocuments) Then + If IsNothing(clsWMDocGrid.SELECTED_DOC_PATH) Then MsgBox("Could not read fileparameters(5)!", MsgBoxStyle.Exclamation) Exit Sub End If - For Each row As DataRow In clsWMDocGrid.DTDocuments.Rows - File_SYSOPEN(row.Item("DOC_PATH"), row.Item("DOC_ID")) - Next + File_SYSOPEN(clsWMDocGrid.SELECTED_DOC_PATH, clsWMDocGrid.SELECTED_DOC_ID) Catch ex As Exception End Try @@ -513,14 +529,20 @@ Public Class frmValidatorSearch Private Shared Sub File_SYSOPEN(RESULT_DOC_PATH As Object, DocID As String) Try If RESULT_DOC_PATH <> Nothing Then + If File.Exists(RESULT_DOC_PATH) Then + BW_DocPath = RESULT_DOC_PATH + BW_DocID = DocID - BW_DocPath = RESULT_DOC_PATH - BW_DocID = DocID + Dim BWFileHandler As New BackgroundWorker + AddHandler BWFileHandler.DoWork, AddressOf BWFileHandler_DoWork + BWFileHandler.RunWorkerAsync() + Else + MsgBox("Document is not existing or accessible!", MsgBoxStyle.Exclamation) - Dim BWFileHandler As New BackgroundWorker - AddHandler BWFileHandler.DoWork, AddressOf BWFileHandler_DoWork - BWFileHandler.RunWorkerAsync() + End If + Else + LOGGER.Warn("Attention: RESULT_DOC_PATH is nothing") End If Catch ex As Exception MsgBox("Unexpected Error in File_SYSOPEN:" & vbNewLine & ex.Message & vbNewLine & RESULT_DOC_PATH & vbNewLine & "DocID: " & DocID, MsgBoxStyle.Critical) @@ -531,8 +553,7 @@ Public Class frmValidatorSearch Try Dim oMyProcess = New Process() - Dim oExtension - Dim oSql + Try 'Dim oPSI As New ProcessStartInfo(BW_DocPath) oMyProcess.StartInfo.FileName = BW_DocPath