MS Push

GUIs.ZooFlow/frmFlowForm.vb

@@ -56,6 +56,7 @@ Public Class frmFlowForm
         EventBus.Instance.Register(Me)
 
         ' === TESTING Actions ===
+
         Dim oSQL = $"SELECT * FROM [dbo].[FNIDB_GET_SEARCH_PROFILES] ({My.Application.User.UserId},'{My.Application.User.Language}')"
         Dim oDT As DataTable = My.Database_IDB.GetDatatable(oSQL)
         SucheToolStripMenuItem.Visible = False
@@ -68,6 +69,7 @@ Public Class frmFlowForm
 
         End If
 
+        My.DTAttributes = My.Database_IDB.GetDatatable("SELECT * FROM TBIDB_ATTRIBUTE")
     End Sub
 
     Private Sub frmFlowForm_Closed(sender As Object, e As EventArgs) Handles Me.Closed
@@ -128,7 +130,7 @@ Public Class frmFlowForm
             Case OnFlowFormStateChangedEvent.FlowFormState.HasFileDropped
                 SetBitmap(My.Resources.GLOBIX_GEFUNDEN_klein)
             Case Else
-                SetBitmap(My.Resources.ZOOFLOW_Home_klein_Eckig)
+                SetBitmap(My.Resources.ZOO_FLOW_Hintergrund)
         End Select
     End Sub