MS Click

GUIs.ZooFlow/frmFlowForm.Designer.vb

@@ -42,8 +42,6 @@ Partial Class frmFlowForm
         Me.PictureBoxSearch = New DevExpress.XtraEditors.SvgImageBox()
         Me.TimerFolderwatch = New System.Windows.Forms.Timer(Me.components)
         Me.pnlQuicksearch1 = New System.Windows.Forms.Panel()
-        Me.txtQuicksearch1 = New DevExpress.XtraEditors.TextEdit()
-        Me.lblQuicksearch1 = New DevExpress.XtraEditors.LabelControl()
         Me.PictureEditQuicksearch1 = New DevExpress.XtraEditors.PictureEdit()
         Me.BarManager1 = New DevExpress.XtraBars.BarManager(Me.components)
         Me.Bar3 = New DevExpress.XtraBars.Bar()
@@ -62,6 +60,8 @@ Partial Class frmFlowForm
         Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem()
         Me.BarButtonItem4 = New DevExpress.XtraBars.BarButtonItem()
         Me.BarButtonItem5 = New DevExpress.XtraBars.BarButtonItem()
+        Me.txtQuicksearch1 = New DevExpress.XtraEditors.TextEdit()
+        Me.lblQuicksearch1 = New DevExpress.XtraEditors.LabelControl()
         Me.Panel1 = New System.Windows.Forms.Panel()
         Me.PictureEdit2 = New DevExpress.XtraEditors.PictureEdit()
         Me.Panel2 = New System.Windows.Forms.Panel()
@@ -72,9 +72,9 @@ Partial Class frmFlowForm
         CType(Me.PictureBoxPM, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.PictureBoxSearch, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.pnlQuicksearch1.SuspendLayout()
-        CType(Me.txtQuicksearch1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.PictureEditQuicksearch1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.BarManager1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.txtQuicksearch1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.Panel1.SuspendLayout()
         CType(Me.PictureEdit2.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.Panel2.SuspendLayout()
@@ -133,6 +133,9 @@ Partial Class frmFlowForm
         Me.ZooFlowBeendenToolStripMenuItem.Size = New System.Drawing.Size(169, 22)
         Me.ZooFlowBeendenToolStripMenuItem.Text = "ZooFlow beenden"
         '
+        'TimerRefreshData
+        '
+        '
         'PictureBoxPM
         '
         Me.PictureBoxPM.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
@@ -179,30 +182,6 @@ Partial Class frmFlowForm
         Me.pnlQuicksearch1.TabIndex = 16
         Me.pnlQuicksearch1.Visible = False
         '
-        'txtQuicksearch1
-        '
-        Me.txtQuicksearch1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
-            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.txtQuicksearch1.Location = New System.Drawing.Point(21, 97)
-        Me.txtQuicksearch1.Name = "txtQuicksearch1"
-        Me.txtQuicksearch1.Properties.Appearance.BackColor = System.Drawing.Color.LightGray
-        Me.txtQuicksearch1.Properties.Appearance.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.txtQuicksearch1.Properties.Appearance.Options.UseBackColor = True
-        Me.txtQuicksearch1.Properties.Appearance.Options.UseFont = True
-        Me.txtQuicksearch1.Properties.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.NoBorder
-        Me.txtQuicksearch1.Size = New System.Drawing.Size(127, 26)
-        Me.txtQuicksearch1.TabIndex = 1
-        '
-        'lblQuicksearch1
-        '
-        Me.lblQuicksearch1.Appearance.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.lblQuicksearch1.Appearance.Options.UseFont = True
-        Me.lblQuicksearch1.Location = New System.Drawing.Point(21, 76)
-        Me.lblQuicksearch1.Name = "lblQuicksearch1"
-        Me.lblQuicksearch1.Size = New System.Drawing.Size(69, 15)
-        Me.lblQuicksearch1.TabIndex = 0
-        Me.lblQuicksearch1.Text = "Schnellsuche"
-        '
         'PictureEditQuicksearch1
         '
         Me.PictureEditQuicksearch1.EditValue = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.ZooFlow_Sidebar_individuelle_suche
@@ -351,6 +330,30 @@ Partial Class frmFlowForm
         Me.BarButtonItem5.Id = 5
         Me.BarButtonItem5.Name = "BarButtonItem5"
         '
+        'txtQuicksearch1
+        '
+        Me.txtQuicksearch1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.txtQuicksearch1.Location = New System.Drawing.Point(21, 97)
+        Me.txtQuicksearch1.Name = "txtQuicksearch1"
+        Me.txtQuicksearch1.Properties.Appearance.BackColor = System.Drawing.Color.LightGray
+        Me.txtQuicksearch1.Properties.Appearance.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtQuicksearch1.Properties.Appearance.Options.UseBackColor = True
+        Me.txtQuicksearch1.Properties.Appearance.Options.UseFont = True
+        Me.txtQuicksearch1.Properties.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.NoBorder
+        Me.txtQuicksearch1.Size = New System.Drawing.Size(127, 26)
+        Me.txtQuicksearch1.TabIndex = 1
+        '
+        'lblQuicksearch1
+        '
+        Me.lblQuicksearch1.Appearance.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblQuicksearch1.Appearance.Options.UseFont = True
+        Me.lblQuicksearch1.Location = New System.Drawing.Point(21, 76)
+        Me.lblQuicksearch1.Name = "lblQuicksearch1"
+        Me.lblQuicksearch1.Size = New System.Drawing.Size(69, 15)
+        Me.lblQuicksearch1.TabIndex = 0
+        Me.lblQuicksearch1.Text = "Schnellsuche"
+        '
         'Panel1
         '
         Me.Panel1.Controls.Add(Me.PictureEdit2)
@@ -432,9 +435,9 @@ Partial Class frmFlowForm
         CType(Me.PictureBoxSearch, System.ComponentModel.ISupportInitialize).EndInit()
         Me.pnlQuicksearch1.ResumeLayout(False)
         Me.pnlQuicksearch1.PerformLayout()
-        CType(Me.txtQuicksearch1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.PictureEditQuicksearch1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.BarManager1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.txtQuicksearch1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
         Me.Panel1.ResumeLayout(False)
         CType(Me.PictureEdit2.Properties, System.ComponentModel.ISupportInitialize).EndInit()
         Me.Panel2.ResumeLayout(False)

GUIs.ZooFlow/frmFlowForm.vb

@@ -1296,5 +1296,9 @@ Public Class frmFlowForm
     Private Sub TimerRefreshData_Tick_1(sender As Object, e As EventArgs) Handles TimerRefreshData.Tick
         TaskBadge.Properties.Text = Date.Now.Millisecond.ToString.Last
     End Sub
+
+    Private Sub PictureEditQuicksearch1_Click(sender As Object, e As EventArgs) Handles PictureEditQuicksearch1.Click
+        Await CheckRunSearch1()
+    End Sub
 End Class