This commit is contained in:
SchreiberM 2022-02-09 13:35:10 +01:00
parent 90fabc1604
commit 3af66db602

View File

@ -105,14 +105,18 @@ Public Class frmFlowForm
AddHandler KeyUp, AddressOf frmFlowForm_KeyDown
AddHandler Watcher.ClipboardChanged, AddressOf Watcher_ClipboardChanged
PictureBoxSearch1.Visible = False
Dim oSQL = My.Queries.Common.FNIDB_GET_SEARCH_PROFILES(My.Application.User.UserId, My.Application.User.Language)
Dim oDatatable As DataTable = My.Database.GetDatatableIDB(oSQL)
PictureBoxSearch1.Visible = False
If Not IsNothing(oDatatable) OrElse oDatatable.Rows.Count > 0 Then
IDBSearchActive = True
DTIDB_SEARCHES = oDatatable
PictureBoxSearch1.Visible = True
If Not IsNothing(oDatatable) Then
If oDatatable.Rows.Count > 0 Then
IDBSearchActive = True
DTIDB_SEARCHES = oDatatable
PictureBoxSearch1.Visible = True
End If
End If
If My.Application.ModulesActive.Contains(MODULE_CLIPBOARDWATCHER) Then