MS AdhocWorkflow

This commit is contained in:
SchreiberM 2022-11-17 17:07:33 +01:00
parent 09a61da565
commit 2e0efa7670
16 changed files with 10206 additions and 12913 deletions

View File

@ -505,7 +505,7 @@ Public Class ClassControlCreator
Dim oColumn = New DataColumn() With { Dim oColumn = New DataColumn() With {
.ColumnName = oRow.Item("SPALTENNAME"), .ColumnName = oRow.Item("SPALTENNAME"),
.Caption = oRow.Item("SPALTEN_HEADER"), .Caption = oRow.Item("SPALTEN_HEADER_LANG"),
.ReadOnly = False .ReadOnly = False
} }
Select Case oRow.Item("TYPE_COLUMN") Select Case oRow.Item("TYPE_COLUMN")

View File

@ -424,11 +424,12 @@ Public Class ClassInit
Dim oStopWatch As New RefreshHelper.SW("InitBasics") Dim oStopWatch As New RefreshHelper.SW("InitBasics")
Dim oSql = String.Format("select * from TBPM_KONFIGURATION WHERE GUID = 1") Dim oSql = String.Format("select * from TBPM_KONFIGURATION WHERE GUID = 1")
oStep = "TBPM_KONFIGURATION" oStep = "TBPM_KONFIGURATION"
'BASEDATA_DT_CONFIG = DataASorDB.GetDatatable("DD_ECM", oSql, "TBPM_KONFIGURATION", $"GUID = 1")
BASEDATA_DT_CONFIG = DatabaseFallback.GetDatatable("TBPM_KONFIGURATION", New GetDatatableOptions(oSql, DatabaseType.ECM) With { BASEDATA_DT_CONFIG = DatabaseFallback.GetDatatable("TBPM_KONFIGURATION", New GetDatatableOptions(oSql, DatabaseType.ECM) With {
.FilterExpression = $"GUID = 1" .FilterExpression = $"GUID = 1"
}) })
WMSUFFIX = BASEDATA_DT_CONFIG.Rows.Item(0).Item("WM_REL_PATH")
WMDriveLetter = "W"
Settings_LoadBasicConfig() Settings_LoadBasicConfig()
oStep = "TBDD_CONNECTION" oStep = "TBDD_CONNECTION"

View File

@ -131,6 +131,21 @@ Public Class ClassPMWindream
Return False Return False
End Try End Try
If oDocument.aObjectType.aName <> CURRENT_WMObjecttype Then
' ihr den entsprechenden Dokumenttyp zuweisen
oDocument.aObjectType = Me.oSession.GetWMObjectByName(WINDREAMLib.WMEntity.WMEntityObjectType, CURRENT_WMObjecttype)
' WMObject.aObjectType = Me.selectedProfile.Dokumenttyp
LOGGER.Debug("Objekttyp '" & oDocument.aObjectType.aName & "' was changed to '" & CURRENT_WMObjecttype & "'.")
Try
oDocument.Save()
Catch ex As Exception
' wenn es einen Fehler beim speichern gab, dann konnte auch kein Dokumenttyp gesetzt werden -> es kann also auch keine
' Indexierung stattfinden und die Indexierung muss nicht fortgesetzt werden
Return False
End Try
End If
Dim i As Integer = 0 Dim i As Integer = 0
Dim indexname As String Dim indexname As String

View File

@ -236,16 +236,20 @@ LOGGER.Error(ex)
End Function End Function
Public Function NormalizePath(Path As String) Public Function NormalizePath(pPath As String)
Dim oNormalizedPath As String Dim oNormalizedPath As String
If Path.StartsWith("\\windream") Then If pPath.StartsWith(WMSUFFIX) Then
oNormalizedPath = Path.Replace("\\windream\objects\", "") oNormalizedPath = pPath.Replace(WMSUFFIX, "")
ElseIf Path.StartsWith("\\") Then ElseIf pPath.StartsWith("\\") Then
oNormalizedPath = Path.Substring(1) oNormalizedPath = pPath.Substring(1)
ElseIf Path.StartsWith("\") Then ElseIf pPath.StartsWith("\") Then
Return Path Return pPath
ElseIf pPath.StartsWith(WMDriveLetter) Then
oNormalizedPath = pPath.Replace(WMDriveLetter & ":", "")
ElseIf pPath.StartsWith("\") = False Then
oNormalizedPath = "\" & pPath
Else Else
oNormalizedPath = "\" & Path oNormalizedPath = pPath
End If End If
Return oNormalizedPath Return oNormalizedPath

View File

@ -187,6 +187,9 @@
<SpecificVersion>False</SpecificVersion> <SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath> <HintPath>..\..\..\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
</Reference> </Reference>
<Reference Include="DigitalData.Modules.Windream">
<HintPath>..\..\..\DDModules\Windream\bin\Debug\DigitalData.Modules.Windream.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.ZooFlow, Version=1.2.0.0, Culture=neutral, processorArchitecture=MSIL"> <Reference Include="DigitalData.Modules.ZooFlow, Version=1.2.0.0, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion> <SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\DDModules\ZooFlow\bin\Debug\DigitalData.Modules.ZooFlow.dll</HintPath> <HintPath>..\..\..\DDModules\ZooFlow\bin\Debug\DigitalData.Modules.ZooFlow.dll</HintPath>

View File

@ -4,14 +4,19 @@ Imports DigitalData.Modules.Logging
Imports DigitalData.Modules.EDMI.API Imports DigitalData.Modules.EDMI.API
Imports DigitalData.Modules.Database Imports DigitalData.Modules.Database
Imports DigitalData.Modules.ZooFlow Imports DigitalData.Modules.ZooFlow
Imports DigitalData.Modules.Windream
Module ModuleRuntimeVariables Module ModuleRuntimeVariables
Public Const ConstAHWorkflow_BlindFile = 1
Public Const ConstAHWorkflow_IDB = 2
Public Const ConstWorkflowTypeRegular = 99
Public Property DatabaseECM As MSSQLServer Public Property DatabaseECM As MSSQLServer
Public Property DatabaseIDB As MSSQLServer Public Property DatabaseIDB As MSSQLServer
Public Property EDMIService As New State.ServiceState Public Property EDMIService As New State.ServiceState
Public Property User As New State.UserState Public Property User As New State.UserState
' Diese Werte müssen später zur Laufzeit geladen werden ' Diese Werte müssen später zur Laufzeit geladen werden
Public Property ActiveWorkflowType As Integer
Public Property BASEDATA_DT_TBDD_CONNECTION As DataTable Public Property BASEDATA_DT_TBDD_CONNECTION As DataTable
Public Property BASEDATA_DT_TBDD_SQL_COMMANDS As DataTable Public Property BASEDATA_DT_TBDD_SQL_COMMANDS As DataTable
Public Property BASEDATA_DT_CONFIG As DataTable Public Property BASEDATA_DT_CONFIG As DataTable
@ -29,14 +34,14 @@ Module ModuleRuntimeVariables
Public Property CURRENT_ProfilName As String Public Property CURRENT_ProfilName As String
Public Property CURRENT_PROFILE_LOG_INDEX As String Public Property CURRENT_PROFILE_LOG_INDEX As String
Public Property CURRENT_DOC_GUID As Integer Public Property CURRENT_DOC_GUID As Int64
Public Property CURRENT_DOC_ID As Integer Public Property CURRENT_DOC_ID As Int64
Public Property CURRENT_DOC_CREATION_DATE As String Public Property CURRENT_DOC_CREATION_DATE As String
Public Property CURRENT_DOC_CREATION_TIME As String Public Property CURRENT_DOC_CREATION_TIME As String
Public Property CURRENT_CONVERSATION_NEW As Long Public Property CURRENT_CONVERSATION_NEW As Long
Public Property CURRENT_JUMP_DOC_GUID As Integer Public Property CURRENT_JUMP_DOC_GUID As Int64
Public Property CURRENT_WMFILE As WMObject Public Property CURRENT_WMFILE As WMObject
Public Property CURRENT_DOC_PATH As String Public Property CURRENT_DOC_PATH As String
@ -105,6 +110,7 @@ Module ModuleRuntimeVariables
Public Property CURRENT_CLICKED_PROFILE_ID As Integer = 0 Public Property CURRENT_CLICKED_PROFILE_ID As Integer = 0
Public Property CURRENT_CLICKED_PROFILE_TITLE As String Public Property CURRENT_CLICKED_PROFILE_TITLE As String
Public Property CURRENT_WMObjecttype As String
Public Property DT_CLIENT_USER As DataTable Public Property DT_CLIENT_USER As DataTable
Public Property CLIENT_SELECTED As Integer = 0 Public Property CLIENT_SELECTED As Integer = 0
@ -136,6 +142,7 @@ Module ModuleRuntimeVariables
Public Property errormessage As String Public Property errormessage As String
Public Property WINDREAM As ClassPMWindream Public Property WINDREAM As ClassPMWindream
Public Property WINDREAM_MOD As Windream
Public Property WINDREAM_ALLG As ClassWindream_allgemein Public Property WINDREAM_ALLG As ClassWindream_allgemein
Public Property FINALINDICES As ClassFinalIndex Public Property FINALINDICES As ClassFinalIndex
Public Property IDBData As ClassIDBData Public Property IDBData As ClassIDBData
@ -160,4 +167,7 @@ Module ModuleRuntimeVariables
Public Property TimerRefresh_running As Boolean = False Public Property TimerRefresh_running As Boolean = False
Public Property SQL_PROFILES_USER As String = "" Public Property SQL_PROFILES_USER As String = ""
Public WMDriveLetter As String = "W"
Public WMSUFFIX As String = "\\windream\objects"
Public WM_AHWF_docPath As String
End Module End Module

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

View File

@ -2,6 +2,7 @@
Imports System.Data.SqlClient Imports System.Data.SqlClient
Imports System.IO Imports System.IO
Imports DD_LIB_Standards Imports DD_LIB_Standards
Imports DevExpress.Utils.Frames
Imports DevExpress.XtraGrid Imports DevExpress.XtraGrid
Imports DevExpress.XtraGrid.Views.Base Imports DevExpress.XtraGrid.Views.Base
Imports DevExpress.XtraGrid.Views.Grid Imports DevExpress.XtraGrid.Views.Grid
@ -133,7 +134,7 @@ Public Class frmAdministration
' MyIndicies_Types.Add(type) ' MyIndicies_Types.Add(type)
'Next 'Next
Catch ex As Exception Catch ex As Exception
_LOGGER.Error(ex) _Logger.Error(ex)
MsgBox("Error in GetIndices windream: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Achtung:") MsgBox("Error in GetIndices windream: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Achtung:")
PM_VEKTOR_INDEXComboBox.SelectedIndex = -1 PM_VEKTOR_INDEXComboBox.SelectedIndex = -1
cmbLOGIndex.SelectedIndex = -1 cmbLOGIndex.SelectedIndex = -1
@ -168,7 +169,7 @@ Public Class frmAdministration
MyIndicies_Types.Add(type) MyIndicies_Types.Add(type)
Next Next
Catch ex As Exception Catch ex As Exception
_LOGGER.Error(ex) _Logger.Error(ex)
MsgBox("Error in GetIndices IDB: " & vbNewLine & ex.Message, MsgBoxStyle.Critical) MsgBox("Error in GetIndices IDB: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try End Try
@ -217,7 +218,7 @@ Public Class frmAdministration
Me.cmbObjekttypen.Items.Add(aType.aName) Me.cmbObjekttypen.Items.Add(aType.aName)
Next Next
Catch ex As Exception Catch ex As Exception
_LOGGER.Error(ex) _Logger.Error(ex)
MsgBox("Es konnte keine Verbindung zum windream-Server hergestellt werden.", MsgBoxStyle.Critical, "Fehler beim Zugriff auf windream-Server") MsgBox("Es konnte keine Verbindung zum windream-Server hergestellt werden.", MsgBoxStyle.Critical, "Fehler beim Zugriff auf windream-Server")
End Try End Try
Else Else
@ -232,7 +233,13 @@ Public Class frmAdministration
End Sub End Sub
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles btnWMSuche.Click Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles btnWMSuche.Click
If IDB_ACTIVE = True Then If DISPLAY_MODEComboBox.Text = "AdHoc BlindFile" Then
Dim result As DialogResult = OpenFileDialog1.ShowDialog()
' Test result.
If result = Windows.Forms.DialogResult.OK Then
Me.WD_SEARCHTextBox.Text = OpenFileDialog1.FileName
End If
ElseIf IDB_ACTIVE = True Then
CURRENT_DESIGN_TYPE = "IDB_SEARCH" CURRENT_DESIGN_TYPE = "IDB_SEARCH"
Dim oForm As New frmSQLEditor(LOGCONFIG, DatabaseECM) With { Dim oForm As New frmSQLEditor(LOGCONFIG, DatabaseECM) With {
.SQLCommand = Me.WD_SEARCHTextBox.Text, .SQLCommand = Me.WD_SEARCHTextBox.Text,
@ -255,6 +262,9 @@ Public Class frmAdministration
End If End If
End If End If
End Sub End Sub
Private Sub btnopenSuche_Click(sender As System.Object, e As System.EventArgs) Handles btnWMopenSuche.Click Private Sub btnopenSuche_Click(sender As System.Object, e As System.EventArgs) Handles btnWMopenSuche.Click
@ -268,7 +278,7 @@ Public Class frmAdministration
p.Close() p.Close()
End If End If
Catch ex As Exception Catch ex As Exception
_LOGGER.Error(ex) _Logger.Error(ex)
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei öffnen der windream-Suche:") MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei öffnen der windream-Suche:")
End Try End Try
End Sub End Sub
@ -309,7 +319,7 @@ Public Class frmAdministration
Catch ex As Exception Catch ex As Exception
'Profilzuordnung' 'Profilzuordnung'
_LOGGER.Error(ex) _Logger.Error(ex)
End Try End Try
End Sub End Sub
@ -337,7 +347,7 @@ Public Class frmAdministration
TBPROFILE_USERTableAdapter.CMDInsert(profileId, userId, USER_USERNAME) TBPROFILE_USERTableAdapter.CMDInsert(profileId, userId, USER_USERNAME)
FillProfile_Zuordnung(profileId) FillProfile_Zuordnung(profileId)
Catch ex As Exception Catch ex As Exception
_LOGGER.Error(ex) _Logger.Error(ex)
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Hinzufügen eines Users:") MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Hinzufügen eines Users:")
End Try End Try
End Sub End Sub
@ -351,7 +361,7 @@ Public Class frmAdministration
TBPROFILE_USERTableAdapter.CmdDelete(profileId, userId) TBPROFILE_USERTableAdapter.CmdDelete(profileId, userId)
FillProfile_Zuordnung(profileId) FillProfile_Zuordnung(profileId)
Catch ex As Exception Catch ex As Exception
_LOGGER.Error(ex) _Logger.Error(ex)
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Entfernen eines Users:") MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Entfernen eines Users:")
End Try End Try
End Sub End Sub
@ -367,7 +377,7 @@ Public Class frmAdministration
' TBPROFILE_USERTableAdapter.CMDInsert(profileId, userId, USER_USERNAME) ' TBPROFILE_USERTableAdapter.CMDInsert(profileId, userId, USER_USERNAME)
FillProfile_Zuordnung(profileId) FillProfile_Zuordnung(profileId)
Catch ex As Exception Catch ex As Exception
_LOGGER.Error(ex) _Logger.Error(ex)
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Hinzufügen einer Gruppe:") MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Hinzufügen einer Gruppe:")
End Try End Try
End Sub End Sub
@ -383,7 +393,7 @@ Public Class frmAdministration
'TBPROFILE_USERTableAdapter.cmdDelete(userId) 'TBPROFILE_USERTableAdapter.cmdDelete(userId)
FillProfile_Zuordnung(profileId) FillProfile_Zuordnung(profileId)
Catch ex As Exception Catch ex As Exception
_LOGGER.Error(ex) _Logger.Error(ex)
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Entfernen einer Gruppe:") MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Entfernen einer Gruppe:")
End Try End Try
End Sub End Sub
@ -541,7 +551,7 @@ Public Class frmAdministration
SQLconnection.Close() SQLconnection.Close()
Return True Return True
Catch ex As Exception Catch ex As Exception
_LOGGER.Error(ex) _Logger.Error(ex)
MsgBox("Fehler in Execute_SQL: " & vbNewLine & ex.Message & vbNewLine & vbNewLine & " SQL: " & SQL) MsgBox("Fehler in Execute_SQL: " & vbNewLine & ex.Message & vbNewLine & vbNewLine & " SQL: " & SQL)
Return False Return False
End Try End Try
@ -583,7 +593,7 @@ Public Class frmAdministration
Try Try
Me.TBDD_USERTableAdapter.Fill(Me.DD_DMSLiteDataSet.TBDD_USER) Me.TBDD_USERTableAdapter.Fill(Me.DD_DMSLiteDataSet.TBDD_USER)
Catch ex As Exception Catch ex As Exception
_LOGGER.Error(ex) _Logger.Error(ex)
MsgBox("Fehler bei LoadUsers: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler:") MsgBox("Fehler bei LoadUsers: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler:")
End Try End Try
End Sub End Sub
@ -714,9 +724,9 @@ Public Class frmAdministration
Refresh_Final_indexe() Refresh_Final_indexe()
End If End If
Catch ex As Exception Catch ex As Exception
_LOGGER.Error(ex) _Logger.Error(ex)
MsgBox($"Error while loading Final Index properties: {ex.Message}", MsgBoxStyle.Critical) MsgBox($"Error while loading Final Index properties: {ex.Message}", MsgBoxStyle.Critical)
_LOGGER.Info($"Error while loading Final Index properties: {ex.Message}") _Logger.Info($"Error while loading Final Index properties: {ex.Message}")
End Try End Try
End Sub End Sub
@ -868,7 +878,7 @@ Public Class frmAdministration
End If End If
Catch ex As Exception Catch ex As Exception
_LOGGER.Error(ex) _Logger.Error(ex)
MsgBox("Fehler bei Anlage Profilkopie:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler:") MsgBox("Fehler bei Anlage Profilkopie:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler:")
End Try End Try
@ -890,7 +900,7 @@ Public Class frmAdministration
End If End If
Catch ex As Exception Catch ex As Exception
_LOGGER.Error(ex) _Logger.Error(ex)
MsgBox("Fehler bei Löschen des Profils:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler:") MsgBox("Fehler bei Löschen des Profils:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler:")
End Try End Try
@ -938,12 +948,12 @@ Public Class frmAdministration
End Try End Try
tsbStaticInfo.Caption = $"ProfileData saved - {Now.ToLongTimeString}" tsbStaticInfo.Caption = $"ProfileData saved - {Now.ToLongTimeString}"
UNSAVED_CHANGES_PROFILE = False UNSAVED_CHANGES_PROFILE = False
Else Else
tsbStaticInfo.Caption = "" tsbStaticInfo.Caption = ""
End If End If
Catch ex As Exception Catch ex As Exception
_LOGGER.Error(ex) _Logger.Error(ex)
If ex.Message.Contains("DataTable-Index") = False Then If ex.Message.Contains("DataTable-Index") = False Then
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Speichern des Profils:") MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Speichern des Profils:")
End If End If
@ -958,7 +968,7 @@ Public Class frmAdministration
Try Try
TBPM_PROFILEBindingSource.AddNew() TBPM_PROFILEBindingSource.AddNew()
Catch ex As Exception Catch ex As Exception
_LOGGER.Error(ex) _Logger.Error(ex)
End Try End Try
End If End If
@ -1001,7 +1011,7 @@ Public Class frmAdministration
End If End If
Catch ex As Exception Catch ex As Exception
MsgBox("Fehler beim Speichern: " & vbNewLine & vbNewLine & ex.Message) MsgBox("Fehler beim Speichern: " & vbNewLine & vbNewLine & ex.Message)
_LOGGER.Error(ex) _Logger.Error(ex)
End Try End Try
End Sub End Sub
@ -1116,9 +1126,9 @@ Public Class frmAdministration
End If End If
Catch ex As Exception Catch ex As Exception
_LOGGER.Error(ex) _Logger.Error(ex)
MsgBox("Error while Saving Final Index: " & ex.Message, MsgBoxStyle.Critical) MsgBox("Error while Saving Final Index: " & ex.Message, MsgBoxStyle.Critical)
_LOGGER.Info("Error while Saving Final Index: " & ex.Message) _Logger.Info("Error while Saving Final Index: " & ex.Message)
Finally Finally
BarButtonItem19.Visibility = DevExpress.XtraBars.BarItemVisibility.Never BarButtonItem19.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
BarButtonItem16.Visibility = DevExpress.XtraBars.BarItemVisibility.Always BarButtonItem16.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
@ -1151,7 +1161,7 @@ Public Class frmAdministration
End If End If
Catch ex As Exception Catch ex As Exception
MsgBox("Error in Saving SQL Overview: " & vbNewLine & vbNewLine & ex.Message) MsgBox("Error in Saving SQL Overview: " & vbNewLine & vbNewLine & ex.Message)
_LOGGER.Error(ex) _Logger.Error(ex)
End Try End Try
End Sub End Sub
@ -1182,7 +1192,7 @@ Public Class frmAdministration
End If End If
Catch ex As Exception Catch ex As Exception
MsgBox("Error in Saving Profile SQL: " & vbNewLine & vbNewLine & ex.Message) MsgBox("Error in Saving Profile SQL: " & vbNewLine & vbNewLine & ex.Message)
_LOGGER.Error(ex) _Logger.Error(ex)
End Try End Try
End Sub End Sub
@ -1214,7 +1224,7 @@ Public Class frmAdministration
End If End If
Catch ex As Exception Catch ex As Exception
MsgBox("Error in Saving Profile SQLFinish: " & vbNewLine & vbNewLine & ex.Message) MsgBox("Error in Saving Profile SQLFinish: " & vbNewLine & vbNewLine & ex.Message)
_LOGGER.Error(ex) _Logger.Error(ex)
End Try End Try
End Sub End Sub
Function CHECK_QUESTION_CHANGES() As Boolean Function CHECK_QUESTION_CHANGES() As Boolean
@ -1272,7 +1282,7 @@ Public Class frmAdministration
FillProfile_Zuordnung(profileId) FillProfile_Zuordnung(profileId)
End If End If
Catch ex As Exception Catch ex As Exception
_LOGGER.Error(ex) _Logger.Error(ex)
MsgBox($"Error while calling FillProfile_User", MsgBoxStyle.Critical) MsgBox($"Error while calling FillProfile_User", MsgBoxStyle.Critical)
End Try End Try
End If End If
@ -1524,5 +1534,31 @@ Public Class frmAdministration
EditMode_Profile("Unlock") EditMode_Profile("Unlock")
End Sub End Sub
Private Sub DISPLAY_MODEComboBox_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DISPLAY_MODEComboBox.SelectedIndexChanged
If DISPLAY_MODEComboBox.SelectedIndex <> -1 Then
If DISPLAY_MODEComboBox.Text = "AdHoc BlindFile" Then
lblSearch.Text = "Select BlindDocument:"
btnWMopenSuche.Visible = False
lblDescription.Text = "Targetpath WM:"
btnofbAHW.Visible = True
Else
btnofbAHW.Visible = False
lblDescription.Text = "Beschreibung:"
If IDB_ACTIVE Then
lblSearch.Text = "SQL-Command:"
Else
lblSearch.Text = "WM-Search:"
End If
btnWMopenSuche.Visible = True
End If
End If
End Sub
Private Sub btnofbAHW_Click(sender As Object, e As EventArgs) Handles btnofbAHW.Click
If Me.FolderBrowserDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
Me.DESCRIPTIONTextBox.Text = Me.FolderBrowserDialog1.SelectedPath
End If
End Sub
End Class End Class

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

View File

@ -11,6 +11,7 @@ Imports System.IO
Imports DevExpress.XtraPrinting Imports DevExpress.XtraPrinting
Imports DigitalData.Modules.EDMI.API.DatabaseWithFallback Imports DigitalData.Modules.EDMI.API.DatabaseWithFallback
Imports DigitalData.Modules.EDMI.API.Constants Imports DigitalData.Modules.EDMI.API.Constants
Imports DigitalData.Modules.Windream
Imports DigitalData.GUIs.Common Imports DigitalData.GUIs.Common
Imports DevExpress.XtraGrid.Views.BandedGrid Imports DevExpress.XtraGrid.Views.BandedGrid
Imports DevExpress.XtraBars.Ribbon Imports DevExpress.XtraBars.Ribbon
@ -22,6 +23,7 @@ Public Class frmMain
Private UserLoggedin As Integer = 0 Private UserLoggedin As Integer = 0
Private CURR_DT_VWPM_PROFILE_ACTIVE As DataTable Private CURR_DT_VWPM_PROFILE_ACTIVE As DataTable
Private CURR_DT_VWPM_PROFILE_AH_WORKFLOW As DataTable
Private CURR_DT_OVERVIEW As DataTable Private CURR_DT_OVERVIEW As DataTable
Private OVERVIEW_ADDED_WHEN As String Private OVERVIEW_ADDED_WHEN As String
Private OVERVIEW_CHANGED_WHEN As String Private OVERVIEW_CHANGED_WHEN As String
@ -345,6 +347,32 @@ Public Class frmMain
End Try End Try
LoadNavBar() LoadNavBar()
AddHandler NavBarControl1.LinkClicked, AddressOf navBar_LinkClicked AddHandler NavBarControl1.LinkClicked, AddressOf navBar_LinkClicked
If Not IsNothing(CURR_DT_VWPM_PROFILE_AH_WORKFLOW) Then
If CURR_DT_VWPM_PROFILE_AH_WORKFLOW.Rows.Count > 0 Then
RibbonPageGroupAHW.Visible = True
Dim OCounter As Integer = 1
For Each oRow As DataRow In CURR_DT_VWPM_PROFILE_AH_WORKFLOW.Rows
Select Case OCounter
Case 1
BbtnitmAHWF1.Caption = oRow.Item("TITLE")
BbtnitmAHWF1.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
BbtnitmAHWF1.Tag = oRow.Item("GUID")
Case 2
BbtnitmAHWF2.Caption = oRow.Item("TITLE")
BbtnitmAHWF2.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
BbtnitmAHWF2.Tag = oRow.Item("GUID")
Case 3
BbtnitmAHWF3.Caption = oRow.Item("TITLE")
BbtnitmAHWF3.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
BbtnitmAHWF3.Tag = oRow.Item("GUID")
Case 4
End Select
OCounter += 1
Next
End If
Else
End If
Try Try
If SHOW_CHARTS = True Then If SHOW_CHARTS = True Then
@ -1369,7 +1397,7 @@ Public Class frmMain
Sub Load_Profil_from_Grid(pProfilID As Integer) Sub Load_Profil_from_Grid(pProfilID As Integer)
Try Try
CURRENT_ProfilGUID = pProfilID CURRENT_ProfilGUID = pProfilID
WM_AHWF_docPath = String.Empty
@ -1391,6 +1419,7 @@ Public Class frmMain
CURRENT_DT_PROFILES.Select(oExpression).CopyToDataTable(CURRENT_DT_PROFILE, LoadOption.PreserveChanges) CURRENT_DT_PROFILES.Select(oExpression).CopyToDataTable(CURRENT_DT_PROFILE, LoadOption.PreserveChanges)
If CURRENT_DT_PROFILE.Rows.Count = 1 Then If CURRENT_DT_PROFILE.Rows.Count = 1 Then
CURRENT_ProfilName = CURRENT_DT_PROFILE.Rows(0).Item("NAME") CURRENT_ProfilName = CURRENT_DT_PROFILE.Rows(0).Item("NAME")
CURRENT_WMObjecttype = CURRENT_DT_PROFILES.Rows(0).Item("WD_OBJECTTYPE")
Else Else
MsgBox("Could not get a Profile - Check Your log!", MsgBoxStyle.Exclamation, ADDITIONAL_TITLE) MsgBox("Could not get a Profile - Check Your log!", MsgBoxStyle.Exclamation, ADDITIONAL_TITLE)
Exit Sub Exit Sub
@ -1744,11 +1773,9 @@ Public Class frmMain
End Function End Function
Private Function Init_windream() Private Function Init_windream()
Try Try
'_windream = New ClassWindream_allgemein
'_windream.Create_Session()
'_windreamPM = New ClassPMWindream()
'_windreamPM.Create_Session()
WINDREAM = New ClassPMWindream() WINDREAM = New ClassPMWindream()
WINDREAM_MOD = New Windream(LOGCONFIG, False, WMDriveLetter, WMSUFFIX, True, "", "", "", "")
WINDREAM.Create_Session() WINDREAM.Create_Session()
WINDREAM_ALLG = New ClassWindream_allgemein WINDREAM_ALLG = New ClassWindream_allgemein
Return WINDREAM.IsLoggedIn Return WINDREAM.IsLoggedIn
@ -2295,10 +2322,18 @@ Public Class frmMain
If SQL_PROFILES_USER <> "" Then If SQL_PROFILES_USER <> "" Then
oSQL = SQL_PROFILES_USER.Replace("@USER_ID", USER_ID) oSQL = SQL_PROFILES_USER.Replace("@USER_ID", USER_ID)
Else Else
oSQL = String.Format("SELECT T.* FROM VWPM_PROFILE_ACTIVE T WHERE T.FILE_COUNT > 0 AND T.GUID IN (SELECT PROFILE_ID FROM [dbo].[FNPM_GET_ACTIVE_PROFILES_USER] ({0}))", USER_ID) oSQL = String.Format("SELECT T.* FROM VWPM_PROFILE_ACTIVE T WHERE T.FILE_COUNT > 0 AND T.GUID IN (SELECT PROFILE_ID FROM [dbo].[FNPM_GET_ACTIVE_PROFILES_USER] ({0}))", USER_ID)
End If End If
CURR_DT_VWPM_PROFILE_ACTIVE = DatabaseFallback.GetDatatableECM(oSQL) CURR_DT_VWPM_PROFILE_ACTIVE = DatabaseFallback.GetDatatableECM(oSQL)
CURR_DT_VWPM_PROFILE_AH_WORKFLOW = CURR_DT_VWPM_PROFILE_ACTIVE.Copy
CURR_DT_VWPM_PROFILE_AH_WORKFLOW.Clear()
Dim AHWFRows As DataRow() = CURR_DT_VWPM_PROFILE_ACTIVE.Select("DISPLAY_MODE = 'AdHoc BlindFile' OR DISPLAY_MODE = 'AdHoc'", "PRIORITY")
If AHWFRows.Length > 0 Then
CURR_DT_VWPM_PROFILE_AH_WORKFLOW = AHWFRows.CopyToDataTable()
End If
If pMode = "bwBasicData" Then bwBasicData.ReportProgress(30) If pMode = "bwBasicData" Then bwBasicData.ReportProgress(30)
LoadCURRENT_DT_PROFILES() LoadCURRENT_DT_PROFILES()
@ -3078,4 +3113,73 @@ where (CONVERT(DATE,GETDATE()) <= NOTE.DISPLAY_UNTIL or NOTE.DISPLAY_UNTIL IS NU
GridLayout_Changed("GridViewWFItems_SubstituteFilter") GridLayout_Changed("GridViewWFItems_SubstituteFilter")
RowCount() RowCount()
End Sub End Sub
Private Sub BbtnitmAHWF1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BbtnitmAHWF1.ItemClick
AdHocWorkflow_BlindFile(BbtnitmAHWF1.Tag)
End Sub
Private Sub AdHocWorkflow_BlindFile(pProfileID As Int16)
Try
If Not Application.OpenForms().OfType(Of frmValidator).Any Then
Dim oExpression = $"GUID = {pProfileID}"
CURRENT_DT_PROFILE = Nothing
CURRENT_DT_PROFILE = CURRENT_DT_PROFILES.Clone
CURRENT_DT_PROFILES.Select(oExpression).CopyToDataTable(CURRENT_DT_PROFILE, LoadOption.PreserveChanges)
CURRENT_ProfilGUID = pProfileID
Dim sGUID As String
sGUID = System.Guid.NewGuid.ToString()
Dim oTargetPath = CURRENT_DT_PROFILES.Rows(0).Item("DESCRIPTION")
Dim oSourcePath = CURRENT_DT_PROFILES.Rows(0).Item("WD_SEARCH")
If oTargetPath = String.Empty Or oSourcePath = String.Empty Then
Exit Sub
End If
oTargetPath = $"{oTargetPath}\{Now.Year}\{Now.Month}\{Now.Day}"
oTargetPath = oTargetPath & "\" & sGUID & ".pdf"
Dim oResult = WINDREAM_MOD.NewFileStream(oSourcePath, oTargetPath)
If oResult = True Then
WM_AHWF_docPath = oTargetPath
Dim oDocID = WINDREAM_MOD.NewDocumentID
CURRENT_CLICKED_PROFILE_ID = pProfileID
CURRENT_CLICKED_PROFILE_TITLE = CURRENT_DT_PROFILES.Rows(0).Item("TITLE")
CURRENT_WMObjecttype = CURRENT_DT_PROFILES.Rows(0).Item("WD_OBJECTTYPE")
CURRENT_DOC_ID = oDocID
CURRENT_DOC_GUID = 99123456789
ActiveWorkflowType = ConstAHWorkflow_BlindFile
CURRENT_JUMP_DOC_GUID = CURRENT_DOC_GUID
DT_FILTERED_PROFILE_SEARCHES_DOC = Nothing
DT_FILTERED_PROFILE_SEARCHES_DOC = BASEDATA_DT_PROFILES_SEARCHES_DOC.Copy
DT_FILTERED_PROFILE_SEARCHES_DOC.Clear()
oExpression = $"PROFILE_ID = {CURRENT_ProfilGUID}"
BASEDATA_DT_PROFILES_SEARCHES_DOC.Select(oExpression, "TAB_INDEX").CopyToDataTable(DT_FILTERED_PROFILE_SEARCHES_DOC, LoadOption.PreserveChanges)
BASEDATA_DT_PROFILE_SEARCHES_SQL = Nothing
BASEDATA_DT_PROFILE_SEARCHES_SQL = BASEDATA_DT_PROFILES_SEARCHES_SQL.Copy
BASEDATA_DT_PROFILE_SEARCHES_SQL.Clear()
BASEDATA_DT_PROFILES_SEARCHES_SQL.Select(oExpression, "TAB_INDEX").CopyToDataTable(BASEDATA_DT_PROFILE_SEARCHES_SQL, LoadOption.PreserveChanges)
Try
Dim oEnvironment = GetEnvironment()
_FormValidator = New frmValidator(oEnvironment)
AddHandler _FormValidator.FormClosed, AddressOf ValidatorClosed
_FormValidator.Show()
Catch ex As Exception
LOGGER.Warn($"Error opening Form frmValidator [{ex.Message}]")
LOGGER.Warn($"ex.InnerException.Message [{ex.InnerException.Message}]")
LOGGER.Warn($"ex.InnerException.Source [{ex.InnerException.Source}]")
LOGGER.Error(ex.InnerException)
MsgBox(ex.Message, MsgBoxStyle.Critical, ADDITIONAL_TITLE)
End Try
End If
Else
FormHelper.ShowInfoMessage(S.Bitte_schließen_Sie_den_offenen_Workflow_, omsgTitleWarning)
Exit Sub
End If
Catch ex As Exception
LOGGER.Error(ex)
End Try
End Sub
End Class End Class

View File

@ -137,22 +137,21 @@ Partial Class frmValidator
' '
'SplitContainer2_DV_Chat 'SplitContainer2_DV_Chat
' '
resources.ApplyResources(Me.SplitContainer2_DV_Chat, "SplitContainer2_DV_Chat")
Me.SplitContainer2_DV_Chat.CollapsePanel = DevExpress.XtraEditors.SplitCollapsePanel.Panel2 Me.SplitContainer2_DV_Chat.CollapsePanel = DevExpress.XtraEditors.SplitCollapsePanel.Panel2
resources.ApplyResources(Me.SplitContainer2_DV_Chat, "SplitContainer2_DV_Chat")
Me.SplitContainer2_DV_Chat.FixedPanel = DevExpress.XtraEditors.SplitFixedPanel.None Me.SplitContainer2_DV_Chat.FixedPanel = DevExpress.XtraEditors.SplitFixedPanel.None
Me.SplitContainer2_DV_Chat.Name = "SplitContainer2_DV_Chat" Me.SplitContainer2_DV_Chat.Name = "SplitContainer2_DV_Chat"
' '
'SplitContainer2_DV_Chat.Panel1 'SplitContainer2_DV_Chat.Panel1
' '
resources.ApplyResources(Me.SplitContainer2_DV_Chat.Panel1, "SplitContainer2_DV_Chat.Panel1")
Me.SplitContainer2_DV_Chat.Panel1.Controls.Add(Me.SplitContainer1) Me.SplitContainer2_DV_Chat.Panel1.Controls.Add(Me.SplitContainer1)
resources.ApplyResources(Me.SplitContainer2_DV_Chat.Panel1, "SplitContainer2_DV_Chat.Panel1")
' '
'SplitContainer2_DV_Chat.Panel2 'SplitContainer2_DV_Chat.Panel2
' '
resources.ApplyResources(Me.SplitContainer2_DV_Chat.Panel2, "SplitContainer2_DV_Chat.Panel2") resources.ApplyResources(Me.SplitContainer2_DV_Chat.Panel2, "SplitContainer2_DV_Chat.Panel2")
Me.SplitContainer2_DV_Chat.Panel2.Controls.Add(Me.ChatControl1) Me.SplitContainer2_DV_Chat.Panel2.Controls.Add(Me.ChatControl1)
Me.SplitContainer2_DV_Chat.SplitterPosition = 919 Me.SplitContainer2_DV_Chat.SplitterPosition = 919
Me.ToolTip1.SetToolTip(Me.SplitContainer2_DV_Chat, resources.GetString("SplitContainer2_DV_Chat.ToolTip"))
' '
'SplitContainer1 'SplitContainer1
' '
@ -161,34 +160,27 @@ Partial Class frmValidator
' '
'SplitContainer1.Panel1 'SplitContainer1.Panel1
' '
resources.ApplyResources(Me.SplitContainer1.Panel1, "SplitContainer1.Panel1")
Me.SplitContainer1.Panel1.Controls.Add(Me.Panel1) Me.SplitContainer1.Panel1.Controls.Add(Me.Panel1)
Me.ToolTip1.SetToolTip(Me.SplitContainer1.Panel1, resources.GetString("SplitContainer1.Panel1.ToolTip"))
' '
'SplitContainer1.Panel2 'SplitContainer1.Panel2
' '
resources.ApplyResources(Me.SplitContainer1.Panel2, "SplitContainer1.Panel2")
Me.SplitContainer1.Panel2.Controls.Add(Me.DocumentViewerValidator) Me.SplitContainer1.Panel2.Controls.Add(Me.DocumentViewerValidator)
Me.ToolTip1.SetToolTip(Me.SplitContainer1.Panel2, resources.GetString("SplitContainer1.Panel2.ToolTip"))
Me.SplitContainer1.TabStop = False Me.SplitContainer1.TabStop = False
Me.ToolTip1.SetToolTip(Me.SplitContainer1, resources.GetString("SplitContainer1.ToolTip"))
' '
'Panel1 'Panel1
' '
resources.ApplyResources(Me.Panel1, "Panel1")
Me.Panel1.BackColor = System.Drawing.SystemColors.ControlLight Me.Panel1.BackColor = System.Drawing.SystemColors.ControlLight
Me.Panel1.Controls.Add(Me.TITLELabel1) Me.Panel1.Controls.Add(Me.TITLELabel1)
Me.Panel1.Controls.Add(Me.btnSave) Me.Panel1.Controls.Add(Me.btnSave)
Me.Panel1.Controls.Add(Me.DESCRIPTIONLabel) Me.Panel1.Controls.Add(Me.DESCRIPTIONLabel)
Me.Panel1.Controls.Add(Me.PanelValidatorControl) Me.Panel1.Controls.Add(Me.PanelValidatorControl)
resources.ApplyResources(Me.Panel1, "Panel1")
Me.Panel1.Name = "Panel1" Me.Panel1.Name = "Panel1"
Me.ToolTip1.SetToolTip(Me.Panel1, resources.GetString("Panel1.ToolTip"))
' '
'TITLELabel1 'TITLELabel1
' '
resources.ApplyResources(Me.TITLELabel1, "TITLELabel1") resources.ApplyResources(Me.TITLELabel1, "TITLELabel1")
Me.TITLELabel1.Name = "TITLELabel1" Me.TITLELabel1.Name = "TITLELabel1"
Me.ToolTip1.SetToolTip(Me.TITLELabel1, resources.GetString("TITLELabel1.ToolTip"))
' '
'btnSave 'btnSave
' '
@ -196,34 +188,29 @@ Partial Class frmValidator
Me.btnSave.Image = Global.DD_ProcessManager.My.Resources.Resources.flag_pink Me.btnSave.Image = Global.DD_ProcessManager.My.Resources.Resources.flag_pink
Me.btnSave.Name = "btnSave" Me.btnSave.Name = "btnSave"
Me.btnSave.TabStop = False Me.btnSave.TabStop = False
Me.ToolTip1.SetToolTip(Me.btnSave, resources.GetString("btnSave.ToolTip"))
Me.btnSave.UseVisualStyleBackColor = True Me.btnSave.UseVisualStyleBackColor = True
' '
'DESCRIPTIONLabel 'DESCRIPTIONLabel
' '
resources.ApplyResources(Me.DESCRIPTIONLabel, "DESCRIPTIONLabel") resources.ApplyResources(Me.DESCRIPTIONLabel, "DESCRIPTIONLabel")
Me.DESCRIPTIONLabel.Name = "DESCRIPTIONLabel" Me.DESCRIPTIONLabel.Name = "DESCRIPTIONLabel"
Me.ToolTip1.SetToolTip(Me.DESCRIPTIONLabel, resources.GetString("DESCRIPTIONLabel.ToolTip"))
' '
'PanelValidatorControl 'PanelValidatorControl
' '
resources.ApplyResources(Me.PanelValidatorControl, "PanelValidatorControl") resources.ApplyResources(Me.PanelValidatorControl, "PanelValidatorControl")
Me.PanelValidatorControl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.PanelValidatorControl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.PanelValidatorControl.Name = "PanelValidatorControl" Me.PanelValidatorControl.Name = "PanelValidatorControl"
Me.ToolTip1.SetToolTip(Me.PanelValidatorControl, resources.GetString("PanelValidatorControl.ToolTip"))
' '
'DocumentViewerValidator 'DocumentViewerValidator
' '
resources.ApplyResources(Me.DocumentViewerValidator, "DocumentViewerValidator") resources.ApplyResources(Me.DocumentViewerValidator, "DocumentViewerValidator")
Me.DocumentViewerValidator.FileLoaded = False Me.DocumentViewerValidator.FileLoaded = False
Me.DocumentViewerValidator.Name = "DocumentViewerValidator" Me.DocumentViewerValidator.Name = "DocumentViewerValidator"
Me.ToolTip1.SetToolTip(Me.DocumentViewerValidator, resources.GetString("DocumentViewerValidator.ToolTip"))
' '
'ChatControl1 'ChatControl1
' '
resources.ApplyResources(Me.ChatControl1, "ChatControl1") resources.ApplyResources(Me.ChatControl1, "ChatControl1")
Me.ChatControl1.Name = "ChatControl1" Me.ChatControl1.Name = "ChatControl1"
Me.ToolTip1.SetToolTip(Me.ChatControl1, resources.GetString("ChatControl1.ToolTip"))
' '
'BarAndDockingController3 'BarAndDockingController3
' '
@ -253,40 +240,33 @@ Partial Class frmValidator
' '
'barDockControlTop 'barDockControlTop
' '
resources.ApplyResources(Me.barDockControlTop, "barDockControlTop")
Me.barDockControlTop.CausesValidation = False Me.barDockControlTop.CausesValidation = False
resources.ApplyResources(Me.barDockControlTop, "barDockControlTop")
Me.barDockControlTop.Manager = Me.BarManager1 Me.barDockControlTop.Manager = Me.BarManager1
Me.ToolTip1.SetToolTip(Me.barDockControlTop, resources.GetString("barDockControlTop.ToolTip"))
' '
'barDockControlBottom 'barDockControlBottom
' '
resources.ApplyResources(Me.barDockControlBottom, "barDockControlBottom")
Me.barDockControlBottom.CausesValidation = False Me.barDockControlBottom.CausesValidation = False
resources.ApplyResources(Me.barDockControlBottom, "barDockControlBottom")
Me.barDockControlBottom.Manager = Me.BarManager1 Me.barDockControlBottom.Manager = Me.BarManager1
Me.ToolTip1.SetToolTip(Me.barDockControlBottom, resources.GetString("barDockControlBottom.ToolTip"))
' '
'barDockControlLeft 'barDockControlLeft
' '
resources.ApplyResources(Me.barDockControlLeft, "barDockControlLeft")
Me.barDockControlLeft.CausesValidation = False Me.barDockControlLeft.CausesValidation = False
resources.ApplyResources(Me.barDockControlLeft, "barDockControlLeft")
Me.barDockControlLeft.Manager = Me.BarManager1 Me.barDockControlLeft.Manager = Me.BarManager1
Me.ToolTip1.SetToolTip(Me.barDockControlLeft, resources.GetString("barDockControlLeft.ToolTip"))
' '
'barDockControlRight 'barDockControlRight
' '
resources.ApplyResources(Me.barDockControlRight, "barDockControlRight")
Me.barDockControlRight.CausesValidation = False Me.barDockControlRight.CausesValidation = False
resources.ApplyResources(Me.barDockControlRight, "barDockControlRight")
Me.barDockControlRight.Manager = Me.BarManager1 Me.barDockControlRight.Manager = Me.BarManager1
Me.ToolTip1.SetToolTip(Me.barDockControlRight, resources.GetString("barDockControlRight.ToolTip"))
' '
'PdfFileOpenBarItem1 'PdfFileOpenBarItem1
' '
resources.ApplyResources(Me.PdfFileOpenBarItem1, "PdfFileOpenBarItem1") resources.ApplyResources(Me.PdfFileOpenBarItem1, "PdfFileOpenBarItem1")
Me.PdfFileOpenBarItem1.Enabled = False Me.PdfFileOpenBarItem1.Enabled = False
Me.PdfFileOpenBarItem1.Id = 1 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.ItemShortcut = New DevExpress.XtraBars.BarShortcut((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.O))
Me.PdfFileOpenBarItem1.Name = "PdfFileOpenBarItem1" Me.PdfFileOpenBarItem1.Name = "PdfFileOpenBarItem1"
' '
@ -295,9 +275,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfFileSaveAsBarItem1, "PdfFileSaveAsBarItem1") resources.ApplyResources(Me.PdfFileSaveAsBarItem1, "PdfFileSaveAsBarItem1")
Me.PdfFileSaveAsBarItem1.Enabled = False Me.PdfFileSaveAsBarItem1.Enabled = False
Me.PdfFileSaveAsBarItem1.Id = 2 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.ItemShortcut = New DevExpress.XtraBars.BarShortcut((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.S))
Me.PdfFileSaveAsBarItem1.Name = "PdfFileSaveAsBarItem1" Me.PdfFileSaveAsBarItem1.Name = "PdfFileSaveAsBarItem1"
' '
@ -306,9 +283,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfFilePrintBarItem2, "PdfFilePrintBarItem2") resources.ApplyResources(Me.PdfFilePrintBarItem2, "PdfFilePrintBarItem2")
Me.PdfFilePrintBarItem2.Enabled = False Me.PdfFilePrintBarItem2.Enabled = False
Me.PdfFilePrintBarItem2.Id = 3 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.ItemShortcut = New DevExpress.XtraBars.BarShortcut((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.P))
Me.PdfFilePrintBarItem2.Name = "PdfFilePrintBarItem2" Me.PdfFilePrintBarItem2.Name = "PdfFilePrintBarItem2"
' '
@ -317,9 +291,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfPreviousPageBarItem2, "PdfPreviousPageBarItem2") resources.ApplyResources(Me.PdfPreviousPageBarItem2, "PdfPreviousPageBarItem2")
Me.PdfPreviousPageBarItem2.Enabled = False Me.PdfPreviousPageBarItem2.Enabled = False
Me.PdfPreviousPageBarItem2.Id = 4 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" Me.PdfPreviousPageBarItem2.Name = "PdfPreviousPageBarItem2"
' '
'PdfNextPageBarItem2 'PdfNextPageBarItem2
@ -327,9 +298,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfNextPageBarItem2, "PdfNextPageBarItem2") resources.ApplyResources(Me.PdfNextPageBarItem2, "PdfNextPageBarItem2")
Me.PdfNextPageBarItem2.Enabled = False Me.PdfNextPageBarItem2.Enabled = False
Me.PdfNextPageBarItem2.Id = 5 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" Me.PdfNextPageBarItem2.Name = "PdfNextPageBarItem2"
' '
'PdfFindTextBarItem2 'PdfFindTextBarItem2
@ -337,9 +305,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfFindTextBarItem2, "PdfFindTextBarItem2") resources.ApplyResources(Me.PdfFindTextBarItem2, "PdfFindTextBarItem2")
Me.PdfFindTextBarItem2.Enabled = False Me.PdfFindTextBarItem2.Enabled = False
Me.PdfFindTextBarItem2.Id = 6 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.ItemShortcut = New DevExpress.XtraBars.BarShortcut((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.F))
Me.PdfFindTextBarItem2.Name = "PdfFindTextBarItem2" Me.PdfFindTextBarItem2.Name = "PdfFindTextBarItem2"
' '
@ -348,9 +313,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfZoomOutBarItem2, "PdfZoomOutBarItem2") resources.ApplyResources(Me.PdfZoomOutBarItem2, "PdfZoomOutBarItem2")
Me.PdfZoomOutBarItem2.Enabled = False Me.PdfZoomOutBarItem2.Enabled = False
Me.PdfZoomOutBarItem2.Id = 7 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" Me.PdfZoomOutBarItem2.Name = "PdfZoomOutBarItem2"
' '
'PdfZoomInBarItem2 'PdfZoomInBarItem2
@ -358,9 +320,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfZoomInBarItem2, "PdfZoomInBarItem2") resources.ApplyResources(Me.PdfZoomInBarItem2, "PdfZoomInBarItem2")
Me.PdfZoomInBarItem2.Enabled = False Me.PdfZoomInBarItem2.Enabled = False
Me.PdfZoomInBarItem2.Id = 8 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" Me.PdfZoomInBarItem2.Name = "PdfZoomInBarItem2"
' '
'PdfExactZoomListBarSubItem2 'PdfExactZoomListBarSubItem2
@ -368,9 +327,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfExactZoomListBarSubItem2, "PdfExactZoomListBarSubItem2") resources.ApplyResources(Me.PdfExactZoomListBarSubItem2, "PdfExactZoomListBarSubItem2")
Me.PdfExactZoomListBarSubItem2.Enabled = False Me.PdfExactZoomListBarSubItem2.Enabled = False
Me.PdfExactZoomListBarSubItem2.Id = 9 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.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.Name = "PdfExactZoomListBarSubItem2"
Me.PdfExactZoomListBarSubItem2.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionInMenu Me.PdfExactZoomListBarSubItem2.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionInMenu
@ -380,9 +336,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfZoom10CheckItem2, "PdfZoom10CheckItem2") resources.ApplyResources(Me.PdfZoom10CheckItem2, "PdfZoom10CheckItem2")
Me.PdfZoom10CheckItem2.Enabled = False Me.PdfZoom10CheckItem2.Enabled = False
Me.PdfZoom10CheckItem2.Id = 10 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" Me.PdfZoom10CheckItem2.Name = "PdfZoom10CheckItem2"
' '
'PdfZoom25CheckItem2 'PdfZoom25CheckItem2
@ -390,9 +343,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfZoom25CheckItem2, "PdfZoom25CheckItem2") resources.ApplyResources(Me.PdfZoom25CheckItem2, "PdfZoom25CheckItem2")
Me.PdfZoom25CheckItem2.Enabled = False Me.PdfZoom25CheckItem2.Enabled = False
Me.PdfZoom25CheckItem2.Id = 11 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" Me.PdfZoom25CheckItem2.Name = "PdfZoom25CheckItem2"
' '
'PdfZoom50CheckItem2 'PdfZoom50CheckItem2
@ -400,9 +350,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfZoom50CheckItem2, "PdfZoom50CheckItem2") resources.ApplyResources(Me.PdfZoom50CheckItem2, "PdfZoom50CheckItem2")
Me.PdfZoom50CheckItem2.Enabled = False Me.PdfZoom50CheckItem2.Enabled = False
Me.PdfZoom50CheckItem2.Id = 12 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" Me.PdfZoom50CheckItem2.Name = "PdfZoom50CheckItem2"
' '
'PdfZoom75CheckItem2 'PdfZoom75CheckItem2
@ -410,9 +357,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfZoom75CheckItem2, "PdfZoom75CheckItem2") resources.ApplyResources(Me.PdfZoom75CheckItem2, "PdfZoom75CheckItem2")
Me.PdfZoom75CheckItem2.Enabled = False Me.PdfZoom75CheckItem2.Enabled = False
Me.PdfZoom75CheckItem2.Id = 13 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" Me.PdfZoom75CheckItem2.Name = "PdfZoom75CheckItem2"
' '
'PdfZoom100CheckItem2 'PdfZoom100CheckItem2
@ -420,9 +364,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfZoom100CheckItem2, "PdfZoom100CheckItem2") resources.ApplyResources(Me.PdfZoom100CheckItem2, "PdfZoom100CheckItem2")
Me.PdfZoom100CheckItem2.Enabled = False Me.PdfZoom100CheckItem2.Enabled = False
Me.PdfZoom100CheckItem2.Id = 14 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" Me.PdfZoom100CheckItem2.Name = "PdfZoom100CheckItem2"
' '
'PdfZoom125CheckItem2 'PdfZoom125CheckItem2
@ -430,9 +371,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfZoom125CheckItem2, "PdfZoom125CheckItem2") resources.ApplyResources(Me.PdfZoom125CheckItem2, "PdfZoom125CheckItem2")
Me.PdfZoom125CheckItem2.Enabled = False Me.PdfZoom125CheckItem2.Enabled = False
Me.PdfZoom125CheckItem2.Id = 15 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" Me.PdfZoom125CheckItem2.Name = "PdfZoom125CheckItem2"
' '
'PdfZoom150CheckItem2 'PdfZoom150CheckItem2
@ -440,9 +378,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfZoom150CheckItem2, "PdfZoom150CheckItem2") resources.ApplyResources(Me.PdfZoom150CheckItem2, "PdfZoom150CheckItem2")
Me.PdfZoom150CheckItem2.Enabled = False Me.PdfZoom150CheckItem2.Enabled = False
Me.PdfZoom150CheckItem2.Id = 16 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" Me.PdfZoom150CheckItem2.Name = "PdfZoom150CheckItem2"
' '
'PdfZoom200CheckItem2 'PdfZoom200CheckItem2
@ -450,9 +385,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfZoom200CheckItem2, "PdfZoom200CheckItem2") resources.ApplyResources(Me.PdfZoom200CheckItem2, "PdfZoom200CheckItem2")
Me.PdfZoom200CheckItem2.Enabled = False Me.PdfZoom200CheckItem2.Enabled = False
Me.PdfZoom200CheckItem2.Id = 17 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" Me.PdfZoom200CheckItem2.Name = "PdfZoom200CheckItem2"
' '
'PdfZoom400CheckItem2 'PdfZoom400CheckItem2
@ -460,9 +392,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfZoom400CheckItem2, "PdfZoom400CheckItem2") resources.ApplyResources(Me.PdfZoom400CheckItem2, "PdfZoom400CheckItem2")
Me.PdfZoom400CheckItem2.Enabled = False Me.PdfZoom400CheckItem2.Enabled = False
Me.PdfZoom400CheckItem2.Id = 18 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" Me.PdfZoom400CheckItem2.Name = "PdfZoom400CheckItem2"
' '
'PdfZoom500CheckItem2 'PdfZoom500CheckItem2
@ -470,9 +399,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfZoom500CheckItem2, "PdfZoom500CheckItem2") resources.ApplyResources(Me.PdfZoom500CheckItem2, "PdfZoom500CheckItem2")
Me.PdfZoom500CheckItem2.Enabled = False Me.PdfZoom500CheckItem2.Enabled = False
Me.PdfZoom500CheckItem2.Id = 19 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" Me.PdfZoom500CheckItem2.Name = "PdfZoom500CheckItem2"
' '
'PdfSetActualSizeZoomModeCheckItem2 'PdfSetActualSizeZoomModeCheckItem2
@ -480,9 +406,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfSetActualSizeZoomModeCheckItem2, "PdfSetActualSizeZoomModeCheckItem2") resources.ApplyResources(Me.PdfSetActualSizeZoomModeCheckItem2, "PdfSetActualSizeZoomModeCheckItem2")
Me.PdfSetActualSizeZoomModeCheckItem2.Enabled = False Me.PdfSetActualSizeZoomModeCheckItem2.Enabled = False
Me.PdfSetActualSizeZoomModeCheckItem2.Id = 20 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" Me.PdfSetActualSizeZoomModeCheckItem2.Name = "PdfSetActualSizeZoomModeCheckItem2"
' '
'PdfSetPageLevelZoomModeCheckItem2 'PdfSetPageLevelZoomModeCheckItem2
@ -490,9 +413,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfSetPageLevelZoomModeCheckItem2, "PdfSetPageLevelZoomModeCheckItem2") resources.ApplyResources(Me.PdfSetPageLevelZoomModeCheckItem2, "PdfSetPageLevelZoomModeCheckItem2")
Me.PdfSetPageLevelZoomModeCheckItem2.Enabled = False Me.PdfSetPageLevelZoomModeCheckItem2.Enabled = False
Me.PdfSetPageLevelZoomModeCheckItem2.Id = 21 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" Me.PdfSetPageLevelZoomModeCheckItem2.Name = "PdfSetPageLevelZoomModeCheckItem2"
' '
'PdfSetFitWidthZoomModeCheckItem2 'PdfSetFitWidthZoomModeCheckItem2
@ -500,9 +420,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfSetFitWidthZoomModeCheckItem2, "PdfSetFitWidthZoomModeCheckItem2") resources.ApplyResources(Me.PdfSetFitWidthZoomModeCheckItem2, "PdfSetFitWidthZoomModeCheckItem2")
Me.PdfSetFitWidthZoomModeCheckItem2.Enabled = False Me.PdfSetFitWidthZoomModeCheckItem2.Enabled = False
Me.PdfSetFitWidthZoomModeCheckItem2.Id = 22 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" Me.PdfSetFitWidthZoomModeCheckItem2.Name = "PdfSetFitWidthZoomModeCheckItem2"
' '
'PdfSetFitVisibleZoomModeCheckItem2 'PdfSetFitVisibleZoomModeCheckItem2
@ -510,18 +427,12 @@ Partial Class frmValidator
resources.ApplyResources(Me.PdfSetFitVisibleZoomModeCheckItem2, "PdfSetFitVisibleZoomModeCheckItem2") resources.ApplyResources(Me.PdfSetFitVisibleZoomModeCheckItem2, "PdfSetFitVisibleZoomModeCheckItem2")
Me.PdfSetFitVisibleZoomModeCheckItem2.Enabled = False Me.PdfSetFitVisibleZoomModeCheckItem2.Enabled = False
Me.PdfSetFitVisibleZoomModeCheckItem2.Id = 23 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" Me.PdfSetFitVisibleZoomModeCheckItem2.Name = "PdfSetFitVisibleZoomModeCheckItem2"
' '
'BarButtonItem1 'BarButtonItem1
' '
resources.ApplyResources(Me.BarButtonItem1, "BarButtonItem1") resources.ApplyResources(Me.BarButtonItem1, "BarButtonItem1")
Me.BarButtonItem1.Id = 0 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" Me.BarButtonItem1.Name = "BarButtonItem1"
' '
'PdfBarController2 'PdfBarController2
@ -552,13 +463,9 @@ Partial Class frmValidator
' '
'RibbonControl1 'RibbonControl1
' '
resources.ApplyResources(Me.RibbonControl1, "RibbonControl1")
Me.RibbonControl1.ExpandCollapseItem.Id = 0 Me.RibbonControl1.ExpandCollapseItem.Id = 0
Me.RibbonControl1.ExpandCollapseItem.ImageOptions.ImageIndex = CType(resources.GetObject("RibbonControl1.ExpandCollapseItem.ImageOptions.ImageIndex"), Integer)
Me.RibbonControl1.ExpandCollapseItem.ImageOptions.LargeImageIndex = CType(resources.GetObject("RibbonControl1.ExpandCollapseItem.ImageOptions.LargeImageIndex"), Integer)
Me.RibbonControl1.ExpandCollapseItem.ImageOptions.SvgImage = CType(resources.GetObject("RibbonControl1.ExpandCollapseItem.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.RibbonControl1.ExpandCollapseItem.SearchTags = resources.GetString("RibbonControl1.ExpandCollapseItem.SearchTags")
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bsiError, Me.bsiInformation, Me.bsiDocID, Me.BarButtonItemFileView, Me.BarButtonItem3, Me.BarButtonItem4, Me.bbtniRefresh, Me.bbtniRefreshSearches, Me.bbtniNext, Me.bbtniDelete, Me.bbtniAnnotation, Me.bsiInfo1, Me.bsiInfo2, Me.BbtnitmSave, Me.BarButtonItem2, Me.BarLinkContainerItem1, Me.btnitemConversationEnd, Me.bbtnitem_ConversationNew, Me.BarLinkContainerItem2, Me.BarEditItem1, Me.BarEditItem2, Me.BarEditItem3, Me.btnitemConversation_reload, Me.BarButtonItem5, Me.Attmt_bbtnitmShow, Me.barbtnitmExport, Me.ToggleSwitchItemLoadonClick, Me.Attmnt_bbtnitm_LoadonClick}) Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bsiError, Me.bsiInformation, Me.bsiDocID, Me.BarButtonItemFileView, Me.BarButtonItem3, Me.BarButtonItem4, Me.bbtniRefresh, Me.bbtniRefreshSearches, Me.bbtniNext, Me.bbtniDelete, Me.bbtniAnnotation, Me.bsiInfo1, Me.bsiInfo2, Me.BbtnitmSave, Me.BarButtonItem2, Me.BarLinkContainerItem1, Me.btnitemConversationEnd, Me.bbtnitem_ConversationNew, Me.BarLinkContainerItem2, Me.BarEditItem1, Me.BarEditItem2, Me.BarEditItem3, Me.btnitemConversation_reload, Me.BarButtonItem5, Me.Attmt_bbtnitmShow, Me.barbtnitmExport, Me.ToggleSwitchItemLoadonClick, Me.Attmnt_bbtnitm_LoadonClick})
resources.ApplyResources(Me.RibbonControl1, "RibbonControl1")
Me.RibbonControl1.MaxItemId = 32 Me.RibbonControl1.MaxItemId = 32
Me.RibbonControl1.Name = "RibbonControl1" Me.RibbonControl1.Name = "RibbonControl1"
Me.RibbonControl1.PageCategories.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageCategory() {Me.RibbonPageConversations}) Me.RibbonControl1.PageCategories.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageCategory() {Me.RibbonPageConversations})
@ -569,15 +476,10 @@ Partial Class frmValidator
Me.RibbonControl1.ShowToolbarCustomizeItem = False Me.RibbonControl1.ShowToolbarCustomizeItem = False
Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1 Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
Me.RibbonControl1.Toolbar.ShowCustomizeItem = False Me.RibbonControl1.Toolbar.ShowCustomizeItem = False
Me.ToolTip1.SetToolTip(Me.RibbonControl1, resources.GetString("RibbonControl1.ToolTip"))
' '
'bsiError 'bsiError
' '
resources.ApplyResources(Me.bsiError, "bsiError")
Me.bsiError.Id = 1 Me.bsiError.Id = 1
Me.bsiError.ImageOptions.ImageIndex = CType(resources.GetObject("bsiError.ImageOptions.ImageIndex"), Integer)
Me.bsiError.ImageOptions.LargeImageIndex = CType(resources.GetObject("bsiError.ImageOptions.LargeImageIndex"), Integer)
Me.bsiError.ImageOptions.SvgImage = CType(resources.GetObject("bsiError.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.bsiError.ItemAppearance.Normal.Font = CType(resources.GetObject("bsiError.ItemAppearance.Normal.Font"), System.Drawing.Font) 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.ForeColor = System.Drawing.Color.Red
Me.bsiError.ItemAppearance.Normal.Options.UseFont = True Me.bsiError.ItemAppearance.Normal.Options.UseFont = True
@ -588,9 +490,6 @@ Partial Class frmValidator
' '
resources.ApplyResources(Me.bsiInformation, "bsiInformation") resources.ApplyResources(Me.bsiInformation, "bsiInformation")
Me.bsiInformation.Id = 2 Me.bsiInformation.Id = 2
Me.bsiInformation.ImageOptions.ImageIndex = CType(resources.GetObject("bsiInformation.ImageOptions.ImageIndex"), Integer)
Me.bsiInformation.ImageOptions.LargeImageIndex = CType(resources.GetObject("bsiInformation.ImageOptions.LargeImageIndex"), Integer)
Me.bsiInformation.ImageOptions.SvgImage = CType(resources.GetObject("bsiInformation.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.bsiInformation.ItemAppearance.Normal.BackColor = System.Drawing.Color.Transparent Me.bsiInformation.ItemAppearance.Normal.BackColor = System.Drawing.Color.Transparent
Me.bsiInformation.ItemAppearance.Normal.Options.UseBackColor = True Me.bsiInformation.ItemAppearance.Normal.Options.UseBackColor = True
Me.bsiInformation.Name = "bsiInformation" Me.bsiInformation.Name = "bsiInformation"
@ -599,17 +498,12 @@ Partial Class frmValidator
' '
resources.ApplyResources(Me.bsiDocID, "bsiDocID") resources.ApplyResources(Me.bsiDocID, "bsiDocID")
Me.bsiDocID.Id = 3 Me.bsiDocID.Id = 3
Me.bsiDocID.ImageOptions.ImageIndex = CType(resources.GetObject("bsiDocID.ImageOptions.ImageIndex"), Integer)
Me.bsiDocID.ImageOptions.LargeImageIndex = CType(resources.GetObject("bsiDocID.ImageOptions.LargeImageIndex"), Integer)
Me.bsiDocID.ImageOptions.SvgImage = CType(resources.GetObject("bsiDocID.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.bsiDocID.Name = "bsiDocID" Me.bsiDocID.Name = "bsiDocID"
' '
'BarButtonItemFileView 'BarButtonItemFileView
' '
resources.ApplyResources(Me.BarButtonItemFileView, "BarButtonItemFileView") resources.ApplyResources(Me.BarButtonItemFileView, "BarButtonItemFileView")
Me.BarButtonItemFileView.Id = 4 Me.BarButtonItemFileView.Id = 4
Me.BarButtonItemFileView.ImageOptions.ImageIndex = CType(resources.GetObject("BarButtonItemFileView.ImageOptions.ImageIndex"), Integer)
Me.BarButtonItemFileView.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarButtonItemFileView.ImageOptions.LargeImageIndex"), Integer)
Me.BarButtonItemFileView.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.enablesearch Me.BarButtonItemFileView.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.enablesearch
Me.BarButtonItemFileView.Name = "BarButtonItemFileView" Me.BarButtonItemFileView.Name = "BarButtonItemFileView"
' '
@ -618,10 +512,7 @@ Partial Class frmValidator
resources.ApplyResources(Me.BarButtonItem3, "BarButtonItem3") resources.ApplyResources(Me.BarButtonItem3, "BarButtonItem3")
Me.BarButtonItem3.Id = 5 Me.BarButtonItem3.Id = 5
Me.BarButtonItem3.ImageOptions.Image = CType(resources.GetObject("BarButtonItem3.ImageOptions.Image"), System.Drawing.Image) Me.BarButtonItem3.ImageOptions.Image = CType(resources.GetObject("BarButtonItem3.ImageOptions.Image"), System.Drawing.Image)
Me.BarButtonItem3.ImageOptions.ImageIndex = CType(resources.GetObject("BarButtonItem3.ImageOptions.ImageIndex"), Integer)
Me.BarButtonItem3.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem3.ImageOptions.LargeImage"), System.Drawing.Image) Me.BarButtonItem3.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem3.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BarButtonItem3.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarButtonItem3.ImageOptions.LargeImageIndex"), Integer)
Me.BarButtonItem3.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem3.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.BarButtonItem3.Name = "BarButtonItem3" Me.BarButtonItem3.Name = "BarButtonItem3"
Me.BarButtonItem3.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.SmallWithText Me.BarButtonItem3.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.SmallWithText
' '
@ -629,8 +520,6 @@ Partial Class frmValidator
' '
resources.ApplyResources(Me.BarButtonItem4, "BarButtonItem4") resources.ApplyResources(Me.BarButtonItem4, "BarButtonItem4")
Me.BarButtonItem4.Id = 6 Me.BarButtonItem4.Id = 6
Me.BarButtonItem4.ImageOptions.ImageIndex = CType(resources.GetObject("BarButtonItem4.ImageOptions.ImageIndex"), Integer)
Me.BarButtonItem4.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarButtonItem4.ImageOptions.LargeImageIndex"), Integer)
Me.BarButtonItem4.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.bo_unknown Me.BarButtonItem4.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.bo_unknown
Me.BarButtonItem4.Name = "BarButtonItem4" Me.BarButtonItem4.Name = "BarButtonItem4"
Me.BarButtonItem4.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.SmallWithText Me.BarButtonItem4.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.SmallWithText
@ -640,10 +529,7 @@ Partial Class frmValidator
resources.ApplyResources(Me.bbtniRefresh, "bbtniRefresh") resources.ApplyResources(Me.bbtniRefresh, "bbtniRefresh")
Me.bbtniRefresh.Id = 7 Me.bbtniRefresh.Id = 7
Me.bbtniRefresh.ImageOptions.Image = CType(resources.GetObject("bbtniRefresh.ImageOptions.Image"), System.Drawing.Image) Me.bbtniRefresh.ImageOptions.Image = CType(resources.GetObject("bbtniRefresh.ImageOptions.Image"), System.Drawing.Image)
Me.bbtniRefresh.ImageOptions.ImageIndex = CType(resources.GetObject("bbtniRefresh.ImageOptions.ImageIndex"), Integer)
Me.bbtniRefresh.ImageOptions.LargeImage = CType(resources.GetObject("bbtniRefresh.ImageOptions.LargeImage"), System.Drawing.Image) Me.bbtniRefresh.ImageOptions.LargeImage = CType(resources.GetObject("bbtniRefresh.ImageOptions.LargeImage"), System.Drawing.Image)
Me.bbtniRefresh.ImageOptions.LargeImageIndex = CType(resources.GetObject("bbtniRefresh.ImageOptions.LargeImageIndex"), Integer)
Me.bbtniRefresh.ImageOptions.SvgImage = CType(resources.GetObject("bbtniRefresh.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.bbtniRefresh.Name = "bbtniRefresh" Me.bbtniRefresh.Name = "bbtniRefresh"
' '
'bbtniRefreshSearches 'bbtniRefreshSearches
@ -651,10 +537,7 @@ Partial Class frmValidator
resources.ApplyResources(Me.bbtniRefreshSearches, "bbtniRefreshSearches") resources.ApplyResources(Me.bbtniRefreshSearches, "bbtniRefreshSearches")
Me.bbtniRefreshSearches.Id = 8 Me.bbtniRefreshSearches.Id = 8
Me.bbtniRefreshSearches.ImageOptions.Image = CType(resources.GetObject("bbtniRefreshSearches.ImageOptions.Image"), System.Drawing.Image) Me.bbtniRefreshSearches.ImageOptions.Image = CType(resources.GetObject("bbtniRefreshSearches.ImageOptions.Image"), System.Drawing.Image)
Me.bbtniRefreshSearches.ImageOptions.ImageIndex = CType(resources.GetObject("bbtniRefreshSearches.ImageOptions.ImageIndex"), Integer)
Me.bbtniRefreshSearches.ImageOptions.LargeImage = CType(resources.GetObject("bbtniRefreshSearches.ImageOptions.LargeImage"), System.Drawing.Image) Me.bbtniRefreshSearches.ImageOptions.LargeImage = CType(resources.GetObject("bbtniRefreshSearches.ImageOptions.LargeImage"), System.Drawing.Image)
Me.bbtniRefreshSearches.ImageOptions.LargeImageIndex = CType(resources.GetObject("bbtniRefreshSearches.ImageOptions.LargeImageIndex"), Integer)
Me.bbtniRefreshSearches.ImageOptions.SvgImage = CType(resources.GetObject("bbtniRefreshSearches.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.bbtniRefreshSearches.Name = "bbtniRefreshSearches" Me.bbtniRefreshSearches.Name = "bbtniRefreshSearches"
Me.bbtniRefreshSearches.Visibility = DevExpress.XtraBars.BarItemVisibility.Never Me.bbtniRefreshSearches.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
' '
@ -663,10 +546,7 @@ Partial Class frmValidator
resources.ApplyResources(Me.bbtniNext, "bbtniNext") resources.ApplyResources(Me.bbtniNext, "bbtniNext")
Me.bbtniNext.Id = 9 Me.bbtniNext.Id = 9
Me.bbtniNext.ImageOptions.Image = CType(resources.GetObject("bbtniNext.ImageOptions.Image"), System.Drawing.Image) Me.bbtniNext.ImageOptions.Image = CType(resources.GetObject("bbtniNext.ImageOptions.Image"), System.Drawing.Image)
Me.bbtniNext.ImageOptions.ImageIndex = CType(resources.GetObject("bbtniNext.ImageOptions.ImageIndex"), Integer)
Me.bbtniNext.ImageOptions.LargeImage = CType(resources.GetObject("bbtniNext.ImageOptions.LargeImage"), System.Drawing.Image) Me.bbtniNext.ImageOptions.LargeImage = CType(resources.GetObject("bbtniNext.ImageOptions.LargeImage"), System.Drawing.Image)
Me.bbtniNext.ImageOptions.LargeImageIndex = CType(resources.GetObject("bbtniNext.ImageOptions.LargeImageIndex"), Integer)
Me.bbtniNext.ImageOptions.SvgImage = CType(resources.GetObject("bbtniNext.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.bbtniNext.Name = "bbtniNext" Me.bbtniNext.Name = "bbtniNext"
' '
'bbtniDelete 'bbtniDelete
@ -674,10 +554,7 @@ Partial Class frmValidator
resources.ApplyResources(Me.bbtniDelete, "bbtniDelete") resources.ApplyResources(Me.bbtniDelete, "bbtniDelete")
Me.bbtniDelete.Id = 10 Me.bbtniDelete.Id = 10
Me.bbtniDelete.ImageOptions.Image = CType(resources.GetObject("bbtniDelete.ImageOptions.Image"), System.Drawing.Image) Me.bbtniDelete.ImageOptions.Image = CType(resources.GetObject("bbtniDelete.ImageOptions.Image"), System.Drawing.Image)
Me.bbtniDelete.ImageOptions.ImageIndex = CType(resources.GetObject("bbtniDelete.ImageOptions.ImageIndex"), Integer)
Me.bbtniDelete.ImageOptions.LargeImage = CType(resources.GetObject("bbtniDelete.ImageOptions.LargeImage"), System.Drawing.Image) Me.bbtniDelete.ImageOptions.LargeImage = CType(resources.GetObject("bbtniDelete.ImageOptions.LargeImage"), System.Drawing.Image)
Me.bbtniDelete.ImageOptions.LargeImageIndex = CType(resources.GetObject("bbtniDelete.ImageOptions.LargeImageIndex"), Integer)
Me.bbtniDelete.ImageOptions.SvgImage = CType(resources.GetObject("bbtniDelete.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.bbtniDelete.Name = "bbtniDelete" Me.bbtniDelete.Name = "bbtniDelete"
Me.bbtniDelete.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing Me.bbtniDelete.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
' '
@ -686,10 +563,7 @@ Partial Class frmValidator
resources.ApplyResources(Me.bbtniAnnotation, "bbtniAnnotation") resources.ApplyResources(Me.bbtniAnnotation, "bbtniAnnotation")
Me.bbtniAnnotation.Id = 11 Me.bbtniAnnotation.Id = 11
Me.bbtniAnnotation.ImageOptions.Image = CType(resources.GetObject("bbtniAnnotation.ImageOptions.Image"), System.Drawing.Image) Me.bbtniAnnotation.ImageOptions.Image = CType(resources.GetObject("bbtniAnnotation.ImageOptions.Image"), System.Drawing.Image)
Me.bbtniAnnotation.ImageOptions.ImageIndex = CType(resources.GetObject("bbtniAnnotation.ImageOptions.ImageIndex"), Integer)
Me.bbtniAnnotation.ImageOptions.LargeImage = CType(resources.GetObject("bbtniAnnotation.ImageOptions.LargeImage"), System.Drawing.Image) Me.bbtniAnnotation.ImageOptions.LargeImage = CType(resources.GetObject("bbtniAnnotation.ImageOptions.LargeImage"), System.Drawing.Image)
Me.bbtniAnnotation.ImageOptions.LargeImageIndex = CType(resources.GetObject("bbtniAnnotation.ImageOptions.LargeImageIndex"), Integer)
Me.bbtniAnnotation.ImageOptions.SvgImage = CType(resources.GetObject("bbtniAnnotation.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.bbtniAnnotation.Name = "bbtniAnnotation" Me.bbtniAnnotation.Name = "bbtniAnnotation"
Me.bbtniAnnotation.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing Me.bbtniAnnotation.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
' '
@ -698,10 +572,7 @@ Partial Class frmValidator
resources.ApplyResources(Me.bsiInfo1, "bsiInfo1") resources.ApplyResources(Me.bsiInfo1, "bsiInfo1")
Me.bsiInfo1.Id = 14 Me.bsiInfo1.Id = 14
Me.bsiInfo1.ImageOptions.Image = CType(resources.GetObject("bsiInfo1.ImageOptions.Image"), System.Drawing.Image) Me.bsiInfo1.ImageOptions.Image = CType(resources.GetObject("bsiInfo1.ImageOptions.Image"), System.Drawing.Image)
Me.bsiInfo1.ImageOptions.ImageIndex = CType(resources.GetObject("bsiInfo1.ImageOptions.ImageIndex"), Integer)
Me.bsiInfo1.ImageOptions.LargeImage = CType(resources.GetObject("bsiInfo1.ImageOptions.LargeImage"), System.Drawing.Image) Me.bsiInfo1.ImageOptions.LargeImage = CType(resources.GetObject("bsiInfo1.ImageOptions.LargeImage"), System.Drawing.Image)
Me.bsiInfo1.ImageOptions.LargeImageIndex = CType(resources.GetObject("bsiInfo1.ImageOptions.LargeImageIndex"), Integer)
Me.bsiInfo1.ImageOptions.SvgImage = CType(resources.GetObject("bsiInfo1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.bsiInfo1.ItemAppearance.Normal.Font = CType(resources.GetObject("bsiInfo1.ItemAppearance.Normal.Font"), System.Drawing.Font) 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.ForeColor = System.Drawing.Color.Red
Me.bsiInfo1.ItemAppearance.Normal.Options.UseFont = True Me.bsiInfo1.ItemAppearance.Normal.Options.UseFont = True
@ -714,10 +585,7 @@ Partial Class frmValidator
resources.ApplyResources(Me.bsiInfo2, "bsiInfo2") resources.ApplyResources(Me.bsiInfo2, "bsiInfo2")
Me.bsiInfo2.Id = 15 Me.bsiInfo2.Id = 15
Me.bsiInfo2.ImageOptions.Image = CType(resources.GetObject("bsiInfo2.ImageOptions.Image"), System.Drawing.Image) Me.bsiInfo2.ImageOptions.Image = CType(resources.GetObject("bsiInfo2.ImageOptions.Image"), System.Drawing.Image)
Me.bsiInfo2.ImageOptions.ImageIndex = CType(resources.GetObject("bsiInfo2.ImageOptions.ImageIndex"), Integer)
Me.bsiInfo2.ImageOptions.LargeImage = CType(resources.GetObject("bsiInfo2.ImageOptions.LargeImage"), System.Drawing.Image) Me.bsiInfo2.ImageOptions.LargeImage = CType(resources.GetObject("bsiInfo2.ImageOptions.LargeImage"), System.Drawing.Image)
Me.bsiInfo2.ImageOptions.LargeImageIndex = CType(resources.GetObject("bsiInfo2.ImageOptions.LargeImageIndex"), Integer)
Me.bsiInfo2.ImageOptions.SvgImage = CType(resources.GetObject("bsiInfo2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.bsiInfo2.ItemAppearance.Normal.Font = CType(resources.GetObject("bsiInfo2.ItemAppearance.Normal.Font"), System.Drawing.Font) Me.bsiInfo2.ItemAppearance.Normal.Font = CType(resources.GetObject("bsiInfo2.ItemAppearance.Normal.Font"), System.Drawing.Font)
Me.bsiInfo2.ItemAppearance.Normal.Options.UseFont = True Me.bsiInfo2.ItemAppearance.Normal.Options.UseFont = True
Me.bsiInfo2.Name = "bsiInfo2" Me.bsiInfo2.Name = "bsiInfo2"
@ -728,36 +596,25 @@ Partial Class frmValidator
resources.ApplyResources(Me.BbtnitmSave, "BbtnitmSave") resources.ApplyResources(Me.BbtnitmSave, "BbtnitmSave")
Me.BbtnitmSave.Id = 16 Me.BbtnitmSave.Id = 16
Me.BbtnitmSave.ImageOptions.Image = CType(resources.GetObject("BbtnitmSave.ImageOptions.Image"), System.Drawing.Image) Me.BbtnitmSave.ImageOptions.Image = CType(resources.GetObject("BbtnitmSave.ImageOptions.Image"), System.Drawing.Image)
Me.BbtnitmSave.ImageOptions.ImageIndex = CType(resources.GetObject("BbtnitmSave.ImageOptions.ImageIndex"), Integer)
Me.BbtnitmSave.ImageOptions.LargeImage = CType(resources.GetObject("BbtnitmSave.ImageOptions.LargeImage"), System.Drawing.Image) Me.BbtnitmSave.ImageOptions.LargeImage = CType(resources.GetObject("BbtnitmSave.ImageOptions.LargeImage"), System.Drawing.Image)
Me.BbtnitmSave.ImageOptions.LargeImageIndex = CType(resources.GetObject("BbtnitmSave.ImageOptions.LargeImageIndex"), Integer)
Me.BbtnitmSave.ImageOptions.SvgImage = CType(resources.GetObject("BbtnitmSave.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.BbtnitmSave.Name = "BbtnitmSave" Me.BbtnitmSave.Name = "BbtnitmSave"
' '
'BarButtonItem2 'BarButtonItem2
' '
resources.ApplyResources(Me.BarButtonItem2, "BarButtonItem2") resources.ApplyResources(Me.BarButtonItem2, "BarButtonItem2")
Me.BarButtonItem2.Id = 17 Me.BarButtonItem2.Id = 17
Me.BarButtonItem2.ImageOptions.ImageIndex = CType(resources.GetObject("BarButtonItem2.ImageOptions.ImageIndex"), Integer)
Me.BarButtonItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarButtonItem2.ImageOptions.LargeImageIndex"), Integer)
Me.BarButtonItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.BarButtonItem2.Name = "BarButtonItem2" Me.BarButtonItem2.Name = "BarButtonItem2"
' '
'BarLinkContainerItem1 'BarLinkContainerItem1
' '
resources.ApplyResources(Me.BarLinkContainerItem1, "BarLinkContainerItem1") resources.ApplyResources(Me.BarLinkContainerItem1, "BarLinkContainerItem1")
Me.BarLinkContainerItem1.Id = 18 Me.BarLinkContainerItem1.Id = 18
Me.BarLinkContainerItem1.ImageOptions.ImageIndex = CType(resources.GetObject("BarLinkContainerItem1.ImageOptions.ImageIndex"), Integer)
Me.BarLinkContainerItem1.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarLinkContainerItem1.ImageOptions.LargeImageIndex"), Integer)
Me.BarLinkContainerItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarLinkContainerItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.BarLinkContainerItem1.Name = "BarLinkContainerItem1" Me.BarLinkContainerItem1.Name = "BarLinkContainerItem1"
' '
'btnitemConversationEnd 'btnitemConversationEnd
' '
resources.ApplyResources(Me.btnitemConversationEnd, "btnitemConversationEnd") resources.ApplyResources(Me.btnitemConversationEnd, "btnitemConversationEnd")
Me.btnitemConversationEnd.Id = 19 Me.btnitemConversationEnd.Id = 19
Me.btnitemConversationEnd.ImageOptions.ImageIndex = CType(resources.GetObject("btnitemConversationEnd.ImageOptions.ImageIndex"), Integer)
Me.btnitemConversationEnd.ImageOptions.LargeImageIndex = CType(resources.GetObject("btnitemConversationEnd.ImageOptions.LargeImageIndex"), Integer)
Me.btnitemConversationEnd.ImageOptions.SvgImage = CType(resources.GetObject("btnitemConversationEnd.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.btnitemConversationEnd.ImageOptions.SvgImage = CType(resources.GetObject("btnitemConversationEnd.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.btnitemConversationEnd.Name = "btnitemConversationEnd" Me.btnitemConversationEnd.Name = "btnitemConversationEnd"
' '
@ -765,8 +622,6 @@ Partial Class frmValidator
' '
resources.ApplyResources(Me.bbtnitem_ConversationNew, "bbtnitem_ConversationNew") resources.ApplyResources(Me.bbtnitem_ConversationNew, "bbtnitem_ConversationNew")
Me.bbtnitem_ConversationNew.Id = 20 Me.bbtnitem_ConversationNew.Id = 20
Me.bbtnitem_ConversationNew.ImageOptions.ImageIndex = CType(resources.GetObject("bbtnitem_ConversationNew.ImageOptions.ImageIndex"), Integer)
Me.bbtnitem_ConversationNew.ImageOptions.LargeImageIndex = CType(resources.GetObject("bbtnitem_ConversationNew.ImageOptions.LargeImageIndex"), Integer)
Me.bbtnitem_ConversationNew.ImageOptions.SvgImage = CType(resources.GetObject("bbtnitem_ConversationNew.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.bbtnitem_ConversationNew.ImageOptions.SvgImage = CType(resources.GetObject("bbtnitem_ConversationNew.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.bbtnitem_ConversationNew.Name = "bbtnitem_ConversationNew" Me.bbtnitem_ConversationNew.Name = "bbtnitem_ConversationNew"
' '
@ -774,9 +629,6 @@ Partial Class frmValidator
' '
resources.ApplyResources(Me.BarLinkContainerItem2, "BarLinkContainerItem2") resources.ApplyResources(Me.BarLinkContainerItem2, "BarLinkContainerItem2")
Me.BarLinkContainerItem2.Id = 21 Me.BarLinkContainerItem2.Id = 21
Me.BarLinkContainerItem2.ImageOptions.ImageIndex = CType(resources.GetObject("BarLinkContainerItem2.ImageOptions.ImageIndex"), Integer)
Me.BarLinkContainerItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarLinkContainerItem2.ImageOptions.LargeImageIndex"), Integer)
Me.BarLinkContainerItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarLinkContainerItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.BarLinkContainerItem2.Name = "BarLinkContainerItem2" Me.BarLinkContainerItem2.Name = "BarLinkContainerItem2"
' '
'BarEditItem1 'BarEditItem1
@ -784,9 +636,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.BarEditItem1, "BarEditItem1") resources.ApplyResources(Me.BarEditItem1, "BarEditItem1")
Me.BarEditItem1.Edit = Me.RepositoryItemComboBox1 Me.BarEditItem1.Edit = Me.RepositoryItemComboBox1
Me.BarEditItem1.Id = 22 Me.BarEditItem1.Id = 22
Me.BarEditItem1.ImageOptions.ImageIndex = CType(resources.GetObject("BarEditItem1.ImageOptions.ImageIndex"), Integer)
Me.BarEditItem1.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarEditItem1.ImageOptions.LargeImageIndex"), Integer)
Me.BarEditItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarEditItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.BarEditItem1.Name = "BarEditItem1" Me.BarEditItem1.Name = "BarEditItem1"
' '
'RepositoryItemComboBox1 'RepositoryItemComboBox1
@ -800,9 +649,6 @@ Partial Class frmValidator
resources.ApplyResources(Me.BarEditItem2, "BarEditItem2") resources.ApplyResources(Me.BarEditItem2, "BarEditItem2")
Me.BarEditItem2.Edit = Me.RepositoryItemComboBox2 Me.BarEditItem2.Edit = Me.RepositoryItemComboBox2
Me.BarEditItem2.Id = 23 Me.BarEditItem2.Id = 23
Me.BarEditItem2.ImageOptions.ImageIndex = CType(resources.GetObject("BarEditItem2.ImageOptions.ImageIndex"), Integer)
Me.BarEditItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarEditItem2.ImageOptions.LargeImageIndex"), Integer)
Me.BarEditItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarEditItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.BarEditItem2.Name = "BarEditItem2" Me.BarEditItem2.Name = "BarEditItem2"
' '
'RepositoryItemComboBox2 'RepositoryItemComboBox2
@ -813,12 +659,9 @@ Partial Class frmValidator
' '
'BarEditItem3 'BarEditItem3
' '
resources.ApplyResources(Me.BarEditItem3, "BarEditItem3")
Me.BarEditItem3.Edit = Me.RepositoryItemComboBox3 Me.BarEditItem3.Edit = Me.RepositoryItemComboBox3
resources.ApplyResources(Me.BarEditItem3, "BarEditItem3")
Me.BarEditItem3.Id = 24 Me.BarEditItem3.Id = 24
Me.BarEditItem3.ImageOptions.ImageIndex = CType(resources.GetObject("BarEditItem3.ImageOptions.ImageIndex"), Integer)
Me.BarEditItem3.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarEditItem3.ImageOptions.LargeImageIndex"), Integer)
Me.BarEditItem3.ImageOptions.SvgImage = CType(resources.GetObject("BarEditItem3.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.BarEditItem3.Name = "BarEditItem3" Me.BarEditItem3.Name = "BarEditItem3"
Me.BarEditItem3.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.Large Me.BarEditItem3.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.Large
' '
@ -832,17 +675,12 @@ Partial Class frmValidator
' '
resources.ApplyResources(Me.btnitemConversation_reload, "btnitemConversation_reload") resources.ApplyResources(Me.btnitemConversation_reload, "btnitemConversation_reload")
Me.btnitemConversation_reload.Id = 25 Me.btnitemConversation_reload.Id = 25
Me.btnitemConversation_reload.ImageOptions.ImageIndex = CType(resources.GetObject("btnitemConversation_reload.ImageOptions.ImageIndex"), Integer)
Me.btnitemConversation_reload.ImageOptions.LargeImageIndex = CType(resources.GetObject("btnitemConversation_reload.ImageOptions.LargeImageIndex"), Integer)
Me.btnitemConversation_reload.ImageOptions.SvgImage = CType(resources.GetObject("btnitemConversation_reload.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.btnitemConversation_reload.ImageOptions.SvgImage = CType(resources.GetObject("btnitemConversation_reload.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.btnitemConversation_reload.Name = "btnitemConversation_reload" Me.btnitemConversation_reload.Name = "btnitemConversation_reload"
' '
'BarButtonItem5 'BarButtonItem5
' '
resources.ApplyResources(Me.BarButtonItem5, "BarButtonItem5")
Me.BarButtonItem5.Id = 26 Me.BarButtonItem5.Id = 26
Me.BarButtonItem5.ImageOptions.ImageIndex = CType(resources.GetObject("BarButtonItem5.ImageOptions.ImageIndex"), Integer)
Me.BarButtonItem5.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarButtonItem5.ImageOptions.LargeImageIndex"), Integer)
Me.BarButtonItem5.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem5.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.BarButtonItem5.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem5.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.BarButtonItem5.Name = "BarButtonItem5" Me.BarButtonItem5.Name = "BarButtonItem5"
' '
@ -850,8 +688,6 @@ Partial Class frmValidator
' '
resources.ApplyResources(Me.Attmt_bbtnitmShow, "Attmt_bbtnitmShow") resources.ApplyResources(Me.Attmt_bbtnitmShow, "Attmt_bbtnitmShow")
Me.Attmt_bbtnitmShow.Id = 27 Me.Attmt_bbtnitmShow.Id = 27
Me.Attmt_bbtnitmShow.ImageOptions.ImageIndex = CType(resources.GetObject("Attmt_bbtnitmShow.ImageOptions.ImageIndex"), Integer)
Me.Attmt_bbtnitmShow.ImageOptions.LargeImageIndex = CType(resources.GetObject("Attmt_bbtnitmShow.ImageOptions.LargeImageIndex"), Integer)
Me.Attmt_bbtnitmShow.ImageOptions.SvgImage = CType(resources.GetObject("Attmt_bbtnitmShow.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.Attmt_bbtnitmShow.ImageOptions.SvgImage = CType(resources.GetObject("Attmt_bbtnitmShow.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.Attmt_bbtnitmShow.Name = "Attmt_bbtnitmShow" Me.Attmt_bbtnitmShow.Name = "Attmt_bbtnitmShow"
Me.Attmt_bbtnitmShow.Visibility = DevExpress.XtraBars.BarItemVisibility.Never Me.Attmt_bbtnitmShow.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
@ -860,8 +696,6 @@ Partial Class frmValidator
' '
resources.ApplyResources(Me.barbtnitmExport, "barbtnitmExport") resources.ApplyResources(Me.barbtnitmExport, "barbtnitmExport")
Me.barbtnitmExport.Id = 28 Me.barbtnitmExport.Id = 28
Me.barbtnitmExport.ImageOptions.ImageIndex = CType(resources.GetObject("barbtnitmExport.ImageOptions.ImageIndex"), Integer)
Me.barbtnitmExport.ImageOptions.LargeImageIndex = CType(resources.GetObject("barbtnitmExport.ImageOptions.LargeImageIndex"), Integer)
Me.barbtnitmExport.ImageOptions.SvgImage = CType(resources.GetObject("barbtnitmExport.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.barbtnitmExport.ImageOptions.SvgImage = CType(resources.GetObject("barbtnitmExport.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.barbtnitmExport.Name = "barbtnitmExport" Me.barbtnitmExport.Name = "barbtnitmExport"
Me.barbtnitmExport.Visibility = DevExpress.XtraBars.BarItemVisibility.Never Me.barbtnitmExport.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
@ -870,8 +704,6 @@ Partial Class frmValidator
' '
resources.ApplyResources(Me.ToggleSwitchItemLoadonClick, "ToggleSwitchItemLoadonClick") resources.ApplyResources(Me.ToggleSwitchItemLoadonClick, "ToggleSwitchItemLoadonClick")
Me.ToggleSwitchItemLoadonClick.Id = 30 Me.ToggleSwitchItemLoadonClick.Id = 30
Me.ToggleSwitchItemLoadonClick.ImageOptions.ImageIndex = CType(resources.GetObject("ToggleSwitchItemLoadonClick.ImageOptions.ImageIndex"), Integer)
Me.ToggleSwitchItemLoadonClick.ImageOptions.LargeImageIndex = CType(resources.GetObject("ToggleSwitchItemLoadonClick.ImageOptions.LargeImageIndex"), Integer)
Me.ToggleSwitchItemLoadonClick.ImageOptions.SvgImage = CType(resources.GetObject("ToggleSwitchItemLoadonClick.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.ToggleSwitchItemLoadonClick.ImageOptions.SvgImage = CType(resources.GetObject("ToggleSwitchItemLoadonClick.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.ToggleSwitchItemLoadonClick.Name = "ToggleSwitchItemLoadonClick" Me.ToggleSwitchItemLoadonClick.Name = "ToggleSwitchItemLoadonClick"
' '
@ -879,8 +711,6 @@ Partial Class frmValidator
' '
resources.ApplyResources(Me.Attmnt_bbtnitm_LoadonClick, "Attmnt_bbtnitm_LoadonClick") resources.ApplyResources(Me.Attmnt_bbtnitm_LoadonClick, "Attmnt_bbtnitm_LoadonClick")
Me.Attmnt_bbtnitm_LoadonClick.Id = 31 Me.Attmnt_bbtnitm_LoadonClick.Id = 31
Me.Attmnt_bbtnitm_LoadonClick.ImageOptions.ImageIndex = CType(resources.GetObject("Attmnt_bbtnitm_LoadonClick.ImageOptions.ImageIndex"), Integer)
Me.Attmnt_bbtnitm_LoadonClick.ImageOptions.LargeImageIndex = CType(resources.GetObject("Attmnt_bbtnitm_LoadonClick.ImageOptions.LargeImageIndex"), Integer)
Me.Attmnt_bbtnitm_LoadonClick.ImageOptions.SvgImage = CType(resources.GetObject("Attmnt_bbtnitm_LoadonClick.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.Attmnt_bbtnitm_LoadonClick.ImageOptions.SvgImage = CType(resources.GetObject("Attmnt_bbtnitm_LoadonClick.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.Attmnt_bbtnitm_LoadonClick.ItemAppearance.Pressed.Font = CType(resources.GetObject("Attmnt_bbtnitm_LoadonClick.ItemAppearance.Pressed.Font"), System.Drawing.Font) Me.Attmnt_bbtnitm_LoadonClick.ItemAppearance.Pressed.Font = CType(resources.GetObject("Attmnt_bbtnitm_LoadonClick.ItemAppearance.Pressed.Font"), System.Drawing.Font)
Me.Attmnt_bbtnitm_LoadonClick.ItemAppearance.Pressed.ForeColor = DevExpress.LookAndFeel.DXSkinColors.ForeColors.Information Me.Attmnt_bbtnitm_LoadonClick.ItemAppearance.Pressed.ForeColor = DevExpress.LookAndFeel.DXSkinColors.ForeColors.Information
@ -965,27 +795,22 @@ Partial Class frmValidator
' '
'RibbonStatusBar1 'RibbonStatusBar1
' '
resources.ApplyResources(Me.RibbonStatusBar1, "RibbonStatusBar1")
Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiError) Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiError)
Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiInformation) Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiInformation)
Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiDocID) Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiDocID)
resources.ApplyResources(Me.RibbonStatusBar1, "RibbonStatusBar1")
Me.RibbonStatusBar1.Name = "RibbonStatusBar1" Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1 Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
Me.ToolTip1.SetToolTip(Me.RibbonStatusBar1, resources.GetString("RibbonStatusBar1.ToolTip"))
' '
'RibbonPage2 'RibbonPage2
' '
Me.RibbonPage2.Name = "RibbonPage2" Me.RibbonPage2.Name = "RibbonPage2"
resources.ApplyResources(Me.RibbonPage2, "RibbonPage2") resources.ApplyResources(Me.RibbonPage2, "RibbonPage2")
' '
'FolderBrowserDialog1
'
resources.ApplyResources(Me.FolderBrowserDialog1, "FolderBrowserDialog1")
'
'frmValidator 'frmValidator
' '
resources.ApplyResources(Me, "$this")
Me.Appearance.Options.UseFont = True Me.Appearance.Options.UseFont = True
resources.ApplyResources(Me, "$this")
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.Controls.Add(Me.SplitContainer2_DV_Chat) Me.Controls.Add(Me.SplitContainer2_DV_Chat)
Me.Controls.Add(Me.RibbonControl1) Me.Controls.Add(Me.RibbonControl1)
@ -1000,7 +825,6 @@ Partial Class frmValidator
Me.Name = "frmValidator" Me.Name = "frmValidator"
Me.Ribbon = Me.RibbonControl1 Me.Ribbon = Me.RibbonControl1
Me.StatusBar = Me.RibbonStatusBar1 Me.StatusBar = Me.RibbonStatusBar1
Me.ToolTip1.SetToolTip(Me, resources.GetString("$this.ToolTip"))
CType(Me.SplitContainer2_DV_Chat.Panel1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.SplitContainer2_DV_Chat.Panel1, System.ComponentModel.ISupportInitialize).EndInit()
Me.SplitContainer2_DV_Chat.Panel1.ResumeLayout(False) Me.SplitContainer2_DV_Chat.Panel1.ResumeLayout(False)
CType(Me.SplitContainer2_DV_Chat.Panel2, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.SplitContainer2_DV_Chat.Panel2, System.ComponentModel.ISupportInitialize).EndInit()

File diff suppressed because it is too large Load Diff

View File

@ -841,7 +841,8 @@ Public Class frmValidator
.SortByColumn = "Y_LOC, X_LOC" .SortByColumn = "Y_LOC, X_LOC"
}) })
oSQL = $"SELECT T.* from TBPM_CONTROL_TABLE T, TBPM_PROFILE_CONTROLS T1 WHERE T1.CONTROL_ACTIVE = 1 AND T.CONTROL_ID = T1.GUID AND T1.PROFIL_ID = {CURRENT_ProfilGUID} ORDER BY T.SEQUENCE" oSQL = $"SELECT IIF(LANG.CAPTION IS NULL,T.SPALTEN_HEADER,LANG.CAPTION) SPALTEN_HEADER_LANG, T.* from TBPM_CONTROL_TABLE T INNER JOIN TBPM_PROFILE_CONTROLS T1 ON T.CONTROL_ID = T1.GUID
LEFT JOIN (SELECT * FROM TBPM_CONTOL_TABLE_LANG WHERE LANG_CODE = '{USER_LANGUAGE}') LANG ON T.GUID = LANG.COL_ID WHERE T1.CONTROL_ACTIVE = 1 AND T.CONTROL_ID = T1.GUID AND T1.PROFIL_ID = {CURRENT_ProfilGUID} ORDER BY T.SEQUENCE"
DT_COLUMNS_GRID = DatabaseFallback.GetDatatable("TBPM_CONTROL_TABLE", New GetDatatableOptions(oSQL, DatabaseType.ECM) With { DT_COLUMNS_GRID = DatabaseFallback.GetDatatable("TBPM_CONTROL_TABLE", New GetDatatableOptions(oSQL, DatabaseType.ECM) With {
.FilterExpression = $"PROFIL_ID = {CURRENT_ProfilGUID}", .FilterExpression = $"PROFIL_ID = {CURRENT_ProfilGUID}",
.SortByColumn = "SEQUENCE" .SortByColumn = "SEQUENCE"
@ -2507,11 +2508,17 @@ Public Class frmValidator
Private Function CreateWMObject() As String Private Function CreateWMObject() As String
LOGGER.Debug($"in GetWMDocFileString...'") LOGGER.Debug($"in GetWMDocFileString...'")
Dim oWMRELPATH As String = BASEDATA_DT_CONFIG.Rows.Item(0).Item("WM_REL_PATH") If WMSUFFIX.EndsWith("\") = False Then
If oWMRELPATH.EndsWith("\") = False Then WMSUFFIX = WMSUFFIX & "\"
oWMRELPATH = oWMRELPATH & "\"
End If End If
Dim oWMOwnPath = WMDocPathWindows.Replace(oWMRELPATH, "") Dim oWMOwnPath As String
If WM_AHWF_docPath <> String.Empty Then
oWMOwnPath = WM_AHWF_docPath
WMDocPathWindows = oWMOwnPath
Else
oWMOwnPath = WMDocPathWindows.Replace(WMSUFFIX, "")
End If
LOGGER.Debug($"oWMOwnPath: {oWMOwnPath}") LOGGER.Debug($"oWMOwnPath: {oWMOwnPath}")
Try Try
Dim oNormalizedPath = WINDREAM.NormalizePath(oWMOwnPath) Dim oNormalizedPath = WINDREAM.NormalizePath(oWMOwnPath)
@ -2535,6 +2542,11 @@ Public Class frmValidator
End Function End Function
Private Function GetDocPathWindows(_CheckStandard As Integer) Private Function GetDocPathWindows(_CheckStandard As Integer)
Try Try
If ActiveWorkflowType = ConstAHWorkflow_BlindFile Then
WMDocPathWindows = WM_AHWF_docPath
CURRENT_DOC_PATH = WM_AHWF_docPath
Return True
End If
Dim oResult As String Dim oResult As String
Dim oSQL = $"SELECT dbo.FNPM_GET_FILEPATH ({CURRENT_DOC_GUID},{_CheckStandard})" Dim oSQL = $"SELECT dbo.FNPM_GET_FILEPATH ({CURRENT_DOC_GUID},{_CheckStandard})"
@ -2752,6 +2764,9 @@ Public Class frmValidator
' DocumentViewerValidator.LoadFile(WMDocPathWindows) ' DocumentViewerValidator.LoadFile(WMDocPathWindows)
Try Try
If DocumentViewerValidator.Visible = False Then
DocumentViewerValidator.Visible = True
End If
Dim oDocument As DocumentResultList.Document = Nothing Dim oDocument As DocumentResultList.Document = Nothing
' Load DocumentInfo ' Load DocumentInfo
oDocument = Documentloader.Load(CURRENT_DOC_ID, WMDocPathWindows) oDocument = Documentloader.Load(CURRENT_DOC_ID, WMDocPathWindows)
@ -2763,7 +2778,12 @@ Public Class frmValidator
LOGGER.Error(ex) LOGGER.Error(ex)
Exit Sub Exit Sub
End Try End Try
If ActiveWorkflowType = ConstAHWorkflow_BlindFile Then
SplitContainer1.Panel2Collapsed = True
DocumentViewerValidator.Visible = False
RibbonPageFile.Visible = False
Exit Sub
End If
' Load Document in Document Viewer ' Load Document in Document Viewer
Dim oFileName = $"{CURRENT_DOC_ID}.{Current_Document.Extension}" Dim oFileName = $"{CURRENT_DOC_ID}.{Current_Document.Extension}"
@ -3785,7 +3805,7 @@ Public Class frmValidator
Click_Additional_Searches() Click_Additional_Searches()
End If End If
Else Else
MsgBox("Für dieses Profil wurde noch keine Eingabemaske definiert!" & vbNewLine & "Informieren Sie Ihren PM-Administrator!" & vbNewLine & "Das Fenster wird geschlossen!", MsgBoxStyle.Exclamation, "Achtung:") MsgBox("No Form-Mask defined for this profile!" & vbNewLine & "Please inform Your admin!" & vbNewLine & "The validator will be closed!", MsgBoxStyle.Exclamation, "Attention:")
Me.Close() Me.Close()
End If End If
@ -3833,7 +3853,7 @@ Public Class frmValidator
Else Else
RibbonPageGroupCustom.Visible = False RibbonPageGroupCustom.Visible = False
End If End If
If Not IsNothing(WMDocPathWindows) Then If Not IsNothing(WMDocPathWindows) And ActiveWorkflowType = ConstAHWorkflow_BlindFile Then
If ButtonExport2Folder_Caption <> "" And WMDocPathWindows <> "" Then If ButtonExport2Folder_Caption <> "" And WMDocPathWindows <> "" Then
If File.Exists(WMDocPathWindows) Then If File.Exists(WMDocPathWindows) Then
barbtnitmExport.Caption = ButtonExport2Folder_Caption barbtnitmExport.Caption = ButtonExport2Folder_Caption
@ -5287,7 +5307,7 @@ Public Class frmValidator
oView.FocusedColumn = oView.Columns.Item(oColumn.ColumnName) oView.FocusedColumn = oView.Columns.Item(oColumn.ColumnName)
pMissing = True pMissing = True
pMissingMessage = $"Fehlende Eingabe in Tabelle '{pGrid.Name}' in Spalte '{oDefinition.Item("SPALTEN_HEADER")}', Zeile '{oRowHandle + 1}'" pMissingMessage = $"Fehlende Eingabe in Tabelle '{pGrid.Name}' in Spalte '{oDefinition.Item("SPALTEN_HEADER_LANG")}', Zeile '{oRowHandle + 1}'"
Return False Return False
End If End If
End If End If