Common/DocumentResultList: Rework layout with DockManager

This commit is contained in:
Jonathan Jenne 2022-03-14 16:33:15 +01:00
parent 262ed2143f
commit 538790aa42
16 changed files with 1797 additions and 519 deletions

View File

@ -44,10 +44,12 @@
<OptionInfer>On</OptionInfer>
</PropertyGroup>
<ItemGroup>
<Reference Include="Accessibility" />
<Reference Include="DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.Dialogs.v21.2.Core, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.Printing.v21.2.Core, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.Data.Desktop.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.Sparkline.v21.2.Core, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.XtraDialogs.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
@ -64,11 +66,16 @@
<HintPath>..\packages\NLog.4.7.10\lib\net45\NLog.dll</HintPath>
</Reference>
<Reference Include="System" />
<Reference Include="System.ComponentModel.DataAnnotations" />
<Reference Include="System.Configuration" />
<Reference Include="System.Data" />
<Reference Include="System.Data.Linq" />
<Reference Include="System.Deployment" />
<Reference Include="System.Drawing" />
<Reference Include="System.IO.Compression" />
<Reference Include="System.Runtime.Serialization" />
<Reference Include="System.Runtime.Serialization.Formatters.Soap" />
<Reference Include="System.Security" />
<Reference Include="System.ServiceModel" />
<Reference Include="System.Transactions" />
<Reference Include="System.Windows.Forms" />
@ -107,6 +114,7 @@
<Compile Include="DataResultList\frmDataResultList.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="DocumentResultList\Layout.vb" />
<Compile Include="DocumentResultList\Loader.vb" />
<Compile Include="DocumentResultList\Config.vb" />
<Compile Include="DocumentResultList\Document.vb" />
@ -134,13 +142,19 @@
<DependentUpon>Settings.settings</DependentUpon>
<DesignTimeSharedInput>True</DesignTimeSharedInput>
</Compile>
<Compile Include="ObjectPropertyDialog\ctrlObjectPropertyDialog.Designer.vb">
<DependentUpon>ctrlObjectPropertyDialog.vb</DependentUpon>
</Compile>
<Compile Include="ObjectPropertyDialog\ctrlObjectPropertyDialog.vb">
<SubType>UserControl</SubType>
</Compile>
<Compile Include="ObjectPropertyDialog\frmObjectPropertyDialog.Designer.vb">
<DependentUpon>frmObjectPropertyDialog.vb</DependentUpon>
</Compile>
<Compile Include="ObjectPropertyDialog\frmObjectPropertyDialog.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="ObjectPropertyDialog\PropertyControls.vb" />
<Compile Include="ObjectPropertyDialog\AttributeControls.vb" />
</ItemGroup>
<ItemGroup>
<EmbeddedResource Include="DataResultList\frmDataResultList.resx">
@ -162,6 +176,9 @@
<CustomToolNamespace>My.Resources</CustomToolNamespace>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="ObjectPropertyDialog\ctrlObjectPropertyDialog.resx">
<DependentUpon>ctrlObjectPropertyDialog.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="ObjectPropertyDialog\frmObjectPropertyDialog.resx">
<DependentUpon>frmObjectPropertyDialog.vb</DependentUpon>
</EmbeddedResource>
@ -315,5 +332,8 @@
<ItemGroup>
<None Include="Resources\save.svg" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\clearpivottable.svg" />
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
</Project>

View File

@ -0,0 +1,74 @@
Imports DevExpress.Utils
Imports DevExpress.XtraBars.Docking
Imports DevExpress.XtraGrid.Views.Grid
Imports DigitalData.Modules.Base
Imports DigitalData.Modules.Config
Imports DigitalData.Modules.Logging
Namespace DocumentResultList
Public Class Layout
Inherits BaseClass
Private Config As ConfigManager(Of Config)
Public Sub New(pLogConfig As LogConfig, pConfig As ConfigManager(Of DocumentResultList.Config))
MyBase.New(pLogConfig)
Config = pConfig
End Sub
Public Sub DockManager_SaveLayout(pDockManager As DockManager)
Try
Dim oXml As String = GetDockmanager_LayoutName()
pDockManager.SaveLayoutToXml(oXml)
Catch ex As Exception
Logger.Error(ex)
Logger.Info("Error while saving GridLayout: " & ex.Message)
End Try
End Sub
Public Sub DockManager_RestoreLayout(pDockManager As DockManager)
Try
Dim oXml As String = GetDockmanager_LayoutName()
pDockManager.RestoreLayoutFromXml(oXml)
Catch ex As Exception
Logger.Error(ex)
Logger.Info("Error while restoring GridLayout: " & ex.Message)
End Try
End Sub
Public Sub GridView_RestoreLayout(pGridView As GridView)
Try
Dim oLayoutFile As String = GetGrid_LayoutName(pGridView)
If IO.File.Exists(oLayoutFile) Then
pGridView.RestoreLayoutFromXml(oLayoutFile, OptionsLayoutBase.FullLayout)
End If
Catch ex As Exception
Logger.Error(ex)
Logger.Info("Error while restoring layout: " & ex.Message)
End Try
End Sub
Public Sub GridView_SaveLayout(pGridView As GridView)
Try
Dim oXml As String = GetGrid_LayoutName(pGridView)
pGridView.SaveLayoutToXml(oXml, OptionsLayoutBase.FullLayout)
Catch ex As Exception
Logger.Error(ex)
Logger.Info("Error while saving GridLayout: " & ex.Message)
End Try
End Sub
Public Function GetDockmanager_LayoutName() As String
Dim Filename As String = $"DockManagerDocResult_UserLayout.xml"
Dim oDirectory As String = IO.Path.GetDirectoryName(Config.UserConfigPath)
Return IO.Path.Combine(oDirectory, Filename)
End Function
Public Function GetGrid_LayoutName(pGridView As GridView) As String
Dim Filename As String = $"DevExpressGridViewDocResult_{pGridView.Name}UserLayout.xml"
Dim oDirectory As String = IO.Path.GetDirectoryName(Config.UserConfigPath)
Return IO.Path.Combine(oDirectory, Filename)
End Function
End Class
End Namespace

View File

@ -110,6 +110,16 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
'''</summary>
Friend ReadOnly Property clearpivottable() As DevExpress.Utils.Svg.SvgImage
Get
Dim obj As Object = ResourceManager.GetObject("clearpivottable", resourceCulture)
Return CType(obj,DevExpress.Utils.Svg.SvgImage)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
'''</summary>

View File

@ -133,6 +133,9 @@
<data name="ZooFlow-Vergroessern" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ZooFlow-Vergroessern.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="save" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\save.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="Open_32x32" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Open_32x32.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@ -199,7 +202,7 @@
<data name="Article_32x32" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Article_32x32.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="save" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\save.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
<data name="clearpivottable" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\clearpivottable.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
</root>

View File

@ -1,7 +1,8 @@
DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.ProgressBarControl, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.Repository.RepositoryItemTextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.Repository.RepositoryItemComboBox, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraBars.Docking.DockManager, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.Repository.RepositoryItemComboBox, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.Repository.RepositoryItemTextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.ProgressBarControl, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a

View File

@ -0,0 +1,185 @@
Imports DevExpress.XtraEditors
Imports DevExpress.XtraLayout
Imports DigitalData.Modules.Logging
Imports DigitalData.Modules.ZooFlow
Imports DigitalData.Modules.Database
Imports DigitalData.Controls.LookupGrid
Imports DevExpress.XtraGrid
Imports System.Windows.Forms
Imports DevExpress.XtraGrid.Views.Grid
Imports DigitalData.Modules.EDMI.API
Imports DigitalData.Modules.Base
Public Class AttributeControls
Inherits BaseClass
Private ReadOnly Client As Client
Private ReadOnly Environment As Environment
Public Event EditValueChanged As EventHandler
Public Sub New(pLogConfig As LogConfig, pEnvironment As Environment, pClient As Client)
MyBase.New(pLogConfig)
Client = pClient
Environment = pEnvironment
End Sub
Public Function ShouldControlBeEditable(pAttribute As Attribute) As Boolean
If pAttribute.IsSystem Then
Return False
End If
Return True
End Function
Public Async Function GetAttributesForBusinessEntity(EntityId As Long) As Task(Of List(Of Attribute))
Try
Dim oSQL = $"SELECT * FROM VWIDB_BE_ATTRIBUTE WHERE BE_ID = {EntityId} AND LANG_CODE = '{Environment.User.Language}'"
Dim oResult = Await Client.GetDatatableFromIDBAsync(oSQL)
If oResult.OK = False Then
Throw New ApplicationException($"Attributes for Business Entity {EntityId} could not be retrieved!")
ElseIf oResult.Table.Rows.Count = 0 Then
Throw New ApplicationException($"BusinessEntity {EntityId} does not have any attributes!")
Else
Dim oAttributes As New List(Of Attribute)
For Each oRow As DataRow In oResult.Table.Rows
oAttributes.Add(New Attribute() With {
.ID = oRow.Item("ATTR_ID"),
.Title = oRow.Item("ATTR_TITLE"),
.TypeID = oRow.Item("TYPE_ID"),
.TypeName = oRow.Item("TYPE_NAME"),
.IsSystem = Convert.ToBoolean(oRow.Item("SYS_ATTRIBUTE"))
})
Next
Return oAttributes
End If
Catch ex As Exception
Logger.Error(ex)
Return New List(Of Attribute)
End Try
End Function
Public Async Function LoadControlsForAttributes(pObjectId As Long, pAttributes As List(Of Attribute), LayoutRoot As LayoutControlGroup) As Task
LayoutRoot.Clear()
For Each oAttribute As Attribute In pAttributes
Dim oEditable = ShouldControlBeEditable(oAttribute)
Dim oControl = GetControlForAttribute(oAttribute, Not oEditable)
Dim oItem As LayoutControlItem = LayoutRoot.AddItem()
oItem.Text = oAttribute.Title
oItem.Name = oAttribute.Title
oItem.Control = oControl
Next
For Each oItem As LayoutControlItem In LayoutRoot.Items
If TypeOf oItem.Control Is BaseEdit Then
Dim oValue = Await GetAttributeValue(oItem.Name, pObjectId)
Dim oEdit = DirectCast(oItem.Control, BaseEdit)
oEdit.EditValue = oValue
AddHandler oEdit.EditValueChanged, Sub() RaiseEvent EditValueChanged(oItem, Nothing)
ElseIf TypeOf oItem.Control Is GridControl Then
Dim oValueTable = Await GetAttributeValueAsTable(oItem.Name, pObjectId)
Dim oGrid = DirectCast(oItem.Control, GridControl)
oGrid.DataSource = oValueTable
End If
Next
End Function
Public Async Function GetAttributeValue(AttributeName As String, ObjectId As Long, Optional LanguageCode As String = "de-DE", Optional IsForeign As Boolean = False) As Task(Of Object)
Dim oIsForeign = IIf(IsForeign, 1, 0)
Dim oSQL = $"SELECT TERM_VALUE FROM [dbo].[FNIDB_PM_GET_VARIABLE_VALUE] ({ObjectId}, '{AttributeName}', '{LanguageCode}', {oIsForeign})"
Dim oResult = Await Client.GetScalarValueFromIDBAsync(oSQL)
Return oResult.Scalar
End Function
Public Async Function GetAttributeValueAsTable(AttributeName As String, ObjectId As Long, Optional LanguageCode As String = "de-DE", Optional IsForeign As Boolean = False) As Task(Of DataTable)
Dim oIsForeign = IIf(IsForeign, 1, 0)
Dim oSQL = $"SELECT TERM_VALUE FROM [dbo].[FNIDB_PM_GET_VARIABLE_VALUE] ({ObjectId}, '{AttributeName}', '{LanguageCode}', {oIsForeign})"
Dim oResult = Await Client.GetDatatableFromIDBAsync(oSQL)
Return oResult.Table
End Function
Public Function GetControlForAttribute(pAttribute As Attribute, pIsReadOnly As Boolean) As Control
Dim oControl As Control
Select Case pAttribute.TypeName
Case Attribute.TYPE_BIT
Dim oCheckboxEdit As New CheckEdit With {
.Name = pAttribute.ID,
.Text = pAttribute.Title,
.[ReadOnly] = pIsReadOnly
}
oControl = oCheckboxEdit
Case Attribute.TYPE_DATE
Dim oDateEdit As New DateEdit With {
.Name = pAttribute.ID,
.[ReadOnly] = pIsReadOnly
}
oControl = oDateEdit
Case Attribute.TYPE_BIG_INTEGER
Dim oTextEdit As New TextEdit With {
.Name = pAttribute.ID,
.[ReadOnly] = pIsReadOnly
}
oControl = oTextEdit
Case Attribute.TYPE_DECIMAL
Dim oTextEdit As New TextEdit With {
.Name = pAttribute.ID,
.[ReadOnly] = pIsReadOnly
}
oControl = oTextEdit
Case Attribute.TYPE_FLOAT
Dim oTextEdit As New TextEdit With {
.Name = pAttribute.ID,
.[ReadOnly] = pIsReadOnly
}
oControl = oTextEdit
Case Attribute.TYPE_VECTOR_STRING
' Minimum size is picked up by the LayoutControl to determine the grids size
Dim oGrid As New GridControl With {
.Name = pAttribute.ID,
.MinimumSize = New System.Drawing.Size(0, 100)
}
oGrid.ForceInitialize()
Dim oView = DirectCast(oGrid.DefaultView, GridView)
oView.OptionsView.ShowGroupPanel = False
oView.OptionsView.ShowColumnHeaders = False
oView.OptionsView.ShowIndicator = False
oView.OptionsBehavior.ReadOnly = True
oView.OptionsBehavior.Editable = False
oControl = oGrid
Case Else
Dim oTextEdit As New TextEdit With {
.Name = pAttribute.ID,
.[ReadOnly] = pIsReadOnly
}
oControl = oTextEdit
End Select
oControl.Tag = pAttribute
Return oControl
End Function
End Class

View File

@ -1,92 +0,0 @@
Imports DevExpress.XtraEditors
Imports DevExpress.XtraLayout
Imports DigitalData.Modules.Logging
Imports DigitalData.Modules.ZooFlow
Imports DigitalData.Modules.Database
Imports DigitalData.Controls.LookupGrid
Imports DevExpress.XtraGrid
Imports System.Windows.Forms
Imports DevExpress.XtraGrid.Views.Grid
Public Class PropertyControls
Private _LogConfig As LogConfig
Private _Logger As Logger
Private _Db As MSSQLServer
Public Sub New(LogConfig As LogConfig, Database As MSSQLServer)
_LogConfig = LogConfig
_Logger = LogConfig.GetLogger()
_Db = Database
End Sub
Public Function GetControlForAttribute(pAttribute As Attribute, pIsReadOnly As Boolean) As Control
Dim oControl As Control
Select Case pAttribute.TypeName
Case Attribute.TYPE_BIT
Dim oCheckboxEdit As New CheckEdit With {
.Name = pAttribute.ID,
.Text = pAttribute.Title,
.[ReadOnly] = pIsReadOnly
}
oControl = oCheckboxEdit
Case Attribute.TYPE_DATE
Dim oDateEdit As New DateEdit With {
.Name = pAttribute.ID,
.[ReadOnly] = pIsReadOnly
}
oControl = oDateEdit
Case Attribute.TYPE_BIG_INTEGER
Dim oTextEdit As New TextEdit With {
.Name = pAttribute.ID,
.[ReadOnly] = pIsReadOnly
}
oControl = oTextEdit
Case Attribute.TYPE_DECIMAL
Dim oTextEdit As New TextEdit With {
.Name = pAttribute.ID,
.[ReadOnly] = pIsReadOnly
}
oControl = oTextEdit
Case Attribute.TYPE_FLOAT
Dim oTextEdit As New TextEdit With {
.Name = pAttribute.ID,
.[ReadOnly] = pIsReadOnly
}
oControl = oTextEdit
Case Attribute.TYPE_VECTOR_STRING
' Minimum size is picked up by the LayoutControl to determine the grids size
Dim oGrid As New GridControl With {
.Name = pAttribute.ID,
.MinimumSize = New System.Drawing.Size(0, 100)
}
oGrid.ForceInitialize()
Dim oView = DirectCast(oGrid.DefaultView, GridView)
oView.OptionsView.ShowGroupPanel = False
oView.OptionsView.ShowColumnHeaders = False
oView.OptionsView.ShowIndicator = False
oView.OptionsBehavior.ReadOnly = True
oView.OptionsBehavior.Editable = False
oControl = oGrid
Case Else
Dim oTextEdit As New TextEdit With {
.Name = pAttribute.ID,
.[ReadOnly] = pIsReadOnly
}
oControl = oTextEdit
End Select
oControl.Tag = pAttribute
Return oControl
End Function
End Class

View File

@ -0,0 +1,531 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class ctrlObjectPropertyDialog
Inherits System.Windows.Forms.UserControl
'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Wird vom Windows Form-Designer benötigt.
Private components As System.ComponentModel.IContainer
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.XtraTabControl1 = New DevExpress.XtraTab.XtraTabControl()
Me.XtraTabPageObject = New DevExpress.XtraTab.XtraTabPage()
Me.LayoutControl1 = New DevExpress.XtraLayout.LayoutControl()
Me.ProgressBarControl1 = New DevExpress.XtraEditors.ProgressBarControl()
Me.RootMetadata = New DevExpress.XtraLayout.LayoutControlGroup()
Me.LayoutControlGroup1 = New DevExpress.XtraLayout.LayoutControlGroup()
Me.LayoutControlGroup2 = New DevExpress.XtraLayout.LayoutControlGroup()
Me.LayoutControlGroup3 = New DevExpress.XtraLayout.LayoutControlGroup()
Me.LayoutControlItem4 = New DevExpress.XtraLayout.LayoutControlItem()
Me.lbLifecycleStart = New DevExpress.XtraLayout.SimpleLabelItem()
Me.lbLifecycleEnd = New DevExpress.XtraLayout.SimpleLabelItem()
Me.XtraTabPageAttributes = New DevExpress.XtraTab.XtraTabPage()
Me.XtraTabPageAttributeHistory = New DevExpress.XtraTab.XtraTabPage()
Me.GridControl1 = New DevExpress.XtraGrid.GridControl()
Me.GridView1 = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.LayoutControlItem2 = New DevExpress.XtraLayout.LayoutControlItem()
Me.EmptySpaceItem1 = New DevExpress.XtraLayout.EmptySpaceItem()
Me.txtCreatedWho = New DevExpress.XtraEditors.TextEdit()
Me.TextEdit11 = New DevExpress.XtraEditors.TextEdit()
Me.txtAccessedWhen = New DevExpress.XtraEditors.TextEdit()
Me.txtObjectId = New DevExpress.XtraEditors.TextEdit()
Me.txtChangedWhen = New DevExpress.XtraEditors.TextEdit()
Me.txtCreatedWhen = New DevExpress.XtraEditors.TextEdit()
Me.txtChangedWho = New DevExpress.XtraEditors.TextEdit()
Me.LayoutControlItem1 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem3 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem5 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem6 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem7 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem8 = New DevExpress.XtraLayout.LayoutControlItem()
Me.txtAccessedWho = New DevExpress.XtraLayout.LayoutControlItem()
Me.GridControl2 = New DevExpress.XtraGrid.GridControl()
Me.GridView2 = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.LayoutControl2 = New DevExpress.XtraLayout.LayoutControl()
Me.Root = New DevExpress.XtraLayout.LayoutControlGroup()
CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabControl1.SuspendLayout()
Me.XtraTabPageObject.SuspendLayout()
CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.LayoutControl1.SuspendLayout()
CType(Me.ProgressBarControl1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.RootMetadata, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlGroup1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlGroup2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlGroup3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.lbLifecycleStart, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.lbLifecycleEnd, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabPageAttributes.SuspendLayout()
Me.XtraTabPageAttributeHistory.SuspendLayout()
CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridView1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.EmptySpaceItem1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtCreatedWho.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextEdit11.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAccessedWhen.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtObjectId.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtChangedWhen.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtCreatedWhen.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtChangedWho.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem8, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAccessedWho, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridControl2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridView2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControl2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.Root, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'XtraTabControl1
'
Me.XtraTabControl1.Dock = System.Windows.Forms.DockStyle.Fill
Me.XtraTabControl1.HeaderLocation = DevExpress.XtraTab.TabHeaderLocation.Bottom
Me.XtraTabControl1.Location = New System.Drawing.Point(0, 0)
Me.XtraTabControl1.Name = "XtraTabControl1"
Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPageObject
Me.XtraTabControl1.Size = New System.Drawing.Size(505, 723)
Me.XtraTabControl1.TabIndex = 2
Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPageObject, Me.XtraTabPageAttributes, Me.XtraTabPageAttributeHistory})
'
'XtraTabPageObject
'
Me.XtraTabPageObject.Controls.Add(Me.LayoutControl1)
Me.XtraTabPageObject.Name = "XtraTabPageObject"
Me.XtraTabPageObject.Size = New System.Drawing.Size(503, 698)
Me.XtraTabPageObject.Text = "Objekt"
'
'LayoutControl1
'
Me.LayoutControl1.Controls.Add(Me.GridControl1)
Me.LayoutControl1.Controls.Add(Me.ProgressBarControl1)
Me.LayoutControl1.Controls.Add(Me.txtObjectId)
Me.LayoutControl1.Controls.Add(Me.txtCreatedWhen)
Me.LayoutControl1.Controls.Add(Me.txtCreatedWho)
Me.LayoutControl1.Controls.Add(Me.txtChangedWho)
Me.LayoutControl1.Controls.Add(Me.txtChangedWhen)
Me.LayoutControl1.Controls.Add(Me.txtAccessedWhen)
Me.LayoutControl1.Controls.Add(Me.TextEdit11)
Me.LayoutControl1.Dock = System.Windows.Forms.DockStyle.Fill
Me.LayoutControl1.Location = New System.Drawing.Point(0, 0)
Me.LayoutControl1.Name = "LayoutControl1"
Me.LayoutControl1.OptionsCustomizationForm.DesignTimeCustomizationFormPositionAndSize = New System.Drawing.Rectangle(1068, 351, 650, 400)
Me.LayoutControl1.Root = Me.RootMetadata
Me.LayoutControl1.Size = New System.Drawing.Size(503, 698)
Me.LayoutControl1.TabIndex = 0
Me.LayoutControl1.Text = "LayoutControl1"
'
'ProgressBarControl1
'
Me.ProgressBarControl1.Location = New System.Drawing.Point(24, 656)
Me.ProgressBarControl1.Name = "ProgressBarControl1"
Me.ProgressBarControl1.Size = New System.Drawing.Size(455, 18)
Me.ProgressBarControl1.StyleController = Me.LayoutControl1
Me.ProgressBarControl1.TabIndex = 7
'
'RootMetadata
'
Me.RootMetadata.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
Me.RootMetadata.GroupBordersVisible = False
Me.RootMetadata.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlGroup1, Me.LayoutControlGroup2, Me.LayoutControlGroup3})
Me.RootMetadata.Name = "Root"
Me.RootMetadata.Size = New System.Drawing.Size(503, 698)
Me.RootMetadata.TextVisible = False
'
'LayoutControlGroup1
'
Me.LayoutControlGroup1.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem2})
Me.LayoutControlGroup1.Location = New System.Drawing.Point(0, 232)
Me.LayoutControlGroup1.Name = "LayoutControlGroup1"
Me.LayoutControlGroup1.Size = New System.Drawing.Size(483, 346)
Me.LayoutControlGroup1.Text = "Objekt Historie"
'
'LayoutControlGroup2
'
Me.LayoutControlGroup2.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.EmptySpaceItem1, Me.LayoutControlItem1, Me.LayoutControlItem3, Me.LayoutControlItem5, Me.LayoutControlItem6, Me.LayoutControlItem7, Me.LayoutControlItem8, Me.txtAccessedWho})
Me.LayoutControlGroup2.Location = New System.Drawing.Point(0, 0)
Me.LayoutControlGroup2.Name = "LayoutControlGroup2"
Me.LayoutControlGroup2.Size = New System.Drawing.Size(483, 232)
Me.LayoutControlGroup2.Text = "Eigenschaften"
'
'LayoutControlGroup3
'
Me.LayoutControlGroup3.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem4, Me.lbLifecycleStart, Me.lbLifecycleEnd})
Me.LayoutControlGroup3.Location = New System.Drawing.Point(0, 578)
Me.LayoutControlGroup3.Name = "LayoutControlGroup3"
Me.LayoutControlGroup3.Size = New System.Drawing.Size(483, 100)
Me.LayoutControlGroup3.Text = "Lebenszyklus"
'
'LayoutControlItem4
'
Me.LayoutControlItem4.Control = Me.ProgressBarControl1
Me.LayoutControlItem4.Location = New System.Drawing.Point(0, 33)
Me.LayoutControlItem4.Name = "LayoutControlItem4"
Me.LayoutControlItem4.Size = New System.Drawing.Size(459, 22)
Me.LayoutControlItem4.TextSize = New System.Drawing.Size(0, 0)
Me.LayoutControlItem4.TextVisible = False
'
'lbLifecycleStart
'
Me.lbLifecycleStart.AllowHotTrack = False
Me.lbLifecycleStart.Location = New System.Drawing.Point(0, 0)
Me.lbLifecycleStart.Name = "lbLifecycleStart"
Me.lbLifecycleStart.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.lbLifecycleStart.Size = New System.Drawing.Size(229, 33)
Me.lbLifecycleStart.Text = "00.00.0000"
Me.lbLifecycleStart.TextSize = New System.Drawing.Size(70, 13)
'
'lbLifecycleEnd
'
Me.lbLifecycleEnd.AllowHotTrack = False
Me.lbLifecycleEnd.AppearanceItemCaption.Options.UseTextOptions = True
Me.lbLifecycleEnd.AppearanceItemCaption.TextOptions.HAlignment = DevExpress.Utils.HorzAlignment.Far
Me.lbLifecycleEnd.Location = New System.Drawing.Point(229, 0)
Me.lbLifecycleEnd.Name = "lbLifecycleEnd"
Me.lbLifecycleEnd.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.lbLifecycleEnd.Size = New System.Drawing.Size(230, 33)
Me.lbLifecycleEnd.Text = "99.99.9999"
Me.lbLifecycleEnd.TextSize = New System.Drawing.Size(70, 13)
'
'XtraTabPageAttributes
'
Me.XtraTabPageAttributes.Controls.Add(Me.LayoutControl2)
Me.XtraTabPageAttributes.Name = "XtraTabPageAttributes"
Me.XtraTabPageAttributes.Size = New System.Drawing.Size(503, 698)
Me.XtraTabPageAttributes.Text = "Attribute"
'
'XtraTabPageAttributeHistory
'
Me.XtraTabPageAttributeHistory.Controls.Add(Me.GridControl2)
Me.XtraTabPageAttributeHistory.Name = "XtraTabPageAttributeHistory"
Me.XtraTabPageAttributeHistory.Size = New System.Drawing.Size(503, 698)
Me.XtraTabPageAttributeHistory.Text = "Attribut Historie"
'
'GridControl1
'
Me.GridControl1.Location = New System.Drawing.Point(24, 277)
Me.GridControl1.MainView = Me.GridView1
Me.GridControl1.Name = "GridControl1"
Me.GridControl1.Size = New System.Drawing.Size(455, 297)
Me.GridControl1.TabIndex = 9
Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView1})
'
'GridView1
'
Me.GridView1.GridControl = Me.GridControl1
Me.GridView1.Name = "GridView1"
'
'LayoutControlItem2
'
Me.LayoutControlItem2.Control = Me.GridControl1
Me.LayoutControlItem2.Location = New System.Drawing.Point(0, 0)
Me.LayoutControlItem2.Name = "LayoutControlItem2"
Me.LayoutControlItem2.Size = New System.Drawing.Size(459, 301)
Me.LayoutControlItem2.TextSize = New System.Drawing.Size(0, 0)
Me.LayoutControlItem2.TextVisible = False
'
'EmptySpaceItem1
'
Me.EmptySpaceItem1.AllowHotTrack = False
Me.EmptySpaceItem1.Location = New System.Drawing.Point(0, 120)
Me.EmptySpaceItem1.Name = "EmptySpaceItem1"
Me.EmptySpaceItem1.Size = New System.Drawing.Size(459, 67)
Me.EmptySpaceItem1.TextSize = New System.Drawing.Size(0, 0)
'
'txtCreatedWho
'
Me.txtCreatedWho.Location = New System.Drawing.Point(338, 78)
Me.txtCreatedWho.Name = "txtCreatedWho"
Me.txtCreatedWho.Properties.AppearanceReadOnly.BackColor = System.Drawing.Color.White
Me.txtCreatedWho.Properties.AppearanceReadOnly.Options.UseBackColor = True
Me.txtCreatedWho.Properties.ReadOnly = True
Me.txtCreatedWho.Size = New System.Drawing.Size(138, 20)
Me.txtCreatedWho.StyleController = Me.LayoutControl1
Me.txtCreatedWho.TabIndex = 8
'
'TextEdit11
'
Me.TextEdit11.Location = New System.Drawing.Point(338, 138)
Me.TextEdit11.Name = "TextEdit11"
Me.TextEdit11.Properties.AppearanceReadOnly.BackColor = System.Drawing.Color.White
Me.TextEdit11.Properties.AppearanceReadOnly.Options.UseBackColor = True
Me.TextEdit11.Properties.ReadOnly = True
Me.TextEdit11.Size = New System.Drawing.Size(138, 20)
Me.TextEdit11.StyleController = Me.LayoutControl1
Me.TextEdit11.TabIndex = 10
'
'txtAccessedWhen
'
Me.txtAccessedWhen.Location = New System.Drawing.Point(109, 138)
Me.txtAccessedWhen.Name = "txtAccessedWhen"
Me.txtAccessedWhen.Properties.AppearanceReadOnly.BackColor = System.Drawing.Color.White
Me.txtAccessedWhen.Properties.AppearanceReadOnly.Options.UseBackColor = True
Me.txtAccessedWhen.Properties.ReadOnly = True
Me.txtAccessedWhen.Size = New System.Drawing.Size(137, 20)
Me.txtAccessedWhen.StyleController = Me.LayoutControl1
Me.txtAccessedWhen.TabIndex = 6
'
'txtObjectId
'
Me.txtObjectId.Location = New System.Drawing.Point(109, 48)
Me.txtObjectId.Name = "txtObjectId"
Me.txtObjectId.Properties.AppearanceReadOnly.BackColor = System.Drawing.Color.White
Me.txtObjectId.Properties.AppearanceReadOnly.Options.UseBackColor = True
Me.txtObjectId.Properties.ReadOnly = True
Me.txtObjectId.Size = New System.Drawing.Size(367, 20)
Me.txtObjectId.StyleController = Me.LayoutControl1
Me.txtObjectId.TabIndex = 7
'
'txtChangedWhen
'
Me.txtChangedWhen.Location = New System.Drawing.Point(109, 108)
Me.txtChangedWhen.Name = "txtChangedWhen"
Me.txtChangedWhen.Properties.AppearanceReadOnly.BackColor = System.Drawing.Color.White
Me.txtChangedWhen.Properties.AppearanceReadOnly.Options.UseBackColor = True
Me.txtChangedWhen.Properties.ReadOnly = True
Me.txtChangedWhen.Size = New System.Drawing.Size(137, 20)
Me.txtChangedWhen.StyleController = Me.LayoutControl1
Me.txtChangedWhen.TabIndex = 5
'
'txtCreatedWhen
'
Me.txtCreatedWhen.Location = New System.Drawing.Point(109, 78)
Me.txtCreatedWhen.Name = "txtCreatedWhen"
Me.txtCreatedWhen.Properties.AppearanceReadOnly.BackColor = System.Drawing.Color.White
Me.txtCreatedWhen.Properties.AppearanceReadOnly.Options.UseBackColor = True
Me.txtCreatedWhen.Properties.ReadOnly = True
Me.txtCreatedWhen.Size = New System.Drawing.Size(137, 20)
Me.txtCreatedWhen.StyleController = Me.LayoutControl1
Me.txtCreatedWhen.TabIndex = 4
'
'txtChangedWho
'
Me.txtChangedWho.Location = New System.Drawing.Point(338, 108)
Me.txtChangedWho.Name = "txtChangedWho"
Me.txtChangedWho.Properties.AppearanceReadOnly.BackColor = System.Drawing.Color.White
Me.txtChangedWho.Properties.AppearanceReadOnly.Options.UseBackColor = True
Me.txtChangedWho.Properties.ReadOnly = True
Me.txtChangedWho.Size = New System.Drawing.Size(138, 20)
Me.txtChangedWho.StyleController = Me.LayoutControl1
Me.txtChangedWho.TabIndex = 9
'
'LayoutControlItem1
'
Me.LayoutControlItem1.Control = Me.txtObjectId
Me.LayoutControlItem1.ControlAlignment = System.Drawing.ContentAlignment.TopLeft
Me.LayoutControlItem1.CustomizationFormText = "Objekt Id"
Me.LayoutControlItem1.Location = New System.Drawing.Point(0, 0)
Me.LayoutControlItem1.Name = "LayoutControlItem1"
Me.LayoutControlItem1.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem1.Size = New System.Drawing.Size(459, 30)
Me.LayoutControlItem1.Text = "Objekt Id"
Me.LayoutControlItem1.TextSize = New System.Drawing.Size(70, 13)
'
'LayoutControlItem3
'
Me.LayoutControlItem3.Control = Me.txtCreatedWhen
Me.LayoutControlItem3.ControlAlignment = System.Drawing.ContentAlignment.TopLeft
Me.LayoutControlItem3.CustomizationFormText = "Erstellt"
Me.LayoutControlItem3.Location = New System.Drawing.Point(0, 30)
Me.LayoutControlItem3.Name = "LayoutControlItem3"
Me.LayoutControlItem3.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem3.Size = New System.Drawing.Size(229, 30)
Me.LayoutControlItem3.Text = "Erstellt"
Me.LayoutControlItem3.TextSize = New System.Drawing.Size(70, 13)
'
'LayoutControlItem5
'
Me.LayoutControlItem5.Control = Me.txtCreatedWho
Me.LayoutControlItem5.ControlAlignment = System.Drawing.ContentAlignment.TopLeft
Me.LayoutControlItem5.CustomizationFormText = "von"
Me.LayoutControlItem5.Location = New System.Drawing.Point(229, 30)
Me.LayoutControlItem5.Name = "LayoutControlItem5"
Me.LayoutControlItem5.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem5.Size = New System.Drawing.Size(230, 30)
Me.LayoutControlItem5.Text = "von"
Me.LayoutControlItem5.TextSize = New System.Drawing.Size(70, 13)
'
'LayoutControlItem6
'
Me.LayoutControlItem6.Control = Me.txtChangedWho
Me.LayoutControlItem6.ControlAlignment = System.Drawing.ContentAlignment.TopLeft
Me.LayoutControlItem6.CustomizationFormText = "von"
Me.LayoutControlItem6.Location = New System.Drawing.Point(229, 60)
Me.LayoutControlItem6.Name = "LayoutControlItem6"
Me.LayoutControlItem6.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem6.Size = New System.Drawing.Size(230, 30)
Me.LayoutControlItem6.Text = "von"
Me.LayoutControlItem6.TextSize = New System.Drawing.Size(70, 13)
'
'LayoutControlItem7
'
Me.LayoutControlItem7.Control = Me.txtChangedWhen
Me.LayoutControlItem7.ControlAlignment = System.Drawing.ContentAlignment.TopLeft
Me.LayoutControlItem7.CustomizationFormText = "Geändert"
Me.LayoutControlItem7.Location = New System.Drawing.Point(0, 60)
Me.LayoutControlItem7.Name = "LayoutControlItem7"
Me.LayoutControlItem7.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem7.Size = New System.Drawing.Size(229, 30)
Me.LayoutControlItem7.Text = "Geändert"
Me.LayoutControlItem7.TextSize = New System.Drawing.Size(70, 13)
'
'LayoutControlItem8
'
Me.LayoutControlItem8.Control = Me.txtAccessedWhen
Me.LayoutControlItem8.ControlAlignment = System.Drawing.ContentAlignment.TopLeft
Me.LayoutControlItem8.CustomizationFormText = "Letzter Zugriff"
Me.LayoutControlItem8.Location = New System.Drawing.Point(0, 90)
Me.LayoutControlItem8.Name = "LayoutControlItem8"
Me.LayoutControlItem8.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem8.Size = New System.Drawing.Size(229, 30)
Me.LayoutControlItem8.Text = "Letzter Zugriff"
Me.LayoutControlItem8.TextSize = New System.Drawing.Size(70, 13)
'
'txtAccessedWho
'
Me.txtAccessedWho.Control = Me.TextEdit11
Me.txtAccessedWho.ControlAlignment = System.Drawing.ContentAlignment.TopLeft
Me.txtAccessedWho.CustomizationFormText = "von"
Me.txtAccessedWho.Location = New System.Drawing.Point(229, 90)
Me.txtAccessedWho.Name = "txtAccessedWho"
Me.txtAccessedWho.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.txtAccessedWho.Size = New System.Drawing.Size(230, 30)
Me.txtAccessedWho.Text = "von"
Me.txtAccessedWho.TextSize = New System.Drawing.Size(70, 13)
'
'GridControl2
'
Me.GridControl2.Dock = System.Windows.Forms.DockStyle.Fill
Me.GridControl2.Location = New System.Drawing.Point(0, 0)
Me.GridControl2.MainView = Me.GridView2
Me.GridControl2.Name = "GridControl2"
Me.GridControl2.Size = New System.Drawing.Size(503, 698)
Me.GridControl2.TabIndex = 0
Me.GridControl2.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView2})
'
'GridView2
'
Me.GridView2.GridControl = Me.GridControl2
Me.GridView2.Name = "GridView2"
'
'LayoutControl2
'
Me.LayoutControl2.Dock = System.Windows.Forms.DockStyle.Fill
Me.LayoutControl2.Location = New System.Drawing.Point(0, 0)
Me.LayoutControl2.Name = "LayoutControl2"
Me.LayoutControl2.Root = Me.Root
Me.LayoutControl2.Size = New System.Drawing.Size(503, 698)
Me.LayoutControl2.TabIndex = 0
Me.LayoutControl2.Text = "LayoutControl2"
'
'Root
'
Me.Root.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
Me.Root.GroupBordersVisible = False
Me.Root.Name = "Root"
Me.Root.Size = New System.Drawing.Size(503, 698)
Me.Root.TextVisible = False
'
'ctrlObjectPropertyDialog
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.Controls.Add(Me.XtraTabControl1)
Me.Name = "ctrlObjectPropertyDialog"
Me.Size = New System.Drawing.Size(505, 723)
CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.XtraTabControl1.ResumeLayout(False)
Me.XtraTabPageObject.ResumeLayout(False)
CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.LayoutControl1.ResumeLayout(False)
CType(Me.ProgressBarControl1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.RootMetadata, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlGroup1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlGroup2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlGroup3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.lbLifecycleStart, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.lbLifecycleEnd, System.ComponentModel.ISupportInitialize).EndInit()
Me.XtraTabPageAttributes.ResumeLayout(False)
Me.XtraTabPageAttributeHistory.ResumeLayout(False)
CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridView1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.EmptySpaceItem1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtCreatedWho.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextEdit11.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAccessedWhen.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtObjectId.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtChangedWhen.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtCreatedWhen.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtChangedWho.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem8, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAccessedWho, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridControl2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridView2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControl2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.Root, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
Friend WithEvents XtraTabControl1 As DevExpress.XtraTab.XtraTabControl
Friend WithEvents XtraTabPageObject As DevExpress.XtraTab.XtraTabPage
Friend WithEvents LayoutControl1 As DevExpress.XtraLayout.LayoutControl
Friend WithEvents ProgressBarControl1 As DevExpress.XtraEditors.ProgressBarControl
Friend WithEvents RootMetadata As DevExpress.XtraLayout.LayoutControlGroup
Friend WithEvents LayoutControlGroup1 As DevExpress.XtraLayout.LayoutControlGroup
Friend WithEvents LayoutControlGroup2 As DevExpress.XtraLayout.LayoutControlGroup
Friend WithEvents LayoutControlGroup3 As DevExpress.XtraLayout.LayoutControlGroup
Friend WithEvents LayoutControlItem4 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents lbLifecycleStart As DevExpress.XtraLayout.SimpleLabelItem
Friend WithEvents lbLifecycleEnd As DevExpress.XtraLayout.SimpleLabelItem
Friend WithEvents XtraTabPageAttributes As DevExpress.XtraTab.XtraTabPage
Friend WithEvents XtraTabPageAttributeHistory As DevExpress.XtraTab.XtraTabPage
Friend WithEvents GridControl1 As DevExpress.XtraGrid.GridControl
Friend WithEvents GridView1 As DevExpress.XtraGrid.Views.Grid.GridView
Friend WithEvents LayoutControlItem2 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents EmptySpaceItem1 As DevExpress.XtraLayout.EmptySpaceItem
Friend WithEvents txtObjectId As DevExpress.XtraEditors.TextEdit
Friend WithEvents txtCreatedWhen As DevExpress.XtraEditors.TextEdit
Friend WithEvents txtCreatedWho As DevExpress.XtraEditors.TextEdit
Friend WithEvents txtChangedWho As DevExpress.XtraEditors.TextEdit
Friend WithEvents txtChangedWhen As DevExpress.XtraEditors.TextEdit
Friend WithEvents txtAccessedWhen As DevExpress.XtraEditors.TextEdit
Friend WithEvents TextEdit11 As DevExpress.XtraEditors.TextEdit
Friend WithEvents LayoutControlItem1 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents LayoutControlItem3 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents LayoutControlItem5 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents LayoutControlItem6 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents LayoutControlItem7 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents LayoutControlItem8 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents txtAccessedWho As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents GridControl2 As DevExpress.XtraGrid.GridControl
Friend WithEvents GridView2 As DevExpress.XtraGrid.Views.Grid.GridView
Friend WithEvents LayoutControl2 As DevExpress.XtraLayout.LayoutControl
Friend WithEvents Root As DevExpress.XtraLayout.LayoutControlGroup
End Class

View File

@ -0,0 +1,120 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
</root>

View File

@ -0,0 +1,7 @@
Imports DevExpress.XtraTab
Public Class ctrlObjectPropertyDialog
Private Sub ctrlObjectPropertyDialog_Load(sender As Object, e As EventArgs) Handles Me.Load
End Sub
End Class

View File

@ -135,7 +135,7 @@ Partial Class frmObjectPropertyDialog
Me.TabFormControl1.Pages.Add(Me.TabPageAttributes)
Me.TabFormControl1.Pages.Add(Me.TabPageObject)
Me.TabFormControl1.Pages.Add(Me.TabPageHistory)
Me.TabFormControl1.SelectedPage = Me.TabPageAttributes
Me.TabFormControl1.SelectedPage = Me.TabPageObject
Me.TabFormControl1.ShowAddPageButton = False
Me.TabFormControl1.ShowTabCloseButtons = False
Me.TabFormControl1.Size = New System.Drawing.Size(572, 71)
@ -390,7 +390,7 @@ Partial Class frmObjectPropertyDialog
Me.LayoutObject.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
Me.LayoutObject.GroupBordersVisible = False
Me.LayoutObject.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.SimpleSeparator1, Me.LayoutControlItem7, Me.LayoutControlGroup1, Me.LayoutControlGroup2})
Me.LayoutObject.Name = "LayoutObject"
Me.LayoutObject.Name = "Root"
Me.LayoutObject.Size = New System.Drawing.Size(572, 534)
Me.LayoutObject.TextVisible = False
'
@ -593,7 +593,7 @@ Partial Class frmObjectPropertyDialog
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(572, 605)
Me.Controls.Add(Me.TabFormContentContainer1)
Me.Controls.Add(Me.TabFormContentContainer2)
Me.Controls.Add(Me.TabFormControl1)
Me.IconOptions.SvgImage = CType(resources.GetObject("frmObjectPropertyDialog.IconOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.Name = "frmObjectPropertyDialog"

View File

@ -19,7 +19,7 @@ Public Class frmObjectPropertyDialog
Private ReadOnly Client As Client
Private ReadOnly ObjectId As Int64
Private ReadOnly DatabaseIDB As MSSQLServer
Private ReadOnly ControlManager As PropertyControls
Private ReadOnly ControlManager As AttributeControls
Private ReadOnly Property LogConfig As LogConfig Implements IBaseForm.LogConfig
Private ReadOnly Property Logger As Logger Implements IBaseForm.Logger
@ -38,7 +38,9 @@ Public Class frmObjectPropertyDialog
Client = pClient
ObjectId = pObjectId
DatabaseIDB = Environment.DatabaseIDB
ControlManager = New PropertyControls(LogConfig, DatabaseIDB)
ControlManager = New AttributeControls(LogConfig, Environment, pClient)
AddHandler ControlManager.EditValueChanged, AddressOf BaseEdit_EditValueChanged
ErrorHandler = New BaseErrorHandler(LogConfig, Me)
End Sub
@ -74,37 +76,7 @@ Public Class frmObjectPropertyDialog
End Try
End Sub
Private Async Function GetAttributesForBusinessEntity(EntityId As Long) As Task(Of List(Of Attribute))
Try
Dim oSQL = $"SELECT * FROM VWIDB_BE_ATTRIBUTE WHERE BE_ID = {EntityId} AND LANG_CODE = '{Environment.User.Language}'"
Dim oResult = Await Client.GetDatatableFromIDBAsync(oSQL)
If oResult.OK = False Then
Throw New ApplicationException($"Attributes for Business Entity {EntityId} could not be retrieved!")
ElseIf oResult.Table.Rows.Count = 0 Then
Throw New ApplicationException($"BusinessEntity {EntityId} does not have any attributes!")
Else
Dim oAttributes As New List(Of Attribute)
For Each oRow As DataRow In oResult.Table.Rows
oAttributes.Add(New Attribute() With {
.ID = oRow.Item("ATTR_ID"),
.Title = oRow.Item("ATTR_TITLE"),
.TypeID = oRow.Item("TYPE_ID"),
.TypeName = oRow.Item("TYPE_NAME"),
.IsSystem = Convert.ToBoolean(oRow.Item("SYS_ATTRIBUTE"))
})
Next
Return oAttributes
End If
Catch ex As Exception
Logger.Error(ex)
Return New List(Of Attribute)
End Try
End Function
Private Async Function GetBusinessEntitiesForObjectId(ObjectId As Long) As Task(Of List(Of Long))
Try
@ -161,22 +133,6 @@ Public Class frmObjectPropertyDialog
Return oResult.Table
End Function
Private Async Function GetAttributeValue(AttributeName As String, ObjectId As Long, Optional LanguageCode As String = "de-DE", Optional IsForeign As Boolean = False) As Task(Of Object)
Dim oIsForeign = IIf(IsForeign, 1, 0)
Dim oSQL = $"SELECT TERM_VALUE FROM [dbo].[FNIDB_PM_GET_VARIABLE_VALUE] ({ObjectId}, '{AttributeName}', '{LanguageCode}', {oIsForeign})"
Dim oResult = Await Client.GetScalarValueFromIDBAsync(oSQL)
Return oResult.Scalar
End Function
Private Async Function GetAttributeValueAsTable(AttributeName As String, ObjectId As Long, Optional LanguageCode As String = "de-DE", Optional IsForeign As Boolean = False) As Task(Of DataTable)
Dim oIsForeign = IIf(IsForeign, 1, 0)
Dim oSQL = $"SELECT TERM_VALUE FROM [dbo].[FNIDB_PM_GET_VARIABLE_VALUE] ({ObjectId}, '{AttributeName}', '{LanguageCode}', {oIsForeign})"
Dim oResult = Await Client.GetDatatableFromIDBAsync(oSQL)
Return oResult.Table
End Function
Private Sub cmbBusinessEntity_EditValueChanged(sender As Object, e As EventArgs) Handles cmbBusinessEntity.EditValueChanged
Load_Attributes()
End Sub
@ -189,38 +145,13 @@ Public Class frmObjectPropertyDialog
Exit Sub
End If
Dim oAttributes = Await GetAttributesForBusinessEntity(oEntityId)
Dim oAttributes = Await ControlManager.GetAttributesForBusinessEntity(oEntityId)
If oAttributes.Count = 0 Then
MsgBox($"Es konnten keine Attribute für das Objekt '{ObjectId}' geladen werden!", MsgBoxStyle.Critical, Text)
End If
For Each oAttribute As Attribute In oAttributes
Dim oEditable = ShouldControlBeEditable(oAttribute)
Dim oControl = ControlManager.GetControlForAttribute(oAttribute, Not oEditable)
Dim oItem As LayoutControlItem = AttributeLayout.AddItem()
oItem.Text = oAttribute.Title
oItem.Name = oAttribute.Title
oItem.Control = oControl
Next
For Each oItem As LayoutControlItem In AttributeLayout.Items
If TypeOf oItem.Control Is BaseEdit Then
Dim oValue = Await GetAttributeValue(oItem.Name, ObjectId)
Dim oEdit = DirectCast(oItem.Control, BaseEdit)
oEdit.EditValue = oValue
AddHandler oEdit.EditValueChanged, AddressOf BaseEdit_EditValueChanged
ElseIf TypeOf oItem.Control Is GridControl Then
Dim oValueTable = Await GetAttributeValueAsTable(oItem.Name, ObjectId)
Dim oGrid = DirectCast(oItem.Control, GridControl)
oGrid.DataSource = oValueTable
End If
Next
Await ControlManager.LoadControlsForAttributes(ObjectId, oAttributes, AttributeLayout)
Catch ex As Exception
Logger.Error(ex)
End Try
@ -240,14 +171,6 @@ Public Class frmObjectPropertyDialog
End If
End Sub
Private Function ShouldControlBeEditable(pAttribute As Attribute) As Boolean
If pAttribute.IsSystem Then
Return False
End If
Return True
End Function
Private Function ShowAttributeHistory(pDatatable As DataTable) As Boolean
Try
GridValueHistory.DataSource = pDatatable
@ -312,8 +235,4 @@ Public Class frmObjectPropertyDialog
ErrorHandler.ShowErrorMessage(ex, "btnSave_ItemClick")
End Try
End Sub
Private Sub TabFormControl1_Click(sender As Object, e As EventArgs) Handles TabFormControl1.Click
End Sub
End Class

View File

@ -0,0 +1,15 @@
<?xml version='1.0' encoding='UTF-8'?>
<svg x="0px" y="0px" viewBox="0 0 32 32" version="1.1" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink" xml:space="preserve" id="Clear_Pivot_Table" style="enable-background:new 0 0 32 32">
<style type="text/css">
.Red{fill:#D11C1C;}
.Black{fill:#727272;}
.Blue{fill:#1177D7;}
.st0{opacity:0.5;}
</style>
<g class="st0">
<path d="M10,10H6V6h4V10z M24,6H12v4h12V6z M10,12H6v12h4V12z" class="Blue" />
</g>
<path d="M19,23.3L16.3,26c-0.4,0.4-0.4,1.2,0,1.6l4,4c0.4,0.4,1.2,0.4,1.6,0l2.7-2.7L19,23.3z" class="Blue" />
<path d="M14,26.8c0-0.3,0.1-0.6,0.1-0.8H4V4h22v10.1c0.3-0.1,0.5-0.1,0.8-0.1c0.4,0,0.8,0.1,1.2,0.2V3 c0-0.6-0.4-1-1-1H3C2.4,2,2,2.4,2,3v24c0,0.6,0.4,1,1,1h11.2C14.1,27.6,14,27.2,14,26.8z" class="Black" />
<path d="M31.7,20.4l-4-4c-0.4-0.4-1.2-0.4-1.6,0l-6.1,6.1l5.6,5.6l6.1-6.1C32.1,21.5,32.1,20.8,31.7,20.4z" class="Red" />
</svg>

View File

@ -49,6 +49,7 @@ Partial Class frmDocumentResultList
Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem4 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem5 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem6 = New DevExpress.XtraBars.BarButtonItem()
Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RibbonPageGroup_Navigation = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageGroup5 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
@ -71,14 +72,34 @@ Partial Class frmDocumentResultList
Me.GridControl3 = New DevExpress.XtraGrid.GridControl()
Me.GridView3 = New DevExpress.XtraGrid.Views.BandedGrid.BandedGridView()
Me.GridBand3 = New DevExpress.XtraGrid.Views.BandedGrid.GridBand()
Me.SplitContainerControl3 = New DevExpress.XtraEditors.SplitContainerControl()
Me.DocumentViewer1 = New DigitalData.Controls.DocumentViewer.DocumentViewer()
Me.XtraSaveFileDialog = New DevExpress.XtraEditors.XtraSaveFileDialog(Me.components)
Me.MenuFullAccess_IDB = New DevExpress.XtraBars.PopupMenu(Me.components)
Me.MenuViewAccess_IDB = New DevExpress.XtraBars.PopupMenu(Me.components)
Me.MenuFullAccess_EDM = New DevExpress.XtraBars.PopupMenu(Me.components)
Me.MenuFullAccess_ZOOFLOW = New DevExpress.XtraBars.PopupMenu(Me.components)
Me.RibbonPageGroup6 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.DockManager1 = New DevExpress.XtraBars.Docking.DockManager(Me.components)
Me.DockPanelFileList = New DevExpress.XtraBars.Docking.DockPanel()
Me.DockPanel2_Container = New DevExpress.XtraBars.Docking.ControlContainer()
Me.DockPanelMetadata = New DevExpress.XtraBars.Docking.DockPanel()
Me.DockPanel3_Container = New DevExpress.XtraBars.Docking.ControlContainer()
Me.LayoutControl1 = New DevExpress.XtraLayout.LayoutControl()
Me.RootMetadata = New DevExpress.XtraLayout.LayoutControlGroup()
Me.DockPanelDocViewer = New DevExpress.XtraBars.Docking.DockPanel()
Me.DockPanel1_Container = New DevExpress.XtraBars.Docking.ControlContainer()
Me.XtraTabControl1 = New DevExpress.XtraTab.XtraTabControl()
Me.XtraTabPageAttributes = New DevExpress.XtraTab.XtraTabPage()
Me.XtraTabPageObject = New DevExpress.XtraTab.XtraTabPage()
Me.XtraTabPageAttributeHistory = New DevExpress.XtraTab.XtraTabPage()
Me.TextEdit1 = New DevExpress.XtraEditors.TextEdit()
Me.LayoutControlItem1 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlGroup1 = New DevExpress.XtraLayout.LayoutControlGroup()
Me.LayoutControlGroup2 = New DevExpress.XtraLayout.LayoutControlGroup()
Me.LayoutControlGroup3 = New DevExpress.XtraLayout.LayoutControlGroup()
Me.ProgressBarControl1 = New DevExpress.XtraEditors.ProgressBarControl()
Me.LayoutControlItem4 = New DevExpress.XtraLayout.LayoutControlItem()
Me.lbLifecycleEnd = New DevExpress.XtraLayout.SimpleLabelItem()
Me.lbLifecycleStart = New DevExpress.XtraLayout.SimpleLabelItem()
Me.EmptySpaceItem1 = New DevExpress.XtraLayout.EmptySpaceItem()
Me.TextEdit3 = New DevExpress.XtraEditors.TextEdit()
Me.LayoutControlItem3 = New DevExpress.XtraLayout.LayoutControlItem()
CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.SplitContainerControl1.Panel1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SplitContainerControl1.Panel1.SuspendLayout()
@ -100,21 +121,35 @@ Partial Class frmDocumentResultList
CType(Me.GridView2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridControl3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridView3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.SplitContainerControl3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.SplitContainerControl3.Panel1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SplitContainerControl3.Panel1.SuspendLayout()
CType(Me.SplitContainerControl3.Panel2, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SplitContainerControl3.Panel2.SuspendLayout()
Me.SplitContainerControl3.SuspendLayout()
CType(Me.MenuFullAccess_IDB, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.MenuViewAccess_IDB, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.MenuFullAccess_EDM, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.MenuFullAccess_ZOOFLOW, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DockManager1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.DockPanelFileList.SuspendLayout()
Me.DockPanel2_Container.SuspendLayout()
Me.DockPanelMetadata.SuspendLayout()
Me.DockPanel3_Container.SuspendLayout()
CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.LayoutControl1.SuspendLayout()
CType(Me.RootMetadata, System.ComponentModel.ISupportInitialize).BeginInit()
Me.DockPanelDocViewer.SuspendLayout()
Me.DockPanel1_Container.SuspendLayout()
CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabControl1.SuspendLayout()
Me.XtraTabPageAttributes.SuspendLayout()
CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlGroup1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlGroup2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlGroup3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ProgressBarControl1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.lbLifecycleEnd, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.lbLifecycleStart, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.EmptySpaceItem1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextEdit3.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'SplitContainerControl1
'
Me.SplitContainerControl1.Collapsed = True
Me.SplitContainerControl1.CollapsePanel = DevExpress.XtraEditors.SplitCollapsePanel.Panel2
resources.ApplyResources(Me.SplitContainerControl1, "SplitContainerControl1")
Me.SplitContainerControl1.Name = "SplitContainerControl1"
@ -167,9 +202,9 @@ Partial Class frmDocumentResultList
'
Me.RibbonControl.CommandLayout = DevExpress.XtraBars.Ribbon.CommandLayout.Simplified
Me.RibbonControl.ExpandCollapseItem.Id = 0
Me.RibbonControl.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl.ExpandCollapseItem, Me.RibbonControl.SearchEditItem, Me.SwitchMainContainerHorizontal, Me.SwitchDetailContainerHorizontal, Me.BarButtonItemExportGrid1, Me.BarStaticItem1, Me.labelResultCount, Me.BarButtonBack, Me.BarButtonResetLayout, Me.labelCriticalError, Me.labelWarning, Me.MenuItemFileOpen, Me.MenuItemPropertiesIDB, Me.MenuItemFolderOpen, Me.MenuItemFilepathCopy, Me.MenuItemFolderpathCopy, Me.MenuItemPropertiesECM, Me.MenuItemsOpenFileZooFlow, Me.MenuItemPropertiesZooFlow, Me.ButtonRefresh, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarButtonItem5})
Me.RibbonControl.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl.ExpandCollapseItem, Me.RibbonControl.SearchEditItem, Me.SwitchMainContainerHorizontal, Me.SwitchDetailContainerHorizontal, Me.BarButtonItemExportGrid1, Me.BarStaticItem1, Me.labelResultCount, Me.BarButtonBack, Me.BarButtonResetLayout, Me.labelCriticalError, Me.labelWarning, Me.MenuItemFileOpen, Me.MenuItemPropertiesIDB, Me.MenuItemFolderOpen, Me.MenuItemFilepathCopy, Me.MenuItemFolderpathCopy, Me.MenuItemPropertiesECM, Me.MenuItemsOpenFileZooFlow, Me.MenuItemPropertiesZooFlow, Me.ButtonRefresh, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarButtonItem5, Me.BarButtonItem6})
resources.ApplyResources(Me.RibbonControl, "RibbonControl")
Me.RibbonControl.MaxItemId = 35
Me.RibbonControl.MaxItemId = 36
Me.RibbonControl.Name = "RibbonControl"
Me.RibbonControl.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1, Me.RibbonPage4, Me.RibbonPage2, Me.RibbonPageExport})
Me.RibbonControl.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemTextEdit1, Me.RepositoryItemTextEdit2})
@ -348,6 +383,13 @@ Partial Class frmDocumentResultList
Me.BarButtonItem5.Id = 34
Me.BarButtonItem5.Name = "BarButtonItem5"
'
'BarButtonItem6
'
resources.ApplyResources(Me.BarButtonItem6, "BarButtonItem6")
Me.BarButtonItem6.Id = 35
Me.BarButtonItem6.ImageOptions.SvgImage = Global.DigitalData.GUIs.Common.My.Resources.Resources.clearpivottable
Me.BarButtonItem6.Name = "BarButtonItem6"
'
'RibbonPage1
'
Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup_Navigation, Me.RibbonPageGroup5})
@ -409,7 +451,9 @@ Partial Class frmDocumentResultList
'
'RibbonPageGroup1
'
Me.RibbonPageGroup1.Alignment = DevExpress.XtraBars.Ribbon.RibbonPageGroupAlignment.Far
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonResetLayout)
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem6)
Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
resources.ApplyResources(Me.RibbonPageGroup1, "RibbonPageGroup1")
'
@ -520,23 +564,6 @@ Partial Class frmDocumentResultList
Me.GridBand3.OptionsBand.AllowSize = False
Me.GridBand3.VisibleIndex = 0
'
'SplitContainerControl3
'
Me.SplitContainerControl3.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.[Default]
resources.ApplyResources(Me.SplitContainerControl3, "SplitContainerControl3")
Me.SplitContainerControl3.Name = "SplitContainerControl3"
'
'SplitContainerControl3.Panel1
'
Me.SplitContainerControl3.Panel1.Controls.Add(Me.SplitContainerControl1)
resources.ApplyResources(Me.SplitContainerControl3.Panel1, "SplitContainerControl3.Panel1")
'
'SplitContainerControl3.Panel2
'
Me.SplitContainerControl3.Panel2.Controls.Add(Me.DocumentViewer1)
resources.ApplyResources(Me.SplitContainerControl3.Panel2, "SplitContainerControl3.Panel2")
Me.SplitContainerControl3.SplitterPosition = 771
'
'DocumentViewer1
'
resources.ApplyResources(Me.DocumentViewer1, "DocumentViewer1")
@ -547,50 +574,212 @@ Partial Class frmDocumentResultList
'
Me.XtraSaveFileDialog.FileName = "XtraSaveFileDialog1"
'
'MenuFullAccess_IDB
'
Me.MenuFullAccess_IDB.ItemLinks.Add(Me.MenuItemFileOpen)
Me.MenuFullAccess_IDB.ItemLinks.Add(Me.MenuItemFolderOpen)
Me.MenuFullAccess_IDB.ItemLinks.Add(Me.MenuItemFilepathCopy)
Me.MenuFullAccess_IDB.ItemLinks.Add(Me.MenuItemFolderpathCopy)
Me.MenuFullAccess_IDB.ItemLinks.Add(Me.MenuItemPropertiesIDB)
Me.MenuFullAccess_IDB.Name = "MenuFullAccess_IDB"
Me.MenuFullAccess_IDB.Ribbon = Me.RibbonControl
'
'MenuViewAccess_IDB
'
Me.MenuViewAccess_IDB.ItemLinks.Add(Me.MenuItemPropertiesIDB)
Me.MenuViewAccess_IDB.Name = "MenuViewAccess_IDB"
Me.MenuViewAccess_IDB.Ribbon = Me.RibbonControl
'
'MenuFullAccess_EDM
'
Me.MenuFullAccess_EDM.ItemLinks.Add(Me.MenuItemFileOpen)
Me.MenuFullAccess_EDM.ItemLinks.Add(Me.MenuItemFolderOpen)
Me.MenuFullAccess_EDM.ItemLinks.Add(Me.MenuItemFilepathCopy)
Me.MenuFullAccess_EDM.ItemLinks.Add(Me.MenuItemFolderpathCopy)
Me.MenuFullAccess_EDM.ItemLinks.Add(Me.MenuItemPropertiesECM)
Me.MenuFullAccess_EDM.Name = "MenuFullAccess_EDM"
Me.MenuFullAccess_EDM.Ribbon = Me.RibbonControl
'
'MenuFullAccess_ZOOFLOW
'
Me.MenuFullAccess_ZOOFLOW.ItemLinks.Add(Me.MenuItemsOpenFileZooFlow)
Me.MenuFullAccess_ZOOFLOW.ItemLinks.Add(Me.MenuItemPropertiesZooFlow)
Me.MenuFullAccess_ZOOFLOW.Name = "MenuFullAccess_ZOOFLOW"
Me.MenuFullAccess_ZOOFLOW.Ribbon = Me.RibbonControl
'
'RibbonPageGroup6
'
Me.RibbonPageGroup6.Name = "RibbonPageGroup6"
resources.ApplyResources(Me.RibbonPageGroup6, "RibbonPageGroup6")
'
'DockManager1
'
Me.DockManager1.Form = Me
Me.DockManager1.RootPanels.AddRange(New DevExpress.XtraBars.Docking.DockPanel() {Me.DockPanelFileList, Me.DockPanelMetadata, Me.DockPanelDocViewer})
Me.DockManager1.TopZIndexControls.AddRange(New String() {"DevExpress.XtraBars.BarDockControl", "DevExpress.XtraBars.StandaloneBarDockControl", "System.Windows.Forms.MenuStrip", "System.Windows.Forms.StatusStrip", "System.Windows.Forms.StatusBar", "DevExpress.XtraBars.Ribbon.RibbonStatusBar", "DevExpress.XtraBars.Ribbon.RibbonControl", "DevExpress.XtraBars.Navigation.OfficeNavigationBar", "DevExpress.XtraBars.Navigation.TileNavPane", "DevExpress.XtraBars.TabFormControl", "DevExpress.XtraBars.FluentDesignSystem.FluentDesignFormControl", "DevExpress.XtraBars.ToolbarForm.ToolbarFormControl"})
'
'DockPanelFileList
'
Me.DockPanelFileList.Controls.Add(Me.DockPanel2_Container)
Me.DockPanelFileList.Dock = DevExpress.XtraBars.Docking.DockingStyle.Left
Me.DockPanelFileList.ID = New System.Guid("1839997d-1d60-4497-acbb-0a49e64d6376")
resources.ApplyResources(Me.DockPanelFileList, "DockPanelFileList")
Me.DockPanelFileList.Name = "DockPanelFileList"
Me.DockPanelFileList.Options.ShowCloseButton = False
Me.DockPanelFileList.OriginalSize = New System.Drawing.Size(585, 200)
'
'DockPanel2_Container
'
Me.DockPanel2_Container.Controls.Add(Me.SplitContainerControl1)
resources.ApplyResources(Me.DockPanel2_Container, "DockPanel2_Container")
Me.DockPanel2_Container.Name = "DockPanel2_Container"
'
'DockPanelMetadata
'
Me.DockPanelMetadata.Controls.Add(Me.DockPanel3_Container)
Me.DockPanelMetadata.Dock = DevExpress.XtraBars.Docking.DockingStyle.Right
Me.DockPanelMetadata.ID = New System.Guid("a7688cec-f13e-448b-82cf-a6bb020fb3f7")
resources.ApplyResources(Me.DockPanelMetadata, "DockPanelMetadata")
Me.DockPanelMetadata.Name = "DockPanelMetadata"
Me.DockPanelMetadata.Options.ShowCloseButton = False
Me.DockPanelMetadata.OriginalSize = New System.Drawing.Size(280, 200)
'
'DockPanel3_Container
'
Me.DockPanel3_Container.Controls.Add(Me.XtraTabControl1)
resources.ApplyResources(Me.DockPanel3_Container, "DockPanel3_Container")
Me.DockPanel3_Container.Name = "DockPanel3_Container"
'
'LayoutControl1
'
Me.LayoutControl1.Controls.Add(Me.TextEdit1)
Me.LayoutControl1.Controls.Add(Me.ProgressBarControl1)
Me.LayoutControl1.Controls.Add(Me.TextEdit3)
resources.ApplyResources(Me.LayoutControl1, "LayoutControl1")
Me.LayoutControl1.Name = "LayoutControl1"
Me.LayoutControl1.OptionsCustomizationForm.DesignTimeCustomizationFormPositionAndSize = New System.Drawing.Rectangle(1068, 351, 650, 400)
Me.LayoutControl1.Root = Me.RootMetadata
'
'RootMetadata
'
Me.RootMetadata.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
Me.RootMetadata.GroupBordersVisible = False
Me.RootMetadata.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlGroup1, Me.LayoutControlGroup2, Me.LayoutControlGroup3})
Me.RootMetadata.Name = "Root"
Me.RootMetadata.Size = New System.Drawing.Size(276, 487)
Me.RootMetadata.TextVisible = False
'
'DockPanelDocViewer
'
Me.DockPanelDocViewer.Controls.Add(Me.DockPanel1_Container)
Me.DockPanelDocViewer.Dock = DevExpress.XtraBars.Docking.DockingStyle.Fill
Me.DockPanelDocViewer.ID = New System.Guid("6e5335e5-ba54-49c1-81b3-f174ea4e59ca")
resources.ApplyResources(Me.DockPanelDocViewer, "DockPanelDocViewer")
Me.DockPanelDocViewer.Name = "DockPanelDocViewer"
Me.DockPanelDocViewer.Options.ShowCloseButton = False
Me.DockPanelDocViewer.OriginalSize = New System.Drawing.Size(324, 200)
'
'DockPanel1_Container
'
Me.DockPanel1_Container.Controls.Add(Me.DocumentViewer1)
resources.ApplyResources(Me.DockPanel1_Container, "DockPanel1_Container")
Me.DockPanel1_Container.Name = "DockPanel1_Container"
'
'XtraTabControl1
'
resources.ApplyResources(Me.XtraTabControl1, "XtraTabControl1")
Me.XtraTabControl1.Name = "XtraTabControl1"
Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPageAttributes
Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPageAttributes, Me.XtraTabPageObject, Me.XtraTabPageAttributeHistory})
'
'XtraTabPageAttributes
'
Me.XtraTabPageAttributes.Controls.Add(Me.LayoutControl1)
Me.XtraTabPageAttributes.Name = "XtraTabPageAttributes"
resources.ApplyResources(Me.XtraTabPageAttributes, "XtraTabPageAttributes")
'
'XtraTabPageObject
'
Me.XtraTabPageObject.Name = "XtraTabPageObject"
resources.ApplyResources(Me.XtraTabPageObject, "XtraTabPageObject")
'
'XtraTabPageAttributeHistory
'
Me.XtraTabPageAttributeHistory.Name = "XtraTabPageAttributeHistory"
resources.ApplyResources(Me.XtraTabPageAttributeHistory, "XtraTabPageAttributeHistory")
'
'TextEdit1
'
resources.ApplyResources(Me.TextEdit1, "TextEdit1")
Me.TextEdit1.MenuManager = Me.RibbonControl
Me.TextEdit1.Name = "TextEdit1"
Me.TextEdit1.StyleController = Me.LayoutControl1
'
'LayoutControlItem1
'
Me.LayoutControlItem1.Control = Me.TextEdit1
Me.LayoutControlItem1.Location = New System.Drawing.Point(0, 0)
Me.LayoutControlItem1.Name = "LayoutControlItem1"
Me.LayoutControlItem1.Size = New System.Drawing.Size(232, 24)
Me.LayoutControlItem1.TextSize = New System.Drawing.Size(96, 13)
'
'LayoutControlGroup1
'
Me.LayoutControlGroup1.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem3})
Me.LayoutControlGroup1.Location = New System.Drawing.Point(0, 69)
Me.LayoutControlGroup1.Name = "LayoutControlGroup1"
Me.LayoutControlGroup1.Size = New System.Drawing.Size(256, 69)
'
'LayoutControlGroup2
'
Me.LayoutControlGroup2.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem1})
Me.LayoutControlGroup2.Location = New System.Drawing.Point(0, 0)
Me.LayoutControlGroup2.Name = "LayoutControlGroup2"
Me.LayoutControlGroup2.Size = New System.Drawing.Size(256, 69)
'
'LayoutControlGroup3
'
Me.LayoutControlGroup3.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem4, Me.lbLifecycleStart, Me.lbLifecycleEnd, Me.EmptySpaceItem1})
Me.LayoutControlGroup3.Location = New System.Drawing.Point(0, 138)
Me.LayoutControlGroup3.Name = "LayoutControlGroup3"
Me.LayoutControlGroup3.Size = New System.Drawing.Size(256, 329)
'
'ProgressBarControl1
'
resources.ApplyResources(Me.ProgressBarControl1, "ProgressBarControl1")
Me.ProgressBarControl1.MenuManager = Me.RibbonControl
Me.ProgressBarControl1.Name = "ProgressBarControl1"
Me.ProgressBarControl1.StyleController = Me.LayoutControl1
'
'LayoutControlItem4
'
Me.LayoutControlItem4.Control = Me.ProgressBarControl1
Me.LayoutControlItem4.Location = New System.Drawing.Point(0, 262)
Me.LayoutControlItem4.Name = "LayoutControlItem4"
Me.LayoutControlItem4.Size = New System.Drawing.Size(232, 22)
Me.LayoutControlItem4.TextSize = New System.Drawing.Size(0, 0)
Me.LayoutControlItem4.TextVisible = False
'
'lbLifecycleEnd
'
Me.lbLifecycleEnd.AllowHotTrack = False
Me.lbLifecycleEnd.AppearanceItemCaption.Options.UseTextOptions = True
Me.lbLifecycleEnd.AppearanceItemCaption.TextOptions.HAlignment = DevExpress.Utils.HorzAlignment.Far
Me.lbLifecycleEnd.Location = New System.Drawing.Point(116, 229)
Me.lbLifecycleEnd.Name = "lbLifecycleEnd"
Me.lbLifecycleEnd.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.lbLifecycleEnd.Size = New System.Drawing.Size(116, 33)
resources.ApplyResources(Me.lbLifecycleEnd, "lbLifecycleEnd")
Me.lbLifecycleEnd.TextSize = New System.Drawing.Size(96, 13)
'
'lbLifecycleStart
'
Me.lbLifecycleStart.AllowHotTrack = False
Me.lbLifecycleStart.Location = New System.Drawing.Point(0, 229)
Me.lbLifecycleStart.Name = "lbLifecycleStart"
Me.lbLifecycleStart.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.lbLifecycleStart.Size = New System.Drawing.Size(116, 33)
resources.ApplyResources(Me.lbLifecycleStart, "lbLifecycleStart")
Me.lbLifecycleStart.TextSize = New System.Drawing.Size(96, 13)
'
'EmptySpaceItem1
'
Me.EmptySpaceItem1.AllowHotTrack = False
Me.EmptySpaceItem1.Location = New System.Drawing.Point(0, 0)
Me.EmptySpaceItem1.Name = "EmptySpaceItem1"
Me.EmptySpaceItem1.Size = New System.Drawing.Size(232, 229)
Me.EmptySpaceItem1.TextSize = New System.Drawing.Size(0, 0)
'
'TextEdit3
'
resources.ApplyResources(Me.TextEdit3, "TextEdit3")
Me.TextEdit3.MenuManager = Me.RibbonControl
Me.TextEdit3.Name = "TextEdit3"
Me.TextEdit3.StyleController = Me.LayoutControl1
'
'LayoutControlItem3
'
Me.LayoutControlItem3.Control = Me.TextEdit3
Me.LayoutControlItem3.Location = New System.Drawing.Point(0, 0)
Me.LayoutControlItem3.Name = "LayoutControlItem3"
Me.LayoutControlItem3.Size = New System.Drawing.Size(232, 24)
Me.LayoutControlItem3.TextSize = New System.Drawing.Size(96, 13)
'
'frmDocumentResultList
'
Me.AllowFormGlass = DevExpress.Utils.DefaultBoolean.[True]
resources.ApplyResources(Me, "$this")
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.Controls.Add(Me.SplitContainerControl3)
Me.Controls.Add(Me.DockPanelDocViewer)
Me.Controls.Add(Me.DockPanelMetadata)
Me.Controls.Add(Me.DockPanelFileList)
Me.Controls.Add(Me.RibbonStatusBar)
Me.Controls.Add(Me.RibbonControl)
Me.IconOptions.Icon = CType(resources.GetObject("frmDocumentResultList.IconOptions.Icon"), System.Drawing.Icon)
@ -619,16 +808,31 @@ Partial Class frmDocumentResultList
CType(Me.GridView2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridControl3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridView3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.SplitContainerControl3.Panel1, System.ComponentModel.ISupportInitialize).EndInit()
Me.SplitContainerControl3.Panel1.ResumeLayout(False)
CType(Me.SplitContainerControl3.Panel2, System.ComponentModel.ISupportInitialize).EndInit()
Me.SplitContainerControl3.Panel2.ResumeLayout(False)
CType(Me.SplitContainerControl3, System.ComponentModel.ISupportInitialize).EndInit()
Me.SplitContainerControl3.ResumeLayout(False)
CType(Me.MenuFullAccess_IDB, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.MenuViewAccess_IDB, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.MenuFullAccess_EDM, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.MenuFullAccess_ZOOFLOW, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DockManager1, System.ComponentModel.ISupportInitialize).EndInit()
Me.DockPanelFileList.ResumeLayout(False)
Me.DockPanel2_Container.ResumeLayout(False)
Me.DockPanelMetadata.ResumeLayout(False)
Me.DockPanel3_Container.ResumeLayout(False)
CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.LayoutControl1.ResumeLayout(False)
CType(Me.RootMetadata, System.ComponentModel.ISupportInitialize).EndInit()
Me.DockPanelDocViewer.ResumeLayout(False)
Me.DockPanel1_Container.ResumeLayout(False)
CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.XtraTabControl1.ResumeLayout(False)
Me.XtraTabPageAttributes.ResumeLayout(False)
CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlGroup1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlGroup2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlGroup3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ProgressBarControl1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.lbLifecycleEnd, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.lbLifecycleStart, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.EmptySpaceItem1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextEdit3.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
@ -650,7 +854,6 @@ Partial Class frmDocumentResultList
Friend WithEvents GridView3 As DevExpress.XtraGrid.Views.BandedGrid.BandedGridView
Friend WithEvents GridBand3 As DevExpress.XtraGrid.Views.BandedGrid.GridBand
Friend WithEvents BarButtonItemExportGrid1 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents SplitContainerControl3 As DevExpress.XtraEditors.SplitContainerControl
Friend WithEvents DocumentViewer1 As DigitalData.Controls.DocumentViewer.DocumentViewer
Friend WithEvents BarStaticItem1 As DevExpress.XtraBars.BarStaticItem
Friend WithEvents labelResultCount As DevExpress.XtraBars.BarStaticItem
@ -664,16 +867,12 @@ Partial Class frmDocumentResultList
Friend WithEvents labelWarning As DevExpress.XtraBars.BarStaticItem
Friend WithEvents GridView1 As DevExpress.XtraGrid.Views.BandedGrid.BandedGridView
Friend WithEvents GridBand1 As DevExpress.XtraGrid.Views.BandedGrid.GridBand
Friend WithEvents MenuFullAccess_IDB As DevExpress.XtraBars.PopupMenu
Friend WithEvents MenuItemFileOpen As DevExpress.XtraBars.BarButtonItem
Friend WithEvents MenuItemPropertiesIDB As DevExpress.XtraBars.BarButtonItem
Friend WithEvents MenuItemFolderOpen As DevExpress.XtraBars.BarButtonItem
Friend WithEvents MenuItemFilepathCopy As DevExpress.XtraBars.BarButtonItem
Friend WithEvents MenuItemFolderpathCopy As DevExpress.XtraBars.BarButtonItem
Friend WithEvents MenuViewAccess_IDB As DevExpress.XtraBars.PopupMenu
Friend WithEvents MenuFullAccess_EDM As DevExpress.XtraBars.PopupMenu
Friend WithEvents MenuItemPropertiesECM As DevExpress.XtraBars.BarButtonItem
Friend WithEvents MenuFullAccess_ZOOFLOW As DevExpress.XtraBars.PopupMenu
Friend WithEvents MenuItemsOpenFileZooFlow As DevExpress.XtraBars.BarButtonItem
Friend WithEvents MenuItemPropertiesZooFlow As DevExpress.XtraBars.BarButtonItem
Friend WithEvents ButtonRefresh As DevExpress.XtraBars.BarButtonItem
@ -692,4 +891,30 @@ Partial Class frmDocumentResultList
Friend WithEvents RibbonPageGroup5 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents RibbonPageGroup6 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents RibbonPageGroup7 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents DockManager1 As DevExpress.XtraBars.Docking.DockManager
Friend WithEvents DockPanelDocViewer As DevExpress.XtraBars.Docking.DockPanel
Friend WithEvents DockPanel1_Container As DevExpress.XtraBars.Docking.ControlContainer
Friend WithEvents DockPanelMetadata As DevExpress.XtraBars.Docking.DockPanel
Friend WithEvents DockPanel3_Container As DevExpress.XtraBars.Docking.ControlContainer
Friend WithEvents DockPanelFileList As DevExpress.XtraBars.Docking.DockPanel
Friend WithEvents DockPanel2_Container As DevExpress.XtraBars.Docking.ControlContainer
Friend WithEvents BarButtonItem6 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents LayoutControl1 As DevExpress.XtraLayout.LayoutControl
Friend WithEvents RootMetadata As DevExpress.XtraLayout.LayoutControlGroup
Friend WithEvents XtraTabControl1 As DevExpress.XtraTab.XtraTabControl
Friend WithEvents XtraTabPageAttributes As DevExpress.XtraTab.XtraTabPage
Friend WithEvents XtraTabPageObject As DevExpress.XtraTab.XtraTabPage
Friend WithEvents XtraTabPageAttributeHistory As DevExpress.XtraTab.XtraTabPage
Friend WithEvents TextEdit1 As DevExpress.XtraEditors.TextEdit
Friend WithEvents LayoutControlGroup1 As DevExpress.XtraLayout.LayoutControlGroup
Friend WithEvents LayoutControlGroup2 As DevExpress.XtraLayout.LayoutControlGroup
Friend WithEvents LayoutControlItem1 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents ProgressBarControl1 As DevExpress.XtraEditors.ProgressBarControl
Friend WithEvents LayoutControlGroup3 As DevExpress.XtraLayout.LayoutControlGroup
Friend WithEvents LayoutControlItem4 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents lbLifecycleStart As DevExpress.XtraLayout.SimpleLabelItem
Friend WithEvents lbLifecycleEnd As DevExpress.XtraLayout.SimpleLabelItem
Friend WithEvents EmptySpaceItem1 As DevExpress.XtraLayout.EmptySpaceItem
Friend WithEvents TextEdit3 As DevExpress.XtraEditors.TextEdit
Friend WithEvents LayoutControlItem3 As DevExpress.XtraLayout.LayoutControlItem
End Class

View File

@ -253,7 +253,7 @@
</value>
</data>
<data name="BarButtonResetLayout.Caption" xml:space="preserve">
<value>Layout zurücksetzen</value>
<value>Aktives Tabellen Layout zurücksetzen</value>
</data>
<data name="BarButtonResetLayout.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
@ -444,42 +444,21 @@
<data name="BarButtonItem5.Caption" xml:space="preserve">
<value>BarButtonItem5</value>
</data>
<data name="BarButtonItem6.Caption" xml:space="preserve">
<value>Fenster Layout zurücksetzen</value>
</data>
<data name="RibbonControl.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 0</value>
</data>
<data name="RibbonPageGroup_Navigation.Text" xml:space="preserve">
<value>Navigation</value>
</data>
<data name="RibbonPageGroup5.Text" xml:space="preserve">
<value>RibbonPageGroup5</value>
</data>
<data name="RibbonPage1.Text" xml:space="preserve">
<value>Start</value>
</data>
<data name="RibbonPageGroup3.Text" xml:space="preserve">
<value>RibbonPageGroup3</value>
</data>
<data name="RibbonPageGroup7.Text" xml:space="preserve">
<value>RibbonPageGroup7</value>
</data>
<data name="RibbonPageGroupFilesystem.Text" xml:space="preserve">
<value>RibbonPageGroup4</value>
</data>
<data name="RibbonPage4.Text" xml:space="preserve">
<value>Bearbeiten</value>
</data>
<data name="RibbonPageGroup_Layout.Text" xml:space="preserve">
<value>Layout</value>
</data>
<data name="RibbonPageGroup1.Text" xml:space="preserve">
<value>RibbonPageGroup1</value>
</data>
<data name="RibbonPage2.Text" xml:space="preserve">
<value>Layout</value>
</data>
<data name="RibbonPageGroup2.Text" xml:space="preserve">
<value>RibbonPageGroup2</value>
</data>
<data name="RibbonPageExport.Text" xml:space="preserve">
<value>Export</value>
</data>
@ -509,7 +488,7 @@
<value>$this</value>
</data>
<data name="&gt;&gt;RibbonStatusBar.ZOrder" xml:space="preserve">
<value>1</value>
<value>3</value>
</data>
<data name="&gt;&gt;RibbonControl.Name" xml:space="preserve">
<value>RibbonControl</value>
@ -521,10 +500,10 @@
<value>$this</value>
</data>
<data name="&gt;&gt;RibbonControl.ZOrder" xml:space="preserve">
<value>2</value>
<value>4</value>
</data>
<data name="GridControl1.Size" type="System.Drawing.Size, System.Drawing">
<value>761, 554</value>
<value>325, 529</value>
</data>
<data name="GridControl1.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
@ -578,7 +557,7 @@
<value>GridBand2</value>
</data>
<data name="GridControl2.Size" type="System.Drawing.Size, System.Drawing">
<value>0, 0</value>
<value>243, 223</value>
</data>
<data name="GridControl2.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
@ -626,7 +605,7 @@
<value>GridBand3</value>
</data>
<data name="GridControl3.Size" type="System.Drawing.Size, System.Drawing">
<value>0, 0</value>
<value>243, 296</value>
</data>
<data name="GridControl3.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
@ -659,7 +638,7 @@
<value>1</value>
</data>
<data name="SplitContainerControl2.Size" type="System.Drawing.Size, System.Drawing">
<value>0, 0</value>
<value>243, 529</value>
</data>
<data name="SplitContainerControl2.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
@ -695,7 +674,7 @@
<value>1</value>
</data>
<data name="SplitContainerControl1.Size" type="System.Drawing.Size, System.Drawing">
<value>771, 554</value>
<value>578, 529</value>
</data>
<data name="SplitContainerControl1.TabIndex" type="System.Int32, mscorlib">
<value>2</value>
@ -710,28 +689,34 @@
<value>DevExpress.XtraEditors.SplitContainerControl, DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;SplitContainerControl1.Parent" xml:space="preserve">
<value>SplitContainerControl3.Panel1</value>
<value>DockPanel2_Container</value>
</data>
<data name="&gt;&gt;SplitContainerControl1.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="SplitContainerControl3.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 89</value>
<data name="RibbonPageGroup_Navigation.Text" xml:space="preserve">
<value>Navigation</value>
</data>
<data name="SplitContainerControl3.Panel1.Text" xml:space="preserve">
<value>Panel1</value>
<data name="RibbonPageGroup5.Text" xml:space="preserve">
<value>RibbonPageGroup5</value>
</data>
<data name="&gt;&gt;SplitContainerControl3.Panel1.Name" xml:space="preserve">
<value>SplitContainerControl3.Panel1</value>
<data name="RibbonPageGroup3.Text" xml:space="preserve">
<value>RibbonPageGroup3</value>
</data>
<data name="&gt;&gt;SplitContainerControl3.Panel1.Type" xml:space="preserve">
<value>DevExpress.XtraEditors.SplitGroupPanel, DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
<data name="RibbonPageGroup7.Text" xml:space="preserve">
<value>RibbonPageGroup7</value>
</data>
<data name="&gt;&gt;SplitContainerControl3.Panel1.Parent" xml:space="preserve">
<value>SplitContainerControl3</value>
<data name="RibbonPageGroupFilesystem.Text" xml:space="preserve">
<value>RibbonPageGroup4</value>
</data>
<data name="&gt;&gt;SplitContainerControl3.Panel1.ZOrder" xml:space="preserve">
<value>0</value>
<data name="RibbonPageGroup_Layout.Text" xml:space="preserve">
<value>Layout</value>
</data>
<data name="RibbonPageGroup1.Text" xml:space="preserve">
<value>RibbonPageGroup1</value>
</data>
<data name="RibbonPageGroup2.Text" xml:space="preserve">
<value>RibbonPageGroup2</value>
</data>
<data name="DocumentViewer1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
<value>Fill</value>
@ -740,7 +725,7 @@
<value>0, 0</value>
</data>
<data name="DocumentViewer1.Size" type="System.Drawing.Size, System.Drawing">
<value>404, 554</value>
<value>318, 528</value>
</data>
<data name="DocumentViewer1.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
@ -752,65 +737,20 @@
<value>DigitalData.Controls.DocumentViewer.DocumentViewer, DigitalData.Controls.DocumentViewer, Version=1.6.7.0, Culture=neutral, PublicKeyToken=null</value>
</data>
<data name="&gt;&gt;DocumentViewer1.Parent" xml:space="preserve">
<value>SplitContainerControl3.Panel2</value>
<value>DockPanel1_Container</value>
</data>
<data name="&gt;&gt;DocumentViewer1.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="SplitContainerControl3.Panel2.Text" xml:space="preserve">
<value>Panel2</value>
</data>
<data name="&gt;&gt;SplitContainerControl3.Panel2.Name" xml:space="preserve">
<value>SplitContainerControl3.Panel2</value>
</data>
<data name="&gt;&gt;SplitContainerControl3.Panel2.Type" xml:space="preserve">
<value>DevExpress.XtraEditors.SplitGroupPanel, DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;SplitContainerControl3.Panel2.Parent" xml:space="preserve">
<value>SplitContainerControl3</value>
</data>
<data name="&gt;&gt;SplitContainerControl3.Panel2.ZOrder" xml:space="preserve">
<value>1</value>
</data>
<data name="SplitContainerControl3.Size" type="System.Drawing.Size, System.Drawing">
<value>1189, 558</value>
</data>
<data name="SplitContainerControl3.TabIndex" type="System.Int32, mscorlib">
<value>5</value>
</data>
<data name="SplitContainerControl3.Text" xml:space="preserve">
<value>SplitContainerControl3</value>
</data>
<data name="&gt;&gt;SplitContainerControl3.Name" xml:space="preserve">
<value>SplitContainerControl3</value>
</data>
<data name="&gt;&gt;SplitContainerControl3.Type" xml:space="preserve">
<value>DevExpress.XtraEditors.SplitContainerControl, DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;SplitContainerControl3.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="&gt;&gt;SplitContainerControl3.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<metadata name="XtraSaveFileDialog.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>14, 16</value>
</metadata>
<metadata name="MenuFullAccess_IDB.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>167, 16</value>
</metadata>
<metadata name="MenuViewAccess_IDB.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>353, 18</value>
</metadata>
<metadata name="MenuFullAccess_EDM.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>522, 21</value>
</metadata>
<metadata name="MenuFullAccess_ZOOFLOW.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>692, 21</value>
</metadata>
<data name="RibbonPageGroup6.Text" xml:space="preserve">
<value>RibbonPageGroup6</value>
</data>
<metadata name="DockManager1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>155, 22</value>
</metadata>
<metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
@ -820,6 +760,292 @@
<data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
<value>1189, 671</value>
</data>
<data name="&gt;&gt;DockPanel1_Container.Name" xml:space="preserve">
<value>DockPanel1_Container</value>
</data>
<data name="&gt;&gt;DockPanel1_Container.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Docking.ControlContainer, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;DockPanel1_Container.Parent" xml:space="preserve">
<value>DockPanelDocViewer</value>
</data>
<data name="&gt;&gt;DockPanel1_Container.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="DockPanelDocViewer.Location" type="System.Drawing.Point, System.Drawing">
<value>585, 89</value>
</data>
<data name="DockPanelDocViewer.Size" type="System.Drawing.Size, System.Drawing">
<value>324, 558</value>
</data>
<data name="DockPanelDocViewer.Text" xml:space="preserve">
<value>Vorschau</value>
</data>
<data name="&gt;&gt;DockPanelDocViewer.Name" xml:space="preserve">
<value>DockPanelDocViewer</value>
</data>
<data name="&gt;&gt;DockPanelDocViewer.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Docking.DockPanel, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;DockPanelDocViewer.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="&gt;&gt;DockPanelDocViewer.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="XtraTabControl1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
<value>Fill</value>
</data>
<assembly alias="DevExpress.XtraEditors.v21.2" name="DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<data name="XtraTabControl1.HeaderLocation" type="DevExpress.XtraTab.TabHeaderLocation, DevExpress.XtraEditors.v21.2">
<value>Bottom</value>
</data>
<data name="XtraTabControl1.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 0</value>
</data>
<data name="TextEdit1.Location" type="System.Drawing.Point, System.Drawing">
<value>132, 45</value>
</data>
<data name="TextEdit1.Size" type="System.Drawing.Size, System.Drawing">
<value>120, 20</value>
</data>
<data name="TextEdit1.TabIndex" type="System.Int32, mscorlib">
<value>4</value>
</data>
<data name="&gt;&gt;TextEdit1.Name" xml:space="preserve">
<value>TextEdit1</value>
</data>
<data name="&gt;&gt;TextEdit1.Type" xml:space="preserve">
<value>DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;TextEdit1.Parent" xml:space="preserve">
<value>LayoutControl1</value>
</data>
<data name="&gt;&gt;TextEdit1.ZOrder" xml:space="preserve">
<value>4</value>
</data>
<data name="ProgressBarControl1.Location" type="System.Drawing.Point, System.Drawing">
<value>24, 445</value>
</data>
<data name="ProgressBarControl1.Size" type="System.Drawing.Size, System.Drawing">
<value>228, 18</value>
</data>
<data name="ProgressBarControl1.TabIndex" type="System.Int32, mscorlib">
<value>7</value>
</data>
<data name="&gt;&gt;ProgressBarControl1.Name" xml:space="preserve">
<value>ProgressBarControl1</value>
</data>
<data name="&gt;&gt;ProgressBarControl1.Type" xml:space="preserve">
<value>DevExpress.XtraEditors.ProgressBarControl, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;ProgressBarControl1.Parent" xml:space="preserve">
<value>LayoutControl1</value>
</data>
<data name="&gt;&gt;ProgressBarControl1.ZOrder" xml:space="preserve">
<value>5</value>
</data>
<data name="TextEdit3.Location" type="System.Drawing.Point, System.Drawing">
<value>132, 114</value>
</data>
<data name="TextEdit3.Size" type="System.Drawing.Size, System.Drawing">
<value>120, 20</value>
</data>
<data name="TextEdit3.TabIndex" type="System.Int32, mscorlib">
<value>8</value>
</data>
<data name="&gt;&gt;TextEdit3.Name" xml:space="preserve">
<value>TextEdit3</value>
</data>
<data name="&gt;&gt;TextEdit3.Type" xml:space="preserve">
<value>DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;TextEdit3.Parent" xml:space="preserve">
<value>LayoutControl1</value>
</data>
<data name="&gt;&gt;TextEdit3.ZOrder" xml:space="preserve">
<value>6</value>
</data>
<data name="LayoutControl1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
<value>Fill</value>
</data>
<data name="LayoutControl1.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 0</value>
</data>
<data name="lbLifecycleStart.Text" xml:space="preserve">
<value>00.00.0000</value>
</data>
<data name="lbLifecycleEnd.Text" xml:space="preserve">
<value>99.99.9999</value>
</data>
<data name="LayoutControl1.Size" type="System.Drawing.Size, System.Drawing">
<value>271, 504</value>
</data>
<data name="LayoutControl1.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
</data>
<data name="LayoutControl1.Text" xml:space="preserve">
<value>LayoutControl1</value>
</data>
<data name="&gt;&gt;LayoutControl1.Name" xml:space="preserve">
<value>LayoutControl1</value>
</data>
<data name="&gt;&gt;LayoutControl1.Type" xml:space="preserve">
<value>DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;LayoutControl1.Parent" xml:space="preserve">
<value>XtraTabPageAttributes</value>
</data>
<data name="&gt;&gt;LayoutControl1.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="XtraTabPageAttributes.Size" type="System.Drawing.Size, System.Drawing">
<value>271, 504</value>
</data>
<data name="XtraTabPageAttributes.Text" xml:space="preserve">
<value>Attribute</value>
</data>
<data name="&gt;&gt;XtraTabPageAttributes.Name" xml:space="preserve">
<value>XtraTabPageAttributes</value>
</data>
<data name="&gt;&gt;XtraTabPageAttributes.Type" xml:space="preserve">
<value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;XtraTabPageAttributes.Parent" xml:space="preserve">
<value>XtraTabControl1</value>
</data>
<data name="&gt;&gt;XtraTabPageAttributes.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="XtraTabControl1.Size" type="System.Drawing.Size, System.Drawing">
<value>273, 529</value>
</data>
<data name="XtraTabControl1.TabIndex" type="System.Int32, mscorlib">
<value>1</value>
</data>
<data name="XtraTabPageObject.Size" type="System.Drawing.Size, System.Drawing">
<value>271, 504</value>
</data>
<data name="XtraTabPageObject.Text" xml:space="preserve">
<value>XtraTabPage2</value>
</data>
<data name="&gt;&gt;XtraTabPageObject.Name" xml:space="preserve">
<value>XtraTabPageObject</value>
</data>
<data name="&gt;&gt;XtraTabPageObject.Type" xml:space="preserve">
<value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;XtraTabPageObject.Parent" xml:space="preserve">
<value>XtraTabControl1</value>
</data>
<data name="&gt;&gt;XtraTabPageObject.ZOrder" xml:space="preserve">
<value>1</value>
</data>
<data name="XtraTabPageAttributeHistory.Size" type="System.Drawing.Size, System.Drawing">
<value>271, 504</value>
</data>
<data name="XtraTabPageAttributeHistory.Text" xml:space="preserve">
<value>XtraTabPage3</value>
</data>
<data name="&gt;&gt;XtraTabPageAttributeHistory.Name" xml:space="preserve">
<value>XtraTabPageAttributeHistory</value>
</data>
<data name="&gt;&gt;XtraTabPageAttributeHistory.Type" xml:space="preserve">
<value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;XtraTabPageAttributeHistory.Parent" xml:space="preserve">
<value>XtraTabControl1</value>
</data>
<data name="&gt;&gt;XtraTabPageAttributeHistory.ZOrder" xml:space="preserve">
<value>2</value>
</data>
<data name="&gt;&gt;XtraTabControl1.Name" xml:space="preserve">
<value>XtraTabControl1</value>
</data>
<data name="&gt;&gt;XtraTabControl1.Type" xml:space="preserve">
<value>DevExpress.XtraTab.XtraTabControl, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;XtraTabControl1.Parent" xml:space="preserve">
<value>DockPanel3_Container</value>
</data>
<data name="&gt;&gt;XtraTabControl1.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="DockPanel3_Container.Location" type="System.Drawing.Point, System.Drawing">
<value>4, 26</value>
</data>
<data name="DockPanel3_Container.Size" type="System.Drawing.Size, System.Drawing">
<value>273, 529</value>
</data>
<data name="DockPanel3_Container.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
</data>
<data name="&gt;&gt;DockPanel3_Container.Name" xml:space="preserve">
<value>DockPanel3_Container</value>
</data>
<data name="&gt;&gt;DockPanel3_Container.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Docking.ControlContainer, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;DockPanel3_Container.Parent" xml:space="preserve">
<value>DockPanelMetadata</value>
</data>
<data name="&gt;&gt;DockPanel3_Container.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="DockPanelMetadata.Location" type="System.Drawing.Point, System.Drawing">
<value>909, 89</value>
</data>
<data name="DockPanelMetadata.Size" type="System.Drawing.Size, System.Drawing">
<value>280, 558</value>
</data>
<data name="DockPanelMetadata.Text" xml:space="preserve">
<value>Mehr</value>
</data>
<data name="&gt;&gt;DockPanelMetadata.Name" xml:space="preserve">
<value>DockPanelMetadata</value>
</data>
<data name="&gt;&gt;DockPanelMetadata.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Docking.DockPanel, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;DockPanelMetadata.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="&gt;&gt;DockPanelMetadata.ZOrder" xml:space="preserve">
<value>1</value>
</data>
<data name="&gt;&gt;DockPanel2_Container.Name" xml:space="preserve">
<value>DockPanel2_Container</value>
</data>
<data name="&gt;&gt;DockPanel2_Container.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Docking.ControlContainer, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;DockPanel2_Container.Parent" xml:space="preserve">
<value>DockPanelFileList</value>
</data>
<data name="&gt;&gt;DockPanel2_Container.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="DockPanelFileList.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 89</value>
</data>
<data name="DockPanelFileList.Size" type="System.Drawing.Size, System.Drawing">
<value>585, 558</value>
</data>
<data name="DockPanelFileList.Text" xml:space="preserve">
<value>Ergebnisse</value>
</data>
<data name="&gt;&gt;DockPanelFileList.Name" xml:space="preserve">
<value>DockPanelFileList</value>
</data>
<data name="&gt;&gt;DockPanelFileList.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Docking.DockPanel, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;DockPanelFileList.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="&gt;&gt;DockPanelFileList.ZOrder" xml:space="preserve">
<value>2</value>
</data>
<data name="frmDocumentResultList.IconOptions.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAMAEBAQAAEABAAoAQAANgAAABAQAAABAAgAaAUAAF4BAAAQEAAAAQAgAGgEAADGBgAAKAAAABAA
@ -1053,6 +1279,12 @@
<data name="&gt;&gt;BarButtonItem5.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;BarButtonItem6.Name" xml:space="preserve">
<value>BarButtonItem6</value>
</data>
<data name="&gt;&gt;BarButtonItem6.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;RibbonPage1.Name" xml:space="preserve">
<value>RibbonPage1</value>
</data>
@ -1167,40 +1399,124 @@
<data name="&gt;&gt;XtraSaveFileDialog.Type" xml:space="preserve">
<value>DevExpress.XtraEditors.XtraSaveFileDialog, DevExpress.XtraDialogs.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;MenuFullAccess_IDB.Name" xml:space="preserve">
<value>MenuFullAccess_IDB</value>
</data>
<data name="&gt;&gt;MenuFullAccess_IDB.Type" xml:space="preserve">
<value>DevExpress.XtraBars.PopupMenu, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;MenuViewAccess_IDB.Name" xml:space="preserve">
<value>MenuViewAccess_IDB</value>
</data>
<data name="&gt;&gt;MenuViewAccess_IDB.Type" xml:space="preserve">
<value>DevExpress.XtraBars.PopupMenu, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;MenuFullAccess_EDM.Name" xml:space="preserve">
<value>MenuFullAccess_EDM</value>
</data>
<data name="&gt;&gt;MenuFullAccess_EDM.Type" xml:space="preserve">
<value>DevExpress.XtraBars.PopupMenu, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;MenuFullAccess_ZOOFLOW.Name" xml:space="preserve">
<value>MenuFullAccess_ZOOFLOW</value>
</data>
<data name="&gt;&gt;MenuFullAccess_ZOOFLOW.Type" xml:space="preserve">
<value>DevExpress.XtraBars.PopupMenu, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;RibbonPageGroup6.Name" xml:space="preserve">
<value>RibbonPageGroup6</value>
</data>
<data name="&gt;&gt;RibbonPageGroup6.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;DockManager1.Name" xml:space="preserve">
<value>DockManager1</value>
</data>
<data name="&gt;&gt;DockManager1.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Docking.DockManager, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;RootMetadata.Name" xml:space="preserve">
<value>RootMetadata</value>
</data>
<data name="&gt;&gt;RootMetadata.Type" xml:space="preserve">
<value>DevExpress.XtraLayout.LayoutControlGroup, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;LayoutControlItem1.Name" xml:space="preserve">
<value>LayoutControlItem1</value>
</data>
<data name="&gt;&gt;LayoutControlItem1.Type" xml:space="preserve">
<value>DevExpress.XtraLayout.LayoutControlItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;LayoutControlGroup1.Name" xml:space="preserve">
<value>LayoutControlGroup1</value>
</data>
<data name="&gt;&gt;LayoutControlGroup1.Type" xml:space="preserve">
<value>DevExpress.XtraLayout.LayoutControlGroup, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;LayoutControlGroup2.Name" xml:space="preserve">
<value>LayoutControlGroup2</value>
</data>
<data name="&gt;&gt;LayoutControlGroup2.Type" xml:space="preserve">
<value>DevExpress.XtraLayout.LayoutControlGroup, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;LayoutControlGroup3.Name" xml:space="preserve">
<value>LayoutControlGroup3</value>
</data>
<data name="&gt;&gt;LayoutControlGroup3.Type" xml:space="preserve">
<value>DevExpress.XtraLayout.LayoutControlGroup, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;LayoutControlItem4.Name" xml:space="preserve">
<value>LayoutControlItem4</value>
</data>
<data name="&gt;&gt;LayoutControlItem4.Type" xml:space="preserve">
<value>DevExpress.XtraLayout.LayoutControlItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;lbLifecycleEnd.Name" xml:space="preserve">
<value>lbLifecycleEnd</value>
</data>
<data name="&gt;&gt;lbLifecycleEnd.Type" xml:space="preserve">
<value>DevExpress.XtraLayout.SimpleLabelItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;lbLifecycleStart.Name" xml:space="preserve">
<value>lbLifecycleStart</value>
</data>
<data name="&gt;&gt;lbLifecycleStart.Type" xml:space="preserve">
<value>DevExpress.XtraLayout.SimpleLabelItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;EmptySpaceItem1.Name" xml:space="preserve">
<value>EmptySpaceItem1</value>
</data>
<data name="&gt;&gt;EmptySpaceItem1.Type" xml:space="preserve">
<value>DevExpress.XtraLayout.EmptySpaceItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;LayoutControlItem3.Name" xml:space="preserve">
<value>LayoutControlItem3</value>
</data>
<data name="&gt;&gt;LayoutControlItem3.Type" xml:space="preserve">
<value>DevExpress.XtraLayout.LayoutControlItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;$this.Name" xml:space="preserve">
<value>frmDocumentResultList</value>
</data>
<data name="&gt;&gt;$this.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Ribbon.RibbonForm, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="DockPanel2_Container.Location" type="System.Drawing.Point, System.Drawing">
<value>3, 26</value>
</data>
<data name="DockPanel2_Container.Size" type="System.Drawing.Size, System.Drawing">
<value>578, 529</value>
</data>
<data name="DockPanel2_Container.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
</data>
<data name="&gt;&gt;DockPanel2_Container.Name" xml:space="preserve">
<value>DockPanel2_Container</value>
</data>
<data name="&gt;&gt;DockPanel2_Container.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Docking.ControlContainer, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;DockPanel2_Container.Parent" xml:space="preserve">
<value>DockPanelFileList</value>
</data>
<data name="&gt;&gt;DockPanel2_Container.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="DockPanel1_Container.Location" type="System.Drawing.Point, System.Drawing">
<value>3, 26</value>
</data>
<data name="DockPanel1_Container.Size" type="System.Drawing.Size, System.Drawing">
<value>318, 528</value>
</data>
<data name="DockPanel1_Container.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
</data>
<data name="&gt;&gt;DockPanel1_Container.Name" xml:space="preserve">
<value>DockPanel1_Container</value>
</data>
<data name="&gt;&gt;DockPanel1_Container.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Docking.ControlContainer, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;DockPanel1_Container.Parent" xml:space="preserve">
<value>DockPanelDocViewer</value>
</data>
<data name="&gt;&gt;DockPanel1_Container.ZOrder" xml:space="preserve">
<value>0</value>
</data>
</root>

View File

@ -10,7 +10,6 @@ Imports DevExpress.XtraGrid.Columns
Imports DevExpress.XtraGrid.Views.BandedGrid
Imports DevExpress.XtraGrid.Views.Base
Imports DevExpress.XtraGrid.Views.Grid
Imports DevExpress.XtraGrid.Views.Grid.ViewInfo
Imports DevExpress.XtraPrinting
Imports DigitalData.Modules.Config
Imports DigitalData.Modules.EDMI.API
@ -56,12 +55,14 @@ Public Class frmDocumentResultList
Private ReadOnly Helpers As DocumentResultList.Helpers
Private ReadOnly Params As DocumentResultList.Params
Private ReadOnly LayoutManager As DocumentResultList.Layout
Private WithEvents Watcher As DocumentResultList.Watcher
Private ControlManager As AttributeControls
Private Documentloader As DocumentResultList.Loader
' Runtime variables
Private Property _ResultLists As List(Of DocumentResultList.DocumentResult)
Private Property ResultLists As List(Of DocumentResultList.DocumentResult)
Private _IsLoading As Boolean = True
Private _ActiveGrid As GridControl = Nothing
@ -100,16 +101,17 @@ Public Class frmDocumentResultList
Logger = pLogConfig.GetLogger()
ErrorHandler = New BaseErrorHandler(pLogConfig, Me)
Environment = pEnvironment
Params = pParams
ResultLists = pParams.Results
Config = New ConfigManager(Of DocumentResultList.Config)(pLogConfig, oConfigPath, oConfigPath)
Helpers = New DocumentResultList.Helpers(pLogConfig)
Filesystem = New Modules.Filesystem.File(pLogConfig)
GridBuilder = New GridBuilder(New List(Of GridView) From {GridView1, GridView2, GridView3})
FileEx = New Modules.Windows.File(pLogConfig)
Watcher = New DocumentResultList.Watcher(pLogConfig)
Environment = pEnvironment
Params = pParams
_ResultLists = pParams.Results
LayoutManager = New DocumentResultList.Layout(pLogConfig, Config)
_Language = Utils.NotNull(Me.Environment.User.Language, State.UserState.LANG_EN_US)
End Sub
@ -158,6 +160,17 @@ Public Class frmDocumentResultList
SplitContainerControl2.SplitterPosition = Config.Config.SplitContainer2Distance
SwitchDetailContainerHorizontal.Checked = Config.Config.SplitContainer2Horizontal
' Hide options relating to a filepath for zooflow
If OperationMode = OperationMode.ZooFlow Then
RibbonPageGroupFilesystem.Visible = False
Else
RibbonPageGroupFilesystem.Visible = False
End If
If OperationMode = OperationMode.NoAppServer Then
DockPanelMetadata.Visibility = Docking.DockVisibility.Hidden
End If
If OperationMode <> OperationMode.NoAppServer Then
' Location and size will be managed by the ZooFlow Search Window
If Utils.IsVisibleOnAnyScreen(Config.Config.WindowLocation) Then
@ -184,6 +197,8 @@ Public Class frmDocumentResultList
UpdateTotalResults()
UpdateGridData()
LayoutManager.DockManager_RestoreLayout(DockManager1)
Catch ex As Exception
ErrorHandler.ShowErrorMessage(ex, "Error while loading results", "Form Load")
@ -195,7 +210,8 @@ Public Class frmDocumentResultList
Private Sub frmDocumentResultList_Closing(sender As Object, e As CancelEventArgs) Handles Me.FormClosing
Try
GridViewSave_Layout(_ActiveGrid.MainView)
LayoutManager.GridView_SaveLayout(_ActiveGrid.MainView)
LayoutManager.DockManager_SaveLayout(DockManager1)
Config.Config.WindowLocation = Location
Config.Config.WindowSize = Size
@ -207,11 +223,10 @@ Public Class frmDocumentResultList
End Try
End Sub
Private Sub GridView_FocusedRowChanged(sender As GridView, e As FocusedRowChangedEventArgs)
Private Async Sub GridView_FocusedRowChanged(sender As GridView, e As FocusedRowChangedEventArgs)
Helpers.SetRowHandle(e)
Try
Reset_Errors()
Cursor = Cursors.WaitCursor
If e.FocusedRowHandle >= 0 Then
@ -226,7 +241,7 @@ Public Class frmDocumentResultList
' Check DocumentInfo
If IsNothing(oDocumentInfo) Then
Show_Warning("File could not be loaded!")
ErrorHandler.ShowErrorMessage("File could not be loaded!")
Exit Sub
End If
@ -248,16 +263,19 @@ Public Class frmDocumentResultList
RibbonPageGroupFilesystem.Visible = True
End If
' Hide options relating to a filepath for zooflow
If OperationMode = OperationMode.ZooFlow Then
RibbonPageGroupFilesystem.Visible = False
Else
RibbonPageGroupFilesystem.Visible = False
If OperationMode = OperationMode.ZooFlow Or OperationMode = OperationMode.WithAppServer Then
Dim oEntityId = 1
Dim oAttributes = Await ControlManager.GetAttributesForBusinessEntity(oEntityId)
If oAttributes.Count = 0 Then
MsgBox($"Es konnten keine Attribute für das Objekt '{oObjectId}' geladen werden!", MsgBoxStyle.Critical, Text)
End If
Await ControlManager.LoadControlsForAttributes(oObjectId, oAttributes, RootMetadata)
End If
End If
Catch ex As Exception
Logger.Error(ex)
Show_CriticalError(ex)
ErrorHandler.ShowErrorMessage(ex, "GridView_FocusedRowChanged")
Finally
Cursor = Cursors.Default
End Try
@ -303,8 +321,7 @@ Public Class frmDocumentResultList
End If
Catch ex As Exception
Logger.Error(ex)
Show_CriticalError(ex)
ErrorHandler.ShowErrorMessage(ex, "Watcher_FileChanged")
Finally
' Signal to the watcher that the file is no longer in use
@ -376,8 +393,7 @@ Public Class frmDocumentResultList
Dim oPort As Integer = oSplit.Item(1)
_IDBClient = New Client(LogConfig, oAddress, oPort)
' TODO: INitialize databasewithfallback
'_Database
ControlManager = New AttributeControls(LogConfig, Environment, _IDBClient)
If Not _IDBClient.Connect() Then
Logger.Warn("Client could not connect to Service at [{0}]", Environment.Service.Address)
@ -398,7 +414,7 @@ Public Class frmDocumentResultList
_IsLoading = True
Try
' Save the new results
_ResultLists = pResults
ResultLists = pResults
' Remove the current document from
Documentloader.ClearCache()
@ -450,31 +466,31 @@ Public Class frmDocumentResultList
Private Sub UpdateGridData()
' Load Grids
For oIndex = 0 To _ResultLists.Count - 1
For oIndex = 0 To ResultLists.Count - 1
Select Case oIndex
Case 0
Dim oResult As DocumentResultList.DocumentResult = _ResultLists.Item(0)
Dim oResult As DocumentResultList.DocumentResult = ResultLists.Item(0)
LoadGridData(GridView1, oResult)
CreateDocumentGrid(GridView1, oResult)
RestoreLayout(GridView1)
UpdateGridHeader(_ResultLists, oIndex, oResult.Datatable.Rows.Count)
LayoutManager.GridView_RestoreLayout(GridView1)
UpdateGridHeader(ResultLists, oIndex, oResult.Datatable.Rows.Count)
Case 1
Dim oResult As DocumentResultList.DocumentResult = _ResultLists.Item(1)
Dim oResult As DocumentResultList.DocumentResult = ResultLists.Item(1)
LoadGridData(GridView2, oResult)
CreateDocumentGrid(GridView2, oResult)
RestoreLayout(GridView2)
UpdateGridHeader(_ResultLists, oIndex, oResult.Datatable.Rows.Count)
LayoutManager.GridView_RestoreLayout(GridView2)
UpdateGridHeader(ResultLists, oIndex, oResult.Datatable.Rows.Count)
Case 2
Dim oResult As DocumentResultList.DocumentResult = _ResultLists.Item(2)
Dim oResult As DocumentResultList.DocumentResult = ResultLists.Item(2)
LoadGridData(GridView3, oResult)
CreateDocumentGrid(GridView3, oResult)
RestoreLayout(GridView3)
UpdateGridHeader(_ResultLists, oIndex, oResult.Datatable.Rows.Count)
LayoutManager.GridView_RestoreLayout(GridView3)
UpdateGridHeader(ResultLists, oIndex, oResult.Datatable.Rows.Count)
Case Else
MessageBox.Show(Constants.MESSAGE_TOO_MANY_SEARCHES, Text, MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
@ -483,7 +499,7 @@ Public Class frmDocumentResultList
Next
' Hide Grids depending on Result count
Select Case _ResultLists.Count
Select Case ResultLists.Count
Case 0
SplitContainerControl1.SetPanelCollapsed(True)
@ -515,7 +531,7 @@ Public Class frmDocumentResultList
Private Sub UpdateTotalResults()
Dim oTotalResults = 0
For Each oList In _ResultLists
For Each oList In ResultLists
oTotalResults += oList.Datatable.Rows.Count
Next
@ -702,17 +718,17 @@ Public Class frmDocumentResultList
Private Sub GridView1_ColumnFilterChanged(sender As GridView, e As EventArgs) Handles GridView1.ColumnFilterChanged
Dim oRowCount = sender.RowCount
UpdateGridHeader(_ResultLists, 0, oRowCount)
UpdateGridHeader(ResultLists, 0, oRowCount)
End Sub
Private Sub GridView2_ColumnFilterChanged(sender As GridView, e As EventArgs) Handles GridView2.ColumnFilterChanged
Dim oRowCount = sender.RowCount
UpdateGridHeader(_ResultLists, 1, oRowCount)
UpdateGridHeader(ResultLists, 1, oRowCount)
End Sub
Private Sub GridView3_ColumnFilterChanged(sender As GridView, e As EventArgs) Handles GridView3.ColumnFilterChanged
Dim oRowCount = sender.RowCount
UpdateGridHeader(_ResultLists, 2, oRowCount)
UpdateGridHeader(ResultLists, 2, oRowCount)
End Sub
Private Sub BarButtonItem4_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonBack.ItemClick
@ -726,30 +742,10 @@ Public Class frmDocumentResultList
End If
End Sub
Public Sub Show_CriticalError(Message As String)
labelCriticalError.Visibility = BarItemVisibility.Always
labelCriticalError.Caption = Message
End Sub
Public Sub Show_CriticalError(pException As Exception)
labelCriticalError.Visibility = BarItemVisibility.Always
labelCriticalError.Caption = pException.Message
End Sub
Public Sub Show_Warning(Message As String)
labelWarning.Visibility = BarItemVisibility.Always
labelWarning.Caption = Message
End Sub
Public Sub Reset_Errors()
labelCriticalError.Visibility = BarItemVisibility.Never
labelWarning.Visibility = BarItemVisibility.Never
End Sub
Private Sub BarButtonResetLayout_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonResetLayout.ItemClick
If Not IsNothing(_ActiveGrid) Then
Try
Dim oFile = GetDevexpressGrid_LayoutName(_ActiveGrid.MainView)
Dim oFile = LayoutManager.GetGrid_LayoutName(_ActiveGrid.MainView)
If IO.File.Exists(oFile) Then
IO.File.Delete(oFile)
End If
@ -798,45 +794,12 @@ Public Class frmDocumentResultList
#Region "Context Menu"
'Private Sub GridView_PopupMenuShowing(sender As Object, e As PopupMenuShowingEventArgs) Handles GridView2.PopupMenuShowing, GridView3.PopupMenuShowing, GridView1.PopupMenuShowing
' Try
' Dim oView As GridView = sender
' If e.MenuType = GridMenuType.Row Then
' Dim oRowHandle = e.HitInfo.RowHandle
' Dim oRow As DataRow = oView.GetDataRow(oRowHandle)
' Dim oObjectId As Long = oRow.Item(COLUMN_DOCID)
' Dim oPoint As Point = oView.GridControl.PointToScreen(e.HitInfo.HitPoint)
' Dim oRight As Rights.AccessRight = _CurrentDocument.AccessRight
' '_CurrentDocumentId = oObjectId
' _CurrentDocument.Id = oObjectId
' If OperationMode = OperationMode.WithAppServer Then
' If oRight = Rights.AccessRight.FULL Or oRight = Rights.AccessRight.VIEW_EXPORT Then
' MenuFullAccess_IDB.ShowPopup(oPoint)
' Else
' MenuViewAccess_IDB.ShowPopup(oPoint)
' End If
' ElseIf OperationMode = OperationMode.ZooFlow Then
' MenuFullAccess_ZOOFLOW.ShowPopup(oPoint)
' Else
' MenuFullAccess_EDM.ShowPopup(oPoint)
' End If
' Else
' '_CurrentDocumentId = Nothing
' _CurrentDocument.Id = Nothing
' End If
' Catch ex As Exception
' Logger.Error(ex)
' MsgBox("Unexpected Error while preparing context menu", MsgBoxStyle.Critical, Text)
' End Try
'End Sub
#Region "File Actions"
Private Sub MenuItem_OpenProperties_ItemClick(sender As Object, e As ItemClickEventArgs) Handles MenuItemPropertiesECM.ItemClick
If _CurrentDocument Is Nothing Then
Exit Sub
End If
Select Case OperationMode
Case OperationMode.NoAppServer
FileEx.OpenFileProperties(_CurrentDocument.FullPath)
@ -947,38 +910,19 @@ Public Class frmDocumentResultList
Config.Config.SplitContainer2Horizontal = SwitchDetailContainerHorizontal.Checked
End If
End Sub
Private Function GetDevexpressGrid_LayoutName(pGridView As GridView)
Dim Filename As String = $"DevExpressGridViewDocResult_{pGridView.Name}UserLayout.xml"
Return Path.Combine(Config.UserConfigPath.Replace("UserConfig.xml", ""), Filename)
End Function
Private Sub GridViewSave_Layout(pGridView As GridView)
Try
Dim oXml As String = GetDevexpressGrid_LayoutName(pGridView)
pGridView.SaveLayoutToXml(oXml, OptionsLayoutBase.FullLayout)
Catch ex As Exception
Logger.Error(ex)
Logger.Info("Error while saving GridLayout: " & ex.Message)
End Try
End Sub
Private Sub RestoreLayout(pGridView As GridView)
Try
Dim oLayoutFile As String = GetDevexpressGrid_LayoutName(pGridView)
If IO.File.Exists(oLayoutFile) Then
pGridView.RestoreLayoutFromXml(oLayoutFile, OptionsLayoutBase.FullLayout)
End If
Catch ex As Exception
Logger.Error(ex)
Logger.Info("Error while restoring layout: " & ex.Message)
End Try
End Sub
#End Region
Private Sub ButtonRefresh_ItemClick(sender As Object, e As ItemClickEventArgs) Handles ButtonRefresh.ItemClick
RaiseEvent NeedsRefresh(Me, Params.ProfileGuid)
End Sub
#End Region
Private Sub BarButtonItem6_ItemClick(sender As Object, e As ItemClickEventArgs) Handles BarButtonItem6.ItemClick
Try
Dim oFile = LayoutManager.GetDockmanager_LayoutName()
If File.Exists(oFile) Then
File.Delete(oFile)
End If
Catch ex As Exception
Logger.Error(ex)
End Try
End Sub
End Class