5 Commits

Author SHA1 Message Date
Jonathan Jenne
e42bc3db89 Patterns: Version 1.1.0.0 2022-06-29 16:27:35 +02:00
Jonathan Jenne
4082187694 Version 1.13.3 2022-06-29 16:26:57 +02:00
Jonathan Jenne
df4a0f5bc5 Common/DocumentResultList: Show current workspace 2022-06-29 16:26:33 +02:00
Jonathan Jenne
01767669c9 Common: Add Control helper 2022-06-29 16:26:01 +02:00
Jonathan Jenne
960c7ecb27 Patterns: Improve control values modules, accept list of controls 2022-06-29 16:25:39 +02:00
14 changed files with 238 additions and 31 deletions

View File

@@ -108,6 +108,7 @@
<ItemGroup>
<Compile Include="Base\BaseResult.vb" />
<Compile Include="Constants.vb" />
<Compile Include="ControlHelper.vb" />
<Compile Include="DataResultList\DataResultConfig.vb" />
<Compile Include="DataResultList\DataResultParams.vb" />
<Compile Include="DataResultList\frmDataResultList.Designer.vb">
@@ -578,5 +579,11 @@
<ItemGroup>
<None Include="Resources\bo_security_permission_action.svg" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\business_world1.svg" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\business_world2.svg" />
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
</Project>

View File

@@ -0,0 +1,66 @@
Imports System.Windows.Forms
Imports DigitalData.Modules.Base
Imports DigitalData.Modules.Language
Imports DigitalData.Modules.Logging
Public Class ControlHelper
Inherits BaseClass
Public Sub New(pLogConfig As LogConfig)
MyBase.New(pLogConfig)
End Sub
Public Function HasValue(pControl As Control) As Boolean
Return Utils.NotNull(GetValue(pControl), Nothing) IsNot Nothing
End Function
Public Function GetValue(pControl As Control) As Object
Dim oControlValue As Object
Select Case pControl.GetType
Case GetType(TextBox)
oControlValue = pControl.Text
Case GetType(DevExpress.XtraEditors.TextEdit)
Dim oTextEdit As DevExpress.XtraEditors.TextEdit = pControl
oControlValue = oTextEdit.EditValue
Case GetType(DevExpress.XtraEditors.DateEdit)
Dim oDateEdit As DevExpress.XtraEditors.DateEdit = pControl
oControlValue = oDateEdit.EditValue
Case GetType(DevExpress.XtraEditors.LookUpEdit)
Dim oLookupEdit As DevExpress.XtraEditors.LookUpEdit = pControl
oControlValue = oLookupEdit.EditValue
Case GetType(Controls.LookupGrid.LookupControl3)
Dim oLookupControl3 As Controls.LookupGrid.LookupControl3 = pControl
If oLookupControl3.Properties.SelectedValues.Count = 1 Then
oControlValue = oLookupControl3.Properties.SelectedValues.Item(0)
Else
oControlValue = "0"
End If
Case GetType(ComboBox)
oControlValue = pControl.Text
Case GetType(DevExpress.XtraEditors.ComboBoxEdit)
Dim oCombobox As DevExpress.XtraEditors.ComboBoxEdit = pControl
oControlValue = oCombobox.EditValue
Case GetType(CheckBox)
Dim oCheckBox As CheckBox = pControl
oControlValue = oCheckBox.Checked
Case GetType(DevExpress.XtraEditors.CheckEdit)
Dim oCheckEdit As DevExpress.XtraEditors.CheckEdit = pControl
oControlValue = oCheckEdit.Checked
Case Else
oControlValue = "0"
End Select
Return oControlValue
End Function
End Class

View File

@@ -21,6 +21,7 @@ Namespace DocumentResultList
Private _CurrentWorkspace = Nothing
Public Event WorkspaceLoaded As EventHandler(Of String)
Public ReadOnly Property CurrentWorkspace As String
Get
@@ -161,6 +162,8 @@ Namespace DocumentResultList
Manager.AllowTransitionAnimation = DefaultBoolean.False
Manager.ApplyWorkspace(pName)
_CurrentWorkspace = pName
RaiseEvent WorkspaceLoaded(Me, pName)
Manager.AllowTransitionAnimation = DefaultBoolean.True
Catch ex As Exception
Logger.Error(ex)

View File

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.13.2.0")>
<Assembly: AssemblyFileVersion("1.13.2.0")>
<Assembly: AssemblyVersion("1.13.3.0")>
<Assembly: AssemblyFileVersion("1.13.3.0")>

View File

@@ -210,6 +210,26 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
'''</summary>
Friend ReadOnly Property business_world1() As DevExpress.Utils.Svg.SvgImage
Get
Dim obj As Object = ResourceManager.GetObject("business_world1", resourceCulture)
Return CType(obj,DevExpress.Utils.Svg.SvgImage)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
'''</summary>
Friend ReadOnly Property business_world2() As DevExpress.Utils.Svg.SvgImage
Get
Dim obj As Object = ResourceManager.GetObject("business_world2", 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="doc" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\doc.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<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="actions_question" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\actions_question.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
@@ -148,9 +151,6 @@
<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="singlepageview" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\singlepageview.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="grid" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\grid.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
@@ -190,21 +190,24 @@
<data name="refreshallpivottable" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\refreshallpivottable.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="columnheaders" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\columnheaders.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="open" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\open.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="enablescrolling" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\enablescrolling.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="bo_contract" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\bo_contract1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="save2" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\save2.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="save3" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\save3.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="_page" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\_page.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="singlepageview1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\singlepageview1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
@@ -223,8 +226,8 @@
<data name="cancel" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\cancel.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="dwg" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\dwg.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="bo_security_permission_action" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\bo_security_permission_action.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="clearall" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\clearall1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
@@ -235,8 +238,8 @@
<data name="categorize" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\categorize.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="bo_contract" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\bo_contract1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
<data name="singlepageview" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\singlepageview.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="saveas" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\saveas.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
@@ -244,12 +247,12 @@
<data name="title" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\title.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="columnheaders" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\columnheaders.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="editcolors" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\editcolors.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="_page" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\_page.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="actions_user" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\actions_user1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
@@ -271,6 +274,9 @@
<data name="private" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\private.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="business_world1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\business_world1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="Copy_32x32" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Copy_32x32.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@@ -289,13 +295,13 @@
<data name="business_world" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\business_world.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<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 name="dwg" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\dwg.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="_blank" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\_blank.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="bo_security_permission_action" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\bo_security_permission_action.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
<data name="business_world2" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\business_world2.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
</root>

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="Layer_1" style="enable-background:new 0 0 32 32">
<style type="text/css">
.Blue{fill:#1177D7;}
.Green{fill:#039C23;}
.Yellow{fill:#FFB115;}
.Black{fill:#727272;}
.White{fill:#FFFFFF;}
.Red{fill:#D11C1C;}
.st0{opacity:0.75;}
</style>
<g id="World_1_">
<path d="M15.8,2c-7.7,0-14,6.3-14,14s6.3,14,14,14s14-6.3,14-14S23.6,2,15.8,2z M20.1,19.1c-0.5,0.1-0.5-0.3-0.1-0.4 C20.1,18.9,20.2,18.8,20.1,19.1z M8.4,13.3c0-0.1,0-0.1,0-0.2C8.4,13.2,8.4,13.3,8.4,13.3z M22.1,21.9c0-0.1-0.1-0.1-0.1-0.1 c0.1,0.3-0.1,0.9-0.1,1.2c-0.1,0.4-0.4,1.3-0.7,1.3c0,0.2-0.4,0-0.3,0.2c-0.5,0.1-0.8,0.5-0.8,0.8c0,0.1-0.3,1.1-0.4,1.1 c0-0.1,0.1-0.2,0.1-0.3c0,0.1-0.1,0.1-0.1,0c0,0.2-0.3,0.8-0.4,0.9c-0.1,0.1-0.3,0.3-0.5,0.2c-0.1,0-0.3-0.2-0.3-0.4 c0,0.3,0.2,0.6,0.2,0.8c-0.9,0.2-1.8,0.3-2.7,0.3c-0.1,0-0.2,0-0.3,0c0.1-0.3,0.1-0.5,0.2-0.8c0.2-0.7,0.2-1.5,0.3-2.2 c0.1-0.4,0.3-1.5,0.1-1.9c-0.1-0.2-0.3-0.2-0.5-0.4c-0.6-0.4-0.6-0.7-0.8-1.3c-0.1-0.4-0.3-0.5-0.5-0.9c-0.1-0.2-0.2-0.2-0.2-0.5 c0-0.2,0.2-0.4,0.2-0.6c0,0-0.1,0.1-0.1,0.1c0,0-0.1-0.1-0.1-0.1c0-0.1,0-0.4,0.1-0.4c0-0.2,0.1-0.7,0.3-0.7c0-0.3,0.2-0.3,0.1-0.5 c0.3-0.2,0-0.9,0-1c-0.2,0-0.1-0.1-0.3-0.2c0,0.1-0.2,0.1-0.2,0.2c0,0.1,0.1,0,0.1,0.1c-0.3,0-0.4-0.2-0.6-0.3 c0,0.2-0.1-0.2-0.3-0.3c0.1,0.2-0.2-0.2-0.2-0.3c-0.1-0.2-0.2-0.3-0.2-0.5c-0.5,0-0.6-0.1-1-0.4c-0.4-0.3-0.7-0.1-1.2-0.3 c-0.3-0.1-0.7-0.3-0.9-0.5c-0.4-0.3-0.3-0.6-0.5-1c-0.1-0.3-0.7-0.7-0.6-1c-0.6,0-0.5-1.3-1.1-1.3c0,0.2,0.6,1.5,0.8,2 c-0.2-0.4-0.8-0.6-0.9-1c0.5,0-0.2-0.8-0.4-1c-0.2-0.3-0.2-0.6-0.7-0.6c0-0.2-0.2-0.4-0.2-0.7c-0.1,0-0.2-0.1-0.2-0.2 c0,0,0.1,0,0.1,0c0-0.1-0.1-0.1,0-0.2c-0.1,0,0,0-0.1,0c0,0,0,0,0,0.1C6,9.5,5.9,9.3,5.8,9.2c1.1-1.6,2.6-3,4.4-3.9 c0.1,0.1,0.1,0.3,0.2,0.3c0-0.1,0-0.2,0-0.3c0.7-0.4,1.5-0.7,2.4-0.9c0.1,0,0.1,0.1,0.2,0.1c0.2,0.1,0.4,0.1,0.6,0.2 c0.2,0.1,0.1,0.1,0.2,0.4c0,0.1,0.1,0.2,0.1,0.3c0.1,0,0.1,0,0.2,0c0,0.1-0.1,0.1-0.1,0C14,5.7,14.2,6,14.4,5.6 c0.1-0.2-0.2-0.4-0.1-0.7c0.1-0.2,0.5-0.4,0.5-0.6c0,0,0,0,0,0c0-0.1,0-0.2-0.1-0.3C15,4,15.4,4,15.7,4c0.7,0,1.3,0.1,2,0.2 c0,0,0,0,0,0.1c0,0-0.1,0-0.2,0c0,0,0,0.2,0,0.1c0.1,0,0.4,0.2,0.3,0.4c0.1,0,0.1,0.1,0.2,0.1c0-0.2,0.3,0.3,0.3,0 c-0.1,0,0.1,0.1,0.1,0.1c0,0.1-0.5,0.3-0.6,0.3c0,0.3,0.8-0.5,0.8,0c0,0,0,0,0.1-0.1c0,0.6-0.8,0.9-1.1,0.9c-0.2,0-0.6,0-0.8,0 c-0.2,0.1-0.4,0.6-0.7,0.6c0,0.3-0.1,0.3-0.2,0.4c0,0,1.3-1.3,1.3-0.6c0,0-0.1,0.2-0.3,0.3c0,0,0-0.1,0-0.1c-0.1,0.1,0,0.1,0,0.2 c0.1,0,0.2-0.1,0.2-0.1c0,0.1,0,0.2-0.1,0.2c0,0,0.1,0,0.1,0c0,0.1-0.1,0.3,0.1,0.3c0,0,0,0,0,0c0,0,0,0.1-0.1,0.1c0,0,0,0,0,0 c0.2,0,0.2,0,0.4,0c0,0.3,0,0,0.1,0.2c-0.1,0-0.4,0.3-0.4,0.3c0,0,0-0.1-0.1-0.1c0,0-0.2,0.3-0.2,0.3c0,0,0,0,0-0.1 c-0.7,0,0.3-0.5,0.3-0.5c-0.5,0-0.2,0.1-0.2-0.2c0,0-0.1,0-0.1,0c0,0.1-0.1,0.2-0.2,0.2c0,0,0-0.1,0-0.1c-0.1,0.1-0.1,0.1,0,0.1 c-0.1,0.1-0.1,0-0.2,0c-0.1,0.1,0.1,0.4-0.2,0.2c0,0.1,0,0,0,0.1c-0.1,0,0-0.1-0.1-0.1c0,0.3-0.6,0.2-0.3,0.7c-0.1,0-0.1,0-0.2,0 c0,0.1,0,0.1,0,0.1c-0.1,0-0.2,0.1-0.3,0.2c0.1,0,0.3,0,0.2,0c0,0.1-0.2,0.1-0.3,0.1C15.3,9,15.2,9.2,15,9.1c0,0.2,0.1,0.3-0.1,0.5 c0,0.1,0-0.4,0-0.5c-0.1,0.1-0.3,0.4-0.2,0.4c0,0.2,0.1,0.1,0.1,0.2c-0.2,0,0,0.2,0.1,0.3c-0.1,0-0.1,0-0.1,0.1 c0.1,0,0.2,0.1,0.2,0.1c-0.1,0-0.1,0-0.2,0c0,0.5-0.9,0.7-0.8,1.4c0,0.3,0.4,1,0.1,1.2c0-0.3-0.3-0.4-0.3-0.7c-0.1,0,0,0.1-0.1,0.1 c-0.1-0.1,0-0.3-0.1-0.5c-0.1-0.1-0.2,0-0.4-0.1c-0.1,0-0.5-0.2-0.5-0.2c-0.1,0-0.3,0-0.4,0.1c0.1,0.2,0.2,0,0.1,0.2 c0.1,0,0.1,0,0.1,0.1c-0.1,0-0.2-0.1-0.3-0.2c0,0.1,0,0.1,0,0.1c-0.1,0-0.1,0-0.2,0c0-0.1,0-0.1,0-0.1c0,0-0.7,0-0.7,0 c0,0.2-0.4,0.5-0.5,0.8c-0.1,0.3,0,0.9,0,1.3c0.1,0,0.2,0.4,0.4,0.6c0.2,0.1,0.7,0.2,0.9,0.1c0.2-0.2,0.2-0.8,0.6-0.8 c0.4,0,0,0.5,0.1,0.9c-0.1,0-0.1-0.1-0.1-0.1c0,0.2-0.1,0.5-0.1,0.7c0.4,0,0.9-0.2,1.1,0.2c0.1,0.2-0.2,0.5-0.1,0.8 c0,0.2,0.2,0.5,0.4,0.5c0.2,0.1,0.2-0.1,0.3-0.1c0.2,0,0.2,0.1,0.4,0.1c0.1,0,0.1,0.2,0.2,0.2c0.1-0.5,0.3-0.7,0.7-0.9 c0.3-0.1,0.2-0.3,0.1,0.1c0.2,0-0.1,0.5,0.1,0.5c0-0.2,0-0.5,0.3-0.6c0-0.1-0.1,0-0.1-0.1c0.1-0.1,0.5,0.3,0.4,0.3 c0,0.1,0.9,0.1,0.9,0c0,0,0.3,0,0.3,0c0,0.1,0,0-0.1,0.1c0,0.1,0.3,0.2,0.3,0.1c-0.1,0.3-0.1,0.1-0.3,0.4c0.6,0,0.6-0.2,0.7,0.4 c0.1,0,0,0,0.1,0c0-0.3,0.3-0.1,0.3,0.1c0,0,0.5-0.2,0.5,0c0.6,0,0.4,0.7,0.7,0.9c0.1,0-0.1,0,0.1,0c0,0-0.1,0.3-0.1,0.3 c0.1,0,0-0.1,0.1-0.1c0,0.1,0,0.1,0,0.1c0,0,0,0,0,0.1c0,0,0,0,0,0c-0.2,0-0.1,0-0.1-0.1c0,0-0.5,0.5-0.8,0.7 c0.2-0.1,0.3-0.2,0.6-0.2c0,0.3,0,0.1,0,0.3c0.1,0,0-0.3,0.2-0.3c0,0.4,0.4,0.1,0.5,0.1c0,0,0.6-0.3,0.5,0.1c0.2,0,0.1,0.3,0.3,0.3 c0.3-0.3,1.2,0.3,1.5,0.5C23.2,20.7,22.4,21.1,22.1,21.9z M17.5,7.3l-0.1-0.1c-0.1,0-0.4-0.1-0.1-0.2l0.1,0.2c0,0,0.1,0,0.1,0 C17.4,7.3,17.4,7.3,17.5,7.3z M17.1,6.2c0.1,0,0.4,0.1,0.5,0.2c0,0,0,0,0,0.1C17.5,6.5,17.1,6.3,17.1,6.2z M12.3,11.8 C12.2,11.8,12.2,11.7,12.3,11.8C12.3,11.7,12.3,11.7,12.3,11.8z M19.6,18.9C19.6,18.9,19.5,19,19.6,18.9L19.6,18.9z M19.5,19 C19.6,19,19.5,19.1,19.5,19L19.5,19z" class="Blue" />
</g>
</svg>

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="Layer_1" style="enable-background:new 0 0 32 32">
<style type="text/css">
.Blue{fill:#1177D7;}
.Green{fill:#039C23;}
.Yellow{fill:#FFB115;}
.Black{fill:#727272;}
.White{fill:#FFFFFF;}
.Red{fill:#D11C1C;}
.st0{opacity:0.75;}
</style>
<g id="World_1_">
<path d="M15.8,2c-7.7,0-14,6.3-14,14s6.3,14,14,14s14-6.3,14-14S23.6,2,15.8,2z M20.1,19.1c-0.5,0.1-0.5-0.3-0.1-0.4 C20.1,18.9,20.2,18.8,20.1,19.1z M8.4,13.3c0-0.1,0-0.1,0-0.2C8.4,13.2,8.4,13.3,8.4,13.3z M22.1,21.9c0-0.1-0.1-0.1-0.1-0.1 c0.1,0.3-0.1,0.9-0.1,1.2c-0.1,0.4-0.4,1.3-0.7,1.3c0,0.2-0.4,0-0.3,0.2c-0.5,0.1-0.8,0.5-0.8,0.8c0,0.1-0.3,1.1-0.4,1.1 c0-0.1,0.1-0.2,0.1-0.3c0,0.1-0.1,0.1-0.1,0c0,0.2-0.3,0.8-0.4,0.9c-0.1,0.1-0.3,0.3-0.5,0.2c-0.1,0-0.3-0.2-0.3-0.4 c0,0.3,0.2,0.6,0.2,0.8c-0.9,0.2-1.8,0.3-2.7,0.3c-0.1,0-0.2,0-0.3,0c0.1-0.3,0.1-0.5,0.2-0.8c0.2-0.7,0.2-1.5,0.3-2.2 c0.1-0.4,0.3-1.5,0.1-1.9c-0.1-0.2-0.3-0.2-0.5-0.4c-0.6-0.4-0.6-0.7-0.8-1.3c-0.1-0.4-0.3-0.5-0.5-0.9c-0.1-0.2-0.2-0.2-0.2-0.5 c0-0.2,0.2-0.4,0.2-0.6c0,0-0.1,0.1-0.1,0.1c0,0-0.1-0.1-0.1-0.1c0-0.1,0-0.4,0.1-0.4c0-0.2,0.1-0.7,0.3-0.7c0-0.3,0.2-0.3,0.1-0.5 c0.3-0.2,0-0.9,0-1c-0.2,0-0.1-0.1-0.3-0.2c0,0.1-0.2,0.1-0.2,0.2c0,0.1,0.1,0,0.1,0.1c-0.3,0-0.4-0.2-0.6-0.3 c0,0.2-0.1-0.2-0.3-0.3c0.1,0.2-0.2-0.2-0.2-0.3c-0.1-0.2-0.2-0.3-0.2-0.5c-0.5,0-0.6-0.1-1-0.4c-0.4-0.3-0.7-0.1-1.2-0.3 c-0.3-0.1-0.7-0.3-0.9-0.5c-0.4-0.3-0.3-0.6-0.5-1c-0.1-0.3-0.7-0.7-0.6-1c-0.6,0-0.5-1.3-1.1-1.3c0,0.2,0.6,1.5,0.8,2 c-0.2-0.4-0.8-0.6-0.9-1c0.5,0-0.2-0.8-0.4-1c-0.2-0.3-0.2-0.6-0.7-0.6c0-0.2-0.2-0.4-0.2-0.7c-0.1,0-0.2-0.1-0.2-0.2 c0,0,0.1,0,0.1,0c0-0.1-0.1-0.1,0-0.2c-0.1,0,0,0-0.1,0c0,0,0,0,0,0.1C6,9.5,5.9,9.3,5.8,9.2c1.1-1.6,2.6-3,4.4-3.9 c0.1,0.1,0.1,0.3,0.2,0.3c0-0.1,0-0.2,0-0.3c0.7-0.4,1.5-0.7,2.4-0.9c0.1,0,0.1,0.1,0.2,0.1c0.2,0.1,0.4,0.1,0.6,0.2 c0.2,0.1,0.1,0.1,0.2,0.4c0,0.1,0.1,0.2,0.1,0.3c0.1,0,0.1,0,0.2,0c0,0.1-0.1,0.1-0.1,0C14,5.7,14.2,6,14.4,5.6 c0.1-0.2-0.2-0.4-0.1-0.7c0.1-0.2,0.5-0.4,0.5-0.6c0,0,0,0,0,0c0-0.1,0-0.2-0.1-0.3C15,4,15.4,4,15.7,4c0.7,0,1.3,0.1,2,0.2 c0,0,0,0,0,0.1c0,0-0.1,0-0.2,0c0,0,0,0.2,0,0.1c0.1,0,0.4,0.2,0.3,0.4c0.1,0,0.1,0.1,0.2,0.1c0-0.2,0.3,0.3,0.3,0 c-0.1,0,0.1,0.1,0.1,0.1c0,0.1-0.5,0.3-0.6,0.3c0,0.3,0.8-0.5,0.8,0c0,0,0,0,0.1-0.1c0,0.6-0.8,0.9-1.1,0.9c-0.2,0-0.6,0-0.8,0 c-0.2,0.1-0.4,0.6-0.7,0.6c0,0.3-0.1,0.3-0.2,0.4c0,0,1.3-1.3,1.3-0.6c0,0-0.1,0.2-0.3,0.3c0,0,0-0.1,0-0.1c-0.1,0.1,0,0.1,0,0.2 c0.1,0,0.2-0.1,0.2-0.1c0,0.1,0,0.2-0.1,0.2c0,0,0.1,0,0.1,0c0,0.1-0.1,0.3,0.1,0.3c0,0,0,0,0,0c0,0,0,0.1-0.1,0.1c0,0,0,0,0,0 c0.2,0,0.2,0,0.4,0c0,0.3,0,0,0.1,0.2c-0.1,0-0.4,0.3-0.4,0.3c0,0,0-0.1-0.1-0.1c0,0-0.2,0.3-0.2,0.3c0,0,0,0,0-0.1 c-0.7,0,0.3-0.5,0.3-0.5c-0.5,0-0.2,0.1-0.2-0.2c0,0-0.1,0-0.1,0c0,0.1-0.1,0.2-0.2,0.2c0,0,0-0.1,0-0.1c-0.1,0.1-0.1,0.1,0,0.1 c-0.1,0.1-0.1,0-0.2,0c-0.1,0.1,0.1,0.4-0.2,0.2c0,0.1,0,0,0,0.1c-0.1,0,0-0.1-0.1-0.1c0,0.3-0.6,0.2-0.3,0.7c-0.1,0-0.1,0-0.2,0 c0,0.1,0,0.1,0,0.1c-0.1,0-0.2,0.1-0.3,0.2c0.1,0,0.3,0,0.2,0c0,0.1-0.2,0.1-0.3,0.1C15.3,9,15.2,9.2,15,9.1c0,0.2,0.1,0.3-0.1,0.5 c0,0.1,0-0.4,0-0.5c-0.1,0.1-0.3,0.4-0.2,0.4c0,0.2,0.1,0.1,0.1,0.2c-0.2,0,0,0.2,0.1,0.3c-0.1,0-0.1,0-0.1,0.1 c0.1,0,0.2,0.1,0.2,0.1c-0.1,0-0.1,0-0.2,0c0,0.5-0.9,0.7-0.8,1.4c0,0.3,0.4,1,0.1,1.2c0-0.3-0.3-0.4-0.3-0.7c-0.1,0,0,0.1-0.1,0.1 c-0.1-0.1,0-0.3-0.1-0.5c-0.1-0.1-0.2,0-0.4-0.1c-0.1,0-0.5-0.2-0.5-0.2c-0.1,0-0.3,0-0.4,0.1c0.1,0.2,0.2,0,0.1,0.2 c0.1,0,0.1,0,0.1,0.1c-0.1,0-0.2-0.1-0.3-0.2c0,0.1,0,0.1,0,0.1c-0.1,0-0.1,0-0.2,0c0-0.1,0-0.1,0-0.1c0,0-0.7,0-0.7,0 c0,0.2-0.4,0.5-0.5,0.8c-0.1,0.3,0,0.9,0,1.3c0.1,0,0.2,0.4,0.4,0.6c0.2,0.1,0.7,0.2,0.9,0.1c0.2-0.2,0.2-0.8,0.6-0.8 c0.4,0,0,0.5,0.1,0.9c-0.1,0-0.1-0.1-0.1-0.1c0,0.2-0.1,0.5-0.1,0.7c0.4,0,0.9-0.2,1.1,0.2c0.1,0.2-0.2,0.5-0.1,0.8 c0,0.2,0.2,0.5,0.4,0.5c0.2,0.1,0.2-0.1,0.3-0.1c0.2,0,0.2,0.1,0.4,0.1c0.1,0,0.1,0.2,0.2,0.2c0.1-0.5,0.3-0.7,0.7-0.9 c0.3-0.1,0.2-0.3,0.1,0.1c0.2,0-0.1,0.5,0.1,0.5c0-0.2,0-0.5,0.3-0.6c0-0.1-0.1,0-0.1-0.1c0.1-0.1,0.5,0.3,0.4,0.3 c0,0.1,0.9,0.1,0.9,0c0,0,0.3,0,0.3,0c0,0.1,0,0-0.1,0.1c0,0.1,0.3,0.2,0.3,0.1c-0.1,0.3-0.1,0.1-0.3,0.4c0.6,0,0.6-0.2,0.7,0.4 c0.1,0,0,0,0.1,0c0-0.3,0.3-0.1,0.3,0.1c0,0,0.5-0.2,0.5,0c0.6,0,0.4,0.7,0.7,0.9c0.1,0-0.1,0,0.1,0c0,0-0.1,0.3-0.1,0.3 c0.1,0,0-0.1,0.1-0.1c0,0.1,0,0.1,0,0.1c0,0,0,0,0,0.1c0,0,0,0,0,0c-0.2,0-0.1,0-0.1-0.1c0,0-0.5,0.5-0.8,0.7 c0.2-0.1,0.3-0.2,0.6-0.2c0,0.3,0,0.1,0,0.3c0.1,0,0-0.3,0.2-0.3c0,0.4,0.4,0.1,0.5,0.1c0,0,0.6-0.3,0.5,0.1c0.2,0,0.1,0.3,0.3,0.3 c0.3-0.3,1.2,0.3,1.5,0.5C23.2,20.7,22.4,21.1,22.1,21.9z M17.5,7.3l-0.1-0.1c-0.1,0-0.4-0.1-0.1-0.2l0.1,0.2c0,0,0.1,0,0.1,0 C17.4,7.3,17.4,7.3,17.5,7.3z M17.1,6.2c0.1,0,0.4,0.1,0.5,0.2c0,0,0,0,0,0.1C17.5,6.5,17.1,6.3,17.1,6.2z M12.3,11.8 C12.2,11.8,12.2,11.7,12.3,11.8C12.3,11.7,12.3,11.7,12.3,11.8z M19.6,18.9C19.6,18.9,19.5,19,19.6,18.9L19.6,18.9z M19.5,19 C19.6,19,19.5,19.1,19.5,19L19.5,19z" class="Blue" />
</g>
</svg>

View File

@@ -67,6 +67,7 @@ Partial Class frmDocumentResultList
Me.WorkspaceManager1 = New DevExpress.Utils.WorkspaceManager(Me.components)
Me.btnSaveWorkspaceAs = New DevExpress.XtraBars.BarButtonItem()
Me.btnSaveAsMySearch = New DevExpress.XtraBars.BarButtonItem()
Me.lblCurrentWorkspace = New DevExpress.XtraBars.BarStaticItem()
Me.RibbonPageStart = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RibbonPageGroup_Navigation = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageGroupExport = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
@@ -220,9 +221,9 @@ Partial Class frmDocumentResultList
Me.RibbonControl.ColorScheme = DevExpress.XtraBars.Ribbon.RibbonControlColorScheme.Green
Me.RibbonControl.ExpandCollapseItem.Id = 0
Me.RibbonControl.Images = Me.SvgImageCollection1
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.BarButtonResetGridLayout, Me.labelCriticalError, Me.labelWarning, Me.MenuItemFileOpen, Me.MenuItemPropertiesIDB, Me.MenuItemFolderOpen, Me.MenuItemFilepathCopy, Me.MenuItemFolderpathCopy, Me.MenuItemProperties, Me.MenuItemsOpenFileZooFlow, Me.MenuItemPropertiesZooFlow, Me.ButtonRefresh, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarButtonItem5, Me.MenuItemStartAdhocWorkflow, Me.MenuItemCheckInFile, Me.MenuItemCheckOutFile, Me.MenuItemVersionFile, Me.chkGridShowQuickfilter, Me.chkGridShowGrouping, Me.chkGridShowTitle, Me.MenuItemSaveProperties, Me.BarButtonItem11, Me.BarEditItemGridFontSize, Me.btnSaveWorkspace, Me.BarWorkspaceMenuItem1, Me.btnSaveWorkspaceAs, Me.btnSaveAsMySearch})
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.BarButtonResetGridLayout, Me.labelCriticalError, Me.labelWarning, Me.MenuItemFileOpen, Me.MenuItemPropertiesIDB, Me.MenuItemFolderOpen, Me.MenuItemFilepathCopy, Me.MenuItemFolderpathCopy, Me.MenuItemProperties, Me.MenuItemsOpenFileZooFlow, Me.MenuItemPropertiesZooFlow, Me.ButtonRefresh, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarButtonItem5, Me.MenuItemStartAdhocWorkflow, Me.MenuItemCheckInFile, Me.MenuItemCheckOutFile, Me.MenuItemVersionFile, Me.chkGridShowQuickfilter, Me.chkGridShowGrouping, Me.chkGridShowTitle, Me.MenuItemSaveProperties, Me.BarButtonItem11, Me.BarEditItemGridFontSize, Me.btnSaveWorkspace, Me.BarWorkspaceMenuItem1, Me.btnSaveWorkspaceAs, Me.btnSaveAsMySearch, Me.lblCurrentWorkspace})
resources.ApplyResources(Me.RibbonControl, "RibbonControl")
Me.RibbonControl.MaxItemId = 59
Me.RibbonControl.MaxItemId = 61
Me.RibbonControl.Name = "RibbonControl"
Me.RibbonControl.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPageStart, Me.RibbonPage2})
Me.RibbonControl.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemTextEdit1, Me.RepositoryItemTextEdit2, Me.RepositoryItemSearchControl1, Me.cmbGridFontSize})
@@ -519,6 +520,14 @@ Partial Class frmDocumentResultList
Me.btnSaveAsMySearch.ImageOptions.SvgImage = Global.DigitalData.GUIs.Common.My.Resources.Resources.bo_security_permission_action
Me.btnSaveAsMySearch.Name = "btnSaveAsMySearch"
'
'lblCurrentWorkspace
'
resources.ApplyResources(Me.lblCurrentWorkspace, "lblCurrentWorkspace")
Me.lblCurrentWorkspace.Id = 60
Me.lblCurrentWorkspace.ImageOptions.SvgImage = Global.DigitalData.GUIs.Common.My.Resources.Resources.business_world2
Me.lblCurrentWorkspace.Name = "lblCurrentWorkspace"
Me.lblCurrentWorkspace.Tag = "Arbeitsbereich: {0}"
'
'RibbonPageStart
'
Me.RibbonPageStart.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup_Navigation, Me.RibbonPageGroupExport, Me.RibbonPageRefresh, Me.RibbonPageGroupDocument, Me.RibbonPageGroupFilesystem, Me.RibbonPageGroupCheckInOut, Me.RibbonPageGroupWorkflow, Me.RibbonPageGroupAttribute, Me.RibbonPageGroupWorkspace, Me.RibbonPageGroupSavedSearch})
@@ -644,6 +653,7 @@ Partial Class frmDocumentResultList
Me.RibbonStatusBar.ItemLinks.Add(Me.labelResultCount)
Me.RibbonStatusBar.ItemLinks.Add(Me.labelCriticalError)
Me.RibbonStatusBar.ItemLinks.Add(Me.labelWarning)
Me.RibbonStatusBar.ItemLinks.Add(Me.lblCurrentWorkspace)
resources.ApplyResources(Me.RibbonStatusBar, "RibbonStatusBar")
Me.RibbonStatusBar.Name = "RibbonStatusBar"
Me.RibbonStatusBar.Ribbon = Me.RibbonControl
@@ -1054,4 +1064,5 @@ Partial Class frmDocumentResultList
Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents btnSaveAsMySearch As DevExpress.XtraBars.BarButtonItem
Friend WithEvents RibbonPageGroupSavedSearch As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents lblCurrentWorkspace As DevExpress.XtraBars.BarStaticItem
End Class

View File

@@ -588,7 +588,7 @@
<value>CtrlObjectPropertyDialog</value>
</data>
<data name="&gt;&gt;CtrlObjectPropertyDialog.Type" xml:space="preserve">
<value>DigitalData.GUIs.Common.ctrlObjectPropertyDialog, DigitalData.GUIs.Common, Version=1.12.1.0, Culture=neutral, PublicKeyToken=null</value>
<value>DigitalData.GUIs.Common.ctrlObjectPropertyDialog, DigitalData.GUIs.Common, Version=1.13.2.0, Culture=neutral, PublicKeyToken=null</value>
</data>
<data name="&gt;&gt;CtrlObjectPropertyDialog.Parent" xml:space="preserve">
<value>DockPanel3_Container</value>
@@ -830,6 +830,9 @@
<data name="&gt;&gt;DockPanelFileList.ZOrder" xml:space="preserve">
<value>2</value>
</data>
<data name="lblCurrentWorkspace.Caption" xml:space="preserve">
<value>Arbeitsbereich: {0}</value>
</data>
<data name="RibbonStatusBar.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 647</value>
</data>
@@ -1183,6 +1186,12 @@
<data name="&gt;&gt;btnSaveAsMySearch.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;lblCurrentWorkspace.Name" xml:space="preserve">
<value>lblCurrentWorkspace</value>
</data>
<data name="&gt;&gt;lblCurrentWorkspace.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;RibbonPageStart.Name" xml:space="preserve">
<value>RibbonPageStart</value>
</data>

View File

@@ -220,15 +220,20 @@ Public Class frmDocumentResultList
'Load window settings
LayoutManager.LoadWindowLocationAndSize(Me)
' Load the workspaces from file, maybe do this earlier and get the available workspaces through params
Workspace.LoadWorkspaces()
' Add an event when new workspace is loaded
AddHandler Workspace.WorkspaceLoaded, AddressOf Workspace_WorkspaceLoaded
' This loads the available workspaces into the ribbon
Workspace.GetWorkspaceButtons(RibbonControl, RibbonPageGroupWorkspace)
' This loads the default workspace, for now
Workspace.LoadWorkspace(Config.Config.SelectedWorkspace)
' This needs to done be after loading the grid
' so we can set the row handle and start loading the (only) file
If Params.ShowFileList = False Then
@@ -263,6 +268,10 @@ Public Class frmDocumentResultList
End Try
End Sub
Private Sub Workspace_WorkspaceLoaded(sender As Object, e As String)
lblCurrentWorkspace.Caption = String.Format(lblCurrentWorkspace.Tag, e)
End Sub
Private Sub frmDocumentResultList_Closing(sender As Object, e As CancelEventArgs) Handles Me.FormClosing
Try
LayoutManager.SaveWindowLocationAndSize(Me)

View File

@@ -20,33 +20,66 @@ Namespace Modules
End Sub
Public Function Replace(pInput As String, pPanel As Panel) As String
Dim oControls As List(Of Control) = pPanel.Controls.Cast(Of Control).ToList()
Return Replace(pInput, oControls)
End Function
Public Function Replace(pInput As String, pControls As List(Of Control)) As String
Dim oResult = pInput
Dim oCounter = 0
While ContainsPattern(oResult, PatternIdentifier)
Try
Dim oControlName As String = GetNextPattern(oResult, PatternIdentifier).Value
Dim oControl As Control = pPanel.Controls.Find(oControlName, False).FirstOrDefault()
Dim oControl As Control = pControls.
Where(Function(control) control.Name = oControlName).
FirstOrDefault()
If oControl IsNot Nothing Then
Dim oReplaceValue As String
Select Case oControl.GetType.ToString
Case GetType(TextBox).ToString
Select Case oControl.GetType
Case GetType(TextBox)
oReplaceValue = oControl.Text
Case GetType(LookupControl3).ToString
Case GetType(DevExpress.XtraEditors.TextEdit)
Dim oTextEdit As DevExpress.XtraEditors.TextEdit = oControl
oReplaceValue = oTextEdit.EditValue
Case GetType(DevExpress.XtraEditors.DateEdit)
Dim oDateEdit As DevExpress.XtraEditors.DateEdit = oControl
oReplaceValue = oDateEdit.EditValue
Case GetType(DevExpress.XtraEditors.LookUpEdit)
Dim oLookupEdit As DevExpress.XtraEditors.LookUpEdit = oControl
oReplaceValue = oLookupEdit.EditValue
Case GetType(LookupControl3)
Dim oLookupControl3 As LookupControl3 = oControl
If oLookupControl3.Properties.SelectedValues.Count = 1 Then
oReplaceValue = oLookupControl3.Properties.SelectedValues.Item(0)
Else
oReplaceValue = "0"
End If
Case GetType(ComboBox).ToString
Case GetType(ComboBox)
oReplaceValue = oControl.Text
Case GetType(CheckBox).ToString
Case GetType(DevExpress.XtraEditors.ComboBoxEdit)
Dim oCombobox As DevExpress.XtraEditors.ComboBoxEdit = oControl
oReplaceValue = oCombobox.EditValue
Case GetType(CheckBox)
Dim oCheckBox As CheckBox = oControl
oReplaceValue = oCheckBox.Checked
Case GetType(DevExpress.XtraEditors.CheckEdit)
Dim oCheckEdit As DevExpress.XtraEditors.CheckEdit = oControl
oReplaceValue = oCheckEdit.Checked
Case Else
oReplaceValue = "0"
End Select
oResult = ReplacePattern(oResult, PatternIdentifier, oReplaceValue)
@@ -61,5 +94,6 @@ Namespace Modules
Return oResult
End Function
End Class
End Namespace

View File

@@ -12,7 +12,7 @@ Imports System.Runtime.InteropServices
<Assembly: AssemblyDescription("")>
<Assembly: AssemblyCompany("")>
<Assembly: AssemblyProduct("Patterns")>
<Assembly: AssemblyCopyright("Copyright © 2021")>
<Assembly: AssemblyCopyright("Copyright © 2022")>
<Assembly: AssemblyTrademark("")>
<Assembly: ComVisible(False)>
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.0.0.0")>
<Assembly: AssemblyFileVersion("1.0.0.0")>
<Assembly: AssemblyVersion("1.1.0.0")>
<Assembly: AssemblyFileVersion("1.1.0.0")>

View File

@@ -77,6 +77,18 @@ Public Class Patterns2
End Try
End Function
Public Function ReplaceControlValues(pInput As String, pControls As List(Of Control)) As String
Try
Logger.Debug("Replacing Control Values")
Dim oModule = New Modules.Controls(LogConfig)
Return oModule.Replace(pInput, pControls)
Catch ex As Exception
Logger.Warn("Error occurred while replacing Control Values")
Logger.Error(ex)
Return pInput
End Try
End Function
Public Function ReplaceWindreamValues(pInput As String, pWMObject As WMObject) As String
Try
Logger.Debug("Replacing Windream Values")