Zooflow: Work on Custom Searches

GUIs.ZooFlow/frmFlowForm.vb

@@ -160,7 +160,7 @@ Public Class frmFlowForm
     Private Init As ClassInit
     Private FileEx As Filesystem.File
     Private Modules As ClassModules
-    Private Search As SearchRunner
+    Private Search As Search.SearchRunner
     Private FormHelper As FormHelper
 
     ' Globix Helper Classes
@@ -231,7 +231,7 @@ Public Class frmFlowForm
             'ErrorHandler = New BaseErrorHandler(My.LogConfig, Logger, Me)
             Modules = New ClassModules(My.LogConfig, My.SystemConfig)
             FileEx = New Filesystem.File(My.LogConfig)
-            Search = New SearchRunner(My.LogConfig, Environment, "FlowSearch") With {
+            Search = New Search.SearchRunner(My.LogConfig, Environment, "FlowSearch") With {
                 .BaseSearchSQL = SQL_FLOW_SEARCH_BASE
             }
 
@@ -525,7 +525,7 @@ Public Class frmFlowForm
             Exit Sub
         End If
 
-        Dim oForm As New frmFlowSearch2()
+        Dim oForm As New frmSearchFlow()
         oForm.Show()
         oForm.BringToFront()
 
@@ -1227,7 +1227,7 @@ Public Class frmFlowForm
     End Sub
 
     Private Sub SucheEntwurfToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles SucheEntwurfToolStripMenuItem.Click
-        Dim oForm = New frmFlowSearch2()
+        Dim oForm = New frmSearchFlow()
         oForm.Show()
     End Sub