ms

GUIs.ZooFlow/Administration/IDB/frmAdmin_IDBAttribute.Designer.vb

@@ -31,6 +31,7 @@ Partial Class frmAdmin_IDBAttribute
         Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
         Me.labelStatus = New DevExpress.XtraBars.BarStaticItem()
         Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem()
+        Me.BarButtonItem4 = New DevExpress.XtraBars.BarButtonItem()
         Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
         Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
         Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
@@ -65,7 +66,9 @@ Partial Class frmAdmin_IDBAttribute
         Me.TableAdapterManager = New DigitalData.GUIs.ZooFlow.DSIDB_StammdatenTableAdapters.TableAdapterManager()
         Me.VWIDB_BE_ATTRIBUTETableAdapter = New DigitalData.GUIs.ZooFlow.DSIDB_StammdatenTableAdapters.VWIDB_BE_ATTRIBUTETableAdapter()
         Me.TBWH_ATTRIBUTE_TYPETableAdapter = New DigitalData.GUIs.ZooFlow.DSIDB_StammdatenTableAdapters.TBWH_ATTRIBUTE_TYPETableAdapter()
-        Me.BarButtonItem4 = New DevExpress.XtraBars.BarButtonItem()
+        Me.XtraTabControl1 = New DevExpress.XtraTab.XtraTabControl()
+        Me.XtraTabPage1 = New DevExpress.XtraTab.XtraTabPage()
+        Me.XtraTabPage2 = New DevExpress.XtraTab.XtraTabPage()
         CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.LayoutControl1.SuspendLayout()
@@ -95,10 +98,14 @@ Partial Class frmAdmin_IDBAttribute
         CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.LayoutControlItem8, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.LayoutControlItem10, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.XtraTabControl1.SuspendLayout()
+        Me.XtraTabPage1.SuspendLayout()
         Me.SuspendLayout()
         '
         'RibbonControl1
         '
+        Me.RibbonControl1.ColorScheme = DevExpress.XtraBars.Ribbon.RibbonControlColorScheme.Green
         Me.RibbonControl1.ExpandCollapseItem.Id = 0
         Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.labelStatus, Me.BarButtonItem3, Me.BarButtonItem4})
         Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
@@ -114,7 +121,7 @@ Partial Class frmAdmin_IDBAttribute
         '
         'BarButtonItem1
         '
-        Me.BarButtonItem1.Caption = "Speichern und Schließen"
+        Me.BarButtonItem1.Caption = "Abbrechen"
         Me.BarButtonItem1.Id = 1
         Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
         Me.BarButtonItem1.Name = "BarButtonItem1"
@@ -141,6 +148,13 @@ Partial Class frmAdmin_IDBAttribute
         Me.BarButtonItem3.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.del1
         Me.BarButtonItem3.Name = "BarButtonItem3"
         '
+        'BarButtonItem4
+        '
+        Me.BarButtonItem4.Caption = "Löschen"
+        Me.BarButtonItem4.Id = 7
+        Me.BarButtonItem4.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem4.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.BarButtonItem4.Name = "BarButtonItem4"
+        '
         'RibbonPage1
         '
         Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1})
@@ -158,10 +172,10 @@ Partial Class frmAdmin_IDBAttribute
         'RibbonStatusBar1
         '
         Me.RibbonStatusBar1.ItemLinks.Add(Me.labelStatus)
-        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 539)
+        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 537)
         Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
         Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
-        Me.RibbonStatusBar1.Size = New System.Drawing.Size(894, 22)
+        Me.RibbonStatusBar1.Size = New System.Drawing.Size(894, 24)
         '
         'RibbonPage2
         '
@@ -182,21 +196,21 @@ Partial Class frmAdmin_IDBAttribute
         Me.LayoutControl1.Controls.Add(Me.txtChangedWhen)
         Me.LayoutControl1.Controls.Add(Me.ComboBoxEdit1)
         Me.LayoutControl1.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.LayoutControl1.Location = New System.Drawing.Point(0, 132)
+        Me.LayoutControl1.Location = New System.Drawing.Point(0, 0)
         Me.LayoutControl1.Name = "LayoutControl1"
         Me.LayoutControl1.Root = Me.Root
-        Me.LayoutControl1.Size = New System.Drawing.Size(894, 407)
+        Me.LayoutControl1.Size = New System.Drawing.Size(892, 380)
         Me.LayoutControl1.TabIndex = 2
         Me.LayoutControl1.Text = "LayoutControl1"
         '
         'TextEdit1
         '
         Me.TextEdit1.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.VWIDB_BE_ATTRIBUTEBindingSource, "ATTR_ID", True))
-        Me.TextEdit1.Location = New System.Drawing.Point(177, 20)
+        Me.TextEdit1.Location = New System.Drawing.Point(163, 20)
         Me.TextEdit1.MenuManager = Me.RibbonControl1
         Me.TextEdit1.Name = "TextEdit1"
         Me.TextEdit1.Properties.ReadOnly = True
-        Me.TextEdit1.Size = New System.Drawing.Size(697, 20)
+        Me.TextEdit1.Size = New System.Drawing.Size(709, 20)
         Me.TextEdit1.StyleController = Me.LayoutControl1
         Me.TextEdit1.TabIndex = 4
         '
@@ -213,10 +227,10 @@ Partial Class frmAdmin_IDBAttribute
         'TextEdit2
         '
         Me.TextEdit2.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.VWIDB_BE_ATTRIBUTEBindingSource, "ATTR_TITLE", True))
-        Me.TextEdit2.Location = New System.Drawing.Point(177, 60)
+        Me.TextEdit2.Location = New System.Drawing.Point(163, 60)
         Me.TextEdit2.MenuManager = Me.RibbonControl1
         Me.TextEdit2.Name = "TextEdit2"
-        Me.TextEdit2.Size = New System.Drawing.Size(697, 20)
+        Me.TextEdit2.Size = New System.Drawing.Size(709, 20)
         Me.TextEdit2.StyleController = Me.LayoutControl1
         Me.TextEdit2.TabIndex = 5
         '
@@ -224,11 +238,11 @@ Partial Class frmAdmin_IDBAttribute
         '
         Me.SpinEdit1.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.VWIDB_BE_ATTRIBUTEBindingSource, "VIEW_SEQUENCE", True))
         Me.SpinEdit1.EditValue = New Decimal(New Integer() {0, 0, 0, 0})
-        Me.SpinEdit1.Location = New System.Drawing.Point(613, 180)
+        Me.SpinEdit1.Location = New System.Drawing.Point(598, 180)
         Me.SpinEdit1.MenuManager = Me.RibbonControl1
         Me.SpinEdit1.Name = "SpinEdit1"
         Me.SpinEdit1.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
-        Me.SpinEdit1.Size = New System.Drawing.Size(261, 20)
+        Me.SpinEdit1.Size = New System.Drawing.Size(274, 20)
         Me.SpinEdit1.StyleController = Me.LayoutControl1
         Me.SpinEdit1.TabIndex = 6
         '
@@ -239,7 +253,7 @@ Partial Class frmAdmin_IDBAttribute
         Me.CheckEditMulticontext.MenuManager = Me.RibbonControl1
         Me.CheckEditMulticontext.Name = "CheckEditMulticontext"
         Me.CheckEditMulticontext.Properties.Caption = "Attribut mehrzeilig"
-        Me.CheckEditMulticontext.Size = New System.Drawing.Size(854, 18)
+        Me.CheckEditMulticontext.Size = New System.Drawing.Size(852, 20)
         Me.CheckEditMulticontext.StyleController = Me.LayoutControl1
         Me.CheckEditMulticontext.TabIndex = 7
         '
@@ -250,67 +264,67 @@ Partial Class frmAdmin_IDBAttribute
         Me.CheckEdit2.MenuManager = Me.RibbonControl1
         Me.CheckEdit2.Name = "CheckEdit2"
         Me.CheckEdit2.Properties.Caption = "Standard in Ergebnisliste"
-        Me.CheckEdit2.Size = New System.Drawing.Size(416, 18)
+        Me.CheckEdit2.Size = New System.Drawing.Size(415, 20)
         Me.CheckEdit2.StyleController = Me.LayoutControl1
         Me.CheckEdit2.TabIndex = 8
         '
         'TextEdit3
         '
-        Me.TextEdit3.Location = New System.Drawing.Point(177, 140)
+        Me.TextEdit3.Location = New System.Drawing.Point(163, 140)
         Me.TextEdit3.MenuManager = Me.RibbonControl1
         Me.TextEdit3.Name = "TextEdit3"
-        Me.TextEdit3.Size = New System.Drawing.Size(697, 20)
+        Me.TextEdit3.Size = New System.Drawing.Size(709, 20)
         Me.TextEdit3.StyleController = Me.LayoutControl1
         Me.TextEdit3.TabIndex = 9
         '
         'txtAddedWho
         '
         Me.txtAddedWho.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.VWIDB_BE_ATTRIBUTEBindingSource, "ADDED_WHO", True))
-        Me.txtAddedWho.Location = New System.Drawing.Point(177, 258)
+        Me.txtAddedWho.Location = New System.Drawing.Point(163, 260)
         Me.txtAddedWho.MenuManager = Me.RibbonControl1
         Me.txtAddedWho.Name = "txtAddedWho"
         Me.txtAddedWho.Properties.ReadOnly = True
-        Me.txtAddedWho.Size = New System.Drawing.Size(259, 20)
+        Me.txtAddedWho.Size = New System.Drawing.Size(272, 20)
         Me.txtAddedWho.StyleController = Me.LayoutControl1
         Me.txtAddedWho.TabIndex = 10
         '
         'txtAddedWhen
         '
         Me.txtAddedWhen.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.VWIDB_BE_ATTRIBUTEBindingSource, "ADDED_WHEN", True))
-        Me.txtAddedWhen.Location = New System.Drawing.Point(613, 258)
+        Me.txtAddedWhen.Location = New System.Drawing.Point(598, 260)
         Me.txtAddedWhen.MenuManager = Me.RibbonControl1
         Me.txtAddedWhen.Name = "txtAddedWhen"
         Me.txtAddedWhen.Properties.ReadOnly = True
-        Me.txtAddedWhen.Size = New System.Drawing.Size(261, 20)
+        Me.txtAddedWhen.Size = New System.Drawing.Size(274, 20)
         Me.txtAddedWhen.StyleController = Me.LayoutControl1
         Me.txtAddedWhen.TabIndex = 11
         '
         'txtChangedWho
         '
         Me.txtChangedWho.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.VWIDB_BE_ATTRIBUTEBindingSource, "CHANGED_WHO", True))
-        Me.txtChangedWho.Location = New System.Drawing.Point(177, 298)
+        Me.txtChangedWho.Location = New System.Drawing.Point(163, 300)
         Me.txtChangedWho.MenuManager = Me.RibbonControl1
         Me.txtChangedWho.Name = "txtChangedWho"
         Me.txtChangedWho.Properties.ReadOnly = True
-        Me.txtChangedWho.Size = New System.Drawing.Size(259, 20)
+        Me.txtChangedWho.Size = New System.Drawing.Size(272, 20)
         Me.txtChangedWho.StyleController = Me.LayoutControl1
         Me.txtChangedWho.TabIndex = 12
         '
         'txtChangedWhen
         '
         Me.txtChangedWhen.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.VWIDB_BE_ATTRIBUTEBindingSource, "CHANGED_WHEN", True))
-        Me.txtChangedWhen.Location = New System.Drawing.Point(613, 298)
+        Me.txtChangedWhen.Location = New System.Drawing.Point(598, 300)
         Me.txtChangedWhen.MenuManager = Me.RibbonControl1
         Me.txtChangedWhen.Name = "txtChangedWhen"
         Me.txtChangedWhen.Properties.ReadOnly = True
-        Me.txtChangedWhen.Size = New System.Drawing.Size(261, 20)
+        Me.txtChangedWhen.Size = New System.Drawing.Size(274, 20)
         Me.txtChangedWhen.StyleController = Me.LayoutControl1
         Me.txtChangedWhen.TabIndex = 13
         '
         'ComboBoxEdit1
         '
         Me.ComboBoxEdit1.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.VWIDB_BE_ATTRIBUTEBindingSource, "TYPE_ID", True))
-        Me.ComboBoxEdit1.Location = New System.Drawing.Point(177, 100)
+        Me.ComboBoxEdit1.Location = New System.Drawing.Point(163, 100)
         Me.ComboBoxEdit1.MenuManager = Me.RibbonControl1
         Me.ComboBoxEdit1.Name = "ComboBoxEdit1"
         Me.ComboBoxEdit1.Properties.BestFitMode = DevExpress.XtraEditors.Controls.BestFitMode.BestFit
@@ -320,7 +334,7 @@ Partial Class frmAdmin_IDBAttribute
         Me.ComboBoxEdit1.Properties.NullText = ""
         Me.ComboBoxEdit1.Properties.PopupSizeable = False
         Me.ComboBoxEdit1.Properties.ValueMember = "GUID"
-        Me.ComboBoxEdit1.Size = New System.Drawing.Size(697, 20)
+        Me.ComboBoxEdit1.Size = New System.Drawing.Size(709, 20)
         Me.ComboBoxEdit1.StyleController = Me.LayoutControl1
         Me.ComboBoxEdit1.TabIndex = 14
         '
@@ -335,7 +349,7 @@ Partial Class frmAdmin_IDBAttribute
         Me.Root.GroupBordersVisible = False
         Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem1, Me.LayoutControlItem2, Me.LayoutControlItem4, Me.LayoutControlItem6, Me.LayoutControlItem7, Me.LayoutControlItem3, Me.LayoutControlItem11, Me.LayoutControlItem9, Me.LayoutControlItem5, Me.LayoutControlItem8, Me.LayoutControlItem10})
         Me.Root.Name = "Root"
-        Me.Root.Size = New System.Drawing.Size(894, 407)
+        Me.Root.Size = New System.Drawing.Size(892, 380)
         Me.Root.TextVisible = False
         '
         'LayoutControlItem1
@@ -348,9 +362,9 @@ Partial Class frmAdmin_IDBAttribute
         Me.LayoutControlItem1.Location = New System.Drawing.Point(0, 0)
         Me.LayoutControlItem1.Name = "LayoutControlItem1"
         Me.LayoutControlItem1.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
-        Me.LayoutControlItem1.Size = New System.Drawing.Size(874, 40)
+        Me.LayoutControlItem1.Size = New System.Drawing.Size(872, 40)
         Me.LayoutControlItem1.Text = "ID"
-        Me.LayoutControlItem1.TextSize = New System.Drawing.Size(145, 13)
+        Me.LayoutControlItem1.TextSize = New System.Drawing.Size(131, 13)
         '
         'LayoutControlItem2
         '
@@ -358,9 +372,9 @@ Partial Class frmAdmin_IDBAttribute
         Me.LayoutControlItem2.Location = New System.Drawing.Point(0, 40)
         Me.LayoutControlItem2.Name = "LayoutControlItem2"
         Me.LayoutControlItem2.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
-        Me.LayoutControlItem2.Size = New System.Drawing.Size(874, 40)
+        Me.LayoutControlItem2.Size = New System.Drawing.Size(872, 40)
         Me.LayoutControlItem2.Text = "Bezeichnung"
-        Me.LayoutControlItem2.TextSize = New System.Drawing.Size(145, 13)
+        Me.LayoutControlItem2.TextSize = New System.Drawing.Size(131, 13)
         '
         'LayoutControlItem4
         '
@@ -368,7 +382,7 @@ Partial Class frmAdmin_IDBAttribute
         Me.LayoutControlItem4.Location = New System.Drawing.Point(0, 200)
         Me.LayoutControlItem4.Name = "LayoutControlItem4"
         Me.LayoutControlItem4.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
-        Me.LayoutControlItem4.Size = New System.Drawing.Size(874, 38)
+        Me.LayoutControlItem4.Size = New System.Drawing.Size(872, 40)
         Me.LayoutControlItem4.TextSize = New System.Drawing.Size(0, 0)
         Me.LayoutControlItem4.TextVisible = False
         '
@@ -378,9 +392,9 @@ Partial Class frmAdmin_IDBAttribute
         Me.LayoutControlItem6.Location = New System.Drawing.Point(0, 120)
         Me.LayoutControlItem6.Name = "LayoutControlItem6"
         Me.LayoutControlItem6.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
-        Me.LayoutControlItem6.Size = New System.Drawing.Size(874, 40)
+        Me.LayoutControlItem6.Size = New System.Drawing.Size(872, 40)
         Me.LayoutControlItem6.Text = "Kommentar"
-        Me.LayoutControlItem6.TextSize = New System.Drawing.Size(145, 13)
+        Me.LayoutControlItem6.TextSize = New System.Drawing.Size(131, 13)
         '
         'LayoutControlItem7
         '
@@ -388,23 +402,23 @@ Partial Class frmAdmin_IDBAttribute
         Me.LayoutControlItem7.AppearanceItemCaption.Options.UseFont = True
         Me.LayoutControlItem7.Control = Me.txtAddedWho
         Me.LayoutControlItem7.Enabled = False
-        Me.LayoutControlItem7.Location = New System.Drawing.Point(0, 238)
+        Me.LayoutControlItem7.Location = New System.Drawing.Point(0, 240)
         Me.LayoutControlItem7.Name = "LayoutControlItem7"
         Me.LayoutControlItem7.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
-        Me.LayoutControlItem7.Size = New System.Drawing.Size(436, 40)
+        Me.LayoutControlItem7.Size = New System.Drawing.Size(435, 40)
         Me.LayoutControlItem7.Text = "Erstellt Wer"
-        Me.LayoutControlItem7.TextSize = New System.Drawing.Size(145, 13)
+        Me.LayoutControlItem7.TextSize = New System.Drawing.Size(131, 13)
         '
         'LayoutControlItem3
         '
         Me.LayoutControlItem3.Control = Me.SpinEdit1
         Me.LayoutControlItem3.CustomizationFormText = "Anzeige Reihenfolge"
-        Me.LayoutControlItem3.Location = New System.Drawing.Point(436, 160)
+        Me.LayoutControlItem3.Location = New System.Drawing.Point(435, 160)
         Me.LayoutControlItem3.Name = "LayoutControlItem3"
         Me.LayoutControlItem3.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
-        Me.LayoutControlItem3.Size = New System.Drawing.Size(438, 40)
+        Me.LayoutControlItem3.Size = New System.Drawing.Size(437, 40)
         Me.LayoutControlItem3.Text = "Reihenfolge in Ergebnisliste"
-        Me.LayoutControlItem3.TextSize = New System.Drawing.Size(145, 13)
+        Me.LayoutControlItem3.TextSize = New System.Drawing.Size(131, 13)
         '
         'LayoutControlItem11
         '
@@ -412,9 +426,9 @@ Partial Class frmAdmin_IDBAttribute
         Me.LayoutControlItem11.Location = New System.Drawing.Point(0, 80)
         Me.LayoutControlItem11.Name = "LayoutControlItem11"
         Me.LayoutControlItem11.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
-        Me.LayoutControlItem11.Size = New System.Drawing.Size(874, 40)
+        Me.LayoutControlItem11.Size = New System.Drawing.Size(872, 40)
         Me.LayoutControlItem11.Text = "Attribut-Typ"
-        Me.LayoutControlItem11.TextSize = New System.Drawing.Size(145, 13)
+        Me.LayoutControlItem11.TextSize = New System.Drawing.Size(131, 13)
         '
         'LayoutControlItem9
         '
@@ -422,12 +436,12 @@ Partial Class frmAdmin_IDBAttribute
         Me.LayoutControlItem9.AppearanceItemCaption.Options.UseFont = True
         Me.LayoutControlItem9.Control = Me.txtChangedWho
         Me.LayoutControlItem9.Enabled = False
-        Me.LayoutControlItem9.Location = New System.Drawing.Point(0, 278)
+        Me.LayoutControlItem9.Location = New System.Drawing.Point(0, 280)
         Me.LayoutControlItem9.Name = "LayoutControlItem9"
         Me.LayoutControlItem9.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
-        Me.LayoutControlItem9.Size = New System.Drawing.Size(436, 109)
+        Me.LayoutControlItem9.Size = New System.Drawing.Size(435, 80)
         Me.LayoutControlItem9.Text = "Geändert Wer"
-        Me.LayoutControlItem9.TextSize = New System.Drawing.Size(145, 13)
+        Me.LayoutControlItem9.TextSize = New System.Drawing.Size(131, 13)
         '
         'LayoutControlItem5
         '
@@ -435,7 +449,7 @@ Partial Class frmAdmin_IDBAttribute
         Me.LayoutControlItem5.Location = New System.Drawing.Point(0, 160)
         Me.LayoutControlItem5.Name = "LayoutControlItem5"
         Me.LayoutControlItem5.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
-        Me.LayoutControlItem5.Size = New System.Drawing.Size(436, 40)
+        Me.LayoutControlItem5.Size = New System.Drawing.Size(435, 40)
         Me.LayoutControlItem5.TextSize = New System.Drawing.Size(0, 0)
         Me.LayoutControlItem5.TextVisible = False
         '
@@ -445,12 +459,12 @@ Partial Class frmAdmin_IDBAttribute
         Me.LayoutControlItem8.AppearanceItemCaption.Options.UseFont = True
         Me.LayoutControlItem8.Control = Me.txtAddedWhen
         Me.LayoutControlItem8.Enabled = False
-        Me.LayoutControlItem8.Location = New System.Drawing.Point(436, 238)
+        Me.LayoutControlItem8.Location = New System.Drawing.Point(435, 240)
         Me.LayoutControlItem8.Name = "LayoutControlItem8"
         Me.LayoutControlItem8.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
-        Me.LayoutControlItem8.Size = New System.Drawing.Size(438, 40)
+        Me.LayoutControlItem8.Size = New System.Drawing.Size(437, 40)
         Me.LayoutControlItem8.Text = "Erstellt Wann"
-        Me.LayoutControlItem8.TextSize = New System.Drawing.Size(145, 13)
+        Me.LayoutControlItem8.TextSize = New System.Drawing.Size(131, 13)
         '
         'LayoutControlItem10
         '
@@ -458,12 +472,12 @@ Partial Class frmAdmin_IDBAttribute
         Me.LayoutControlItem10.AppearanceItemCaption.Options.UseFont = True
         Me.LayoutControlItem10.Control = Me.txtChangedWhen
         Me.LayoutControlItem10.Enabled = False
-        Me.LayoutControlItem10.Location = New System.Drawing.Point(436, 278)
+        Me.LayoutControlItem10.Location = New System.Drawing.Point(435, 280)
         Me.LayoutControlItem10.Name = "LayoutControlItem10"
         Me.LayoutControlItem10.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
-        Me.LayoutControlItem10.Size = New System.Drawing.Size(438, 109)
+        Me.LayoutControlItem10.Size = New System.Drawing.Size(437, 80)
         Me.LayoutControlItem10.Text = "Geändert Wann"
-        Me.LayoutControlItem10.TextSize = New System.Drawing.Size(145, 13)
+        Me.LayoutControlItem10.TextSize = New System.Drawing.Size(131, 13)
         '
         'TableAdapterManager
         '
@@ -472,8 +486,12 @@ Partial Class frmAdmin_IDBAttribute
         Me.TableAdapterManager.TBIDB_ATTRIBUTE_TYPETableAdapter = Nothing
         Me.TableAdapterManager.TBIDB_ATTRIBUTETableAdapter = Nothing
         Me.TableAdapterManager.TBIDB_BUSINESS_ENTITYTableAdapter = Nothing
+        Me.TableAdapterManager.TBIDB_CATALOG_USERTableAdapter = Nothing
         Me.TableAdapterManager.TBIDB_CATALOGTableAdapter = Nothing
+        Me.TableAdapterManager.TBIDB_COMMON_SQLTableAdapter = Nothing
         Me.TableAdapterManager.TBIDB_DOCTYPE_HANDLINGTableAdapter = Nothing
+        Me.TableAdapterManager.TBIDB_DOCTYPETableAdapter = Nothing
+        Me.TableAdapterManager.TBIDB_LANGUAGETableAdapter = Nothing
         Me.TableAdapterManager.TBIDB_OBJECT_STORETableAdapter = Nothing
         Me.TableAdapterManager.TBZF_ADMIN_SOURCE_SQLTableAdapter = Nothing
         Me.TableAdapterManager.UpdateOrder = DigitalData.GUIs.ZooFlow.DSIDB_StammdatenTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
@@ -487,19 +505,35 @@ Partial Class frmAdmin_IDBAttribute
         '
         Me.TBWH_ATTRIBUTE_TYPETableAdapter.ClearBeforeFill = True
         '
-        'BarButtonItem4
+        'XtraTabControl1
         '
-        Me.BarButtonItem4.Caption = "Löschen"
+        Me.XtraTabControl1.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.BarButtonItem4.Id = 7
+        Me.XtraTabControl1.Location = New System.Drawing.Point(0, 132)
-        Me.BarButtonItem4.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem4.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.XtraTabControl1.Name = "XtraTabControl1"
-        Me.BarButtonItem4.Name = "BarButtonItem4"
+        Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPage1
+        Me.XtraTabControl1.Size = New System.Drawing.Size(894, 405)
+        Me.XtraTabControl1.TabIndex = 5
+        Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPage1, Me.XtraTabPage2})
+        '
+        'XtraTabPage1
+        '
+        Me.XtraTabPage1.Controls.Add(Me.LayoutControl1)
+        Me.XtraTabPage1.Name = "XtraTabPage1"
+        Me.XtraTabPage1.Size = New System.Drawing.Size(892, 380)
+        Me.XtraTabPage1.Text = "Detail"
+        '
+        'XtraTabPage2
+        '
+        Me.XtraTabPage2.Name = "XtraTabPage2"
+        Me.XtraTabPage2.Size = New System.Drawing.Size(150, 300)
+        Me.XtraTabPage2.Text = "Übersetzungen"
         '
         'frmAdmin_IDBAttribute
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
         Me.ClientSize = New System.Drawing.Size(894, 561)
-        Me.Controls.Add(Me.LayoutControl1)
+        Me.Controls.Add(Me.XtraTabControl1)
         Me.Controls.Add(Me.RibbonStatusBar1)
         Me.Controls.Add(Me.RibbonControl1)
         Me.IconOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.bo_appearance
@@ -536,6 +570,9 @@ Partial Class frmAdmin_IDBAttribute
         CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.LayoutControlItem8, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.LayoutControlItem10, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.XtraTabControl1.ResumeLayout(False)
+        Me.XtraTabPage1.ResumeLayout(False)
         Me.ResumeLayout(False)
         Me.PerformLayout()
 
@@ -581,4 +618,7 @@ Partial Class frmAdmin_IDBAttribute
     Friend WithEvents TBWH_ATTRIBUTE_TYPEBindingSource As BindingSource
     Friend WithEvents TBWH_ATTRIBUTE_TYPETableAdapter As DSIDB_StammdatenTableAdapters.TBWH_ATTRIBUTE_TYPETableAdapter
     Friend WithEvents BarButtonItem4 As DevExpress.XtraBars.BarButtonItem
+    Friend WithEvents XtraTabControl1 As DevExpress.XtraTab.XtraTabControl
+    Friend WithEvents XtraTabPage1 As DevExpress.XtraTab.XtraTabPage
+    Friend WithEvents XtraTabPage2 As DevExpress.XtraTab.XtraTabPage
 End Class

GUIs.ZooFlow/Administration/IDB/frmAdmin_IDBAttribute.resx

@@ -122,26 +122,16 @@
     <value>
         AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
         LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
-        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAGkEAAAC77u/
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAPoBAAAC77u/
         PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
         IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
         MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
-        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
+        Y2U9InByZXNlcnZlIiBpZD0iQ2xlYXJIZWFkZXJBbmRGb290ZXIiIHN0eWxlPSJlbmFibGUtYmFja2dy
-        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
+        b3VuZDpuZXcgMCAwIDMyIDMyIj4NCiAgPHN0eWxlIHR5cGU9InRleHQvY3NzIj4KCS5SZWR7ZmlsbDoj
-        LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5HcmVlbntmaWxsOiMwMzlD
+        RDExQzFDO30KPC9zdHlsZT4NCiAgPHBhdGggZD0iTTI3LDRINUM0LjUsNCw0LDQuNSw0LDV2MjJjMCww
-        MjM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
+        LjUsMC41LDEsMSwxaDIyYzAuNSwwLDEtMC41LDEtMVY1QzI4LDQuNSwyNy41LDQsMjcsNHogTTIyLDIw
-        Y2l0eTowLjU7fQoJLnN0MXtkaXNwbGF5Om5vbmU7fQoJLnN0MntkaXNwbGF5OmlubGluZTtmaWxsOiMw
+        bC0yLDJsLTQtNGwtNCw0ICBsLTItMmw0LTRsLTQtNGwyLTJsNCw0bDQtNGwyLDJsLTQsNEwyMiwyMHoi
-        MzlDMjM7fQoJLnN0M3tkaXNwbGF5OmlubGluZTtmaWxsOiNEMTFDMUM7fQoJLnN0NHtkaXNwbGF5Omlu
+        IGNsYXNzPSJSZWQiIC8+DQo8L3N2Zz4L
-        bGluZTtmaWxsOiM3MjcyNzI7fQo8L3N0eWxlPg0KICA8ZyBpZD0iU2F2ZUFuZENsb3NlIj4NCiAgICA8
-        cGF0aCBkPSJNNiwxNlY2SDNDMi40LDYsMiw2LjQsMiw3djIyYzAsMC42LDAuNCwxLDEsMWgyMmMwLjYs
-        MCwxLTAuNCwxLTFWMTZINnogTTYsMjZ2LTZoMTZ2Nkg2eiBNMTYsNkg4djhoOFY2eiAgICBNMTIsMTJo
-        LTJWOGgyVjEyeiIgY2xhc3M9IkJsYWNrIiAvPg0KICAgIDxwYXRoIGQ9Ik0yOSwySDE5Yy0wLjUsMC0x
-        LDAuNS0xLDF2MTBjMCwwLjUsMC41LDEsMSwxaDEwYzAuNSwwLDEtMC41LDEtMVYzQzMwLDIuNSwyOS41
-        LDIsMjksMnogTTI3LjcsMTAuNCAgIGMwLjQsMC40LDAuNCwxLDAsMS4zYy0wLjQsMC40LTEsMC40LTEu
-        MywwTDI0LDkuM2wtMi40LDIuNGMtMC40LDAuNC0xLDAuNC0xLjMsMGMtMC40LTAuNC0wLjQtMSwwLTEu
-        M0wyMi43LDhsLTIuNC0yLjQgICBjLTAuNC0wLjQtMC40LTEsMC0xLjNjMC40LTAuNCwxLTAuNCwxLjMs
-        MEwyNCw2LjdsMi40LTIuNGMwLjQtMC40LDEtMC40LDEuMywwYzAuNCwwLjQsMC40LDEsMCwxLjNMMjUu
-        Myw4TDI3LjcsMTAuNHoiIGNsYXNzPSJSZWQiIC8+DQogIDwvZz4NCjwvc3ZnPgs=
 </value>
   </data>
   <data name="BarButtonItem4.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
@@ -176,6 +166,9 @@
   <metadata name="TBWH_ATTRIBUTE_TYPEBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>848, 17</value>
   </metadata>
+  <metadata name="DSIDB_Stammdaten.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>17, 17</value>
+  </metadata>
   <metadata name="TableAdapterManager.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>177, 17</value>
   </metadata>

GUIs.ZooFlow/Administration/IDB/frmAdmin_IDBAttribute.vb

@@ -1,21 +1,21 @@
-Imports DigitalData.GUIs.Common
+Public Class frmAdmin_IDBAttribute
-
-Public Class frmAdmin_IDBAttribute
     Implements IAdminForm
 
     Public Property HasChanges As Boolean = False Implements IAdminForm.HasChanges
     Public Property IsInsert As Boolean = False Implements IAdminForm.IsInsert
     Public Property PrimaryKey As Integer Implements IAdminForm.PrimaryKey
-    Private FormHelper As FormHelper
+    Private Const ConstDetail = "Detail"
+    Private Const ConstTranslate = "Translate"
+    Private Property oMode As String = "Detail"
 
     Public Sub New(PrimaryKey As Integer, Optional IsInsert As Boolean = False)
         ' Dieser Aufruf ist für den Designer erforderlich.
         InitializeComponent()
 
         ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+        InitializeBaseForm(My.LogConfig)
         Me.PrimaryKey = PrimaryKey
         Me.IsInsert = IsInsert
-        FormHelper = New FormHelper(My.LogConfig, Me)
     End Sub
 
     Private Sub frmAdmin_Attribute_Load(sender As Object, e As EventArgs) Handles MyBase.Load
@@ -30,7 +30,7 @@ Public Class frmAdmin_IDBAttribute
                 DSIDB_Stammdaten.VWIDB_BE_ATTRIBUTE.ADDED_WHOColumn.DefaultValue = My.Application.User.UserName
             End If
         Catch ex As Exception
-            FormHelper.ShowErrorMessage(ex, "frmAdmin_Attribute_Load")
+            ShowErrorMessage(ex)
         End Try
     End Sub
     Private Sub FillAttribute()
@@ -38,7 +38,16 @@ Public Class frmAdmin_IDBAttribute
     End Sub
     Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
         ResetMessages()
+        Dim oGetMax As Boolean = False
+        If IsInsert Then
+            oGetMax = True
+        End If
         If SaveData() And HasChanges Then
+            If IsInsert Then
+                Dim oSQL = "Select MAX(GUID) FROM TBIDB_ATTRIBUTE"
+                PrimaryKey = My.DatabaseIDB.GetScalarValue(oSQL)
+            End If
+
 
             FillAttribute()
         End If
@@ -55,11 +64,7 @@ Public Class frmAdmin_IDBAttribute
     End Sub
 
     Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
-        ResetMessages()
+        Close()
-
-        If SaveData() Then
-            Close()
-        End If
     End Sub
 
     Public Function SaveData() As Boolean
@@ -80,7 +85,7 @@ Public Class frmAdmin_IDBAttribute
                 ' TODO: Update Database
                 If Not IsInsert Then
                     Dim oUpdate As String = $"UPDATE TBIDB_ATTRIBUTE " &
-                 $"SET TITLE = '{TextEdit2.Text}', TYP_ID = {ComboBoxEdit1.EditValue}, VIEW_SEQUENCE = {SpinEdit1.Value}, VIEW_VISIBLE = '{CheckEdit2.Checked}'" &
+                 $"Set TITLE = '{TextEdit2.Text}', TYP_ID = {ComboBoxEdit1.EditValue}, VIEW_SEQUENCE = {SpinEdit1.Value}, VIEW_VISIBLE = '{CheckEdit2.Checked}'" &
                 $",MULTI_CONTEXT = '{CheckEditMulticontext.Checked}', COMMENT = '{TextEdit3.Text}', CHANGED_WHO = '{My.Application.User.UserName}' " &
                 $"WHERE        (GUID = {TextEdit1.Text})"
 
@@ -108,7 +113,7 @@ Public Class frmAdmin_IDBAttribute
             FillAttribute()
             Return True
         Catch ex As Exception
-            FormHelper.ShowErrorMessage(ex, "SaveData")
+            ShowErrorMessage(ex)
             ShowStatus($"Unexpeced error saving attribute {TextEdit2.Text} - {ex.Message}", Color.Red)
             Return False
         End Try
@@ -123,7 +128,7 @@ Public Class frmAdmin_IDBAttribute
             End If
 
         Catch ex As Exception
-            FormHelper.ShowErrorMessage(ex, "DeleteAttribute")
+            ShowErrorMessage(ex)
             Return False
         End Try
     End Function
@@ -139,4 +144,12 @@ Public Class frmAdmin_IDBAttribute
             End If
         End If
     End Sub
+
+    Private Sub XtraTabControl1_SelectedPageChanged(sender As Object, e As DevExpress.XtraTab.TabPageChangedEventArgs) Handles XtraTabControl1.SelectedPageChanged
+        If XtraTabControl1.SelectedTabPageIndex = 1 Then
+            oMode = ConstTranslate
+        Else
+            oMode = ConstDetail
+        End If
+    End Sub
 End Class

GUIs.ZooFlow/ZooFlow.vbproj

@@ -116,7 +116,9 @@
     </Reference>
     <Reference Include="PresentationCore" />
     <Reference Include="PresentationFramework" />
-    <Reference Include="System" />
+    <Reference Include="System">
+      <HintPath>C:\Program Files (x86)\Reference Assemblies\Microsoft\Framework\.NETFramework\v4.6.1\System.dll</HintPath>
+    </Reference>
     <Reference Include="System.ComponentModel.DataAnnotations" />
     <Reference Include="System.Configuration" />
     <Reference Include="System.Core" />