AppStd/Monorepo
8
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

ZooFlow: Admin

Browse Source
This commit is contained in:
Jonathan Jenne 2021-02-19 16:13:03 +01:00
parent 07d3db4741
commit d63d90f0d2
21 changed files with 594 additions and 412 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
GUIs.ZooFlow/Administration/SourceBundle.vb Normal file
View File

@ -0,0 +1,17 @@
Public Class SourceBundle
Public Overview As SourceSql
Public Update As SourceSql
Public Insert As SourceSql
Public Load As SourceSql
End Class
Public Class SourceSql
Public Guid As Integer
Public ParentId As Integer
Public Title As String
Public SQL As String
Public PrimaryKey As String
Public Scope As String
End Class

6
GUIs.ZooFlow/Administration/frmAdmin_Base.vb
View File

@ -25,10 +25,6 @@ Partial Public MustInherit Class BaseForm
End Sub
End Class
Public Class BaseFormImpl
Inherits BaseForm
End Class
Partial Public Class frmAdmin_Base
Inherits BaseFormImpl
Inherits BaseForm
End Class

442
GUIs.ZooFlow/Administration/frmAdmin_CWProfile.Designer.vb generated
View File

@ -1,9 +1,9 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Class frmAdmin_CWProfile
Inherits DevExpress.XtraBars.Ribbon.RibbonForm
Inherits frmAdmin_Base
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
<System.Diagnostics.DebuggerNonUserCode()> _
<System.Diagnostics.DebuggerNonUserCode()>
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
@ -20,81 +20,111 @@ Partial Class frmAdmin_CWProfile
'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()> _
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmAdmin_CWProfile))
Dim GUIDLabel As System.Windows.Forms.Label
Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.DBCW_Stammdaten = New DigitalData.GUIs.ZooFlow.DBCW_Stammdaten()
Me.TBCW_PROFILESBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBCW_PROFILESTableAdapter = New DigitalData.GUIs.ZooFlow.DBCW_StammdatenTableAdapters.TBCW_PROFILESTableAdapter()
Me.TableAdapterManager = New DigitalData.GUIs.ZooFlow.DBCW_StammdatenTableAdapters.TableAdapterManager()
Me.TBCW_PROFILESBindingNavigator = New System.Windows.Forms.BindingNavigator(Me.components)
Me.BindingNavigatorMoveFirstItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorMovePreviousItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorSeparator = New System.Windows.Forms.ToolStripSeparator()
Me.BindingNavigatorPositionItem = New System.Windows.Forms.ToolStripTextBox()
Me.BindingNavigatorCountItem = New System.Windows.Forms.ToolStripLabel()
Me.BindingNavigatorSeparator1 = New System.Windows.Forms.ToolStripSeparator()
Me.BindingNavigatorMoveNextItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorMoveLastItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorSeparator2 = New System.Windows.Forms.ToolStripSeparator()
Me.BindingNavigatorAddNewItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorDeleteItem = New System.Windows.Forms.ToolStripButton()
Me.TBCW_PROFILESBindingNavigatorSaveItem = New System.Windows.Forms.ToolStripButton()
Me.FillToolStrip = New System.Windows.Forms.ToolStrip()
Me.GUIDToolStripLabel = New System.Windows.Forms.ToolStripLabel()
Me.GUIDToolStripTextBox = New System.Windows.Forms.ToolStripTextBox()
Me.FillToolStripButton = New System.Windows.Forms.ToolStripButton()
Me.GUIDTextBox = New System.Windows.Forms.TextBox()
GUIDLabel = New System.Windows.Forms.Label()
Me.LayoutControl1 = New DevExpress.XtraLayout.LayoutControl()
Me.Root = New DevExpress.XtraLayout.LayoutControlGroup()
Me.TextEdit1 = New DevExpress.XtraEditors.TextEdit()
Me.LayoutControlItem1 = New DevExpress.XtraLayout.LayoutControlItem()
Me.TextEdit2 = New DevExpress.XtraEditors.TextEdit()
Me.LayoutControlItem2 = New DevExpress.XtraLayout.LayoutControlItem()
Me.TextEdit3 = New DevExpress.XtraEditors.TextEdit()
Me.LayoutControlItem3 = New DevExpress.XtraLayout.LayoutControlItem()
Me.txtAddedWho = New DevExpress.XtraEditors.TextEdit()
Me.LayoutControlItem4 = New DevExpress.XtraLayout.LayoutControlItem()
Me.txtAddedWhen = New DevExpress.XtraEditors.TextEdit()
Me.LayoutControlItem5 = New DevExpress.XtraLayout.LayoutControlItem()
Me.txtChangedWho = New DevExpress.XtraEditors.TextEdit()
Me.LayoutControlItem6 = New DevExpress.XtraLayout.LayoutControlItem()
Me.txtChangedWhen = New DevExpress.XtraEditors.TextEdit()
Me.LayoutControlItem7 = New DevExpress.XtraLayout.LayoutControlItem()
Me.labelStatus = New DevExpress.XtraBars.BarStaticItem()
Me.labelError = New DevExpress.XtraBars.BarStaticItem()
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DBCW_Stammdaten, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBCW_PROFILESBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBCW_PROFILESBindingNavigator, System.ComponentModel.ISupportInitialize).BeginInit()
Me.TBCW_PROFILESBindingNavigator.SuspendLayout()
Me.FillToolStrip.SuspendLayout()
CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.LayoutControl1.SuspendLayout()
CType(Me.Root, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextEdit2.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextEdit3.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAddedWho.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAddedWhen.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtChangedWho.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtChangedWhen.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'RibbonControl1
'
Me.RibbonControl1.CommandLayout = DevExpress.XtraBars.Ribbon.CommandLayout.Simplified
Me.RibbonControl1.ExpandCollapseItem.Id = 0
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem})
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.labelStatus, Me.labelError})
Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
Me.RibbonControl1.MaxItemId = 1
Me.RibbonControl1.MaxItemId = 5
Me.RibbonControl1.Name = "RibbonControl1"
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
Me.RibbonControl1.Size = New System.Drawing.Size(800, 159)
Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
Me.RibbonControl1.ShowPageHeadersMode = DevExpress.XtraBars.Ribbon.ShowPageHeadersMode.Hide
Me.RibbonControl1.ShowToolbarCustomizeItem = False
Me.RibbonControl1.Size = New System.Drawing.Size(800, 63)
Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
Me.RibbonControl1.Toolbar.ShowCustomizeItem = False
'
'BarButtonItem1
'
Me.BarButtonItem1.Caption = "Speichern und Schließen"
Me.BarButtonItem1.Id = 1
Me.BarButtonItem1.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.actions_check2
Me.BarButtonItem1.Name = "BarButtonItem1"
'
'BarButtonItem2
'
Me.BarButtonItem2.Caption = "Speichern"
Me.BarButtonItem2.Id = 2
Me.BarButtonItem2.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.save2
Me.BarButtonItem2.Name = "BarButtonItem2"
'
'RibbonPage1
'
Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2})
Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1})
Me.RibbonPage1.Name = "RibbonPage1"
Me.RibbonPage1.Text = "RibbonPage1"
'
'RibbonPageGroup1
'
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem1)
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem2)
Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
Me.RibbonPageGroup1.Text = "RibbonPageGroup1"
'
'RibbonPageGroup2
'
Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
Me.RibbonPageGroup2.Text = "RibbonPageGroup2"
'
'RibbonStatusBar1
'
Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 428)
Me.RibbonStatusBar1.ItemLinks.Add(Me.labelStatus)
Me.RibbonStatusBar1.ItemLinks.Add(Me.labelError)
Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 426)
Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
Me.RibbonStatusBar1.Size = New System.Drawing.Size(800, 22)
Me.RibbonStatusBar1.Size = New System.Drawing.Size(800, 24)
'
'RibbonPage2
'
@ -121,184 +151,219 @@ Partial Class frmAdmin_CWProfile
Me.TableAdapterManager.TBCW_PROFILESTableAdapter = Me.TBCW_PROFILESTableAdapter
Me.TableAdapterManager.UpdateOrder = DigitalData.GUIs.ZooFlow.DBCW_StammdatenTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
'
'TBCW_PROFILESBindingNavigator
'LayoutControl1
'
Me.TBCW_PROFILESBindingNavigator.AddNewItem = Me.BindingNavigatorAddNewItem
Me.TBCW_PROFILESBindingNavigator.BindingSource = Me.TBCW_PROFILESBindingSource
Me.TBCW_PROFILESBindingNavigator.CountItem = Me.BindingNavigatorCountItem
Me.TBCW_PROFILESBindingNavigator.DeleteItem = Me.BindingNavigatorDeleteItem
Me.TBCW_PROFILESBindingNavigator.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem, Me.BindingNavigatorMovePreviousItem, Me.BindingNavigatorSeparator, Me.BindingNavigatorPositionItem, Me.BindingNavigatorCountItem, Me.BindingNavigatorSeparator1, Me.BindingNavigatorMoveNextItem, Me.BindingNavigatorMoveLastItem, Me.BindingNavigatorSeparator2, Me.BindingNavigatorAddNewItem, Me.BindingNavigatorDeleteItem, Me.TBCW_PROFILESBindingNavigatorSaveItem})
Me.TBCW_PROFILESBindingNavigator.Location = New System.Drawing.Point(0, 159)
Me.TBCW_PROFILESBindingNavigator.MoveFirstItem = Me.BindingNavigatorMoveFirstItem
Me.TBCW_PROFILESBindingNavigator.MoveLastItem = Me.BindingNavigatorMoveLastItem
Me.TBCW_PROFILESBindingNavigator.MoveNextItem = Me.BindingNavigatorMoveNextItem
Me.TBCW_PROFILESBindingNavigator.MovePreviousItem = Me.BindingNavigatorMovePreviousItem
Me.TBCW_PROFILESBindingNavigator.Name = "TBCW_PROFILESBindingNavigator"
Me.TBCW_PROFILESBindingNavigator.PositionItem = Me.BindingNavigatorPositionItem
Me.TBCW_PROFILESBindingNavigator.Size = New System.Drawing.Size(800, 25)
Me.TBCW_PROFILESBindingNavigator.TabIndex = 2
Me.TBCW_PROFILESBindingNavigator.Text = "BindingNavigator1"
Me.LayoutControl1.Controls.Add(Me.TextEdit1)
Me.LayoutControl1.Controls.Add(Me.TextEdit2)
Me.LayoutControl1.Controls.Add(Me.TextEdit3)
Me.LayoutControl1.Controls.Add(Me.txtAddedWho)
Me.LayoutControl1.Controls.Add(Me.txtAddedWhen)
Me.LayoutControl1.Controls.Add(Me.txtChangedWho)
Me.LayoutControl1.Controls.Add(Me.txtChangedWhen)
Me.LayoutControl1.Dock = System.Windows.Forms.DockStyle.Fill
Me.LayoutControl1.Location = New System.Drawing.Point(0, 63)
Me.LayoutControl1.Name = "LayoutControl1"
Me.LayoutControl1.OptionsCustomizationForm.DesignTimeCustomizationFormPositionAndSize = New System.Drawing.Rectangle(848, 159, 650, 400)
Me.LayoutControl1.Root = Me.Root
Me.LayoutControl1.Size = New System.Drawing.Size(800, 363)
Me.LayoutControl1.TabIndex = 2
Me.LayoutControl1.Text = "LayoutControl1"
'
'BindingNavigatorMoveFirstItem
'Root
'
Me.BindingNavigatorMoveFirstItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMoveFirstItem.Image = CType(resources.GetObject("BindingNavigatorMoveFirstItem.Image"), System.Drawing.Image)
Me.BindingNavigatorMoveFirstItem.Name = "BindingNavigatorMoveFirstItem"
Me.BindingNavigatorMoveFirstItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMoveFirstItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorMoveFirstItem.Text = "Erste verschieben"
Me.Root.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
Me.Root.GroupBordersVisible = False
Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem1, Me.LayoutControlItem2, Me.LayoutControlItem3, Me.LayoutControlItem4, Me.LayoutControlItem6, Me.LayoutControlItem5, Me.LayoutControlItem7})
Me.Root.Name = "Root"
Me.Root.Size = New System.Drawing.Size(800, 363)
Me.Root.TextVisible = False
'
'BindingNavigatorMovePreviousItem
'TextEdit1
'
Me.BindingNavigatorMovePreviousItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMovePreviousItem.Image = CType(resources.GetObject("BindingNavigatorMovePreviousItem.Image"), System.Drawing.Image)
Me.BindingNavigatorMovePreviousItem.Name = "BindingNavigatorMovePreviousItem"
Me.BindingNavigatorMovePreviousItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMovePreviousItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorMovePreviousItem.Text = "Vorherige verschieben"
Me.TextEdit1.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBCW_PROFILESBindingSource, "GUID", True))
Me.TextEdit1.Location = New System.Drawing.Point(108, 20)
Me.TextEdit1.MenuManager = Me.RibbonControl1
Me.TextEdit1.Name = "TextEdit1"
Me.TextEdit1.Size = New System.Drawing.Size(672, 20)
Me.TextEdit1.StyleController = Me.LayoutControl1
Me.TextEdit1.TabIndex = 4
'
'BindingNavigatorSeparator
'LayoutControlItem1
'
Me.BindingNavigatorSeparator.Name = "BindingNavigatorSeparator"
Me.BindingNavigatorSeparator.Size = New System.Drawing.Size(6, 25)
Me.LayoutControlItem1.Control = Me.TextEdit1
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(780, 40)
Me.LayoutControlItem1.Text = "GUID"
Me.LayoutControlItem1.TextSize = New System.Drawing.Size(76, 13)
'
'BindingNavigatorPositionItem
'TextEdit2
'
Me.BindingNavigatorPositionItem.AccessibleName = "Position"
Me.BindingNavigatorPositionItem.AutoSize = False
Me.BindingNavigatorPositionItem.Name = "BindingNavigatorPositionItem"
Me.BindingNavigatorPositionItem.Size = New System.Drawing.Size(50, 23)
Me.BindingNavigatorPositionItem.Text = "0"
Me.BindingNavigatorPositionItem.ToolTipText = "Aktuelle Position"
Me.TextEdit2.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBCW_PROFILESBindingSource, "NAME", True))
Me.TextEdit2.Location = New System.Drawing.Point(108, 60)
Me.TextEdit2.MenuManager = Me.RibbonControl1
Me.TextEdit2.Name = "TextEdit2"
Me.TextEdit2.Size = New System.Drawing.Size(672, 20)
Me.TextEdit2.StyleController = Me.LayoutControl1
Me.TextEdit2.TabIndex = 5
'
'BindingNavigatorCountItem
'LayoutControlItem2
'
Me.BindingNavigatorCountItem.Name = "BindingNavigatorCountItem"
Me.BindingNavigatorCountItem.Size = New System.Drawing.Size(44, 15)
Me.BindingNavigatorCountItem.Text = "von {0}"
Me.BindingNavigatorCountItem.ToolTipText = "Die Gesamtanzahl der Elemente."
Me.LayoutControlItem2.Control = Me.TextEdit2
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(780, 40)
Me.LayoutControlItem2.Text = "Profil"
Me.LayoutControlItem2.TextSize = New System.Drawing.Size(76, 13)
'
'BindingNavigatorSeparator1
'TextEdit3
'
Me.BindingNavigatorSeparator1.Name = "BindingNavigatorSeparator"
Me.BindingNavigatorSeparator1.Size = New System.Drawing.Size(6, 6)
Me.TextEdit3.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBCW_PROFILESBindingSource, "COMMENT", True))
Me.TextEdit3.Location = New System.Drawing.Point(108, 100)
Me.TextEdit3.MenuManager = Me.RibbonControl1
Me.TextEdit3.Name = "TextEdit3"
Me.TextEdit3.Size = New System.Drawing.Size(672, 20)
Me.TextEdit3.StyleController = Me.LayoutControl1
Me.TextEdit3.TabIndex = 6
'
'BindingNavigatorMoveNextItem
'LayoutControlItem3
'
Me.BindingNavigatorMoveNextItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMoveNextItem.Image = CType(resources.GetObject("BindingNavigatorMoveNextItem.Image"), System.Drawing.Image)
Me.BindingNavigatorMoveNextItem.Name = "BindingNavigatorMoveNextItem"
Me.BindingNavigatorMoveNextItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMoveNextItem.Size = New System.Drawing.Size(23, 20)
Me.BindingNavigatorMoveNextItem.Text = "Nächste verschieben"
Me.LayoutControlItem3.Control = Me.TextEdit3
Me.LayoutControlItem3.Location = New System.Drawing.Point(0, 80)
Me.LayoutControlItem3.Name = "LayoutControlItem3"
Me.LayoutControlItem3.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem3.Size = New System.Drawing.Size(780, 40)
Me.LayoutControlItem3.Text = "Kommentar"
Me.LayoutControlItem3.TextSize = New System.Drawing.Size(76, 13)
'
'BindingNavigatorMoveLastItem
'txtAddedWho
'
Me.BindingNavigatorMoveLastItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMoveLastItem.Image = CType(resources.GetObject("BindingNavigatorMoveLastItem.Image"), System.Drawing.Image)
Me.BindingNavigatorMoveLastItem.Name = "BindingNavigatorMoveLastItem"
Me.BindingNavigatorMoveLastItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMoveLastItem.Size = New System.Drawing.Size(23, 20)
Me.BindingNavigatorMoveLastItem.Text = "Letzte verschieben"
Me.txtAddedWho.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBCW_PROFILESBindingSource, "ADDED_WHO", True))
Me.txtAddedWho.Location = New System.Drawing.Point(108, 140)
Me.txtAddedWho.MenuManager = Me.RibbonControl1
Me.txtAddedWho.Name = "txtAddedWho"
Me.txtAddedWho.Size = New System.Drawing.Size(282, 20)
Me.txtAddedWho.StyleController = Me.LayoutControl1
Me.txtAddedWho.TabIndex = 7
'
'BindingNavigatorSeparator2
'LayoutControlItem4
'
Me.BindingNavigatorSeparator2.Name = "BindingNavigatorSeparator"
Me.BindingNavigatorSeparator2.Size = New System.Drawing.Size(6, 6)
Me.LayoutControlItem4.Control = Me.txtAddedWho
Me.LayoutControlItem4.Location = New System.Drawing.Point(0, 120)
Me.LayoutControlItem4.Name = "LayoutControlItem4"
Me.LayoutControlItem4.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem4.Size = New System.Drawing.Size(390, 40)
Me.LayoutControlItem4.Text = "Erstellt Wer"
Me.LayoutControlItem4.TextSize = New System.Drawing.Size(76, 13)
'
'BindingNavigatorAddNewItem
'txtAddedWhen
'
Me.BindingNavigatorAddNewItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorAddNewItem.Image = CType(resources.GetObject("BindingNavigatorAddNewItem.Image"), System.Drawing.Image)
Me.BindingNavigatorAddNewItem.Name = "BindingNavigatorAddNewItem"
Me.BindingNavigatorAddNewItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorAddNewItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorAddNewItem.Text = "Neu hinzufügen"
Me.txtAddedWhen.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBCW_PROFILESBindingSource, "CHANGED_WHO", True))
Me.txtAddedWhen.Location = New System.Drawing.Point(498, 140)
Me.txtAddedWhen.MenuManager = Me.RibbonControl1
Me.txtAddedWhen.Name = "txtAddedWhen"
Me.txtAddedWhen.Size = New System.Drawing.Size(282, 20)
Me.txtAddedWhen.StyleController = Me.LayoutControl1
Me.txtAddedWhen.TabIndex = 8
'
'BindingNavigatorDeleteItem
'LayoutControlItem5
'
Me.BindingNavigatorDeleteItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorDeleteItem.Image = CType(resources.GetObject("BindingNavigatorDeleteItem.Image"), System.Drawing.Image)
Me.BindingNavigatorDeleteItem.Name = "BindingNavigatorDeleteItem"
Me.BindingNavigatorDeleteItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorDeleteItem.Size = New System.Drawing.Size(23, 20)
Me.BindingNavigatorDeleteItem.Text = "Löschen"
Me.LayoutControlItem5.Control = Me.txtAddedWhen
Me.LayoutControlItem5.Location = New System.Drawing.Point(390, 120)
Me.LayoutControlItem5.Name = "LayoutControlItem5"
Me.LayoutControlItem5.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem5.Size = New System.Drawing.Size(390, 40)
Me.LayoutControlItem5.Text = "Erstellt Wann"
Me.LayoutControlItem5.TextSize = New System.Drawing.Size(76, 13)
'
'TBCW_PROFILESBindingNavigatorSaveItem
'txtChangedWho
'
Me.TBCW_PROFILESBindingNavigatorSaveItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.TBCW_PROFILESBindingNavigatorSaveItem.Image = CType(resources.GetObject("TBCW_PROFILESBindingNavigatorSaveItem.Image"), System.Drawing.Image)
Me.TBCW_PROFILESBindingNavigatorSaveItem.Name = "TBCW_PROFILESBindingNavigatorSaveItem"
Me.TBCW_PROFILESBindingNavigatorSaveItem.Size = New System.Drawing.Size(23, 20)
Me.TBCW_PROFILESBindingNavigatorSaveItem.Text = "Daten speichern"
Me.txtChangedWho.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBCW_PROFILESBindingSource, "ADDED_WHEN", True))
Me.txtChangedWho.Location = New System.Drawing.Point(108, 180)
Me.txtChangedWho.MenuManager = Me.RibbonControl1
Me.txtChangedWho.Name = "txtChangedWho"
Me.txtChangedWho.Size = New System.Drawing.Size(282, 20)
Me.txtChangedWho.StyleController = Me.LayoutControl1
Me.txtChangedWho.TabIndex = 9
'
'FillToolStrip
'LayoutControlItem6
'
Me.FillToolStrip.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.GUIDToolStripLabel, Me.GUIDToolStripTextBox, Me.FillToolStripButton})
Me.FillToolStrip.Location = New System.Drawing.Point(0, 184)
Me.FillToolStrip.Name = "FillToolStrip"
Me.FillToolStrip.Size = New System.Drawing.Size(800, 25)
Me.FillToolStrip.TabIndex = 3
Me.FillToolStrip.Text = "FillToolStrip"
Me.LayoutControlItem6.Control = Me.txtChangedWho
Me.LayoutControlItem6.Location = New System.Drawing.Point(0, 160)
Me.LayoutControlItem6.Name = "LayoutControlItem6"
Me.LayoutControlItem6.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem6.Size = New System.Drawing.Size(390, 183)
Me.LayoutControlItem6.Text = "Geändert Wer"
Me.LayoutControlItem6.TextSize = New System.Drawing.Size(76, 13)
'
'GUIDToolStripLabel
'txtChangedWhen
'
Me.GUIDToolStripLabel.Name = "GUIDToolStripLabel"
Me.GUIDToolStripLabel.Size = New System.Drawing.Size(37, 22)
Me.GUIDToolStripLabel.Text = "GUID:"
Me.txtChangedWhen.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBCW_PROFILESBindingSource, "CHANGED_WHEN", True))
Me.txtChangedWhen.Location = New System.Drawing.Point(498, 180)
Me.txtChangedWhen.MenuManager = Me.RibbonControl1
Me.txtChangedWhen.Name = "txtChangedWhen"
Me.txtChangedWhen.Size = New System.Drawing.Size(282, 20)
Me.txtChangedWhen.StyleController = Me.LayoutControl1
Me.txtChangedWhen.TabIndex = 10
'
'GUIDToolStripTextBox
'LayoutControlItem7
'
Me.GUIDToolStripTextBox.Name = "GUIDToolStripTextBox"
Me.GUIDToolStripTextBox.Size = New System.Drawing.Size(100, 23)
Me.LayoutControlItem7.Control = Me.txtChangedWhen
Me.LayoutControlItem7.Location = New System.Drawing.Point(390, 160)
Me.LayoutControlItem7.Name = "LayoutControlItem7"
Me.LayoutControlItem7.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem7.Size = New System.Drawing.Size(390, 183)
Me.LayoutControlItem7.Text = "Geändert Wann"
Me.LayoutControlItem7.TextSize = New System.Drawing.Size(76, 13)
'
'FillToolStripButton
'labelStatus
'
Me.FillToolStripButton.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text
Me.FillToolStripButton.Name = "FillToolStripButton"
Me.FillToolStripButton.Size = New System.Drawing.Size(26, 19)
Me.FillToolStripButton.Text = "Fill"
Me.labelStatus.Caption = "BarStaticItem1"
Me.labelStatus.Id = 3
Me.labelStatus.Name = "labelStatus"
Me.labelStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
'
'GUIDLabel
'labelError
'
GUIDLabel.AutoSize = True
GUIDLabel.Location = New System.Drawing.Point(548, 312)
GUIDLabel.Name = "GUIDLabel"
GUIDLabel.Size = New System.Drawing.Size(37, 13)
GUIDLabel.TabIndex = 4
GUIDLabel.Text = "GUID:"
'
'GUIDTextBox
'
Me.GUIDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBCW_PROFILESBindingSource, "GUID", True))
Me.GUIDTextBox.Location = New System.Drawing.Point(591, 309)
Me.GUIDTextBox.Name = "GUIDTextBox"
Me.GUIDTextBox.Size = New System.Drawing.Size(100, 22)
Me.GUIDTextBox.TabIndex = 5
Me.labelError.Caption = "BarStaticItem2"
Me.labelError.Id = 4
Me.labelError.Name = "labelError"
Me.labelError.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
'
'frmAdmin_CWProfile
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(800, 450)
Me.Controls.Add(GUIDLabel)
Me.Controls.Add(Me.GUIDTextBox)
Me.Controls.Add(Me.FillToolStrip)
Me.Controls.Add(Me.TBCW_PROFILESBindingNavigator)
Me.Controls.Add(Me.LayoutControl1)
Me.Controls.Add(Me.RibbonStatusBar1)
Me.Controls.Add(Me.RibbonControl1)
Me.Name = "frmAdmin_CWProfile"
Me.Ribbon = Me.RibbonControl1
Me.StatusBar = Me.RibbonStatusBar1
Me.Text = "frmAdmin_CWProfiles"
Me.Text = "Clipboard Watcher - Profile"
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DBCW_Stammdaten, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBCW_PROFILESBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBCW_PROFILESBindingNavigator, System.ComponentModel.ISupportInitialize).EndInit()
Me.TBCW_PROFILESBindingNavigator.ResumeLayout(False)
Me.TBCW_PROFILESBindingNavigator.PerformLayout()
Me.FillToolStrip.ResumeLayout(False)
Me.FillToolStrip.PerformLayout()
CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.LayoutControl1.ResumeLayout(False)
CType(Me.Root, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextEdit2.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextEdit3.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAddedWho.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAddedWhen.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtChangedWho.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtChangedWhen.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
@ -307,29 +372,30 @@ Partial Class frmAdmin_CWProfile
Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
Friend WithEvents DBCW_Stammdaten As DBCW_Stammdaten
Friend WithEvents TBCW_PROFILESBindingSource As BindingSource
Friend WithEvents TBCW_PROFILESTableAdapter As DBCW_StammdatenTableAdapters.TBCW_PROFILESTableAdapter
Friend WithEvents TableAdapterManager As DBCW_StammdatenTableAdapters.TableAdapterManager
Friend WithEvents TBCW_PROFILESBindingNavigator As BindingNavigator
Friend WithEvents BindingNavigatorAddNewItem As ToolStripButton
Friend WithEvents BindingNavigatorCountItem As ToolStripLabel
Friend WithEvents BindingNavigatorDeleteItem As ToolStripButton
Friend WithEvents BindingNavigatorMoveFirstItem As ToolStripButton
Friend WithEvents BindingNavigatorMovePreviousItem As ToolStripButton
Friend WithEvents BindingNavigatorSeparator As ToolStripSeparator
Friend WithEvents BindingNavigatorPositionItem As ToolStripTextBox
Friend WithEvents BindingNavigatorSeparator1 As ToolStripSeparator
Friend WithEvents BindingNavigatorMoveNextItem As ToolStripButton
Friend WithEvents BindingNavigatorMoveLastItem As ToolStripButton
Friend WithEvents BindingNavigatorSeparator2 As ToolStripSeparator
Friend WithEvents TBCW_PROFILESBindingNavigatorSaveItem As ToolStripButton
Friend WithEvents FillToolStrip As ToolStrip
Friend WithEvents GUIDToolStripLabel As ToolStripLabel
Friend WithEvents GUIDToolStripTextBox As ToolStripTextBox
Friend WithEvents FillToolStripButton As ToolStripButton
Friend WithEvents GUIDTextBox As TextBox
Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents LayoutControl1 As DevExpress.XtraLayout.LayoutControl
Friend WithEvents TextEdit1 As DevExpress.XtraEditors.TextEdit
Friend WithEvents Root As DevExpress.XtraLayout.LayoutControlGroup
Friend WithEvents LayoutControlItem1 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents TextEdit2 As DevExpress.XtraEditors.TextEdit
Friend WithEvents TextEdit3 As DevExpress.XtraEditors.TextEdit
Friend WithEvents LayoutControlItem2 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents LayoutControlItem3 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents txtAddedWho As DevExpress.XtraEditors.TextEdit
Friend WithEvents txtAddedWhen As DevExpress.XtraEditors.TextEdit
Friend WithEvents txtChangedWho As DevExpress.XtraEditors.TextEdit
Friend WithEvents txtChangedWhen As DevExpress.XtraEditors.TextEdit
Friend WithEvents LayoutControlItem4 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents LayoutControlItem6 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents LayoutControlItem5 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents LayoutControlItem7 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents labelStatus As DevExpress.XtraBars.BarStaticItem
Friend WithEvents labelError As DevExpress.XtraBars.BarStaticItem
End Class

82
GUIs.ZooFlow/Administration/frmAdmin_CWProfile.resx
View File

@ -129,86 +129,4 @@
<metadata name="TableAdapterManager.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>612, 17</value>
</metadata>
<metadata name="TBCW_PROFILESBindingNavigator.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>785, 17</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="BindingNavigatorAddNewItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAFKSURBVDhPYxi84O4C9v+35nH+vzqH6//FGbz/ocLEg+tA
jX8eNf7/87Dh/8nJAqQbcH46L9yAgz0ipBtwfJIgUHPd/z8Pqv7vaBcnbMClmTz/z07l+38SqPFIv9D/
fd0iQM3l///eK/q/vkHm/6oauf9LKxX/zy9V/j+rSBXTwFNAf/55WA/UVAvElf//3CsB4rz/f+9m/v97
J/n/39tx///djADikP+TcjQxDTjUKwx27t/7pUCNBUCN2UCNqUCNCf//3YoGagz7/+9G0P9/1/3+d6Xp
Yhqws13i/5Zmqf/rwM6V/7+kQvH/31sxQI3h/6fmafyfkKX1vztD9397qv7/5kRDwmEyG+hPkHP/3Qj4
35OhQ1gDOgD5898NfyD2+9+arE+6Ad3pumD/gnB9nBHpBrQkGfxviDf8XxNr/L8y2oR0A+gEGBgAJCPY
nnX8iGkAAAAASUVORK5CYII=
</value>
</data>
<data name="BindingNavigatorDeleteItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAFvSURBVDhPtZBNKMNhHMd3Vd5K7eKCWjkgk7yEZDKksciE
yMwkBw6LhHZxcCDlQg64SA4kJeVE4jRv89qaWn8tUtoF/7g8H2Ootb+x4nt56nm+38/v+/xUfyJcJ9Bt
BMcOH1eRiZV5RGcVwqyHrfWwELweWJoJ9rC2AL0mRLse0VEBcxOKkLeGwlwGIz2h75w6ApC6bERjAdia
gkxiyIow5cKkPWxDFYvTiMrUdxDDVnCfwVh/AOo/P2zhhccFzcWBLxmzEPV50Nfyu/Cn2N/1V85DGNKh
Rhth+EaCxkLISUDWxvOgjYXa7F/Wv7kGUz4UJeKzGODi6H25d2l+yPLsDwu8v4NWHY8lSbhL0/HtbX8F
GLXh1MQgnxwoQ3h5hkEL6JI5TlPj21gNMd6WZyC1VSN7r0Mh7G4i56pxpkQhdTWA/KQ4aUcTh+x0KACm
RpBSo3HrM0G6Uq7pl2zvhvNDBcClE8YH4HDv2/A/SKV6BYojAxyEJtLJAAAAAElFTkSuQmCC
</value>
</data>
<data name="BindingNavigatorMoveFirstItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAEqSURBVDhPYxg8oHDW8/9NC57/z5z4+D9UCAOEtz/AKceQ
O/PZ/1VH3v/HpSi++8H/4IZruA3ImPL0/8J9H7Aqiu95+H/p/v///asv4DYgoefJ/2lb3mMoimi/D9ac
Oev/f6/SE7gNiOx69L939QcURaGt98CaW9cBbe/8+98l/wBuAwKbH/6vm/8Orii45e7/RXv//+8Aas6Y
8/O/Xd3P//YZ23Eb4FF1/3/+tDcoiuyKb/9Pn/P7v3/Xt/86he/+WySsx22Afend/9mTX2Mo0k85/9+k
6MV/laxP/40jl+E2wCLvzv/U/tdYFRkknfgvm/b1v27wPNwGGGbd/h/W8hKnIv3Uy/81fKfhNkAn7cZ/
v+qHeBWpeEzAbYBT7pX/IAV4FQ1CwMAAAPB2wKul5ZpwAAAAAElFTkSuQmCC
</value>
</data>
<data name="BindingNavigatorMovePreviousItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAC2SURBVDhPYxg6ILz9wX8ok3QQ3/3gf3DDNfIMiO95+H/p
/v///asvkG5ARPt9sObMWf//e5WeIM2A0NZ7YM2t64C2d/7975J/gHgDglvu/l+09///DqDmjDk//9vV
/fxvn7GdNBfYFd/+nz7n93//rm//dQrf/bdIWE96GOinnP9vUvTiv0rWp//GkctINwAEDJJO/JdN+/pf
N3geeQaAgH7q5f8avtPINwAEVDwmUGbAYAUMDADQFGCYBLpQVQAAAABJRU5ErkJggg==
</value>
</data>
<data name="BindingNavigatorMoveNextItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAACjSURBVDhPYxh8oHDW8/9QJnkgd+az/wnd98g3JGPK0//z
9v/+n9B1hzxDEnqe/J+979f/zq1//7uVXibdkMiuR/+nbPv1v2Tp3/8J0//+t8k9S5ohgc0P/7eufQ/W
bFzy5b909LX/xpHLiDfEo+r+/5K57+CaFV16SHOBfend/4Etz8jTDAIWeXf+2xRcIU8zCBhm3SZfMwjo
pN0gX/NQBAwMAKB+X6AHNEI4AAAAAElFTkSuQmCC
</value>
</data>
<data name="BindingNavigatorMoveLastItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAEsSURBVDhPYxhcoHDW8/9QJgYAyTUteP4/c+JjnGoYcmc+
+5/QfQ+rApDcqiPv/4e3P8BtQMaUp//n7f/9P6HrDoYikNzCfR/+Bzdcw21AQs+T/7P3/frfufXvf7fS
yygKQXLTtrz/7199AbcBkV2P/k/Z9ut/ydK//xOm//1vk3sWrhgk17v6w3+v0hO4DQhsfvi/de17sGbj
ki//paOv/TeOXAbWAJKrm//uv0v+AdwGeFTd/18y9x1cs6JLD1wxSC5/2pv/9hnbcRtgX3r3f2DLMwzN
IACSy578+r9FwnrcBljk3flvU3AFQzMIgORS+1/DvYQVGGbdxqoZBEByYS0v/+sGz8NtgE7aDZySIDm/
6of/NXyn4TYAH3DKvfJfxWMCGEOFBgVgYAAAvtG/s7kMTpwAAAAASUVORK5CYII=
</value>
</data>
<data name="TBCW_PROFILESBindingNavigatorSaveItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAABMSURBVDhPY6AK+Pbt239SMVQrBIAFgufA8Yf3H+EYWQxE
x0zYh2kIKQaAMMwQqHbSDQBhog1AxshqaGsAMXjUgEFpADkYqp0SwMAAAPRDDFPA2mtzAAAAAElFTkSu
QmCC
</value>
</data>
<metadata name="FillToolStrip.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1021, 17</value>
</metadata>
<metadata name="GUIDLabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
</root>

66
GUIs.ZooFlow/Administration/frmAdmin_CWProfile.vb
View File

@ -1,7 +1,6 @@
Imports DigitalData.Modules.Logging
Public Class frmAdmin_CWProfile
Inherits frmAdmin_Base
Implements frmAdmin_Interface
Public Property PrimaryKey As Integer Implements frmAdmin_Interface.PrimaryKey
@ -12,27 +11,70 @@ Public Class frmAdmin_CWProfile
Private Property Logger As Logger Implements frmAdmin_Interface.Logger
Private Sub frmAdmin_CWProfile_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Public Sub New(PrimaryKey As Integer)
' Dieser Aufruf ist für den Designer erforderlich.
InitializeComponent()
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
Logger = My.LogConfig.GetLogger()
Me.PrimaryKey = PrimaryKey
Me.IsInsert = IsInsert
End Sub
Private Sub frmAdmin_CWProfile_Load(sender As Object, e As EventArgs) Handles Me.Load
Try
TBCW_PROFILESTableAdapter.Fill(DBCW_Stammdaten.TBCW_PROFILES, PrimaryKey)
Catch ex As Exception
ShowError(ex)
End Try
End Sub
Private Sub ResetMessages()
labelStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
End Sub
Private Sub ShowStatus(Message As String)
labelStatus.Caption = Message
labelStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
End Sub
Public Function SaveData() As Boolean Implements frmAdmin_Interface.SaveData
Try
TBCW_PROFILESBindingSource.EndEdit()
If DBCW_Stammdaten.TBCW_PROFILES.GetChanges() IsNot Nothing Then
HasChanges = True
If IsInsert Then
txtAddedWho.EditValue = My.Application.User.UserName
Else
txtChangedWho.EditValue = My.Application.User.UserName
End If
TBCW_PROFILESBindingSource.EndEdit()
TBCW_PROFILESTableAdapter.Update(DBCW_Stammdaten.TBCW_PROFILES)
End If
Return True
Catch ex As Exception
ShowError(ex)
Return False
End Try
End Function
Private Sub TBCW_PROFILESBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs) Handles TBCW_PROFILESBindingNavigatorSaveItem.Click
Me.Validate()
Me.TBCW_PROFILESBindingSource.EndEdit()
Me.TableAdapterManager.UpdateAll(Me.DBCW_Stammdaten)
Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
ResetMessages()
If SaveData() Then
Close()
End If
End Sub
Private Sub FillToolStripButton_Click(sender As Object, e As EventArgs) Handles FillToolStripButton.Click
Try
Me.TBCW_PROFILESTableAdapter.Fill(Me.DBCW_Stammdaten.TBCW_PROFILES, CType(GUIDToolStripTextBox.Text, Integer))
Catch ex As System.Exception
System.Windows.Forms.MessageBox.Show(ex.Message)
End Try
Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
ResetMessages()
If SaveData() And HasChanges Then
ShowStatus("Attribute gespeichert!")
End If
End Sub
End Class

87
GUIs.ZooFlow/Administration/frmAdmin_IDBAttribute.Designer.vb generated
View File

@ -100,7 +100,7 @@ Partial Class frmAdmin_IDBAttribute
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
Me.RibbonControl1.ShowPageHeadersMode = DevExpress.XtraBars.Ribbon.ShowPageHeadersMode.Hide
Me.RibbonControl1.Size = New System.Drawing.Size(800, 66)
Me.RibbonControl1.Size = New System.Drawing.Size(800, 63)
Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
'
'BarButtonItem1
@ -142,10 +142,10 @@ Partial Class frmAdmin_IDBAttribute
'RibbonStatusBar1
'
Me.RibbonStatusBar1.ItemLinks.Add(Me.labelStatus)
Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 428)
Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 426)
Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
Me.RibbonStatusBar1.Size = New System.Drawing.Size(800, 22)
Me.RibbonStatusBar1.Size = New System.Drawing.Size(800, 24)
'
'RibbonPage2
'
@ -166,21 +166,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, 66)
Me.LayoutControl1.Location = New System.Drawing.Point(0, 63)
Me.LayoutControl1.Name = "LayoutControl1"
Me.LayoutControl1.Root = Me.Root
Me.LayoutControl1.Size = New System.Drawing.Size(800, 362)
Me.LayoutControl1.Size = New System.Drawing.Size(800, 363)
Me.LayoutControl1.TabIndex = 2
Me.LayoutControl1.Text = "LayoutControl1"
'
'TextEdit1
'
Me.TextEdit1.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_ATTRIBUTEBindingSource, "GUID", True))
Me.TextEdit1.Location = New System.Drawing.Point(168, 20)
Me.TextEdit1.Location = New System.Drawing.Point(154, 20)
Me.TextEdit1.MenuManager = Me.RibbonControl1
Me.TextEdit1.Name = "TextEdit1"
Me.TextEdit1.Properties.ReadOnly = True
Me.TextEdit1.Size = New System.Drawing.Size(612, 20)
Me.TextEdit1.Size = New System.Drawing.Size(626, 20)
Me.TextEdit1.StyleController = Me.LayoutControl1
Me.TextEdit1.TabIndex = 4
'
@ -197,10 +197,10 @@ Partial Class frmAdmin_IDBAttribute
'TextEdit2
'
Me.TextEdit2.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_ATTRIBUTEBindingSource, "TITLE", True))
Me.TextEdit2.Location = New System.Drawing.Point(168, 60)
Me.TextEdit2.Location = New System.Drawing.Point(154, 60)
Me.TextEdit2.MenuManager = Me.RibbonControl1
Me.TextEdit2.Name = "TextEdit2"
Me.TextEdit2.Size = New System.Drawing.Size(612, 20)
Me.TextEdit2.Size = New System.Drawing.Size(626, 20)
Me.TextEdit2.StyleController = Me.LayoutControl1
Me.TextEdit2.TabIndex = 5
'
@ -208,11 +208,11 @@ Partial Class frmAdmin_IDBAttribute
'
Me.SpinEdit1.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_ATTRIBUTEBindingSource, "VIEW_SEQUENCE", True))
Me.SpinEdit1.EditValue = New Decimal(New Integer() {0, 0, 0, 0})
Me.SpinEdit1.Location = New System.Drawing.Point(558, 180)
Me.SpinEdit1.Location = New System.Drawing.Point(544, 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(222, 20)
Me.SpinEdit1.Size = New System.Drawing.Size(236, 20)
Me.SpinEdit1.StyleController = Me.LayoutControl1
Me.SpinEdit1.TabIndex = 6
'
@ -223,7 +223,7 @@ Partial Class frmAdmin_IDBAttribute
Me.CheckEdit1.MenuManager = Me.RibbonControl1
Me.CheckEdit1.Name = "CheckEdit1"
Me.CheckEdit1.Properties.Caption = "Attribut mehrzeilig"
Me.CheckEdit1.Size = New System.Drawing.Size(760, 18)
Me.CheckEdit1.Size = New System.Drawing.Size(760, 20)
Me.CheckEdit1.StyleController = Me.LayoutControl1
Me.CheckEdit1.TabIndex = 7
'
@ -234,72 +234,72 @@ 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(370, 18)
Me.CheckEdit2.Size = New System.Drawing.Size(370, 20)
Me.CheckEdit2.StyleController = Me.LayoutControl1
Me.CheckEdit2.TabIndex = 8
'
'TextEdit3
'
Me.TextEdit3.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_ATTRIBUTEBindingSource, "COMMENT", True))
Me.TextEdit3.Location = New System.Drawing.Point(168, 140)
Me.TextEdit3.Location = New System.Drawing.Point(154, 140)
Me.TextEdit3.MenuManager = Me.RibbonControl1
Me.TextEdit3.Name = "TextEdit3"
Me.TextEdit3.Size = New System.Drawing.Size(612, 20)
Me.TextEdit3.Size = New System.Drawing.Size(626, 20)
Me.TextEdit3.StyleController = Me.LayoutControl1
Me.TextEdit3.TabIndex = 9
'
'txtAddedWho
'
Me.txtAddedWho.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_ATTRIBUTEBindingSource, "ADDED_WHO", True))
Me.txtAddedWho.Location = New System.Drawing.Point(168, 258)
Me.txtAddedWho.Location = New System.Drawing.Point(154, 260)
Me.txtAddedWho.MenuManager = Me.RibbonControl1
Me.txtAddedWho.Name = "txtAddedWho"
Me.txtAddedWho.Properties.ReadOnly = True
Me.txtAddedWho.Size = New System.Drawing.Size(222, 20)
Me.txtAddedWho.Size = New System.Drawing.Size(236, 20)
Me.txtAddedWho.StyleController = Me.LayoutControl1
Me.txtAddedWho.TabIndex = 10
'
'txtAddedWhen
'
Me.txtAddedWhen.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_ATTRIBUTEBindingSource, "ADDED_WHEN", True))
Me.txtAddedWhen.Location = New System.Drawing.Point(558, 258)
Me.txtAddedWhen.Location = New System.Drawing.Point(544, 260)
Me.txtAddedWhen.MenuManager = Me.RibbonControl1
Me.txtAddedWhen.Name = "txtAddedWhen"
Me.txtAddedWhen.Properties.ReadOnly = True
Me.txtAddedWhen.Size = New System.Drawing.Size(222, 20)
Me.txtAddedWhen.Size = New System.Drawing.Size(236, 20)
Me.txtAddedWhen.StyleController = Me.LayoutControl1
Me.txtAddedWhen.TabIndex = 11
'
'txtChangedWho
'
Me.txtChangedWho.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_ATTRIBUTEBindingSource, "CHANGED_WHO", True))
Me.txtChangedWho.Location = New System.Drawing.Point(168, 298)
Me.txtChangedWho.Location = New System.Drawing.Point(154, 300)
Me.txtChangedWho.MenuManager = Me.RibbonControl1
Me.txtChangedWho.Name = "txtChangedWho"
Me.txtChangedWho.Properties.ReadOnly = True
Me.txtChangedWho.Size = New System.Drawing.Size(222, 20)
Me.txtChangedWho.Size = New System.Drawing.Size(236, 20)
Me.txtChangedWho.StyleController = Me.LayoutControl1
Me.txtChangedWho.TabIndex = 12
'
'txtChangedWhen
'
Me.txtChangedWhen.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_ATTRIBUTEBindingSource, "CHANGED_WHEN", True))
Me.txtChangedWhen.Location = New System.Drawing.Point(558, 298)
Me.txtChangedWhen.Location = New System.Drawing.Point(544, 300)
Me.txtChangedWhen.MenuManager = Me.RibbonControl1
Me.txtChangedWhen.Name = "txtChangedWhen"
Me.txtChangedWhen.Properties.ReadOnly = True
Me.txtChangedWhen.Size = New System.Drawing.Size(222, 20)
Me.txtChangedWhen.Size = New System.Drawing.Size(236, 20)
Me.txtChangedWhen.StyleController = Me.LayoutControl1
Me.txtChangedWhen.TabIndex = 13
'
'ComboBoxEdit1
'
Me.ComboBoxEdit1.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBIDB_ATTRIBUTEBindingSource, "TYP_ID", True))
Me.ComboBoxEdit1.Location = New System.Drawing.Point(168, 100)
Me.ComboBoxEdit1.Location = New System.Drawing.Point(154, 100)
Me.ComboBoxEdit1.MenuManager = Me.RibbonControl1
Me.ComboBoxEdit1.Name = "ComboBoxEdit1"
Me.ComboBoxEdit1.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
Me.ComboBoxEdit1.Size = New System.Drawing.Size(612, 20)
Me.ComboBoxEdit1.Size = New System.Drawing.Size(626, 20)
Me.ComboBoxEdit1.StyleController = Me.LayoutControl1
Me.ComboBoxEdit1.TabIndex = 14
'
@ -309,7 +309,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(800, 362)
Me.Root.Size = New System.Drawing.Size(800, 363)
Me.Root.TextVisible = False
'
'LayoutControlItem1
@ -321,7 +321,7 @@ Partial Class frmAdmin_IDBAttribute
Me.LayoutControlItem1.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem1.Size = New System.Drawing.Size(780, 40)
Me.LayoutControlItem1.Text = "GUID"
Me.LayoutControlItem1.TextSize = New System.Drawing.Size(145, 13)
Me.LayoutControlItem1.TextSize = New System.Drawing.Size(131, 13)
'
'LayoutControlItem2
'
@ -331,7 +331,7 @@ Partial Class frmAdmin_IDBAttribute
Me.LayoutControlItem2.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem2.Size = New System.Drawing.Size(780, 40)
Me.LayoutControlItem2.Text = "Bezeichnung"
Me.LayoutControlItem2.TextSize = New System.Drawing.Size(145, 13)
Me.LayoutControlItem2.TextSize = New System.Drawing.Size(131, 13)
'
'LayoutControlItem4
'
@ -339,7 +339,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(780, 38)
Me.LayoutControlItem4.Size = New System.Drawing.Size(780, 40)
Me.LayoutControlItem4.TextSize = New System.Drawing.Size(0, 0)
Me.LayoutControlItem4.TextVisible = False
'
@ -351,17 +351,17 @@ Partial Class frmAdmin_IDBAttribute
Me.LayoutControlItem6.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem6.Size = New System.Drawing.Size(780, 40)
Me.LayoutControlItem6.Text = "Kommentar"
Me.LayoutControlItem6.TextSize = New System.Drawing.Size(145, 13)
Me.LayoutControlItem6.TextSize = New System.Drawing.Size(131, 13)
'
'LayoutControlItem7
'
Me.LayoutControlItem7.Control = Me.txtAddedWho
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(390, 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
'
@ -372,7 +372,7 @@ Partial Class frmAdmin_IDBAttribute
Me.LayoutControlItem3.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem3.Size = New System.Drawing.Size(390, 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
'
@ -382,17 +382,17 @@ Partial Class frmAdmin_IDBAttribute
Me.LayoutControlItem11.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem11.Size = New System.Drawing.Size(780, 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
'
Me.LayoutControlItem9.Control = Me.txtChangedWho
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(390, 64)
Me.LayoutControlItem9.Size = New System.Drawing.Size(390, 63)
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
'
@ -407,22 +407,22 @@ Partial Class frmAdmin_IDBAttribute
'LayoutControlItem8
'
Me.LayoutControlItem8.Control = Me.txtAddedWhen
Me.LayoutControlItem8.Location = New System.Drawing.Point(390, 238)
Me.LayoutControlItem8.Location = New System.Drawing.Point(390, 240)
Me.LayoutControlItem8.Name = "LayoutControlItem8"
Me.LayoutControlItem8.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem8.Size = New System.Drawing.Size(390, 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
'
Me.LayoutControlItem10.Control = Me.txtChangedWhen
Me.LayoutControlItem10.Location = New System.Drawing.Point(390, 278)
Me.LayoutControlItem10.Location = New System.Drawing.Point(390, 280)
Me.LayoutControlItem10.Name = "LayoutControlItem10"
Me.LayoutControlItem10.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem10.Size = New System.Drawing.Size(390, 64)
Me.LayoutControlItem10.Size = New System.Drawing.Size(390, 63)
Me.LayoutControlItem10.Text = "Geändert Wann"
Me.LayoutControlItem10.TextSize = New System.Drawing.Size(145, 13)
Me.LayoutControlItem10.TextSize = New System.Drawing.Size(131, 13)
'
'TBIDB_ATTRIBUTETableAdapter
'
@ -446,10 +446,11 @@ Partial Class frmAdmin_IDBAttribute
Me.Controls.Add(Me.LayoutControl1)
Me.Controls.Add(Me.RibbonStatusBar1)
Me.Controls.Add(Me.RibbonControl1)
Me.IconOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.bo_appearance
Me.Name = "frmAdmin_IDBAttribute"
Me.Ribbon = Me.RibbonControl1
Me.StatusBar = Me.RibbonStatusBar1
Me.Text = "frmAdmin_Attribute"
Me.Text = "IDB - Attribut"
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.LayoutControl1.ResumeLayout(False)

3
GUIs.ZooFlow/Administration/frmAdmin_IDBAttribute.resx
View File

@ -123,6 +123,9 @@
<metadata name="DSIDB_Stammdaten.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>74, 22</value>
</metadata>
<metadata name="DSIDB_Stammdaten.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>74, 22</value>
</metadata>
<metadata name="TBIDB_ATTRIBUTETableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>649, 17</value>
</metadata>

4
GUIs.ZooFlow/Administration/frmAdmin_SourceSQL.Designer.vb generated
View File

@ -116,6 +116,7 @@ Partial Class frmAdmin_SourceSQL
Me.labelStatus.Id = 3
Me.labelStatus.ImageOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.about1
Me.labelStatus.Name = "labelStatus"
Me.labelStatus.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
Me.labelStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
'
'labelError
@ -394,10 +395,11 @@ Partial Class frmAdmin_SourceSQL
Me.Controls.Add(Me.LayoutControl1)
Me.Controls.Add(Me.RibbonStatusBar1)
Me.Controls.Add(Me.RibbonControl1)
Me.IconOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.managedatasource
Me.Name = "frmAdmin_SourceSQL"
Me.Ribbon = Me.RibbonControl1
Me.StatusBar = Me.RibbonStatusBar1
Me.Text = "Source SQL"
Me.Text = "IDB - Source SQL"
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.LayoutControl1.ResumeLayout(False)

3
GUIs.ZooFlow/Administration/frmAdmin_SourceSQL.resx
View File

@ -123,9 +123,6 @@
<metadata name="DSIDB_Stammdaten.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>314, 17</value>
</metadata>
<metadata name="DSIDB_Stammdaten.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>314, 17</value>
</metadata>
<metadata name="TBZF_ADMIN_SOURCE_SQLTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>754, 17</value>
</metadata>

123
GUIs.ZooFlow/Administration/frmAdmin_Start.Designer.vb generated
View File

@ -106,8 +106,8 @@ Partial Class frmAdmin_Start
Me.XtraTabPage_ClipboardWatcher = New DevExpress.XtraTab.XtraTabPage()
Me.XtraTabControl1 = New DevExpress.XtraTab.XtraTabControl()
Me.XtraTabPageCWProfiles = New DevExpress.XtraTab.XtraTabPage()
Me.GridControl2 = New DevExpress.XtraGrid.GridControl()
Me.GridView2 = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.GridCWProfiles = New DevExpress.XtraGrid.GridControl()
Me.ViewCWProfiles = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.XtraTabPage2 = New DevExpress.XtraTab.XtraTabPage()
Me.XtraTabControl = New DevExpress.XtraTab.XtraTabControl()
CHANGED_WHENLabel = New System.Windows.Forms.Label()
@ -143,8 +143,8 @@ Partial Class frmAdmin_Start
CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabControl1.SuspendLayout()
Me.XtraTabPageCWProfiles.SuspendLayout()
CType(Me.GridControl2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridView2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridCWProfiles, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ViewCWProfiles, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.XtraTabControl, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabControl.SuspendLayout()
Me.SuspendLayout()
@ -154,7 +154,7 @@ Partial Class frmAdmin_Start
CHANGED_WHENLabel.AutoSize = True
CHANGED_WHENLabel.Location = New System.Drawing.Point(472, 188)
CHANGED_WHENLabel.Name = "CHANGED_WHENLabel"
CHANGED_WHENLabel.Size = New System.Drawing.Size(90, 13)
CHANGED_WHENLabel.Size = New System.Drawing.Size(85, 13)
CHANGED_WHENLabel.TabIndex = 20
CHANGED_WHENLabel.Text = "Geändert wann:"
'
@ -163,7 +163,7 @@ Partial Class frmAdmin_Start
CHANGED_WHOLabel.AutoSize = True
CHANGED_WHOLabel.Location = New System.Drawing.Point(351, 188)
CHANGED_WHOLabel.Name = "CHANGED_WHOLabel"
CHANGED_WHOLabel.Size = New System.Drawing.Size(80, 13)
CHANGED_WHOLabel.Size = New System.Drawing.Size(77, 13)
CHANGED_WHOLabel.TabIndex = 18
CHANGED_WHOLabel.Text = "Geändert wer:"
'
@ -172,7 +172,7 @@ Partial Class frmAdmin_Start
ADDED_WHENLabel.AutoSize = True
ADDED_WHENLabel.Location = New System.Drawing.Point(472, 146)
ADDED_WHENLabel.Name = "ADDED_WHENLabel"
ADDED_WHENLabel.Size = New System.Drawing.Size(77, 13)
ADDED_WHENLabel.Size = New System.Drawing.Size(73, 13)
ADDED_WHENLabel.TabIndex = 16
ADDED_WHENLabel.Text = "Erstellt wann:"
'
@ -181,7 +181,7 @@ Partial Class frmAdmin_Start
ADDED_WHOLabel.AutoSize = True
ADDED_WHOLabel.Location = New System.Drawing.Point(351, 146)
ADDED_WHOLabel.Name = "ADDED_WHOLabel"
ADDED_WHOLabel.Size = New System.Drawing.Size(67, 13)
ADDED_WHOLabel.Size = New System.Drawing.Size(65, 13)
ADDED_WHOLabel.TabIndex = 14
ADDED_WHOLabel.Text = "Erstellt wer:"
'
@ -190,7 +190,7 @@ Partial Class frmAdmin_Start
COMMENTLabel.AutoSize = True
COMMENTLabel.Location = New System.Drawing.Point(351, 106)
COMMENTLabel.Name = "COMMENTLabel"
COMMENTLabel.Size = New System.Drawing.Size(68, 13)
COMMENTLabel.Size = New System.Drawing.Size(65, 13)
COMMENTLabel.TabIndex = 12
COMMENTLabel.Text = "Kommentar:"
'
@ -199,7 +199,7 @@ Partial Class frmAdmin_Start
VIEW_SEQUENCELabel.AutoSize = True
VIEW_SEQUENCELabel.Location = New System.Drawing.Point(351, 82)
VIEW_SEQUENCELabel.Name = "VIEW_SEQUENCELabel"
VIEW_SEQUENCELabel.Size = New System.Drawing.Size(101, 13)
VIEW_SEQUENCELabel.Size = New System.Drawing.Size(93, 13)
VIEW_SEQUENCELabel.TabIndex = 8
VIEW_SEQUENCELabel.Text = "View Reihenfolge:"
'
@ -208,7 +208,7 @@ Partial Class frmAdmin_Start
TITLELabel.AutoSize = True
TITLELabel.Location = New System.Drawing.Point(351, 12)
TITLELabel.Name = "TITLELabel"
TITLELabel.Size = New System.Drawing.Size(76, 13)
TITLELabel.Size = New System.Drawing.Size(71, 13)
TITLELabel.TabIndex = 2
TITLELabel.Text = "Bezeichnung:"
'
@ -217,7 +217,7 @@ Partial Class frmAdmin_Start
GUIDLabel.AutoSize = True
GUIDLabel.Location = New System.Drawing.Point(297, 12)
GUIDLabel.Name = "GUIDLabel"
GUIDLabel.Size = New System.Drawing.Size(37, 13)
GUIDLabel.Size = New System.Drawing.Size(36, 13)
GUIDLabel.TabIndex = 0
GUIDLabel.Text = "GUID:"
'
@ -231,7 +231,7 @@ Partial Class frmAdmin_Start
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1, Me.RibbonPage_ClipboardWatcher, Me.RibbonPage_GlobalIndexer, Me.RibbonPage_IDB})
Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
Me.RibbonControl1.ShowToolbarCustomizeItem = False
Me.RibbonControl1.Size = New System.Drawing.Size(1328, 159)
Me.RibbonControl1.Size = New System.Drawing.Size(1328, 158)
Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
Me.RibbonControl1.Toolbar.ShowCustomizeItem = False
'
@ -279,6 +279,7 @@ Partial Class frmAdmin_Start
Me.labelStatus.Id = 6
Me.labelStatus.ImageOptions.SvgImage = CType(resources.GetObject("labelStatus.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.labelStatus.Name = "labelStatus"
Me.labelStatus.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
Me.labelStatus.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
'
'labelError
@ -419,10 +420,10 @@ Partial Class frmAdmin_Start
'
Me.RibbonStatusBar1.ItemLinks.Add(Me.labelStatus)
Me.RibbonStatusBar1.ItemLinks.Add(Me.labelError)
Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 729)
Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 727)
Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
Me.RibbonStatusBar1.Size = New System.Drawing.Size(1328, 22)
Me.RibbonStatusBar1.Size = New System.Drawing.Size(1328, 24)
'
'RibbonPage2
'
@ -454,7 +455,7 @@ Partial Class frmAdmin_Start
Me.TreeListMenu.OptionsView.ShowIndicator = False
Me.TreeListMenu.OptionsView.ShowVertLines = False
Me.TreeListMenu.SelectImageList = Me.SvgImageCollection1
Me.TreeListMenu.Size = New System.Drawing.Size(193, 521)
Me.TreeListMenu.Size = New System.Drawing.Size(193, 540)
Me.TreeListMenu.TabIndex = 8
'
'TreeListColumn1
@ -485,18 +486,18 @@ Partial Class frmAdmin_Start
Me.DockPanel1.Controls.Add(Me.DockPanel1_Container)
Me.DockPanel1.Dock = DevExpress.XtraBars.Docking.DockingStyle.Left
Me.DockPanel1.ID = New System.Guid("ce81b5b5-eff5-4006-8018-548aa8413799")
Me.DockPanel1.Location = New System.Drawing.Point(0, 159)
Me.DockPanel1.Location = New System.Drawing.Point(0, 158)
Me.DockPanel1.Name = "DockPanel1"
Me.DockPanel1.OriginalSize = New System.Drawing.Size(200, 200)
Me.DockPanel1.Size = New System.Drawing.Size(200, 570)
Me.DockPanel1.Size = New System.Drawing.Size(200, 569)
Me.DockPanel1.Text = "Übersicht"
'
'DockPanel1_Container
'
Me.DockPanel1_Container.Controls.Add(Me.TreeListMenu)
Me.DockPanel1_Container.Location = New System.Drawing.Point(3, 46)
Me.DockPanel1_Container.Location = New System.Drawing.Point(3, 26)
Me.DockPanel1_Container.Name = "DockPanel1_Container"
Me.DockPanel1_Container.Size = New System.Drawing.Size(193, 521)
Me.DockPanel1_Container.Size = New System.Drawing.Size(193, 540)
Me.DockPanel1_Container.TabIndex = 0
'
'TBIDB_ATTRIBUTEBindingSource
@ -536,7 +537,7 @@ Partial Class frmAdmin_Start
'
Me.XtraTabPage_IDB.Controls.Add(Me.XtraTabControlIDB)
Me.XtraTabPage_IDB.Name = "XtraTabPage_IDB"
Me.XtraTabPage_IDB.Size = New System.Drawing.Size(1126, 547)
Me.XtraTabPage_IDB.Size = New System.Drawing.Size(1126, 544)
Me.XtraTabPage_IDB.Text = "IDB"
'
'XtraTabControlIDB
@ -545,7 +546,7 @@ Partial Class frmAdmin_Start
Me.XtraTabControlIDB.Location = New System.Drawing.Point(0, 0)
Me.XtraTabControlIDB.Name = "XtraTabControlIDB"
Me.XtraTabControlIDB.SelectedTabPage = Me.XtraTabPageIDB_Attributes_New
Me.XtraTabControlIDB.Size = New System.Drawing.Size(1126, 547)
Me.XtraTabControlIDB.Size = New System.Drawing.Size(1126, 544)
Me.XtraTabControlIDB.TabIndex = 0
Me.XtraTabControlIDB.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPageIDB_Attributes_New, Me.XtraTabPageIDB_Attributes, Me.XtraTabPageIDB_SourceSQL})
'
@ -553,7 +554,7 @@ Partial Class frmAdmin_Start
'
Me.XtraTabPageIDB_Attributes_New.Controls.Add(Me.GridAttributes)
Me.XtraTabPageIDB_Attributes_New.Name = "XtraTabPageIDB_Attributes_New"
Me.XtraTabPageIDB_Attributes_New.Size = New System.Drawing.Size(1124, 524)
Me.XtraTabPageIDB_Attributes_New.Size = New System.Drawing.Size(1124, 519)
Me.XtraTabPageIDB_Attributes_New.Text = "Attribute"
'
'GridAttributes
@ -563,7 +564,7 @@ Partial Class frmAdmin_Start
Me.GridAttributes.MainView = Me.ViewAttributes
Me.GridAttributes.MenuManager = Me.RibbonControl1
Me.GridAttributes.Name = "GridAttributes"
Me.GridAttributes.Size = New System.Drawing.Size(1124, 524)
Me.GridAttributes.Size = New System.Drawing.Size(1124, 519)
Me.GridAttributes.TabIndex = 0
Me.GridAttributes.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.ViewAttributes})
'
@ -597,7 +598,7 @@ Partial Class frmAdmin_Start
Me.XtraTabPageIDB_Attributes.Controls.Add(CHANGED_WHENLabel)
Me.XtraTabPageIDB_Attributes.Controls.Add(Me.CHANGED_WHENTextBox)
Me.XtraTabPageIDB_Attributes.Name = "XtraTabPageIDB_Attributes"
Me.XtraTabPageIDB_Attributes.Size = New System.Drawing.Size(1124, 524)
Me.XtraTabPageIDB_Attributes.Size = New System.Drawing.Size(1124, 519)
Me.XtraTabPageIDB_Attributes.Text = "Attributverwaltung"
'
'ComboBox1
@ -616,7 +617,7 @@ Partial Class frmAdmin_Start
Me.GridControl1.MainView = Me.GridView1
Me.GridControl1.MenuManager = Me.RibbonControl1
Me.GridControl1.Name = "GridControl1"
Me.GridControl1.Size = New System.Drawing.Size(282, 524)
Me.GridControl1.Size = New System.Drawing.Size(282, 519)
Me.GridControl1.TabIndex = 28
Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView1})
'
@ -662,7 +663,7 @@ Partial Class frmAdmin_Start
Me.GUIDTextBox.Location = New System.Drawing.Point(300, 28)
Me.GUIDTextBox.Name = "GUIDTextBox"
Me.GUIDTextBox.ReadOnly = True
Me.GUIDTextBox.Size = New System.Drawing.Size(33, 22)
Me.GUIDTextBox.Size = New System.Drawing.Size(33, 21)
Me.GUIDTextBox.TabIndex = 1
'
'TITLETextBox
@ -670,7 +671,7 @@ Partial Class frmAdmin_Start
Me.TITLETextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBIDB_ATTRIBUTEBindingSource, "TITLE", True))
Me.TITLETextBox.Location = New System.Drawing.Point(354, 28)
Me.TITLETextBox.Name = "TITLETextBox"
Me.TITLETextBox.Size = New System.Drawing.Size(290, 22)
Me.TITLETextBox.Size = New System.Drawing.Size(290, 21)
Me.TITLETextBox.TabIndex = 3
'
'TYP_IDTextBox
@ -678,7 +679,7 @@ Partial Class frmAdmin_Start
Me.TYP_IDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBIDB_ATTRIBUTEBindingSource, "TYP_ID", True))
Me.TYP_IDTextBox.Location = New System.Drawing.Point(777, 28)
Me.TYP_IDTextBox.Name = "TYP_IDTextBox"
Me.TYP_IDTextBox.Size = New System.Drawing.Size(104, 22)
Me.TYP_IDTextBox.Size = New System.Drawing.Size(104, 21)
Me.TYP_IDTextBox.TabIndex = 5
'
'MULTI_CONTEXTCheckBox
@ -696,7 +697,7 @@ Partial Class frmAdmin_Start
Me.VIEW_SEQUENCETextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBIDB_ATTRIBUTEBindingSource, "VIEW_SEQUENCE", True))
Me.VIEW_SEQUENCETextBox.Location = New System.Drawing.Point(450, 79)
Me.VIEW_SEQUENCETextBox.Name = "VIEW_SEQUENCETextBox"
Me.VIEW_SEQUENCETextBox.Size = New System.Drawing.Size(33, 22)
Me.VIEW_SEQUENCETextBox.Size = New System.Drawing.Size(33, 21)
Me.VIEW_SEQUENCETextBox.TabIndex = 9
'
'VIEW_VISIBLECheckBox
@ -714,7 +715,7 @@ Partial Class frmAdmin_Start
Me.COMMENTTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBIDB_ATTRIBUTEBindingSource, "COMMENT", True))
Me.COMMENTTextBox.Location = New System.Drawing.Point(354, 122)
Me.COMMENTTextBox.Name = "COMMENTTextBox"
Me.COMMENTTextBox.Size = New System.Drawing.Size(417, 22)
Me.COMMENTTextBox.Size = New System.Drawing.Size(417, 21)
Me.COMMENTTextBox.TabIndex = 13
'
'ADDED_WHOTextBox
@ -723,7 +724,7 @@ Partial Class frmAdmin_Start
Me.ADDED_WHOTextBox.Location = New System.Drawing.Point(354, 164)
Me.ADDED_WHOTextBox.Name = "ADDED_WHOTextBox"
Me.ADDED_WHOTextBox.ReadOnly = True
Me.ADDED_WHOTextBox.Size = New System.Drawing.Size(104, 22)
Me.ADDED_WHOTextBox.Size = New System.Drawing.Size(104, 21)
Me.ADDED_WHOTextBox.TabIndex = 15
'
'ADDED_WHENTextBox
@ -732,7 +733,7 @@ Partial Class frmAdmin_Start
Me.ADDED_WHENTextBox.Location = New System.Drawing.Point(475, 164)
Me.ADDED_WHENTextBox.Name = "ADDED_WHENTextBox"
Me.ADDED_WHENTextBox.ReadOnly = True
Me.ADDED_WHENTextBox.Size = New System.Drawing.Size(131, 22)
Me.ADDED_WHENTextBox.Size = New System.Drawing.Size(131, 21)
Me.ADDED_WHENTextBox.TabIndex = 17
'
'CHANGED_WHOTextBox
@ -741,7 +742,7 @@ Partial Class frmAdmin_Start
Me.CHANGED_WHOTextBox.Location = New System.Drawing.Point(354, 204)
Me.CHANGED_WHOTextBox.Name = "CHANGED_WHOTextBox"
Me.CHANGED_WHOTextBox.ReadOnly = True
Me.CHANGED_WHOTextBox.Size = New System.Drawing.Size(104, 22)
Me.CHANGED_WHOTextBox.Size = New System.Drawing.Size(104, 21)
Me.CHANGED_WHOTextBox.TabIndex = 19
'
'CHANGED_WHENTextBox
@ -750,14 +751,14 @@ Partial Class frmAdmin_Start
Me.CHANGED_WHENTextBox.Location = New System.Drawing.Point(475, 204)
Me.CHANGED_WHENTextBox.Name = "CHANGED_WHENTextBox"
Me.CHANGED_WHENTextBox.ReadOnly = True
Me.CHANGED_WHENTextBox.Size = New System.Drawing.Size(131, 22)
Me.CHANGED_WHENTextBox.Size = New System.Drawing.Size(131, 21)
Me.CHANGED_WHENTextBox.TabIndex = 21
'
'XtraTabPageIDB_SourceSQL
'
Me.XtraTabPageIDB_SourceSQL.Controls.Add(Me.GridSourceSQL)
Me.XtraTabPageIDB_SourceSQL.Name = "XtraTabPageIDB_SourceSQL"
Me.XtraTabPageIDB_SourceSQL.Size = New System.Drawing.Size(1124, 524)
Me.XtraTabPageIDB_SourceSQL.Size = New System.Drawing.Size(1124, 519)
Me.XtraTabPageIDB_SourceSQL.Text = "Source SQL"
'
'GridSourceSQL
@ -767,7 +768,7 @@ Partial Class frmAdmin_Start
Me.GridSourceSQL.MainView = Me.ViewSourceSQL
Me.GridSourceSQL.MenuManager = Me.RibbonControl1
Me.GridSourceSQL.Name = "GridSourceSQL"
Me.GridSourceSQL.Size = New System.Drawing.Size(1124, 524)
Me.GridSourceSQL.Size = New System.Drawing.Size(1124, 519)
Me.GridSourceSQL.TabIndex = 0
Me.GridSourceSQL.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.ViewSourceSQL})
'
@ -780,7 +781,7 @@ Partial Class frmAdmin_Start
'
Me.XtraTabPage_GlobalIndexer.Name = "XtraTabPage_GlobalIndexer"
Me.XtraTabPage_GlobalIndexer.PageVisible = False
Me.XtraTabPage_GlobalIndexer.Size = New System.Drawing.Size(1126, 547)
Me.XtraTabPage_GlobalIndexer.Size = New System.Drawing.Size(1126, 544)
Me.XtraTabPage_GlobalIndexer.Text = "Global Indexer"
'
'XtraTabPage_ClipboardWatcher
@ -788,7 +789,7 @@ Partial Class frmAdmin_Start
Me.XtraTabPage_ClipboardWatcher.Controls.Add(Me.XtraTabControl1)
Me.XtraTabPage_ClipboardWatcher.Name = "XtraTabPage_ClipboardWatcher"
Me.XtraTabPage_ClipboardWatcher.PageVisible = False
Me.XtraTabPage_ClipboardWatcher.Size = New System.Drawing.Size(1126, 547)
Me.XtraTabPage_ClipboardWatcher.Size = New System.Drawing.Size(1126, 544)
Me.XtraTabPage_ClipboardWatcher.Text = "Clipboard Watcher"
'
'XtraTabControl1
@ -797,47 +798,47 @@ Partial Class frmAdmin_Start
Me.XtraTabControl1.Location = New System.Drawing.Point(0, 0)
Me.XtraTabControl1.Name = "XtraTabControl1"
Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPageCWProfiles
Me.XtraTabControl1.Size = New System.Drawing.Size(1126, 547)
Me.XtraTabControl1.Size = New System.Drawing.Size(1126, 544)
Me.XtraTabControl1.TabIndex = 0
Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPageCWProfiles, Me.XtraTabPage2})
'
'XtraTabPageCWProfiles
'
Me.XtraTabPageCWProfiles.Controls.Add(Me.GridControl2)
Me.XtraTabPageCWProfiles.Controls.Add(Me.GridCWProfiles)
Me.XtraTabPageCWProfiles.Name = "XtraTabPageCWProfiles"
Me.XtraTabPageCWProfiles.Size = New System.Drawing.Size(1124, 524)
Me.XtraTabPageCWProfiles.Size = New System.Drawing.Size(1124, 519)
Me.XtraTabPageCWProfiles.Text = "Profile"
'
'GridControl2
'GridCWProfiles
'
Me.GridControl2.Dock = System.Windows.Forms.DockStyle.Fill
Me.GridControl2.Location = New System.Drawing.Point(0, 0)
Me.GridControl2.MainView = Me.GridView2
Me.GridControl2.MenuManager = Me.RibbonControl1
Me.GridControl2.Name = "GridControl2"
Me.GridControl2.Size = New System.Drawing.Size(1124, 524)
Me.GridControl2.TabIndex = 0
Me.GridControl2.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView2})
Me.GridCWProfiles.Dock = System.Windows.Forms.DockStyle.Fill
Me.GridCWProfiles.Location = New System.Drawing.Point(0, 0)
Me.GridCWProfiles.MainView = Me.ViewCWProfiles
Me.GridCWProfiles.MenuManager = Me.RibbonControl1
Me.GridCWProfiles.Name = "GridCWProfiles"
Me.GridCWProfiles.Size = New System.Drawing.Size(1124, 519)
Me.GridCWProfiles.TabIndex = 0
Me.GridCWProfiles.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.ViewCWProfiles})
'
'GridView2
'ViewCWProfiles
'
Me.GridView2.GridControl = Me.GridControl2
Me.GridView2.Name = "GridView2"
Me.ViewCWProfiles.GridControl = Me.GridCWProfiles
Me.ViewCWProfiles.Name = "ViewCWProfiles"
'
'XtraTabPage2
'
Me.XtraTabPage2.Name = "XtraTabPage2"
Me.XtraTabPage2.Size = New System.Drawing.Size(1124, 524)
Me.XtraTabPage2.Size = New System.Drawing.Size(1124, 519)
Me.XtraTabPage2.Text = "XtraTabPage2"
'
'XtraTabControl
'
Me.XtraTabControl.Dock = System.Windows.Forms.DockStyle.Fill
Me.XtraTabControl.Location = New System.Drawing.Point(200, 159)
Me.XtraTabControl.Location = New System.Drawing.Point(200, 158)
Me.XtraTabControl.Name = "XtraTabControl"
Me.XtraTabControl.SelectedTabPage = Me.XtraTabPage_IDB
Me.XtraTabControl.ShowTabHeader = DevExpress.Utils.DefaultBoolean.[True]
Me.XtraTabControl.Size = New System.Drawing.Size(1128, 570)
Me.XtraTabControl.Size = New System.Drawing.Size(1128, 569)
Me.XtraTabControl.TabIndex = 4
Me.XtraTabControl.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPage_ClipboardWatcher, Me.XtraTabPage_GlobalIndexer, Me.XtraTabPage_IDB})
'
@ -881,8 +882,8 @@ Partial Class frmAdmin_Start
CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.XtraTabControl1.ResumeLayout(False)
Me.XtraTabPageCWProfiles.ResumeLayout(False)
CType(Me.GridControl2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridView2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridCWProfiles, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ViewCWProfiles, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.XtraTabControl, System.ComponentModel.ISupportInitialize).EndInit()
Me.XtraTabControl.ResumeLayout(False)
Me.ResumeLayout(False)
@ -966,6 +967,6 @@ Partial Class frmAdmin_Start
Friend WithEvents XtraTabControl1 As DevExpress.XtraTab.XtraTabControl
Friend WithEvents XtraTabPageCWProfiles As DevExpress.XtraTab.XtraTabPage
Friend WithEvents XtraTabPage2 As DevExpress.XtraTab.XtraTabPage
Friend WithEvents GridControl2 As GridControl
Friend WithEvents GridView2 As GridView
Friend WithEvents GridCWProfiles As GridControl
Friend WithEvents ViewCWProfiles As GridView
End Class

3
GUIs.ZooFlow/Administration/frmAdmin_Start.resx
View File

@ -326,9 +326,6 @@
LjEsMjguMSwyNy42LDI3LjZ6IiBjbGFzcz0iQmx1ZSIgLz4NCiAgPC9nPg0KPC9zdmc+Cw==
</value>
</data>
<metadata name="DSIDB_Stammdaten.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>323, 21</value>
</metadata>
<metadata name="TBIDB_ATTRIBUTETableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>711, 21</value>
</metadata>

37
GUIs.ZooFlow/Administration/frmAdmin_Start.vb
View File

@ -44,12 +44,12 @@ Public Class frmAdmin_Start
For Each oRow As DataRow In oTable.Rows
Dim oSource As New SourceSql With {
.PrimaryKey = oRow.Item("PK_COLUMN"),
.SQL = oRow.Item("SQL_COMMAND"),
.Title = oRow.Item("ENTITY_TITLE")
.PrimaryKey = oRow.Item("PK_COLUMN").ToString,
.SQL = oRow.Item("SQL_COMMAND").ToString,
.Title = oRow.Item("ENTITY_TITLE").ToString
}
SourceCommands.Add(oRow.Item("ENTITY_TITLE"), oSource)
SourceCommands.Add(oRow.Item("ENTITY_TITLE").ToString, oSource)
Next
Return True
Catch ex As Exception
@ -125,7 +125,7 @@ Public Class frmAdmin_Start
Display_RibbonPage(RibbonPage_ClipboardWatcher)
Dim oTable As DataTable = My.Database.GetDatatable(oSource.SQL)
Load_Grid(oTable, oSource.PrimaryKey, GridControl2)
Load_Grid(oTable, oSource.PrimaryKey, GridCWProfiles)
Case IDB_SOURCE_SQL
Display_Tab(XtraTabPage_IDB)
@ -202,7 +202,8 @@ Public Class frmAdmin_Start
End Try
End Sub
Private Sub View_DoubleClick(sender As Object, e As EventArgs) Handles ViewAttributes.DoubleClick, ViewSourceSQL.DoubleClick
Private Sub View_DoubleClick(sender As Object, e As EventArgs) Handles _
ViewAttributes.DoubleClick, ViewSourceSQL.DoubleClick, ViewCWProfiles.DoubleClick
Dim oView As GridView = TryCast(sender, GridView)
Dim hitInfo As GridHitInfo = oView.CalcHitInfo(TryCast(e, DXMouseEventArgs).Location)
If hitInfo.InDataRow Then
@ -213,11 +214,14 @@ Public Class frmAdmin_Start
Select Case oView.Name
Case ViewAttributes.Name
Load_Attributes(oPrimaryKey)
Load_Attribute(oPrimaryKey)
Case ViewSourceSQL.Name
Load_SourceSql(oPrimaryKey)
Case ViewCWProfiles.Name
Load_CWProfile(oPrimaryKey)
End Select
End If
@ -227,7 +231,7 @@ Public Class frmAdmin_Start
End If
End Sub
Private Sub Load_Attributes(PrimaryKey As Integer)
Private Sub Load_Attribute(PrimaryKey As Integer)
Try
Dim oForm As New frmAdmin_IDBAttribute(PrimaryKey)
oForm.ShowDialog()
@ -257,12 +261,27 @@ Public Class frmAdmin_Start
End Try
End Sub
Private Sub Load_CWProfile(PrimaryKey As Integer)
Try
Dim oForm As New frmAdmin_CWProfile(PrimaryKey)
oForm.ShowDialog()
If oForm.HasChanges Then
Dim oSource As SourceSql = SourceCommands.Item(CurrentPage)
Dim oTable As DataTable = My.Database.GetDatatable(oSource.SQL)
Load_Grid(oTable, oSource.PrimaryKey, GridCWProfiles)
End If
Catch ex As Exception
ShowError(ex)
End Try
End Sub
Private Sub BarButtonItem7_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem7.ItemClick
Try
Dim oRow As DataRow = ViewAttributes.GetFocusedDataRow
If oRow IsNot Nothing Then
Dim oPrimaryKey As Integer = oRow.Item(PrimaryKey)
Load_Attributes(oPrimaryKey)
Load_Attribute(oPrimaryKey)
End If
Catch ex As Exception
ShowError(ex)

2
GUIs.ZooFlow/ClassInit.vb
View File

@ -166,7 +166,7 @@ Public Class ClassInit
Try
MyApplication.Service.Address = My.SystemConfig.AppServerConfig
Dim oSplit() As String = MyApplication.Service.Address.Split(":")
Dim oSplit() As String = MyApplication.Service.Address.Split(":"c)
Dim oAppServerAddress As String = oSplit(0)
Dim oAppServerPort As Integer = 9000
If oSplit.Length = 2 Then

40
GUIs.ZooFlow/My Project/Resources.Designer.vb generated
View File

@ -250,6 +250,16 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
'''</summary>
Friend ReadOnly Property actions_check2() As DevExpress.Utils.Svg.SvgImage
Get
Dim obj As Object = ResourceManager.GetObject("actions_check2", resourceCulture)
Return CType(obj,DevExpress.Utils.Svg.SvgImage)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
'''</summary>
@ -290,6 +300,16 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
'''</summary>
Friend ReadOnly Property bo_appearance() As DevExpress.Utils.Svg.SvgImage
Get
Dim obj As Object = ResourceManager.GetObject("bo_appearance", resourceCulture)
Return CType(obj,DevExpress.Utils.Svg.SvgImage)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
'''</summary>
@ -410,6 +430,16 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
'''</summary>
Friend ReadOnly Property managedatasource() As DevExpress.Utils.Svg.SvgImage
Get
Dim obj As Object = ResourceManager.GetObject("managedatasource", resourceCulture)
Return CType(obj,DevExpress.Utils.Svg.SvgImage)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
'''</summary>
@ -440,6 +470,16 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ DevExpress.Utils.Svg.SvgImage.
'''</summary>
Friend ReadOnly Property save2() As DevExpress.Utils.Svg.SvgImage
Get
Dim obj As Object = ResourceManager.GetObject("save2", resourceCulture)
Return CType(obj,DevExpress.Utils.Svg.SvgImage)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>

16
GUIs.ZooFlow/My Project/Resources.resx
View File

@ -151,6 +151,9 @@
<data name="DD_Icons_ICO_PMANAGER_128px" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\DD_Icons_ICO_PMANAGER_128px.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="actions_check2" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\actions_check2.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="4_GLOBIX_AKTIV_ZOO" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\4_GLOBIX_AKTIV_ZOO.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@ -214,6 +217,9 @@
<data name="1_LOGO_ZOO_FLOW_DROP2" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\1_LOGO_ZOO_FLOW_DROP2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="bo_appearance" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\bo_appearance.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="Flow" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Flow.PNG;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@ -235,6 +241,12 @@
<data name="actions_addcircled1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\actions_addcircled1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="managedatasource" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\managedatasource.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="updatedataextract" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\updatedataextract.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="actions_edit" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\actions_edit.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
@ -247,7 +259,7 @@
<data name="2_ZOO_FLOW_Abo" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\2_ZOO_FLOW_Abo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="updatedataextract" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\updatedataextract.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
<data name="save2" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\save2.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
</root>

15
GUIs.ZooFlow/Resources/actions_check2.svg Normal file
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;}
.Yellow{fill:#FFB115;}
.Black{fill:#727272;}
.Green{fill:#039C23;}
.Red{fill:#D11C1C;}
.st0{opacity:0.75;}
.st1{opacity:0.5;}
</style>
<g id="Check">
<polygon points="27,5 11,21 5,15 2,18 11,27 30,8 " class="Green" />
</g>
</svg>

30
GUIs.ZooFlow/Resources/bo_appearance.svg Normal file
View File

@ -0,0 +1,30 @@
<?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;}
.Yellow{fill:#FFB115;}
.Red{fill:#D11C1C;}
.Green{fill:#039C23;}
.Black{fill:#727272;}
.White{fill:#FFFFFF;}
.st0{opacity:0.5;}
.st1{opacity:0.75;}
.st2{display:none;}
.st3{display:inline;fill:#FFB115;}
.st4{display:inline;}
.st5{display:inline;opacity:0.75;}
.st6{display:inline;opacity:0.5;}
.st7{display:inline;fill:#039C23;}
.st8{display:inline;fill:#D11C1C;}
.st9{display:inline;fill:#1177D7;}
.st10{display:inline;fill:#FFFFFF;}
</style>
<g id="Appearance">
<rect x="12" y="4" width="8" height="6" rx="0" ry="0" class="Yellow" />
<rect x="2" y="12" width="8" height="6" rx="0" ry="0" class="Red" />
<rect x="22" y="20" width="8" height="6" rx="0" ry="0" class="Green" />
<g class="st0">
<path d="M12,12h8v6h-8V12z M10,10V4H2v6H10z M22,10h8V4h-8V10z M22,18h8v-6h-8V18z M12,20v6h8v-6H12z M10,26v-6H2v6 H10z" class="Black" />
</g>
</g>
</svg>

9
GUIs.ZooFlow/Resources/managedatasource.svg Normal file
View File

@ -0,0 +1,9 @@
<?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="Manage_Data_Source" style="enable-background:new 0 0 32 32">
<style type="text/css">
.Yellow{fill:#FFB115;}
.Blue{fill:#1177D7;}
</style>
<path d="M2,10V6c0-2.2,4.5-4,10-4s10,1.8,10,4v4c0,2.2-4.5,4-10,4S2,12.2,2,10z M12,20v-0.7l2.5-0.4L13,16.8l1-0.9 C13.3,16,12.7,16,12,16c-5.5,0-10-1.8-10-4v4C2,18.2,6.5,20,12,20z M14.5,25.1L12,24.7V22c-5.5,0-10-1.8-10-4v4c0,2.2,4.5,4,10,4 c0.7,0,1.3,0,1.9-0.1L14.5,25.1z" class="Yellow" />
<path d="M30,23v-2l-2.2-0.4c-0.2-0.6-0.4-1.3-0.7-1.8l1.3-1.8l-1.4-1.4l-1.8,1.3c-0.5-0.3-1.2-0.6-1.8-0.7L23,14h-2 l-0.4,2.2c-0.6,0.2-1.3,0.4-1.8,0.7l-1.8-1.3l-1.4,1.4l1.3,1.8c-0.3,0.5-0.6,1.2-0.7,1.8L14,21v2l2.2,0.4c0.2,0.6,0.4,1.3,0.7,1.8 l-1.3,1.8l1.4,1.4l1.8-1.3c0.5,0.3,1.2,0.6,1.8,0.7L21,30h2l0.4-2.2c0.6-0.2,1.3-0.4,1.8-0.7l1.8,1.3l1.4-1.4l-1.3-1.8 c0.3-0.5,0.6-1.2,0.7-1.8L30,23z M22,24c-1.1,0-2-0.9-2-2s0.9-2,2-2s2,0.9,2,2S23.1,24,22,24z" class="Blue" />
</svg>

7
GUIs.ZooFlow/Resources/save2.svg Normal file
View File

@ -0,0 +1,7 @@
<?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="Save" style="enable-background:new 0 0 32 32">
<style type="text/css">
.Black{fill:#727272;}
</style>
<path d="M27,4h-3v10H8V4H5C4.4,4,4,4.4,4,5v22c0,0.6,0.4,1,1,1h22c0.6,0,1-0.4,1-1V5C28,4.4,27.6,4,27,4z M24,24H8v-6 h16V24z M10,4v8h10V4H10z M14,10h-2V6h2V10z" class="Black" />
</svg>

12
GUIs.ZooFlow/ZooFlow.vbproj
View File

@ -565,6 +565,18 @@
<ItemGroup>
<None Include="Resources\updatedataextract.svg" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\bo_appearance.svg" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\managedatasource.svg" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\actions_check2.svg" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\save2.svg" />
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
Other similar extension points exist, see Microsoft.Common.targets.

2
GUIs.ZooFlow/frmFlowForm.vb
View File

@ -995,8 +995,6 @@ Public Class frmFlowForm
End Sub
Private Sub TestToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles TestToolStripMenuItem.Click
frmtest.Show()
End Sub
End Class