AppStd/Monorepo
8
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

ms

Browse Source
This commit is contained in:
SchreiberM 2020-11-18 16:42:48 +01:00
parent 9a638bf814
commit 5d7cb4e6ee
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
GUIs.ZooFlow/frmFlowForm.vb
View File

@ -9,7 +9,6 @@ Public Class frmFlowForm
Private Const OPACITY_HIDDEN = 0.65 Private Const OPACITY_HIDDEN = 0.65
Private Const OPACITY_SHOWN = 0.85 Private Const OPACITY_SHOWN = 0.85
Private ActiveModules As List(Of String)
Private Logger As Logger Private Logger As Logger
Private Init As ClassInit Private Init As ClassInit
Private DTIDB_SEARCHES As DataTable Private DTIDB_SEARCHES As DataTable
@ -123,7 +122,7 @@ Public Class frmFlowForm
ESCHitCount += 1 ESCHitCount += 1
End If End If
ElseIf e.KeyCode = Keys.D AndAlso (e.Control) Then ElseIf e.KeyCode = Keys.D AndAlso (e.Control) Then
If ActiveModules.Contains(ClassConstants.MODULE_ZOOFLOW) Then If My.Application.ModulesActive.Contains(ClassConstants.MODULE_ZOOFLOW) Then
MsgBox("Search") MsgBox("Search")
End If End If
End If End If