ZooFlow: Admin

GUIs.ZooFlow/Administration/ClassDetailPage.vb

@@ -20,6 +20,7 @@ Public Class ClassDetailPages
     Public Event AnyControl_Changed As EventHandler(Of DetailPageEventArgs)
     Public Event CurrentPage_Changed As EventHandler(Of DetailPageEventArgs)
 
+    Private RaiseChangedEvents As Boolean = True
     Private CurrentPage As DetailPage
 
     Public Property Current As DetailPage
@@ -94,7 +95,9 @@ Public Class ClassDetailPages
         Items.Add(Page.TabPage.Name, Page)
 
         AddHandler Page.BindingSource.AddingNew, Sub(sender As Object, e As EventArgs)
+                                                     RaiseChangedEvents = False
                                                      Page.AddedWhoEdit.EditValue = Environment.UserName
+                                                     RaiseChangedEvents = True
                                                  End Sub
     End Sub
 
@@ -122,6 +125,27 @@ Public Class ClassDetailPages
         End Try
     End Function
 
+    Public Function PrepareLoad() As Boolean
+        Dim oItem = Items.
+            Where(Function(Item) Item.Value.IsPrimary).
+            FirstOrDefault()
+
+        Dim oPage = oItem.Value
+        If oPage Is Nothing Then
+            Return False
+        End If
+
+        If oPage.IsInsert Then
+            RaiseChangedEvents = False
+            oPage.BindingSource.AddNew()
+            RaiseChangedEvents = True
+        End If
+
+        CurrentPage = oPage
+
+        Return True
+    End Function
+
     ''' <summary>
     ''' Saves the pending changes to the binding source
     ''' </summary>
@@ -137,12 +161,17 @@ Public Class ClassDetailPages
             oPage.BindingSource.EndEdit()
 
             If oPage.DataTable.GetChanges() IsNot Nothing Then
+                RaiseChangedEvents = False
+                HostForm.HasChanges = True
+
                 If oPage.IsInsert Then
                     oPage.AddedWhoEdit.EditValue = My.Application.User.UserName
                 Else
                     oPage.ChangedWhoEdit.EditValue = My.Application.User.UserName
                 End If
 
+                RaiseChangedEvents = True
+
                 oPage.BindingSource.EndEdit()
                 Return True
             Else
@@ -241,6 +270,10 @@ Public Class ClassDetailPages
     Private Sub Handle_EditValueChanged(sender As BaseEdit, e As EventArgs)
         Dim oControl As BaseEdit = sender
 
+        If RaiseChangedEvents = False Then
+            Exit Sub
+        End If
+
         ' Get the Layout Control containing the Edit Contol
         If TypeOf oControl.Parent Is LayoutControl Then
             Dim oLayoutControl As LayoutControl = oControl.Parent

GUIs.ZooFlow/Administration/frmAdmin_ClipboardWatcher.vb

@@ -125,6 +125,8 @@ Public Class frmAdmin_ClipboardWatcher
                 }
             })
 
+            Pages.PrepareLoad()
+
             AddHandler Pages.CurrentPage_Changed, AddressOf CurrentPage_Changed
         Catch ex As Exception
             ShowErrorMessage(ex)
@@ -156,22 +158,28 @@ Public Class frmAdmin_ClipboardWatcher
         ResetMessages()
 
         If Pages.PrepareSave() = True Then
-            Dim oPage = Pages.Current
+            Try
+                Dim oPage = Pages.Current
 
-            Select Case oPage.TabPage.Name
+                Select Case oPage.TabPage.Name
-                Case PageProfile.Name
+                    Case PageProfile.Name
-                    TBCW_PROFILESTableAdapter.Update(oPage.DataTable)
+                        TBCW_PROFILESTableAdapter.Update(oPage.DataTable)
 
-                Case PageDocumentSearch.Name
+                    Case PageDocumentSearch.Name
-                    TBCW_PROF_DOC_SEARCHTableAdapter.Update(oPage.DataTable)
+                        TBCW_PROF_DOC_SEARCHTableAdapter.Update(oPage.DataTable)
 
-                Case PageDataSearch.Name
+                    Case PageDataSearch.Name
-                    TBCW_PROF_DATA_SEARCHTableAdapter.Update(oPage.DataTable)
+                        TBCW_PROF_DATA_SEARCHTableAdapter.Update(oPage.DataTable)
-            End Select
+                End Select
 
-            oPage.IsInsert = False
+                oPage.IsInsert = False
 
-            ShowStatus($"{oPage.Name} gespeichert!")
+                ShowStatus($"{oPage.Name} gespeichert!")
+            Catch ex As Exception
+                ShowErrorMessage(ex)
+            End Try
+        Else
+            ShowStatus("Keine Änderungen!")
         End If
     End Sub
 

GUIs.ZooFlow/Administration/frmAdmin_Start.Designer.vb

@@ -139,7 +139,7 @@ Partial Class frmAdmin_Start
         Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
         Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
         Me.RibbonControl1.ShowToolbarCustomizeItem = False
-        Me.RibbonControl1.Size = New System.Drawing.Size(1077, 159)
+        Me.RibbonControl1.Size = New System.Drawing.Size(1077, 158)
         Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
         Me.RibbonControl1.Toolbar.ShowCustomizeItem = False
         '
@@ -381,10 +381,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, 654)
+        Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 652)
         Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
         Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
-        Me.RibbonStatusBar1.Size = New System.Drawing.Size(1077, 22)
+        Me.RibbonStatusBar1.Size = New System.Drawing.Size(1077, 24)
         '
         'RibbonPage2
         '
@@ -419,7 +419,7 @@ Partial Class frmAdmin_Start
         Me.TreeListMenu.OptionsView.ShowIndicator = False
         Me.TreeListMenu.OptionsView.ShowVertLines = False
         Me.TreeListMenu.SelectImageList = Me.MainTreeImages
-        Me.TreeListMenu.Size = New System.Drawing.Size(193, 446)
+        Me.TreeListMenu.Size = New System.Drawing.Size(193, 465)
         Me.TreeListMenu.TabIndex = 8
         '
         'TreeListColumn1
@@ -450,18 +450,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, 495)
+        Me.DockPanel1.Size = New System.Drawing.Size(200, 494)
         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, 446)
+        Me.DockPanel1_Container.Size = New System.Drawing.Size(193, 465)
         Me.DockPanel1_Container.TabIndex = 0
         '
         'TBIDB_ATTRIBUTEBindingSource
@@ -511,9 +511,9 @@ Partial Class frmAdmin_Start
         '
         Me.Panel1.Controls.Add(Me.labelTitle)
         Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
-        Me.Panel1.Location = New System.Drawing.Point(200, 159)
+        Me.Panel1.Location = New System.Drawing.Point(200, 158)
         Me.Panel1.Name = "Panel1"
-        Me.Panel1.Size = New System.Drawing.Size(877, 9)
+        Me.Panel1.Size = New System.Drawing.Size(877, 40)
         Me.Panel1.TabIndex = 8
         Me.Panel1.TabStop = True
         '
@@ -524,7 +524,7 @@ Partial Class frmAdmin_Start
         Me.labelTitle.Location = New System.Drawing.Point(0, 0)
         Me.labelTitle.Name = "labelTitle"
         Me.labelTitle.Padding = New System.Windows.Forms.Padding(5, 0, 0, 0)
-        Me.labelTitle.Size = New System.Drawing.Size(877, 9)
+        Me.labelTitle.Size = New System.Drawing.Size(877, 40)
         Me.labelTitle.TabIndex = 0
         Me.labelTitle.Text = "labelTitle"
         Me.labelTitle.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@@ -714,11 +714,11 @@ Partial Class frmAdmin_Start
         'GridControl1
         '
         Me.GridControl1.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.GridControl1.Location = New System.Drawing.Point(200, 168)
+        Me.GridControl1.Location = New System.Drawing.Point(200, 198)
         Me.GridControl1.MainView = Me.GridView1
         Me.GridControl1.MenuManager = Me.RibbonControl1
         Me.GridControl1.Name = "GridControl1"
-        Me.GridControl1.Size = New System.Drawing.Size(877, 486)
+        Me.GridControl1.Size = New System.Drawing.Size(877, 454)
         Me.GridControl1.TabIndex = 12
         Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView1})
         '
@@ -785,7 +785,7 @@ Partial Class frmAdmin_Start
         Me.Controls.Add(Me.DockPanel1)
         Me.Controls.Add(Me.RibbonStatusBar1)
         Me.Controls.Add(Me.RibbonControl1)
-        Me.IconOptions.SvgImage = CType(resources.GetObject("frmAdmin_Start.IconOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.IconOptions.SvgImage = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.actions_options
         Me.Name = "frmAdmin_Start"
         Me.Ribbon = Me.RibbonControl1
         Me.StatusBar = Me.RibbonStatusBar1

GUIs.ZooFlow/Administration/frmAdmin_Start.resx

@@ -257,29 +257,6 @@
   <metadata name="DockManager1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>396, 17</value>
   </metadata>
-  <data name="frmAdmin_Start.IconOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
-    <value>
-        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjE5LjIsIFZlcnNpb249MTkuMi4z
-        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
-        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAALoDAAAC77u/
-        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
-        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
-        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
-        Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
-        MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJs
-        YWNre2ZpbGw6IzcyNzI3Mjt9CgkuQmx1ZXtmaWxsOiMxMTc3RDc7fQoJLkdyZWVue2ZpbGw6IzAzOUMy
-        Mzt9CgkuWWVsbG93e2ZpbGw6I0ZGQjExNTt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
-        Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQoJLnN0MntvcGFjaXR5OjAuMjU7fQo8L3N0eWxl
-        Pg0KICA8ZyBpZD0iUGFnZVNldHVwIj4NCiAgICA8cGF0aCBkPSJNMTkuMiwyNkg4VjZoMTB2NWMwLDAu
-        NiwwLjQsMSwxLDFoNXY5LjJsMiwyVjExbC03LTdIN0M2LjQsNCw2LDQuNCw2LDV2MjJjMCwwLjYsMC40
-        LDEsMSwxaDE0LjJMMTkuMiwyNnoiIGNsYXNzPSJCbGFjayIgLz4NCiAgICA8cGF0aCBkPSJNMjcuNiwy
-        Ny42bC02LjItNi4yYzAuNC0wLjcsMC42LTEuNSwwLjYtMi40YzAtMi44LTIuMi01LTUtNWMtMC44LDAt
-        MS41LDAuMi0yLjEsMC41bDIuNywyLjcgICBjMC42LDAuNiwwLjYsMS43LDAsMi40cy0xLjcsMC42LTIu
-        NCwwbC0yLjctMi43QzEyLjIsMTcuNSwxMiwxOC4yLDEyLDE5YzAsMi44LDIuMiw1LDUsNWMwLjksMCwx
-        LjctMC4yLDIuNC0wLjZsNi4yLDYuMiAgIGMwLjYsMC42LDEuNCwwLjYsMiwwbDAsMEMyOC4xLDI5LDI4
-        LjEsMjguMSwyNy42LDI3LjZ6IiBjbGFzcz0iQmx1ZSIgLz4NCiAgPC9nPg0KPC9zdmc+Cw==
-</value>
-  </data>
   <metadata name="TBIDB_ATTRIBUTEBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>691, 17</value>
   </metadata>

GUIs.ZooFlow/Administration/frmAdmin_Start.vb

@@ -15,6 +15,15 @@ Public Class frmAdmin_Start
 
     Private DetailForm As ClassDetailForm
 
+    Public Sub New()
+        MyBase.New(My.LogConfig)
+
+        ' Dieser Aufruf ist für den Designer erforderlich.
+        InitializeComponent()
+
+        ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
+    End Sub
+
     Private Sub frmAdministration_Load(sender As Object, e As EventArgs) Handles MyBase.Load
         DetailForm = New ClassDetailForm(My.LogConfig)
         AddHandler DetailForm.DetailFormClosed, AddressOf DetailForm_Closed
@@ -200,6 +209,8 @@ Public Class frmAdmin_Start
 
                 If oPrimaryKey IsNot Nothing Then
                     DetailForm.Handle_OpenDetail(oPrimaryKey, CurrentPage, False)
+                Else
+                    Throw New ArgumentNullException("PrimaryKey")
                 End If
             End If
         Catch ex As Exception
@@ -239,7 +250,7 @@ Public Class frmAdmin_Start
         Try
             DetailForm.Handle_OpenDetail(Nothing, CurrentPage, True)
         Catch ex As Exception
-            Logger.Error(ex)
+            ShowErrorMessage(ex)
         End Try
     End Sub
 

GUIs.ZooFlow/My Project/Resources.Designer.vb

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

GUIs.ZooFlow/My Project/Resources.resx

@@ -118,6 +118,9 @@
     <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
   </resheader>
   <assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
+  <data name="actions_database" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\actions_database.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
   <data name="save5" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\save5.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
@@ -142,9 +145,6 @@
   <data name="save" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\save.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="definednameuseinformula3" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\definednameuseinformula3.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
   <data name="editquery" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\editquery.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
@@ -160,6 +160,9 @@
   <data name="action_add_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\action_add_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
+  <data name="actions_options" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>..\Resources\actions_options.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
   <data name="about1" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\about1.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
@@ -169,12 +172,12 @@
   <data name="about2" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\about2.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
+  <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="StatusAnnotations_Stop_16xLG_color" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\StatusAnnotations_Stop_16xLG_color.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="actions_addcircled4" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\actions_addcircled4.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
-  </data>
   <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>
@@ -334,8 +337,8 @@
   <data name="del4" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\del4.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="2_ZOO_FLOW_Abo" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="actions_addcircled4" 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>
+    <value>..\Resources\actions_addcircled4.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
   <data name="bo_document" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\bo_document.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
@@ -355,8 +358,8 @@
   <data name="actions_deletecircled4" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\actions_deletecircled4.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="actions_database" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="definednameuseinformula3" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\actions_database.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+    <value>..\Resources\definednameuseinformula3.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
   <data name="1_LOGO_ZOO_FLOW1" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\1_LOGO_ZOO_FLOW1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -385,14 +388,17 @@
   <data name="crossdatasourcefiltering" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\crossdatasourcefiltering.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>
   <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>
   <data name="actions_deletecircled6" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\actions_deletecircled6.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">
+  <data name="actions_check4" 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>
+    <value>..\Resources\actions_check5.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
   <data name="3_PERSON_INAKTIV_ZOO" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\3_PERSON_INAKTIV_ZOO.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -421,7 +427,7 @@
   <data name="GLOBIX_short" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>..\Resources\GLOBIX_short.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="actions_check4" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="bo_attention" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>..\Resources\actions_check5.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+    <value>..\Resources\bo_attention.svg;DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
 </root>

GUIs.ZooFlow/Resources/actions_options.svg

@@ -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="Options_1_">
+    <path d="M27.3,23.8l-8.2-8.2c0.6-1.1,0.9-2.3,0.9-3.7c0-4.4-3.6-8-8-8c-1.3,0-2.5,0.3-3.6,0.9l4.9,4.9   c1,1,1,2.6,0,3.6c-1,1-2.6,1-3.6,0L4.9,8.4C4.3,9.5,4,10.7,4,12c0,4.4,3.6,8,8,8c1.3,0,2.6-0.3,3.7-0.9l8.2,8.2   c0.9,0.9,2.5,0.9,3.4,0C28.2,26.3,28.2,24.8,27.3,23.8z" class="Blue" />
+  </g>
+</svg>

GUIs.ZooFlow/Resources/bo_attention.svg

@@ -0,0 +1,26 @@
+<?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="Attention">
+    <path d="M15.1,2.5L2.1,26.5C1.8,27.2,2.3,28,3.1,28h25.9c0.8,0,1.3-0.8,0.9-1.5L16.9,2.5   C16.5,1.8,15.5,1.8,15.1,2.5z" class="Yellow" />
+    <path d="M16,20c1.1,0,2,0.9,2,2s-0.9,2-2,2s-2-0.9-2-2S14.9,20,16,20z M14,10h4v8h-4V10z" class="Black" />
+  </g>
+</svg>

GUIs.ZooFlow/ZooFlow.vbproj

@@ -813,6 +813,9 @@
   <ItemGroup>
     <None Include="Resources\actions_check5.svg" />
   </ItemGroup>
+  <ItemGroup>
+    <None Include="Resources\actions_options.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.