MS Globix1

GUIs.ZooFlow/ClassInit.vb

@@ -37,7 +37,7 @@ Public Class ClassInit
             oInit.AddStep("Initializing User..", AddressOf InitializeUser, True)
             oInit.AddStep("Initializing IDB..", AddressOf InitializeIDB, True)
             oInit.AddStep("Loading 3rd-party licenses", AddressOf Initialize3rdParty, False)
-
+            oInit.AddStep("Loading basic Configs", AddressOf Initialize3rdParty, False)
             ' === Init Schritte definieren
 
             AddHandler oInit.ProgressChanged, AddressOf ProgressChanged
@@ -113,6 +113,19 @@ Public Class ClassInit
             Throw New InitException("Fehler beim Laden der Konfiguration!")
         End Try
     End Sub
+    Private Sub InitBasicData(MyApplication As My.MyApplication)
+        Try
+            Dim oSql = "SELECT * FROM TBGI_FUNCTION_REGEX"
+            My.Application.GI_DT_FUNCTION_REGEX = My.Database.GetDatatable(oSql)
+
+
+
+
+        Catch ex As Exception
+            _Logger.Error(ex)
+            Throw New InitException("Error in InitBasicData")
+        End Try
+    End Sub
 
     Private Sub InitializeIDB(MyApplication As My.MyApplication)
         If MyApplication.ModulesActive.Contains(MODULE_ZOOFLOW) Then