2019-07-18 16:04:03 +02:00

71 lines
2.1 KiB
VB.net

Imports DigitalData.Modules.Config
Imports DigitalData.Modules.Logging
Module modCurrent
Public LogConfig As LogConfig
Public Logger As Logger
Public ConfigManager As ConfigManager(Of ClassConfig)
Public MyConnectionString As String = ""
Public HotkeyFunctionKey As String = "strg"
Public HotkeySearchKey As String = "f"
Public LogErrorsOnly As Boolean = True
Public CURRENT_WINDOW_NAME As String
Public CURRENT_USER_SHORT As String
Public USER_USERNAME As String
Public USER_IS_ADMIN As Boolean = False
Public USER_ID
Public USER_PRENAME
Public USER_SURNAME
Public USER_SHORTNAME
Public USER_EMAIL
Public USER_LANGUAGE As String = "de-DE"
Public USER_DATE_FORMAT As String
Public USER_EXISTS = False
Public USER_IN_MODULE = False
Public USERCOUNT_LOGGED_IN As Integer
Public LICENSE_COUNT As Integer
Public LICENSE_DATE As Date
Public LICENSE_EXPIRED As Boolean = False
Public DT_CLIENT_USER As DataTable
Public ERROR_INIT As String = ""
Public START_INCOMPLETE As Boolean = False
Public CONNECTION_CHANGED As Boolean = False
Public ESC_Hidden As Boolean = False
Public CURRENT_WD_TEMPSEARCH As String
Public TEMP_FILES As List(Of String) = New List(Of String)
Public WD_UNICODE As Boolean = False
Public DT_USER_PROFILES As DataTable
Public CLIPBOARD_TEXT As String
Public CURRENT_MATCHING_PROFILES As List(Of ClassProfileFilter.ProfileData)
Public CURR_MATCH_RESULT
'Public CURR_MATCH_WM_SEARCH
Public CURR_FOCUSED_WINDOWNAME
Public MONITORING_ACTIVE As Boolean = True
Public CurrPROC_PID As String
Public CurrPROC_Name As String
Public CurrPROC_WindowTitle As String
Public CLIENT_SELECTED As Integer = 0
Public CurrDT_PROFILE_MATCH As DataTable
Public DTPROFILE_REL_WINDOW As DataTable
Public CURRENT_DT_DOC_SEARCHES As DataTable
Public CURRENT_DT_DATA_SEARCHES As DataTable
Public CurrDocSearch2Load As Object
Public CurrDataSearch2Load As Object
Public CurrSearchOpen As Boolean = False
End Module