WIP: cleanup, work on doc result form
@@ -1,47 +0,0 @@
|
||||
Imports Microsoft.VisualBasic.ApplicationServices
|
||||
Imports DigitalData.Modules.Logging
|
||||
Imports DigitalData.Modules.Config
|
||||
Imports DigitalData.Modules.Logging.LogConfig
|
||||
|
||||
Namespace My
|
||||
' Für MyApplication sind folgende Ereignisse verfügbar:
|
||||
' Startup: Wird beim Starten der Anwendung noch vor dem Erstellen des Startformulars ausgelöst.
|
||||
' Shutdown: Wird nach dem Schließen aller Anwendungsformulare ausgelöst. Dieses Ereignis wird nicht ausgelöst, wenn die Anwendung mit einem Fehler beendet wird.
|
||||
' UnhandledException: Wird bei einem Ausnahmefehler ausgelöst.
|
||||
' StartupNextInstance: Wird beim Starten einer Einzelinstanzanwendung ausgelöst, wenn die Anwendung bereits aktiv ist.
|
||||
' NetworkAvailabilityChanged: Wird beim Herstellen oder Trennen der Netzwerkverbindung ausgelöst.
|
||||
Partial Friend Class MyApplication
|
||||
Private _Logger As Logger
|
||||
|
||||
Private _BaseUserConfigPath As String = Windows.Forms.Application.UserAppDataPath
|
||||
Private _BaseLocalUserConfigPath As String = Windows.Forms.Application.LocalUserAppDataPath
|
||||
Private _BaseMachineConfigPath As String = Windows.Forms.Application.CommonAppDataPath
|
||||
|
||||
Public Sub App_Startup() Handles Me.Startup
|
||||
Dim oLogConfig As New LogConfig(PathType.AppData)
|
||||
oLogConfig.Debug = True
|
||||
|
||||
' System Config files like Service Url will be saved in %LocalAppdata% so they will remain on the machine
|
||||
Dim oSystemConfigManager As New ConfigManager(Of ClassConfig)(oLogConfig,
|
||||
_BaseLocalUserConfigPath,
|
||||
_BaseMachineConfigPath)
|
||||
|
||||
' Layout files will be saved in %Appdata% (Roaming) so they will be syncronized with the user profile
|
||||
Dim oUIConfigPath = IO.Path.Combine(_BaseUserConfigPath, ClassConstants.FOLDER_NAME_LAYOUT)
|
||||
Dim oUIConfigManager As New ConfigManager(Of ClassUIConfig)(oLogConfig, oUIConfigPath, oUIConfigPath)
|
||||
|
||||
LogConfig = oLogConfig
|
||||
LogConfig.Debug = True 'oSystemConfigManager.Config.LogDebug
|
||||
|
||||
SystemConfigManager = oSystemConfigManager
|
||||
UIConfigManager = oUIConfigManager
|
||||
|
||||
_Logger = LogConfig.GetLogger()
|
||||
_Logger.Debug("Starting Client Suite..")
|
||||
End Sub
|
||||
|
||||
Public Sub App_Shutdown(sender As Object, e As EventArgs) Handles Me.Shutdown
|
||||
_Logger.Debug("Shutting down Client Suite..")
|
||||
End Sub
|
||||
End Class
|
||||
End Namespace
|
||||
@@ -1,22 +0,0 @@
|
||||
Imports DigitalData.Modules.Logging
|
||||
|
||||
|
||||
Namespace Base
|
||||
''' <summary>
|
||||
''' Base Class which supplies a Logger/LogConfig
|
||||
''' </summary>
|
||||
Public Class BaseClass
|
||||
Protected LogConfig As LogConfig
|
||||
Protected Logger As Logger
|
||||
|
||||
Public Sub New(LogConfig As LogConfig)
|
||||
Dim oClassName = Me.GetType().Name
|
||||
|
||||
Me.LogConfig = LogConfig
|
||||
Me.Logger = LogConfig.GetLogger(oClassName)
|
||||
End Sub
|
||||
End Class
|
||||
End Namespace
|
||||
|
||||
|
||||
|
||||
@@ -1,67 +0,0 @@
|
||||
Imports System.Runtime.InteropServices
|
||||
Public Class ClassClipboardWatcher
|
||||
Inherits NativeWindow
|
||||
Implements IDisposable
|
||||
|
||||
Private Class Win32
|
||||
<DllImport("user32", EntryPoint:="SetClipboardViewer")>
|
||||
Public Shared Function SetClipboardViewer(ByVal hWnd As IntPtr) As IntPtr
|
||||
End Function
|
||||
End Class
|
||||
|
||||
Const WM_DRAWCLIPBOARD As Integer = &H308
|
||||
|
||||
Public Event ClipboardChanged As EventHandler(Of IDataObject)
|
||||
Public Shared Singleton As New ClassClipboardWatcher
|
||||
|
||||
Private _handle As IntPtr
|
||||
|
||||
Private Sub New()
|
||||
MyBase.CreateHandle(New CreateParams)
|
||||
_handle = Win32.SetClipboardViewer(Handle)
|
||||
End Sub
|
||||
|
||||
Protected Overrides Sub WndProc(ByRef m As Message)
|
||||
Select Case m.Msg
|
||||
Case WM_DRAWCLIPBOARD
|
||||
Dim oData As IDataObject = Clipboard.GetDataObject
|
||||
RaiseEvent ClipboardChanged(Me, oData)
|
||||
End Select
|
||||
MyBase.WndProc(m)
|
||||
End Sub
|
||||
|
||||
#Region "IDisposable Support"
|
||||
' Für diese Klasse ist korrekte Ressourcenbereinigung besonders wichtig, da
|
||||
' mit systemübergreifenden Ressourcen gearbeitet wird
|
||||
|
||||
' So ermitteln Sie überflüssige Aufrufe
|
||||
Private disposedValue As Boolean = False
|
||||
|
||||
Protected Overridable Sub Dispose(ByVal disposing As Boolean)
|
||||
If Not disposedValue Then
|
||||
If disposing Then
|
||||
' TODO: Verwaltete Ressourcen freigeben, wenn sie explizit
|
||||
' aufgerufen werden
|
||||
End If
|
||||
MyBase.DestroyHandle()
|
||||
Dim H As IntPtr = Win32.SetClipboardViewer(_handle)
|
||||
End If
|
||||
disposedValue = True
|
||||
End Sub
|
||||
|
||||
' Dieser Code wird von Visual Basic hinzugefügt, um das Dispose-Muster
|
||||
' richtig zu implementieren.
|
||||
Public Sub Dispose() Implements IDisposable.Dispose
|
||||
' Sie sollten diesen Code nicht ändern, sondern stattdessen ihren
|
||||
' Bereinigungscode oben in
|
||||
' Dispose(ByVal disposing As Boolean) einfügen.
|
||||
Dispose(True)
|
||||
GC.SuppressFinalize(Me)
|
||||
End Sub
|
||||
|
||||
Protected Overrides Sub Finalize()
|
||||
MyBase.Finalize()
|
||||
Dispose(False)
|
||||
End Sub
|
||||
#End Region
|
||||
End Class
|
||||
@@ -1,13 +0,0 @@
|
||||
Public Class ClassConstants
|
||||
Public Const SERVICE_MAX_MESSAGE_SIZE = 2147483647
|
||||
Public Const SERVICE_MAX_BUFFER_SIZE = 2147483647
|
||||
Public Const SERVICE_MAX_ARRAY_LENGTH = 2147483647
|
||||
Public Const SERVICE_MAX_STRING_LENGTH = 2147483647
|
||||
Public Const SERVICE_MAX_CONNECTIONS = 10000
|
||||
Public Const SERVICE_OPEN_TIMEOUT = 3
|
||||
|
||||
Public Const FOLDER_NAME_LAYOUT = "Layout"
|
||||
|
||||
Public Const MODULE_CLIPBOARDWATCHER = "CW"
|
||||
Public Const MODULE_GLOBAL_INDEXER = "GLOBIX"
|
||||
End Class
|
||||
@@ -1,3 +0,0 @@
|
||||
Public Class ClassEnvironment
|
||||
|
||||
End Class
|
||||
@@ -1,140 +0,0 @@
|
||||
Imports System.Drawing.Imaging
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
Class Win32
|
||||
Public Enum Bool
|
||||
[False] = 0
|
||||
[True]
|
||||
End Enum
|
||||
|
||||
<StructLayout(LayoutKind.Sequential)>
|
||||
Public Structure Point
|
||||
Public x As Int32
|
||||
Public y As Int32
|
||||
|
||||
Public Sub New(ByVal x As Int32, ByVal y As Int32)
|
||||
Me.x = x
|
||||
Me.y = y
|
||||
End Sub
|
||||
End Structure
|
||||
|
||||
<StructLayout(LayoutKind.Sequential)>
|
||||
Public Structure Size
|
||||
Public cx As Int32
|
||||
Public cy As Int32
|
||||
|
||||
Public Sub New(ByVal cx As Int32, ByVal cy As Int32)
|
||||
Me.cx = cx
|
||||
Me.cy = cy
|
||||
End Sub
|
||||
End Structure
|
||||
|
||||
<StructLayout(LayoutKind.Sequential, Pack:=1)>
|
||||
Structure ARGB
|
||||
Public Blue As Byte
|
||||
Public Green As Byte
|
||||
Public Red As Byte
|
||||
Public Alpha As Byte
|
||||
End Structure
|
||||
|
||||
<StructLayout(LayoutKind.Sequential, Pack:=1)>
|
||||
Public Structure BLENDFUNCTION
|
||||
Public BlendOp As Byte
|
||||
Public BlendFlags As Byte
|
||||
Public SourceConstantAlpha As Byte
|
||||
Public AlphaFormat As Byte
|
||||
End Structure
|
||||
|
||||
Public Const ULW_COLORKEY As Int32 = &H1
|
||||
Public Const ULW_ALPHA As Int32 = &H2
|
||||
Public Const ULW_OPAQUE As Int32 = &H4
|
||||
Public Const AC_SRC_OVER As Byte = &H0
|
||||
Public Const AC_SRC_ALPHA As Byte = &H1
|
||||
|
||||
Public Const WM_NCLBUTTONDOWN As Integer = &HA1
|
||||
Public Const HTCAPTION As Integer = &H2
|
||||
|
||||
<DllImport("user32.dll", ExactSpelling:=True, SetLastError:=True)>
|
||||
Public Shared Function UpdateLayeredWindow(ByVal hwnd As IntPtr, ByVal hdcDst As IntPtr, ByRef pptDst As Point, ByRef psize As Size, ByVal hdcSrc As IntPtr, ByRef pprSrc As Point, ByVal crKey As Int32, ByRef pblend As BLENDFUNCTION, ByVal dwFlags As Int32) As Bool
|
||||
End Function
|
||||
<DllImport("user32.dll", ExactSpelling:=True, SetLastError:=True)>
|
||||
Public Shared Function GetDC(ByVal hWnd As IntPtr) As IntPtr
|
||||
End Function
|
||||
<DllImport("user32.dll", ExactSpelling:=True)>
|
||||
Public Shared Function ReleaseDC(ByVal hWnd As IntPtr, ByVal hDC As IntPtr) As Integer
|
||||
End Function
|
||||
<DllImport("gdi32.dll", ExactSpelling:=True, SetLastError:=True)>
|
||||
Public Shared Function CreateCompatibleDC(ByVal hDC As IntPtr) As IntPtr
|
||||
End Function
|
||||
<DllImport("gdi32.dll", ExactSpelling:=True, SetLastError:=True)>
|
||||
Public Shared Function DeleteDC(ByVal hdc As IntPtr) As Bool
|
||||
End Function
|
||||
<DllImport("gdi32.dll", ExactSpelling:=True)>
|
||||
Public Shared Function SelectObject(ByVal hDC As IntPtr, ByVal hObject As IntPtr) As IntPtr
|
||||
End Function
|
||||
<DllImport("gdi32.dll", ExactSpelling:=True, SetLastError:=True)>
|
||||
Public Shared Function DeleteObject(ByVal hObject As IntPtr) As Bool
|
||||
End Function
|
||||
<DllImport("User32.dll")>
|
||||
Public Shared Function ReleaseCapture() As Boolean
|
||||
End Function
|
||||
<DllImport("User32.dll")>
|
||||
Public Shared Function SendMessage(ByVal hWnd As IntPtr, ByVal Msg As Integer, ByVal wParam As Integer, ByVal lParam As Integer) As Integer
|
||||
End Function
|
||||
|
||||
End Class
|
||||
|
||||
Public Class ClassFlowForm
|
||||
Inherits Form
|
||||
Public Sub New()
|
||||
FormBorderStyle = FormBorderStyle.None
|
||||
TopMost = True
|
||||
End Sub
|
||||
|
||||
Public Sub SetBitmap(ByVal bitmap As Bitmap)
|
||||
SetBitmap(bitmap, 255, bitmap.Width, bitmap.Height)
|
||||
End Sub
|
||||
|
||||
Public Sub SetBitmap(ByVal Bitmap As Bitmap, ByVal Opacity As Byte, ByVal Width As Integer, ByVal Height As Integer)
|
||||
If Bitmap.PixelFormat <> PixelFormat.Format32bppArgb Then
|
||||
Throw New ApplicationException("The bitmap must be 32ppp with alpha-channel.")
|
||||
End If
|
||||
|
||||
Dim oScreenDeviceContext As IntPtr = Win32.GetDC(IntPtr.Zero)
|
||||
Dim oMemoryDeviceContext As IntPtr = Win32.CreateCompatibleDC(oScreenDeviceContext)
|
||||
Dim oBitmap As IntPtr = IntPtr.Zero
|
||||
Dim oOldBitmap As IntPtr = IntPtr.Zero
|
||||
|
||||
Try
|
||||
oBitmap = Bitmap.GetHbitmap(Color.FromArgb(0))
|
||||
oOldBitmap = Win32.SelectObject(oMemoryDeviceContext, oBitmap)
|
||||
Dim oSize As Win32.Size = New Win32.Size(Width, Height)
|
||||
Dim oPointSource As Win32.Point = New Win32.Point(0, 0)
|
||||
Dim oTopPos As Win32.Point = New Win32.Point(Left, Top)
|
||||
Dim oBlend As Win32.BLENDFUNCTION = New Win32.BLENDFUNCTION With {
|
||||
.BlendOp = Win32.AC_SRC_OVER,
|
||||
.BlendFlags = 0,
|
||||
.SourceConstantAlpha = Opacity,
|
||||
.AlphaFormat = Win32.AC_SRC_ALPHA
|
||||
}
|
||||
Win32.UpdateLayeredWindow(Handle, oScreenDeviceContext, oTopPos, oSize, oMemoryDeviceContext, oPointSource, 0, oBlend, Win32.ULW_ALPHA)
|
||||
Finally
|
||||
Win32.ReleaseDC(IntPtr.Zero, oScreenDeviceContext)
|
||||
|
||||
If oBitmap <> IntPtr.Zero Then
|
||||
Win32.SelectObject(oMemoryDeviceContext, oOldBitmap)
|
||||
Win32.DeleteObject(oBitmap)
|
||||
End If
|
||||
|
||||
Win32.DeleteDC(oMemoryDeviceContext)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Protected Overrides ReadOnly Property CreateParams As CreateParams
|
||||
Get
|
||||
Dim oParams As CreateParams = MyBase.CreateParams
|
||||
oParams.ExStyle = oParams.ExStyle Or &H80000
|
||||
Return oParams
|
||||
End Get
|
||||
End Property
|
||||
End Class
|
||||
@@ -1,192 +0,0 @@
|
||||
Imports System.ComponentModel
|
||||
Imports DevExpress.XtraSplashScreen
|
||||
Imports DigitalData.Modules.Database
|
||||
Imports DigitalData.Modules.Filesystem
|
||||
Imports DigitalData.Modules.Language.Utils
|
||||
Imports DigitalData.Modules.Logging
|
||||
Imports DigitalData.GUIs.ZooFlow.ClassInitLoader
|
||||
Imports DigitalData.GUIs.ZooFlow.ClassConstants
|
||||
|
||||
Public Class ClassInit
|
||||
Private _MainForm As frmAdmin
|
||||
Private _Logger As Logger
|
||||
|
||||
Public Event Completed As EventHandler
|
||||
|
||||
Public Sub New(LogConfig As LogConfig, ParentForm As frmAdmin)
|
||||
_MainForm = ParentForm
|
||||
_Logger = LogConfig.GetLogger()
|
||||
End Sub
|
||||
|
||||
Public Sub InitializeApplication()
|
||||
' Init Connectivity
|
||||
' - Database / Service / Application Server
|
||||
' (Init Licensing)
|
||||
' Init User
|
||||
' Zeile -> Objekt / NameValue List
|
||||
|
||||
If Not SetupDatabase() Then
|
||||
MsgBox("Keine Verbindungs-Informationen hinterlegt. Anwendung wird beendet.", MsgBoxStyle.Critical, _MainForm.Text)
|
||||
Application.Exit()
|
||||
Else
|
||||
Dim oInit As New ClassInitLoader()
|
||||
|
||||
' === Init Schritte definieren
|
||||
oInit.AddStep("Checking connectivity..", AddressOf CheckConnectivity, True)
|
||||
oInit.AddStep("Initializing User..", AddressOf InitializeUser, True)
|
||||
oInit.AddStep("Loading 3rd-party licenses", AddressOf Initialize3rdParty, False)
|
||||
' === Init Schritte definieren
|
||||
|
||||
AddHandler oInit.ProgressChanged, AddressOf ProgressChanged
|
||||
AddHandler oInit.InitCompleted, AddressOf InitCompleted
|
||||
|
||||
oInit.Run()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Private Function SetupDatabase() As Boolean
|
||||
If My.SystemConfig.ConnectionString = String.Empty Then
|
||||
Dim oResult = frmConfigDatabase.ShowDialog()
|
||||
|
||||
If oResult = DialogResult.Cancel Then
|
||||
MsgBox("Es wurde keine Datenbank hinterlegt. Die Anwendung wird beendet.")
|
||||
Return False
|
||||
End If
|
||||
End If
|
||||
|
||||
Return True
|
||||
End Function
|
||||
|
||||
Private Sub ProgressChanged(sender As Object, Progress As InitProgress)
|
||||
SplashScreenManager.Default.SendCommand(frmSplash.SplashScreenCommand.SetProgress, Progress.CurrentPercent)
|
||||
SplashScreenManager.Default.SendCommand(frmSplash.SplashScreenCommand.SetActionName, Progress.CurrentStep.Name)
|
||||
End Sub
|
||||
|
||||
Private Sub InitCompleted(sender As Object, e As RunWorkerCompletedEventArgs)
|
||||
If Not IsNothing(e.Error) Then
|
||||
MsgBox("Beim Initialisieren des Programms ist folgender Fehler aufgetreten:" & vbNewLine & vbNewLine & e.Error.Message, MsgBoxStyle.Critical, _MainForm.Text)
|
||||
Application.ExitThread()
|
||||
Else
|
||||
' Copy back state from MyApplication Helper to My.Application
|
||||
Dim oMyApplication As My.MyApplication = DirectCast(e.Result, My.MyApplication)
|
||||
My.Application.User = oMyApplication.User
|
||||
My.Application.Modules = oMyApplication.Modules
|
||||
My.Application.ModulesActive = oMyApplication.ModulesActive
|
||||
|
||||
RaiseEvent Completed(sender, Nothing)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub CheckConnectivity(MyApplication As My.MyApplication)
|
||||
Dim oCrypt As New EncryptionLegacy("!35452didalog=")
|
||||
Dim oBuilder = My.SystemConfig.GetConnectionStringBuilder(My.SystemConfig.ConnectionString)
|
||||
oBuilder.Password = oCrypt.DecryptData(oBuilder.Password)
|
||||
Dim oDecryptedConnectionString = oBuilder.ToString
|
||||
|
||||
My.Database = New MSSQLServer(My.LogConfig, oDecryptedConnectionString)
|
||||
|
||||
If My.Database.DBInitialized = False Then
|
||||
_Logger.Warn("Datenbank konnte nicht initialisiert werden!")
|
||||
Throw New InitException("Datenbank konnte nicht initialisiert werden!")
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub Initialize3rdParty(obj As Object)
|
||||
Try
|
||||
Dim oSql = "SELECT GDPICTURE_LICENSE FROM TBCW_CONFIGURATION"
|
||||
Dim oDatatable As DataTable = My.Database.GetDatatable(oSql)
|
||||
|
||||
If oDatatable.Rows.Count = 0 Then
|
||||
Throw New InitException("Konfiguration konnte nicht geladen werden!")
|
||||
End If
|
||||
Catch ex As Exception
|
||||
_Logger.Error(ex)
|
||||
Throw New InitException("Fehler beim Laden der Konfiguration!")
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub InitializeUser(MyApplication As My.MyApplication)
|
||||
Try
|
||||
Dim oSql As String = My.Queries.Common.FNDD_MODULE_INIT(Environment.UserName)
|
||||
Dim oDatatable As DataTable = My.Database.GetDatatable(oSql)
|
||||
|
||||
If oDatatable.Rows.Count <= 1 Then
|
||||
Throw New InitException("Benutzer konnte nicht gefunden werden!")
|
||||
End If
|
||||
|
||||
For Each oRow As DataRow In oDatatable.Rows
|
||||
Dim oType As String = oRow("TYPE").ToString
|
||||
|
||||
Select Case oType
|
||||
Case "USER"
|
||||
HandleUserInfo(MyApplication, oRow)
|
||||
|
||||
Case MODULE_CLIPBOARDWATCHER
|
||||
HandleModuleInfo(MyApplication, oType, oRow)
|
||||
|
||||
Case MODULE_GLOBAL_INDEXER
|
||||
HandleModuleInfo(MyApplication, oType, oRow)
|
||||
End Select
|
||||
Next
|
||||
Catch ex As Exception
|
||||
_Logger.Error(ex)
|
||||
Throw New InitException("Fehler beim Laden des Benutzers!")
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Private Sub HandleUserInfo(MyApplication As My.MyApplication, Row As DataRow)
|
||||
Dim oValue As Object = Row.Item("VALUE")
|
||||
Dim oName As String = Row.Item("NAME").ToString
|
||||
|
||||
Select Case oName
|
||||
Case "USER_ID"
|
||||
MyApplication.User.UserId = CInt(oValue)
|
||||
Case "USER_PRENAME"
|
||||
MyApplication.User.GivenName = NotNull(oValue.ToString, String.Empty)
|
||||
Case "USER_SURNAME"
|
||||
MyApplication.User.Surname = NotNull(oValue.ToString, String.Empty)
|
||||
Case "USER_SHORTNAME"
|
||||
MyApplication.User.ShortName = NotNull(oValue.ToString, String.Empty)
|
||||
Case "USER_EMAIL"
|
||||
MyApplication.User.Email = NotNull(oValue.ToString, String.Empty)
|
||||
Case "USER_DATE_FORMAT"
|
||||
MyApplication.User.DateFormat = NotNull(oValue.ToString, "dd.MM.yyyy")
|
||||
Case "USER_LANGUAGE"
|
||||
MyApplication.User.Language = NotNull(oValue.ToString, "de-DE")
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
Private Sub HandleModuleInfo(MyApplication As My.MyApplication, ModuleName As String, Row As DataRow)
|
||||
Dim oValue As Object = Row.Item("VALUE")
|
||||
Dim oName As String = Row.Item("NAME").ToString
|
||||
|
||||
If Not MyApplication.Modules.ContainsKey(ModuleName) Then
|
||||
MyApplication.Modules.Item(ModuleName) = New DigitalData.Modules.ZooFlow.State.ModuleState()
|
||||
End If
|
||||
|
||||
Select Case oName
|
||||
Case "MODULE_ACCESS"
|
||||
If CBool(oValue) Then
|
||||
SyncLock MyApplication.ModulesActive
|
||||
MyApplication.ModulesActive.Add(ModuleName)
|
||||
End SyncLock
|
||||
End If
|
||||
MyApplication.Modules.Item(ModuleName).HasAccess = CBool(oValue)
|
||||
|
||||
Case "IS_ADMIN"
|
||||
MyApplication.Modules.Item(ModuleName).IsAdmin = CBool(oValue)
|
||||
|
||||
Case "USER_COUNT_LOGGED_IN"
|
||||
MyApplication.Modules.Item(ModuleName).LoggedIn = CInt(oValue) + 1
|
||||
|
||||
Case "RESULT"
|
||||
Dim oLines = oValue.ToString.Split("|"c)
|
||||
_Logger.Debug("Access Result for Module {0}", ModuleName)
|
||||
For Each oLine In oLines
|
||||
_Logger.Debug(oLine.Trim)
|
||||
Next
|
||||
End Select
|
||||
End Sub
|
||||
End Class
|
||||
@@ -1,103 +0,0 @@
|
||||
Imports System.ComponentModel
|
||||
Imports DigitalData.Modules.Logging
|
||||
|
||||
Public Class ClassInitLoader
|
||||
Private _Worker As BackgroundWorker
|
||||
Private _Logger As Logger
|
||||
Private _CurrentStep As InitStep
|
||||
|
||||
Public Steps As New List(Of InitStep)
|
||||
Public Event ProgressChanged As EventHandler(Of InitProgress)
|
||||
Public Event InitCompleted As EventHandler(Of RunWorkerCompletedEventArgs)
|
||||
|
||||
Public Sub New()
|
||||
_Logger = My.LogConfig.GetLogger()
|
||||
End Sub
|
||||
|
||||
Public Sub AddStep(Name As String, Action As Action(Of Object), Optional Fatal As Boolean = False)
|
||||
Steps.Add(New InitStep() With {
|
||||
.Name = Name,
|
||||
.Action = Action,
|
||||
.Fatal = Fatal
|
||||
})
|
||||
End Sub
|
||||
|
||||
Public Function Run() As Boolean
|
||||
_Worker = New BackgroundWorker()
|
||||
_Worker.WorkerReportsProgress = True
|
||||
|
||||
AddHandler _Worker.DoWork, AddressOf DoWork
|
||||
AddHandler _Worker.ProgressChanged, Sub(sender As Object, e As ProgressChangedEventArgs)
|
||||
Dim oProgress As New InitProgress() With {
|
||||
.CurrentStep = _CurrentStep,
|
||||
.CurrentPercent = e.ProgressPercentage
|
||||
}
|
||||
RaiseEvent ProgressChanged(sender, oProgress)
|
||||
End Sub
|
||||
AddHandler _Worker.RunWorkerCompleted, Sub(sender As Object, e As RunWorkerCompletedEventArgs)
|
||||
RaiseEvent InitCompleted(sender, e)
|
||||
End Sub
|
||||
|
||||
_Worker.RunWorkerAsync(My.Application)
|
||||
|
||||
Return True
|
||||
End Function
|
||||
|
||||
Private Sub DoWork(sender As Object, e As DoWorkEventArgs)
|
||||
Dim oMyApplication As My.MyApplication = DirectCast(e.Argument, My.MyApplication)
|
||||
Dim oStepCounter = 0
|
||||
|
||||
For Each oStep In Steps
|
||||
_CurrentStep = oStep
|
||||
|
||||
Try
|
||||
oStep.Action.Invoke(oMyApplication)
|
||||
Catch ex As Exception
|
||||
_Logger.Error(ex)
|
||||
_Logger.Warn("Init Step '{0}' failed!", oStep.Name)
|
||||
|
||||
If oStep.Fatal Then
|
||||
_Logger.Warn("Fatal error in '{0}'. Init will be aborted!", oStep.Name)
|
||||
Throw ex
|
||||
End If
|
||||
End Try
|
||||
|
||||
oStepCounter += 1
|
||||
|
||||
Dim oPercentComplete As Integer = CInt(Math.Truncate(oStepCounter / Steps.Count * 100))
|
||||
_Worker.ReportProgress(oPercentComplete)
|
||||
|
||||
Threading.Thread.Sleep(600)
|
||||
Next
|
||||
|
||||
e.Result = oMyApplication
|
||||
End Sub
|
||||
|
||||
Public Class InitProgress
|
||||
Public CurrentStep As InitStep
|
||||
Public CurrentPercent As Integer
|
||||
End Class
|
||||
|
||||
Public Class InitStep
|
||||
''' <summary>
|
||||
''' Human Readable Name of init step
|
||||
''' </summary>
|
||||
Public Name As String
|
||||
''' <summary>
|
||||
''' The function to execute
|
||||
''' </summary>
|
||||
Public Action As Action(Of Object)
|
||||
''' <summary>
|
||||
''' Should init be aborted if this step fails?
|
||||
''' </summary>
|
||||
Public Fatal As Boolean
|
||||
End Class
|
||||
|
||||
Public Class InitException
|
||||
Inherits ApplicationException
|
||||
|
||||
Public Sub New(message As String)
|
||||
MyBase.New(message)
|
||||
End Sub
|
||||
End Class
|
||||
End Class
|
||||
@@ -1,548 +0,0 @@
|
||||
Imports System.Text.RegularExpressions
|
||||
Imports DigitalData.Modules.Language.Utils
|
||||
Imports DigitalData.Modules.Logging
|
||||
Imports DigitalData.Modules.Windows
|
||||
Imports DigitalData.Modules.ZooFlow.Params
|
||||
|
||||
Public Class ClassProfileFilter
|
||||
Private _ProfileTable As DataTable
|
||||
Private _ProcessTable As DataTable
|
||||
Private _WindowTable As DataTable
|
||||
Private _ControlTable As DataTable
|
||||
Private _Profiles As List(Of ProfileData)
|
||||
Private _DebugData As DebugData
|
||||
Private _Logger As Logger
|
||||
Private _Window As Window
|
||||
|
||||
Private _TreeView As New TreeView
|
||||
|
||||
' TODO: Fill this Class!!!! :D
|
||||
Class DebugData
|
||||
Public ProcessMatch As List(Of String)
|
||||
Public ClipboardMatch As List(Of String)
|
||||
Public WindowMatch As List(Of String)
|
||||
Public WindowRegexMatch As List(Of String)
|
||||
End Class
|
||||
|
||||
Public ReadOnly Property Profiles As List(Of ProfileData)
|
||||
Get
|
||||
Return _Profiles
|
||||
End Get
|
||||
End Property
|
||||
|
||||
Public ReadOnly Property DebugTree As TreeView
|
||||
Get
|
||||
Return _TreeView
|
||||
End Get
|
||||
End Property
|
||||
|
||||
|
||||
Public Sub New(LogConfig As LogConfig, ProfileDatatable As DataTable, ProcessTable As DataTable, WindowDatatable As DataTable, ControlDatatable As DataTable)
|
||||
Try
|
||||
_Logger = LogConfig.GetLogger()
|
||||
_DebugData = New DebugData()
|
||||
_ProfileTable = ProfileDatatable
|
||||
_ProcessTable = ProcessTable
|
||||
_WindowTable = WindowDatatable
|
||||
_ControlTable = ControlDatatable
|
||||
_Profiles = TransformProfiles()
|
||||
_Window = New Window(LogConfig)
|
||||
Catch ex As Exception
|
||||
_Logger.Error(ex)
|
||||
Throw ex
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Function ToList() As List(Of ProfileData)
|
||||
Return _Profiles
|
||||
End Function
|
||||
|
||||
Private Function FindNode(ByVal Node As TreeNode, SearchTerm As String)
|
||||
Dim oNode As TreeNode
|
||||
For Each oNode In Node.Nodes
|
||||
If oNode.Text = SearchTerm Then
|
||||
Return oNode
|
||||
End If
|
||||
Next
|
||||
Return Node
|
||||
End Function
|
||||
|
||||
Private Function GetLowestNode(ByVal Node As TreeNode) As TreeNode
|
||||
If Node.GetNodeCount(False) = 1 Then
|
||||
Return GetLowestNode(Node.Nodes.Item(0))
|
||||
Else
|
||||
Return Node
|
||||
End If
|
||||
End Function
|
||||
|
||||
Public Function FilterProfilesByClipboardRegex(Profiles As List(Of ProfileData), ClipboardContents As String) As List(Of ProfileData)
|
||||
Dim oFilteredProfiles As New List(Of ProfileData)
|
||||
For Each oProfile In Profiles
|
||||
_Logger.Debug("Current Profile: {0}", oProfile.Name)
|
||||
|
||||
Try
|
||||
Dim oRegex As New Regex(oProfile.Regex)
|
||||
Dim oMatch = oRegex.Match(ClipboardContents)
|
||||
If oMatch.Success Then
|
||||
_Logger.Debug("FilterProfilesByClipboardRegex: Clipboard Regex Matched: {0}", ClipboardContents)
|
||||
'TODO: Add Debug Data
|
||||
oFilteredProfiles.Add(oProfile)
|
||||
oProfile.IsMatched = True
|
||||
Dim oNode As New TreeNode($"Profile: {oProfile.Name}")
|
||||
oNode.ImageIndex = 0
|
||||
Dim f = New Font("Tahoma", 9, FontStyle.Bold)
|
||||
oNode.NodeFont = f
|
||||
_TreeView.Nodes.Add(oNode)
|
||||
Dim oSubnode As New TreeNode($"MATCH on Global Clipboard Regex: {oProfile.Regex}")
|
||||
oSubnode.ImageIndex = 1
|
||||
oSubnode.Tag = oProfile.Name & "-REGEX"
|
||||
oNode.Nodes.Add(oSubnode)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
_Logger.Warn("Regex '{0}' could not be processed for input '{1}'", oProfile.Regex, ClipboardContents)
|
||||
_Logger.Error(ex)
|
||||
End Try
|
||||
Next
|
||||
|
||||
Return oFilteredProfiles
|
||||
End Function
|
||||
Public Function FilterProfilesByProcess(Profiles As List(Of ProfileData), CurrentProcessName As String) As List(Of ProfileData)
|
||||
Dim oFilteredProfiles As New List(Of ProfileData)
|
||||
Try
|
||||
For Each oProfile In Profiles
|
||||
Dim oGuid = oProfile.Guid
|
||||
|
||||
If oProfile.IsMatched = False Then
|
||||
Continue For
|
||||
End If
|
||||
|
||||
|
||||
Dim oProcesses As New List(Of ProfileData.ProcessData)
|
||||
For Each oProcessDef As ProfileData.ProcessData In oProfile.Processes
|
||||
If oProcessDef.ProfileId <> oGuid Then
|
||||
Continue For
|
||||
End If
|
||||
_Logger.Debug($"FilterProfilesByProcess: Checking Profile: {oProfile.Name} ...")
|
||||
If oProcessDef.ProcessName.ToLower = CurrentProcessName.ToLower Then
|
||||
_Logger.Debug($"Yes...Processname Matched: {oProcessDef.ProcessName}")
|
||||
'oProfile.MATCH_PROCESSNAME = $"Processname Matched: {oProfile.ProcessName}"
|
||||
'TODO: Add Debug Data
|
||||
oFilteredProfiles.Add(oProfile)
|
||||
oProfile.MatchedProcessID = oProcessDef.Guid
|
||||
oProcessDef.IsMatched = True
|
||||
oProcesses.Add(oProcessDef)
|
||||
oProfile.IsMatched = True
|
||||
oProfile.MatchedProcessID = oProcessDef.Guid
|
||||
Dim oParentNode As TreeNode
|
||||
Dim oExit = False
|
||||
For Each oTreeNode As TreeNode In _TreeView.Nodes
|
||||
For Each oNodes As TreeNode In oTreeNode.Nodes
|
||||
If oExit = True Then Exit For
|
||||
If oNodes.Tag = oProfile.Name & "-REGEX" Then
|
||||
oParentNode = oNodes
|
||||
oExit = True
|
||||
Exit For
|
||||
End If
|
||||
Next
|
||||
Next
|
||||
|
||||
If Not IsNothing(oParentNode) Then
|
||||
Dim oNode As New TreeNode($"MATCH on Process: {oProcessDef.ProcessName}")
|
||||
oNode.ImageIndex = 4
|
||||
oNode.Tag = oProfile.Name & "-PROCESS"
|
||||
oParentNode.Nodes.Add(oNode)
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
If oFilteredProfiles.Count > 0 Then
|
||||
oProfile.Processes = oProcesses
|
||||
End If
|
||||
Next
|
||||
|
||||
Return oFilteredProfiles
|
||||
Catch ex As Exception
|
||||
_Logger.Warn("Unexpected error in FilterProfilesByProcess...")
|
||||
_Logger.Error(ex)
|
||||
End Try
|
||||
|
||||
End Function
|
||||
Public Function FilterWindowsByWindowTitleRegex(Profiles As List(Of ProfileData), WindowTitle As String) As List(Of ProfileData)
|
||||
Dim oProfiles As New List(Of ProfileData)
|
||||
|
||||
For Each oProfile As ProfileData In Profiles
|
||||
_Logger.Debug("Checking WindowDefinition for profile: {0}...", oProfile.Name)
|
||||
If oProfile.IsMatched = False Then Continue For
|
||||
Dim oWindows As New List(Of ProfileData.WindowData)
|
||||
|
||||
For Each oWindowDef As ProfileData.WindowData In oProfile.Windows
|
||||
If oWindowDef.WindowProcessID <> oProfile.MatchedProcessID Then Continue For
|
||||
Try
|
||||
If oWindowDef.Regex = String.Empty Then
|
||||
oProfile.MatchedWindowID = oWindowDef.Guid
|
||||
oWindowDef.IsMatched = True
|
||||
oWindows.Add(oWindowDef)
|
||||
Exit For
|
||||
End If
|
||||
|
||||
Dim oRegex As New Regex(oWindowDef.Regex)
|
||||
Dim oMatch = oRegex.Match(WindowTitle)
|
||||
|
||||
If oMatch.Success Then
|
||||
_Logger.Debug("MATCH on WindowTitle: {0}", WindowTitle)
|
||||
'TODO: Add Debug Data
|
||||
oProfile.MatchedWindowID = oWindowDef.Guid
|
||||
oWindowDef.IsMatched = True
|
||||
oWindows.Add(oWindowDef)
|
||||
Dim olowestNode As TreeNode = Node_Get_Lowest_Node(oProfile.Name & "-REGEX")
|
||||
If Not IsNothing(olowestNode) Then
|
||||
Dim oNode As New TreeNode($"MATCH on WindowTitle: [{WindowTitle}]")
|
||||
oNode.ImageIndex = 3
|
||||
oNode.Tag = oProfile.Name & "-WINDOW"
|
||||
olowestNode.Nodes.Add(oNode)
|
||||
End If
|
||||
Exit For
|
||||
End If
|
||||
Catch ex As Exception
|
||||
_Logger.Warn("Regex '{0}' could not be processed for input '{1}'", oWindowDef.Regex, WindowTitle)
|
||||
_Logger.Error(ex)
|
||||
End Try
|
||||
Next
|
||||
|
||||
If oWindows.Count > 0 Then
|
||||
oProfile.Windows = oWindows
|
||||
oProfile.IsMatched = True
|
||||
oProfiles.Add(oProfile)
|
||||
End If
|
||||
Next
|
||||
|
||||
Return oProfiles
|
||||
End Function
|
||||
Public Function FilterWindowsByWindowClipboardRegex(Profiles As List(Of ProfileData), ClipboardContents As String) As List(Of ProfileData)
|
||||
Dim oProfiles As New List(Of ProfileData)
|
||||
|
||||
For Each oProfile As ProfileData In Profiles
|
||||
_Logger.Debug("Current Profile: {0}", oProfile.Name)
|
||||
|
||||
Dim oWindows As New List(Of ProfileData.WindowData)
|
||||
|
||||
For Each w As ProfileData.WindowData In oProfile.Windows
|
||||
Try
|
||||
If w.Regex = String.Empty Then
|
||||
oWindows.Add(w)
|
||||
End If
|
||||
|
||||
Dim oRegex As New Regex(w.Regex)
|
||||
Dim oMatch = oRegex.Match(ClipboardContents)
|
||||
|
||||
If oMatch.Success Then
|
||||
_Logger.Debug("Window Clipboard Regex Matched: {0}", ClipboardContents)
|
||||
Dim oResult As TreeNode
|
||||
For Each oTreeNode In _TreeView.Nodes
|
||||
If Not IsNothing(oResult) Then Exit For
|
||||
If oTreeNode.Tag = oProfile.Name & "-REGEX" Then
|
||||
oResult = oTreeNode
|
||||
End If
|
||||
|
||||
|
||||
Next
|
||||
If Not IsNothing(oResult) Then
|
||||
Dim oNode As New TreeNode($"MATCH on WINDOW Clipboard Regex: [{w.Regex}]")
|
||||
oNode.ImageIndex = 2
|
||||
oNode.Tag = oProfile.Name & "-WINDOW_REGEX"
|
||||
Dim olowestNode As TreeNode = GetLowestNode(oResult)
|
||||
olowestNode.Nodes.Add(oNode)
|
||||
End If
|
||||
|
||||
oWindows.Add(w)
|
||||
|
||||
|
||||
End If
|
||||
Catch ex As Exception
|
||||
_Logger.Warn("Regex '{0}' could not be processed for input '{1}'", w.Regex, ClipboardContents)
|
||||
_Logger.Error(ex)
|
||||
End Try
|
||||
Next
|
||||
|
||||
If oWindows.Count > 0 Then
|
||||
oProfile.Windows = oWindows
|
||||
oProfiles.Add(oProfile)
|
||||
End If
|
||||
Next
|
||||
|
||||
Return oProfiles
|
||||
End Function
|
||||
|
||||
Public Function FilterProfilesByFocusedControl(Profiles As List(Of ProfileData), ClipboardContents As String, ControlFocusresult As String) As List(Of ProfileData)
|
||||
Dim oWindow As Window.WindowInfo
|
||||
Dim oFocusedControl As Window.WindowInfo
|
||||
Dim oFocusedControlName As String = String.Empty
|
||||
|
||||
Try
|
||||
oWindow = _Window.GetWindowInfo()
|
||||
oFocusedControl = _Window.GetFocusedControl(oWindow.hWnd)
|
||||
|
||||
If oFocusedControl Is Nothing Then
|
||||
_Logger.Info("Could not get FocusedControl in Window (Old method) {0}", oWindow.WindowTitle)
|
||||
oFocusedControlName = String.Empty
|
||||
Else
|
||||
oFocusedControlName = oFocusedControl.ControlName
|
||||
End If
|
||||
Catch ex As Exception
|
||||
_Logger.Warn("Error while getting Focused control (Old method)")
|
||||
_Logger.Error(ex)
|
||||
oFocusedControlName = String.Empty
|
||||
End Try
|
||||
|
||||
Dim oFilteredProfiles As New List(Of ProfileData)
|
||||
|
||||
For Each oProfileMatchedSofar In Profiles
|
||||
If oProfileMatchedSofar.IsMatched = False Then Continue For
|
||||
|
||||
_Logger.Debug("Checking ControlDefiniotion on profile: {0}", oProfileMatchedSofar.Name)
|
||||
If oProfileMatchedSofar.Controls.Count = 0 Then
|
||||
oFilteredProfiles.Add(oProfileMatchedSofar)
|
||||
|
||||
Dim oNode As New TreeNode($"No Controls configured!")
|
||||
oNode.ImageIndex = 2
|
||||
oNode.ForeColor = Color.Blue
|
||||
oNode.Tag = oProfileMatchedSofar.Name & "-NOCONTROLCONFIG"
|
||||
Dim f = New Font("Tahoma", 10, FontStyle.Bold)
|
||||
oNode.NodeFont = f
|
||||
_TreeView.Nodes.Add(oNode)
|
||||
Continue For
|
||||
End If
|
||||
|
||||
Dim oControls As New List(Of ProfileData.ControlData)
|
||||
|
||||
For Each oControlDefinition In oProfileMatchedSofar.Controls
|
||||
Try
|
||||
If oControlDefinition.WindowId <> oProfileMatchedSofar.MatchedWindowID Then Continue For
|
||||
_Logger.Debug($"Working on ControlDefinition: {oControlDefinition.Guid}-{oControlDefinition.ControlName}...")
|
||||
If oControlDefinition.Regex = String.Empty Then
|
||||
oProfileMatchedSofar.MatchedControlID = oControlDefinition.Guid
|
||||
oControlDefinition.IsMatched = True
|
||||
oControls.Add(oControlDefinition)
|
||||
Exit For
|
||||
End If
|
||||
'Dim oResult As TreeNode
|
||||
'For Each oTreeNode In CurrMatchTreeView.Nodes
|
||||
' oResult = NodeFind(oTreeNode, $"Global Clipboard Regex Matched [{oProfile.Regex}]")
|
||||
'Next
|
||||
'Dim oNode As TreeNode
|
||||
Dim oNodeCaption As String
|
||||
'Dim oAddNode As Boolean = False
|
||||
Dim oRegex As New Regex(oControlDefinition.Regex)
|
||||
|
||||
Dim oFocusedControlResult As String = ""
|
||||
|
||||
If oControlDefinition.AutomationId <> String.Empty And oControlDefinition.ControlName = String.Empty Then
|
||||
_Logger.Debug($"AutomationID should be used...")
|
||||
If Not IsNothing(ControlFocusresult) Then
|
||||
If ControlFocusresult <> String.Empty Then
|
||||
_Logger.Debug($"AutomationID will be used...")
|
||||
oFocusedControlResult = ControlFocusresult
|
||||
End If
|
||||
End If
|
||||
ElseIf oControlDefinition.AutomationId = String.Empty And oControlDefinition.ControlName <> String.Empty Then
|
||||
_Logger.Debug($"ControlName should be used...")
|
||||
If Not IsNothing(oFocusedControlName) Then
|
||||
If oFocusedControlName <> String.Empty Then
|
||||
_Logger.Debug($"ControlName will be used...")
|
||||
oFocusedControlResult = oFocusedControlName
|
||||
End If
|
||||
End If
|
||||
|
||||
End If
|
||||
If oFocusedControlResult <> String.Empty Then
|
||||
Dim oControlRegex As New Regex(oControlDefinition.Regex)
|
||||
Dim oControlMatch = oRegex.Match(oFocusedControlResult)
|
||||
|
||||
If oControlMatch.Success Then
|
||||
_Logger.Debug($"MATCH on Focused Control [{oFocusedControlResult}] with Regex [{oControlDefinition.Regex}]")
|
||||
oProfileMatchedSofar.IsMatched = True
|
||||
oProfileMatchedSofar.MatchedControlID = oControlDefinition.Guid
|
||||
oControlDefinition.IsMatched = True
|
||||
oControls.Add(oControlDefinition)
|
||||
Dim olowestNode As TreeNode = Node_Get_Lowest_Node(oProfileMatchedSofar.Name & "-REGEX")
|
||||
If Not IsNothing(olowestNode) Then
|
||||
Dim oNode As New TreeNode($"MATCH on Focused Control [{oFocusedControlResult}] with Regex [{oControlDefinition.Regex}]")
|
||||
oNode.ImageIndex = 2
|
||||
oNode.Tag = oProfileMatchedSofar.Name & "-CONTROL"
|
||||
olowestNode.Nodes.Add(oNode)
|
||||
End If
|
||||
Exit For
|
||||
End If
|
||||
End If
|
||||
Catch ex As Exception
|
||||
_Logger.Warn("Regex '{0}' could not be processed for input '{1}'", oControlDefinition.Regex, oFocusedControlName)
|
||||
_Logger.Error(ex)
|
||||
End Try
|
||||
Next
|
||||
|
||||
If oControls.Count > 0 Then
|
||||
oProfileMatchedSofar.Controls = oControls
|
||||
oFilteredProfiles.Add(oProfileMatchedSofar)
|
||||
Else
|
||||
Dim olowestNode As TreeNode = Node_Get_Lowest_Node(oProfileMatchedSofar.Name & "-REGEX")
|
||||
If Not IsNothing(olowestNode) Then
|
||||
Dim oNode As New TreeNode($"NO MATCHES on Focused Control, Please check the Config")
|
||||
oNode.ImageIndex = 2
|
||||
oNode.Tag = oProfileMatchedSofar.Name & "-CONTROLNoMatch"
|
||||
olowestNode.Nodes.Add(oNode)
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
|
||||
Return oFilteredProfiles
|
||||
End Function
|
||||
Public Function FilterProfilesBySearchResults(Profiles As List(Of ProfileData)) As List(Of ProfileData)
|
||||
Dim oProfiles As New List(Of ProfileData)
|
||||
|
||||
For Each oProfile In Profiles
|
||||
Dim oResultDocs As Integer = 0
|
||||
Dim oResultData As Integer = 0
|
||||
|
||||
Dim oPatterns As New ClassPatterns(My.LogConfig)
|
||||
Dim oDataSearches As DataTable = My.Database.GetDatatable($"SELECT COUNT_COMMAND FROM TBCW_PROF_DATA_SEARCH WHERE ACTIVE = 1 AND PROFILE_ID = {oProfile.Guid}")
|
||||
Dim oDocSearches As DataTable = My.Database.GetDatatable($"SELECT COUNT_COMMAND FROM TBCW_PROF_DOC_SEARCH WHERE ACTIVE = 1 AND PROFILE_ID = {oProfile.Guid}")
|
||||
|
||||
For Each oRow As DataRow In oDataSearches.Rows
|
||||
Dim oCountCommand = String.Empty
|
||||
Try
|
||||
oCountCommand = NotNull(oRow.Item("COUNT_COMMAND"), String.Empty)
|
||||
|
||||
If oCountCommand = String.Empty Then
|
||||
Continue For
|
||||
End If
|
||||
|
||||
oCountCommand = oPatterns.ReplaceAllValues(oCountCommand, My.Application.User)
|
||||
oResultData += NotNull(Of Integer)(My.Database.GetScalarValue(oCountCommand), 0)
|
||||
Catch ex As Exception
|
||||
_Logger.Warn("Invalid SQL Query for Counting Data in Profile {0}: {1}", oProfile.Guid, oCountCommand)
|
||||
End Try
|
||||
Next
|
||||
|
||||
For Each oRow As DataRow In oDocSearches.Rows
|
||||
Dim oCountCommand = String.Empty
|
||||
Try
|
||||
oCountCommand = NotNull(oRow.Item("COUNT_COMMAND"), String.Empty)
|
||||
|
||||
If oCountCommand = String.Empty Then
|
||||
Continue For
|
||||
End If
|
||||
|
||||
oCountCommand = oPatterns.ReplaceAllValues(oCountCommand, My.Application.User)
|
||||
oResultDocs += NotNull(Of Integer)(My.Database.GetScalarValue(oCountCommand), 0)
|
||||
Catch ex As Exception
|
||||
_Logger.Warn("Invalid SQL Query for Counting Data in Profile {0}: {1}", oProfile.Guid, oCountCommand)
|
||||
End Try
|
||||
Next
|
||||
|
||||
If oResultData > 0 Or oResultDocs > 0 Then
|
||||
oProfile.CountData = oResultData
|
||||
oProfile.CountDocs = oResultDocs
|
||||
oProfiles.Add(oProfile)
|
||||
End If
|
||||
Next
|
||||
|
||||
Return oProfiles
|
||||
End Function
|
||||
|
||||
Private Function Node_Get_Lowest_Node(NodeTag As String) As TreeNode
|
||||
Dim oExit = False
|
||||
Dim oParentNode As TreeNode
|
||||
For Each oTreeNode As TreeNode In _TreeView.Nodes
|
||||
For Each oNodes As TreeNode In oTreeNode.Nodes
|
||||
If oExit = True Then Exit For
|
||||
If oNodes.Tag = NodeTag Then
|
||||
oParentNode = oNodes
|
||||
oExit = True
|
||||
Exit For
|
||||
End If
|
||||
Next
|
||||
Next
|
||||
Dim olowestNode As TreeNode = GetLowestNode(oParentNode)
|
||||
|
||||
Return olowestNode
|
||||
End Function
|
||||
Public Function ClearNotMatchedProfiles(Profiles As List(Of ProfileData)) As List(Of ProfileData)
|
||||
Dim oFilteredProfiles As New List(Of ProfileData)
|
||||
For Each oProfile In Profiles
|
||||
If oProfile.IsMatched Then
|
||||
oFilteredProfiles.Add(oProfile)
|
||||
End If
|
||||
Next
|
||||
Return oFilteredProfiles
|
||||
End Function
|
||||
Private Function TransformProfiles() As List(Of ProfileData)
|
||||
Dim oList As New List(Of ProfileData)
|
||||
|
||||
For Each oRow As DataRow In _ProfileTable.Rows
|
||||
Dim oProfileId = oRow.Item("GUID")
|
||||
Dim oProcessList As List(Of ProfileData.ProcessData) = TransformProcesses(oProfileId, _ProcessTable)
|
||||
Dim oWindowList As List(Of ProfileData.WindowData) = TransformWindows(oProfileId, _WindowTable)
|
||||
Dim oControlList As List(Of ProfileData.ControlData) = TransformControls(oProfileId, _ControlTable)
|
||||
|
||||
oList.Add(New ProfileData() With {
|
||||
.Guid = oRow.Item("GUID"),
|
||||
.Regex = NotNull(oRow.Item("REGEX_EXPRESSION"), String.Empty),
|
||||
.Name = NotNull(oRow.Item("NAME"), String.Empty),
|
||||
.Comment = NotNull(oRow.Item("COMMENT"), String.Empty),
|
||||
.ProfileType = NotNull(oRow.Item("PROFILE_TYPE"), String.Empty),
|
||||
.Processes = oProcessList,
|
||||
.Windows = oWindowList,
|
||||
.Controls = oControlList
|
||||
})
|
||||
Next
|
||||
|
||||
Return oList
|
||||
End Function
|
||||
Private Function TransformControls(ProfileId As Integer, ControlDatatable As DataTable) As List(Of ProfileData.ControlData)
|
||||
Dim oControlList As New List(Of ProfileData.ControlData)
|
||||
|
||||
For Each oRow As DataRow In ControlDatatable.Rows
|
||||
If oRow.Item("PROFILE_ID") = ProfileId Then
|
||||
oControlList.Add(New ProfileData.ControlData() With {
|
||||
.Guid = oRow.Item("GUID"),
|
||||
.Description = NotNull(oRow.Item("DESCRIPTION"), String.Empty),
|
||||
.Regex = NotNull(oRow.Item("REGEX"), String.Empty),
|
||||
.AutomationId = NotNull(oRow.Item("AUTOMATION_ID"), String.Empty),
|
||||
.WindowId = oRow.Item("WINDOW_ID")
|
||||
})
|
||||
End If
|
||||
Next
|
||||
|
||||
Return oControlList
|
||||
End Function
|
||||
Private Function TransformProcesses(ProfileId As Integer, ProcessDatatable As DataTable) As List(Of ProfileData.ProcessData)
|
||||
Dim oProcessList As New List(Of ProfileData.ProcessData)
|
||||
|
||||
For Each oRow As DataRow In ProcessDatatable.Rows
|
||||
oProcessList.Add(New ProfileData.ProcessData() With {
|
||||
.Guid = oRow.Item("GUID"),
|
||||
.ProfileId = oRow.Item("PROFILE_ID"),
|
||||
.ProcessName = NotNull(oRow.Item("PROC_NAME"), String.Empty)
|
||||
})
|
||||
|
||||
Next
|
||||
|
||||
Return oProcessList
|
||||
End Function
|
||||
Private Function TransformWindows(ProfileId As Integer, WindowDatatable As DataTable) As List(Of ProfileData.WindowData)
|
||||
Dim oWindowList As New List(Of ProfileData.WindowData)
|
||||
|
||||
For Each oRow As DataRow In WindowDatatable.Rows
|
||||
oWindowList.Add(New ProfileData.WindowData() With {
|
||||
.Guid = oRow.Item("GUID"),
|
||||
.WindowProcessID = oRow.Item("PROCESS_ID"),
|
||||
.Title = NotNull(oRow.Item("DESCRIPTION"), String.Empty),
|
||||
.Regex = NotNull(oRow.Item("REGEX"), String.Empty),
|
||||
.Sequence = NotNull(oRow.Item("SEQUENCE"), 0)
|
||||
})
|
||||
Next
|
||||
|
||||
Return oWindowList
|
||||
End Function
|
||||
|
||||
|
||||
End Class
|
||||
@@ -1,8 +0,0 @@
|
||||
Namespace ClipboardWatcher
|
||||
Public Class State
|
||||
Public UserProfiles As DataTable
|
||||
Public ProfileProcesses As DataTable
|
||||
Public ProfileWindows As DataTable
|
||||
Public ProfileControls As DataTable
|
||||
End Class
|
||||
End Namespace
|
||||
@@ -1,48 +0,0 @@
|
||||
Imports System.Xml.Serialization
|
||||
Imports DigitalData.Modules.Config.ConfigAttributes
|
||||
|
||||
''' <summary>
|
||||
''' --- User Config for EDMI ---
|
||||
'''
|
||||
''' All settings are simple properties that should have a default value where possible
|
||||
'''
|
||||
''' More complex properties (for example, ServiceConnection) are built from simple ones,
|
||||
''' should be readonly and have an `XmlIgnore` Attribute to prevent them from being saved to the config file.
|
||||
'''
|
||||
''' They can make saving and loading complex properties more easy.
|
||||
'''
|
||||
''' The config is loaded with `ConfigManager` which is initialized in ApplicationEvents
|
||||
''' to ensure that the config is loaded before any of the forms (that might need a config)
|
||||
'''
|
||||
''' The config object can be accessed in two ways:
|
||||
'''
|
||||
''' - My.ConfigManager.Config
|
||||
''' - My.Config (which simply points to My.ConfigManager.Config)
|
||||
'''
|
||||
''' After changing a config value, My.ConfigManager.Save() must be called to persist the change in the config file
|
||||
''' </summary>
|
||||
Public Class ClassConfig
|
||||
Public Function GetConnectionStringBuilder(ConnectionString As String) As SqlClient.SqlConnectionStringBuilder
|
||||
Try
|
||||
If ConnectionString = String.Empty Then
|
||||
Return Nothing
|
||||
End If
|
||||
|
||||
Dim oBuilder As New SqlClient.SqlConnectionStringBuilder(ConnectionString)
|
||||
Return oBuilder
|
||||
Catch ex As Exception
|
||||
Return Nothing
|
||||
End Try
|
||||
End Function
|
||||
|
||||
|
||||
' === Service Configuration ===
|
||||
<ConnectionString>
|
||||
Public Property ConnectionString As String = String.Empty
|
||||
|
||||
' === Logging Configuration
|
||||
Public Property LogDebug As Boolean = False
|
||||
|
||||
' === User Configuration ===
|
||||
Public Property UserLanguage As String = "de-DE"
|
||||
End Class
|
||||
@@ -1,8 +0,0 @@
|
||||
Public Class ClassUIConfig
|
||||
Public Property SkinName As String = "Office 2016 Colorful"
|
||||
Public Property FlowForm As New FlowFormConfig
|
||||
|
||||
Public Class FlowFormConfig
|
||||
Public Property Location As New Point(0, 0)
|
||||
End Class
|
||||
End Class
|
||||
@@ -1,11 +0,0 @@
|
||||
Public Class OnFlowFormInteractionEvent
|
||||
Public Enum FlowFormInteraction
|
||||
Click
|
||||
End Enum
|
||||
|
||||
Public ReadOnly Property Interaction As FlowFormInteraction
|
||||
|
||||
Public Sub New(Interaction As FlowFormInteraction)
|
||||
_Interaction = Interaction
|
||||
End Sub
|
||||
End Class
|
||||
@@ -1,13 +0,0 @@
|
||||
Public Class OnFlowFormStateChangedEvent
|
||||
Public Enum FlowFormState
|
||||
[Default]
|
||||
HasSearchResults
|
||||
HasFileDropped
|
||||
End Enum
|
||||
|
||||
Public ReadOnly Property State As FlowFormState
|
||||
|
||||
Public Sub New(State As FlowFormState)
|
||||
_State = State
|
||||
End Sub
|
||||
End Class
|
||||
38
ZooFlow/My Project/Application.Designer.vb
generated
@@ -1,38 +0,0 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' Dieser Code wurde von einem Tool generiert.
|
||||
' Laufzeitversion:4.0.30319.42000
|
||||
'
|
||||
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
|
||||
' der Code erneut generiert wird.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
|
||||
Namespace My
|
||||
|
||||
'HINWEIS: Diese Datei wird automatisch generiert und darf nicht direkt bearbeitet werden. Wenn Sie Änderungen vornehmen möchten
|
||||
' oder in dieser Datei Buildfehler auftreten, wechseln Sie zum Projekt-Designer.
|
||||
' (Wechseln Sie dazu zu den Projekteigenschaften, oder doppelklicken Sie auf den Knoten "Mein Projekt" im
|
||||
' Projektmappen-Explorer). Nehmen Sie auf der Registerkarte "Anwendung" entsprechende Änderungen vor.
|
||||
'
|
||||
Partial Friend Class MyApplication
|
||||
|
||||
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
|
||||
Public Sub New()
|
||||
MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
|
||||
Me.IsSingleInstance = false
|
||||
Me.EnableVisualStyles = true
|
||||
Me.SaveMySettingsOnExit = true
|
||||
Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerStepThroughAttribute()>
|
||||
Protected Overrides Sub OnCreateMainForm()
|
||||
Me.MainForm = Global.DigitalData.GUIs.ZooFlow.frmAdmin
|
||||
End Sub
|
||||
End Class
|
||||
End Namespace
|
||||
@@ -1,11 +0,0 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
|
||||
<MySubMain>true</MySubMain>
|
||||
<MainForm>Form1</MainForm>
|
||||
<SingleInstance>false</SingleInstance>
|
||||
<ShutdownMode>0</ShutdownMode>
|
||||
<EnableVisualStyles>true</EnableVisualStyles>
|
||||
<AuthenticationMode>0</AuthenticationMode>
|
||||
<ApplicationType>0</ApplicationType>
|
||||
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>
|
||||
</MyApplicationData>
|
||||
@@ -1,36 +0,0 @@
|
||||
Imports System.Reflection
|
||||
Imports System.Runtime.CompilerServices
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
' General Information about an assembly is controlled through the following
|
||||
' set of attributes. Change these attribute values to modify the information
|
||||
' associated with an assembly.
|
||||
<Assembly: AssemblyTitle("ZooFlow")>
|
||||
<Assembly: AssemblyDescription("")>
|
||||
<Assembly: AssemblyConfiguration("")>
|
||||
<Assembly: AssemblyCompany("Digital Data")>
|
||||
<Assembly: AssemblyProduct("ZooFlow")>
|
||||
<Assembly: AssemblyCopyright("Copyright © 2019")>
|
||||
<Assembly: AssemblyTrademark("")>
|
||||
<Assembly: AssemblyCulture("")>
|
||||
|
||||
' Setting ComVisible to false makes the types in this assembly not visible
|
||||
' to COM components. If you need to access a type in this assembly from
|
||||
' COM, set the ComVisible attribute to true on that type.
|
||||
<Assembly: ComVisible(False)>
|
||||
|
||||
' The following GUID is for the ID of the typelib if this project is exposed to COM
|
||||
<Assembly: Guid("c20b63ff-4512-4b80-90d8-b7e90d7a9328")>
|
||||
|
||||
' Version information for an assembly consists of the following four values:
|
||||
'
|
||||
' Major Version
|
||||
' Minor Version
|
||||
' Build Number
|
||||
' Revision
|
||||
'
|
||||
' You can specify all the values or you can default the Build and Revision Numbers
|
||||
' by using the '*' as shown below:
|
||||
' [assembly: AssemblyVersion("1.0.*")]
|
||||
<Assembly: AssemblyVersion("0.0.1.0")>
|
||||
<Assembly: AssemblyFileVersion("1.0.0.0")>
|
||||
@@ -1,10 +0,0 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<!--
|
||||
This file is automatically generated by Visual Studio .Net. It is
|
||||
used to store generic object data source configuration information.
|
||||
Renaming the file extension or editing the content of this file may
|
||||
cause the file to be unrecognizable by the program.
|
||||
-->
|
||||
<GenericObjectDataSource DisplayName="ClassUserState" Version="1.0" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
|
||||
<TypeInfo>DigitalData.GUIs.ZooFlow.State.ClassUserState, DigitalData.GUIs.ZooFlow, Version=0.0.1.0, Culture=neutral, PublicKeyToken=null</TypeInfo>
|
||||
</GenericObjectDataSource>
|
||||
113
ZooFlow/My Project/Resources.Designer.vb
generated
@@ -1,113 +0,0 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' Dieser Code wurde von einem Tool generiert.
|
||||
' Laufzeitversion:4.0.30319.42000
|
||||
'
|
||||
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
|
||||
' der Code erneut generiert wird.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
Imports System
|
||||
|
||||
Namespace My.Resources
|
||||
|
||||
'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
|
||||
'-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
|
||||
'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
|
||||
'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
|
||||
'''<summary>
|
||||
''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
|
||||
'''</summary>
|
||||
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "15.0.0.0"), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
||||
Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
|
||||
Friend Module Resources
|
||||
|
||||
Private resourceMan As Global.System.Resources.ResourceManager
|
||||
|
||||
Private resourceCulture As Global.System.Globalization.CultureInfo
|
||||
|
||||
'''<summary>
|
||||
''' Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
|
||||
'''</summary>
|
||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
|
||||
Get
|
||||
If Object.ReferenceEquals(resourceMan, Nothing) Then
|
||||
Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DigitalData.GUIs.ZooFlow.Resources", GetType(Resources).Assembly)
|
||||
resourceMan = temp
|
||||
End If
|
||||
Return resourceMan
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
|
||||
''' Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
|
||||
'''</summary>
|
||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Friend Property Culture() As Global.System.Globalization.CultureInfo
|
||||
Get
|
||||
Return resourceCulture
|
||||
End Get
|
||||
Set
|
||||
resourceCulture = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property CW_GEFUNDEN_klein() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("CW_GEFUNDEN_klein", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property CW_klein() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("CW_klein", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property GLOBIX_GEFUNDEN_klein() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("GLOBIX_GEFUNDEN_klein", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property GLOBIX_klein() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("GLOBIX_klein", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property ZOOFLOW_Home_klein() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("ZOOFLOW_Home_klein", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
End Module
|
||||
End Namespace
|
||||
@@ -1,136 +0,0 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
<data name="CW_GEFUNDEN_klein" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\CW_GEFUNDEN_klein.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="CW_klein" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\CW_klein.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="GLOBIX_GEFUNDEN_klein" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\GLOBIX_GEFUNDEN_klein.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="GLOBIX_klein" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\GLOBIX_klein.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="ZOOFLOW_Home_klein" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\ZOOFLOW_Home_klein.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
</root>
|
||||
71
ZooFlow/My Project/Settings.Designer.vb
generated
@@ -1,71 +0,0 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' Dieser Code wurde von einem Tool generiert.
|
||||
' Laufzeitversion:4.0.30319.42000
|
||||
'
|
||||
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
|
||||
' der Code erneut generiert wird.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
|
||||
|
||||
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "15.7.0.0"), _
|
||||
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Partial Friend NotInheritable Class Settings
|
||||
Inherits Global.System.Configuration.ApplicationSettingsBase
|
||||
|
||||
Private Shared defaultInstance As Settings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New Settings()),Settings)
|
||||
|
||||
#Region "Automatische My.Settings-Speicherfunktion"
|
||||
#If _MyType = "WindowsForms" Then
|
||||
Private Shared addedHandler As Boolean
|
||||
|
||||
Private Shared addedHandlerLockObject As New Object
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
|
||||
If My.Application.SaveMySettingsOnExit Then
|
||||
My.Settings.Save()
|
||||
End If
|
||||
End Sub
|
||||
#End If
|
||||
#End Region
|
||||
|
||||
Public Shared ReadOnly Property [Default]() As Settings
|
||||
Get
|
||||
|
||||
#If _MyType = "WindowsForms" Then
|
||||
If Not addedHandler Then
|
||||
SyncLock addedHandlerLockObject
|
||||
If Not addedHandler Then
|
||||
AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
|
||||
addedHandler = True
|
||||
End If
|
||||
End SyncLock
|
||||
End If
|
||||
#End If
|
||||
Return defaultInstance
|
||||
End Get
|
||||
End Property
|
||||
End Class
|
||||
|
||||
Namespace My
|
||||
|
||||
<Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
|
||||
Friend Module MySettingsProperty
|
||||
|
||||
<Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
|
||||
Friend ReadOnly Property Settings() As Global.DigitalData.GUIs.ZooFlow.Settings
|
||||
Get
|
||||
Return Global.DigitalData.GUIs.ZooFlow.Settings.Default
|
||||
End Get
|
||||
End Property
|
||||
End Module
|
||||
End Namespace
|
||||
@@ -1,7 +0,0 @@
|
||||
<?xml version='1.0' encoding='utf-8'?>
|
||||
<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)">
|
||||
<Profiles>
|
||||
<Profile Name="(Default)" />
|
||||
</Profiles>
|
||||
<Settings />
|
||||
</SettingsFile>
|
||||
@@ -1,9 +0,0 @@
|
||||
DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.ButtonEdit, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.ComboBoxEdit, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.ProgressBarControl, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.CheckEdit, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.PictureEdit, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
@@ -1,46 +0,0 @@
|
||||
Imports DigitalData.Modules.Config
|
||||
Imports DigitalData.Modules.Logging
|
||||
Imports DigitalData.Modules.Database
|
||||
Imports DigitalData.Modules.ZooFlow
|
||||
Imports ZooFlow.State
|
||||
|
||||
Namespace My
|
||||
''' <summary>
|
||||
''' Extends the My Namespace
|
||||
''' Example: My.LogConfig
|
||||
''' </summary>
|
||||
<HideModuleName()>
|
||||
Module Extension
|
||||
Property SystemConfigManager As ConfigManager(Of ClassConfig)
|
||||
ReadOnly Property SystemConfig As ClassConfig
|
||||
Get
|
||||
Return SystemConfigManager.Config
|
||||
End Get
|
||||
End Property
|
||||
|
||||
Property UIConfigManager As ConfigManager(Of ClassUIConfig)
|
||||
ReadOnly Property UIConfig As ClassUIConfig
|
||||
Get
|
||||
Return UIConfigManager.Config
|
||||
End Get
|
||||
End Property
|
||||
|
||||
Property LogConfig As LogConfig
|
||||
Property MainForm As frmAdmin
|
||||
Property Database As MSSQLServer
|
||||
Property Queries As New ClassQueries
|
||||
End Module
|
||||
|
||||
''' <summary>
|
||||
''' Extends the My.Application Namespace to hold Application State
|
||||
''' Example: My.Application.User
|
||||
''' </summary>
|
||||
Partial Friend Class MyApplication
|
||||
Public Property User As New State.UserState
|
||||
Public Property Service As New State.ServiceState
|
||||
Public Property Modules As New Dictionary(Of String, State.ModuleState)
|
||||
Public Property ModulesActive As New List(Of String)
|
||||
Public Property ClipboardWatcher As New ClipboardWatcher.State
|
||||
End Class
|
||||
End Namespace
|
||||
|
||||
@@ -1,25 +0,0 @@
|
||||
Public Class ClassClipboardWatcherQueries
|
||||
Public Function VWCW_USER_PROFILE(UserId As Integer) As String
|
||||
Return $"SELECT DISTINCT GUID, NAME, REGEX_EXPRESSION, COMMENT, PROC_NAME, PROFILE_TYPE FROM VWCW_USER_PROFILE WHERE USER_ID = {UserId} OR GROUP_ID IN (SELECT DISTINCT GUID FROM TBDD_GROUPS WHERE GUID IN (SELECT GROUP_ID FROM TBDD_GROUPS_USER WHERE USER_ID = {UserId}))"
|
||||
End Function
|
||||
|
||||
Public Function TBCW_PROFILE_PROCESS(UserId As Integer) As String
|
||||
Return $"SELECT T.* FROM TBCW_PROFILE_PROCESS T, VWCW_USER_PROFILE T1 WHERE T.PROFILE_ID = T1.GUID AND T1.USER_ID = {UserId}"
|
||||
End Function
|
||||
|
||||
Public Function TBCW_PROF_DATA_SEARCH(ProfileId As Integer) As String
|
||||
Return $"SELECT COUNT_COMMAND FROM TBCW_PROF_DATA_SEARCH WHERE ACTIVE = 1 AND PROFILE_ID = {ProfileId}"
|
||||
End Function
|
||||
|
||||
Public Function TBCW_PROF_DOC_SEARCH(ProfileId As Integer) As String
|
||||
Return $"SELECT COUNT_COMMAND FROM TBCW_PROF_DOC_SEARCH WHERE ACTIVE = 1 AND PROFILE_ID = {ProfileId}"
|
||||
End Function
|
||||
|
||||
Public Function VWCW_PROFILE_REL_WINDOW(UserId As Integer) As String
|
||||
Return $"SELECT * FROM VWCW_PROFILE_REL_WINDOW WHERE USER_ID = {UserId}"
|
||||
End Function
|
||||
|
||||
Public Function VWCW_PROFILE_REL_CONTROL(UserId As Integer) As String
|
||||
Return $"SELECT * FROM VWCW_PROFILE_REL_CONTROL WHERE USER_ID = {UserId}"
|
||||
End Function
|
||||
End Class
|
||||
@@ -1,9 +0,0 @@
|
||||
Public Class ClassCommonQueries
|
||||
Public Function FNDD_CHECK_USER_MODULE(Username As String, Optional ClientId As Integer = 1) As String
|
||||
Return String.Format("SELECT * FROM [dbo].[FNDD_CHECK_USER_MODULE] ('{0}','CW',{1})", Username, ClientId)
|
||||
End Function
|
||||
|
||||
Public Function FNDD_MODULE_INIT(Username As String) As String
|
||||
Return String.Format("SELECT * FROM [dbo].[FNZF_GET_MODULE_INFO] ('{0}')", Username)
|
||||
End Function
|
||||
End Class
|
||||
@@ -1,4 +0,0 @@
|
||||
Public Class ClassQueries
|
||||
Public Property Common As New ClassCommonQueries
|
||||
Public Property ClipboardWatcher As New ClassClipboardWatcherQueries
|
||||
End Class
|
||||
|
Before Width: | Height: | Size: 20 KiB |
|
Before Width: | Height: | Size: 17 KiB |
|
Before Width: | Height: | Size: 18 KiB |
|
Before Width: | Height: | Size: 15 KiB |
|
Before Width: | Height: | Size: 18 KiB |
|
Before Width: | Height: | Size: 15 KiB |
|
Before Width: | Height: | Size: 17 KiB |
@@ -1,249 +0,0 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<Project ToolsVersion="4.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||
<PropertyGroup>
|
||||
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||
<Platform Condition=" '$(Platform)' == '' ">x86</Platform>
|
||||
<ProductVersion>8.0.30703</ProductVersion>
|
||||
<SchemaVersion>2.0</SchemaVersion>
|
||||
<ProjectGuid>{D0FB36EB-783D-40E1-B71E-A0B84B2FE567}</ProjectGuid>
|
||||
<OutputType>WinExe</OutputType>
|
||||
<RootNamespace>DigitalData.GUIs.ZooFlow</RootNamespace>
|
||||
<AssemblyName>DigitalData.GUIs.ZooFlow</AssemblyName>
|
||||
<TargetFrameworkVersion>v4.6.1</TargetFrameworkVersion>
|
||||
<StartupObject>ZooFlow.Program</StartupObject>
|
||||
<FileAlignment>512</FileAlignment>
|
||||
<OptionExplicit>On</OptionExplicit>
|
||||
<OptionCompare>Binary</OptionCompare>
|
||||
<OptionStrict>Off</OptionStrict>
|
||||
<OptionInfer>On</OptionInfer>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
|
||||
<PlatformTarget>AnyCPU</PlatformTarget>
|
||||
<DebugSymbols>true</DebugSymbols>
|
||||
<DebugType>full</DebugType>
|
||||
<Optimize>false</Optimize>
|
||||
<OutputPath>bin\Debug\</OutputPath>
|
||||
<DefineDebug>true</DefineDebug>
|
||||
<DefineTrace>true</DefineTrace>
|
||||
<ErrorReport>prompt</ErrorReport>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
|
||||
<PlatformTarget>AnyCPU</PlatformTarget>
|
||||
<DebugType>pdbonly</DebugType>
|
||||
<Optimize>true</Optimize>
|
||||
<OutputPath>bin\Release\</OutputPath>
|
||||
<DefineDebug>false</DefineDebug>
|
||||
<DefineTrace>true</DefineTrace>
|
||||
<ErrorReport>prompt</ErrorReport>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<MyType>WindowsForms</MyType>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<StartupObject>DigitalData.GUIs.ZooFlow.My.MyApplication</StartupObject>
|
||||
</PropertyGroup>
|
||||
<ItemGroup>
|
||||
<Reference Include="DevExpress.BonusSkins.v18.1" />
|
||||
<Reference Include="DevExpress.Data.v18.1" />
|
||||
<Reference Include="DevExpress.DataAccess.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
|
||||
<Reference Include="DevExpress.Printing.v18.1.Core" />
|
||||
<Reference Include="DevExpress.Utils.v18.1" />
|
||||
<Reference Include="DevExpress.XtraBars.v18.1" />
|
||||
<Reference Include="DevExpress.Sparkline.v18.1.Core" />
|
||||
<Reference Include="DevExpress.XtraEditors.v18.1" />
|
||||
<Reference Include="DevExpress.XtraGrid.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
|
||||
<Reference Include="DevExpress.XtraLayout.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
|
||||
<Reference Include="DevExpress.XtraPrinting.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
|
||||
<Reference Include="NLog, Version=4.0.0.0, Culture=neutral, PublicKeyToken=5120e14c03d0593c, processorArchitecture=MSIL">
|
||||
<HintPath>..\packages\NLog.4.6.7\lib\net45\NLog.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="System" />
|
||||
<Reference Include="System.Configuration" />
|
||||
<Reference Include="System.Core" />
|
||||
<Reference Include="System.IO.Compression" />
|
||||
<Reference Include="System.Runtime.Serialization" />
|
||||
<Reference Include="System.ServiceModel" />
|
||||
<Reference Include="System.Transactions" />
|
||||
<Reference Include="System.Xml.Linq" />
|
||||
<Reference Include="System.Data.DataSetExtensions" />
|
||||
<Reference Include="Microsoft.CSharp" />
|
||||
<Reference Include="System.Data" />
|
||||
<Reference Include="System.Deployment" />
|
||||
<Reference Include="System.Drawing" />
|
||||
<Reference Include="System.Windows.Forms" />
|
||||
<Reference Include="System.Xml" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Import Include="Microsoft.VisualBasic" />
|
||||
<Import Include="System.Collections.Generic" />
|
||||
<Import Include="System.Diagnostics" />
|
||||
<Import Include="System.Data" />
|
||||
<Import Include="System.Drawing" />
|
||||
<Import Include="System.Windows.Forms" />
|
||||
<Import Include="System.Linq" />
|
||||
<Import Include="System.Xml.Linq" />
|
||||
<Import Include="System" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Compile Include="ApplicationEvents.vb" />
|
||||
<Compile Include="Base\BaseClass.vb" />
|
||||
<Compile Include="ClassClipboardWatcher.vb" />
|
||||
<Compile Include="ClassInit.vb" />
|
||||
<Compile Include="ClipboardWatcher\State.vb" />
|
||||
<Compile Include="Events\OnFlowFormInteractionEvent.vb" />
|
||||
<Compile Include="Events\OnFlowFormStateChangedEvent.vb" />
|
||||
<Compile Include="Queries\ClassClipboardWatcherQueries.vb" />
|
||||
<Compile Include="Queries\ClassCommonQueries.vb" />
|
||||
<Compile Include="Config\ClassConfig.vb" />
|
||||
<Compile Include="ClassConstants.vb" />
|
||||
<Compile Include="ClassEnvironment.vb" />
|
||||
<Compile Include="ClassFlowForm.vb" />
|
||||
<Compile Include="ClassInitLoader.vb" />
|
||||
<Compile Include="Config\ClassUIConfig.vb" />
|
||||
<Compile Include="frmConfigDatabase.Designer.vb">
|
||||
<DependentUpon>frmConfigDatabase.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="frmConfigDatabase.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="frmAdmin.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="frmAdmin.Designer.vb">
|
||||
<DependentUpon>frmAdmin.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="frmFlowForm.Designer.vb">
|
||||
<DependentUpon>frmFlowForm.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="frmFlowForm.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="frmSettings.Designer.vb">
|
||||
<DependentUpon>frmSettings.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="frmSettings.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="frmSplash.Designer.vb">
|
||||
<DependentUpon>frmSplash.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="frmSplash.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="My Project\Application.Designer.vb">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DependentUpon>Application.myapp</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="My Project\AssemblyInfo.vb" />
|
||||
<Compile Include="MyApplication.vb" />
|
||||
<Compile Include="Queries\ClassQueries.vb" />
|
||||
<EmbeddedResource Include="frmConfigDatabase.resx">
|
||||
<DependentUpon>frmConfigDatabase.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="frmAdmin.resx">
|
||||
<DependentUpon>frmAdmin.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="frmFlowForm.resx">
|
||||
<DependentUpon>frmFlowForm.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="frmSettings.resx">
|
||||
<DependentUpon>frmSettings.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="frmSplash.resx">
|
||||
<DependentUpon>frmSplash.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="My Project\licenses.licx" />
|
||||
<EmbeddedResource Include="My Project\Resources.resx">
|
||||
<Generator>VbMyResourcesResXFileCodeGenerator</Generator>
|
||||
<LastGenOutput>Resources.Designer.vb</LastGenOutput>
|
||||
<CustomToolNamespace>My.Resources</CustomToolNamespace>
|
||||
<SubType>Designer</SubType>
|
||||
</EmbeddedResource>
|
||||
<Compile Include="My Project\Resources.Designer.vb">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DependentUpon>Resources.resx</DependentUpon>
|
||||
<DesignTime>True</DesignTime>
|
||||
</Compile>
|
||||
<None Include="My Project\DataSources\ZooFlow.State.ClassUserState.datasource" />
|
||||
<None Include="My Project\Settings.settings">
|
||||
<Generator>SettingsSingleFileGenerator</Generator>
|
||||
<LastGenOutput>Settings.Designer.vb</LastGenOutput>
|
||||
</None>
|
||||
<Compile Include="My Project\Settings.Designer.vb">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DependentUpon>Settings.settings</DependentUpon>
|
||||
<DesignTimeSharedInput>True</DesignTimeSharedInput>
|
||||
</Compile>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="My Project\Application.myapp">
|
||||
<Generator>MyApplicationCodeGenerator</Generator>
|
||||
<LastGenOutput>Application.Designer.vb</LastGenOutput>
|
||||
</None>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="packages.config" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<ProjectReference Include="..\ClipboardWatcher\ClipboardWatcher.vbproj">
|
||||
<Project>{B7D465A2-AE31-4CDF-A8B2-34B42D3EA84E}</Project>
|
||||
<Name>ClipboardWatcher</Name>
|
||||
</ProjectReference>
|
||||
<ProjectReference Include="..\Filesystem\Filesystem.vbproj">
|
||||
<Project>{991d0231-4623-496d-8bd0-9ca906029cbc}</Project>
|
||||
<Name>Filesystem</Name>
|
||||
</ProjectReference>
|
||||
<ProjectReference Include="..\Message\Messaging.vbproj">
|
||||
<Project>{af664d85-0a4b-4bab-a2f8-83110c06553a}</Project>
|
||||
<Name>Messaging</Name>
|
||||
</ProjectReference>
|
||||
<ProjectReference Include="..\Modules.Config\Config.vbproj">
|
||||
<Project>{44982F9B-6116-44E2-85D0-F39650B1EF99}</Project>
|
||||
<Name>Config</Name>
|
||||
</ProjectReference>
|
||||
<ProjectReference Include="..\Modules.Database\Database.vbproj">
|
||||
<Project>{EAF0EA75-5FA7-485D-89C7-B2D843B03A96}</Project>
|
||||
<Name>Database</Name>
|
||||
</ProjectReference>
|
||||
<ProjectReference Include="..\Modules.Language\Language.vbproj">
|
||||
<Project>{d3c8cfed-d6f6-43a8-9bdf-454145d0352f}</Project>
|
||||
<Name>Language</Name>
|
||||
</ProjectReference>
|
||||
<ProjectReference Include="..\Modules.Logging\Logging.vbproj">
|
||||
<Project>{903B2D7D-3B80-4BE9-8713-7447B704E1B0}</Project>
|
||||
<Name>Logging</Name>
|
||||
</ProjectReference>
|
||||
<ProjectReference Include="..\Modules\ZooFlow\ZooFlow.vbproj">
|
||||
<Project>{81cac44f-3711-4c8f-ae98-e02a7448782a}</Project>
|
||||
<Name>ZooFlow</Name>
|
||||
</ProjectReference>
|
||||
<ProjectReference Include="..\Windows\Windows.vbproj">
|
||||
<Project>{5efaef9b-90b9-4f05-9f70-f79ad77fff86}</Project>
|
||||
<Name>Windows</Name>
|
||||
</ProjectReference>
|
||||
</ItemGroup>
|
||||
<ItemGroup />
|
||||
<ItemGroup>
|
||||
<None Include="Resources\CW_GEFUNDEN_klein.png" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Resources\CW_klein.png" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Resources\GLOBIX_GEFUNDEN_klein.png" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Resources\GLOBIX_klein.png" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Resources\ZOOFLOW_Home_klein.png" />
|
||||
</ItemGroup>
|
||||
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
|
||||
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
|
||||
Other similar extension points exist, see Microsoft.Common.targets.
|
||||
<Target Name="BeforeBuild">
|
||||
</Target>
|
||||
<Target Name="AfterBuild">
|
||||
</Target>
|
||||
-->
|
||||
</Project>
|
||||
207
ZooFlow/frmAdmin.Designer.vb
generated
@@ -1,207 +0,0 @@
|
||||
Partial Public Class frmAdmin
|
||||
Inherits DevExpress.XtraBars.Ribbon.RibbonForm
|
||||
|
||||
''' <summary>
|
||||
''' Required designer variable.
|
||||
''' </summary>
|
||||
Private components As System.ComponentModel.IContainer = Nothing
|
||||
|
||||
''' <summary>
|
||||
''' Clean up any resources being used.
|
||||
''' </summary>
|
||||
''' <param name="disposing">true if managed resources should be disposed; otherwise, false.</param>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing AndAlso (components IsNot Nothing) Then
|
||||
components.Dispose()
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
#Region "Windows Form Designer generated code"
|
||||
|
||||
''' <summary>
|
||||
''' Required method for Designer support - do not modify
|
||||
''' the contents of this method with the code editor.
|
||||
''' </summary>
|
||||
Private Sub InitializeComponent()
|
||||
Dim SplashScreenManager As DevExpress.XtraSplashScreen.SplashScreenManager = New DevExpress.XtraSplashScreen.SplashScreenManager(Me, GetType(Global.DigitalData.GUIs.ZooFlow.frmSplash), True, True)
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmAdmin))
|
||||
Me.ribbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
|
||||
Me.ApplicationMenu = New DevExpress.XtraBars.Ribbon.ApplicationMenu()
|
||||
Me.ButtonSettings = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.ButtonExit = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.SkinDropDownButtonItem1 = New DevExpress.XtraBars.SkinDropDownButtonItem()
|
||||
Me.ribbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
|
||||
Me.ribbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
|
||||
Me.NotifyIconMain = New System.Windows.Forms.NotifyIcon()
|
||||
Me.ContextMenuStripMain = New System.Windows.Forms.ContextMenuStrip()
|
||||
Me.AnzeigenVersteckenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.AdministrationToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.BeendenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToastNotificationsManager = New DevExpress.XtraBars.ToastNotifications.ToastNotificationsManager()
|
||||
Me.TimerRefreshData = New System.Windows.Forms.Timer()
|
||||
Me.ImageListDebugTree = New System.Windows.Forms.ImageList()
|
||||
CType(Me.ribbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.ApplicationMenu, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.ContextMenuStripMain.SuspendLayout()
|
||||
CType(Me.ToastNotificationsManager, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'SplashScreenManager
|
||||
'
|
||||
SplashScreenManager.ClosingDelay = 500
|
||||
'
|
||||
'ribbonControl1
|
||||
'
|
||||
Me.ribbonControl1.ApplicationButtonDropDownControl = Me.ApplicationMenu
|
||||
Me.ribbonControl1.ExpandCollapseItem.Id = 0
|
||||
Me.ribbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.ribbonControl1.ExpandCollapseItem, Me.ButtonSettings, Me.ButtonExit, Me.SkinDropDownButtonItem1})
|
||||
Me.ribbonControl1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.ribbonControl1.MaxItemId = 4
|
||||
Me.ribbonControl1.Name = "ribbonControl1"
|
||||
Me.ribbonControl1.PageHeaderItemLinks.Add(Me.SkinDropDownButtonItem1)
|
||||
Me.ribbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.ribbonPage1})
|
||||
Me.ribbonControl1.Size = New System.Drawing.Size(906, 143)
|
||||
'
|
||||
'ApplicationMenu
|
||||
'
|
||||
Me.ApplicationMenu.ItemLinks.Add(Me.ButtonSettings)
|
||||
Me.ApplicationMenu.ItemLinks.Add(Me.ButtonExit)
|
||||
Me.ApplicationMenu.Name = "ApplicationMenu"
|
||||
Me.ApplicationMenu.Ribbon = Me.ribbonControl1
|
||||
'
|
||||
'ButtonSettings
|
||||
'
|
||||
Me.ButtonSettings.Caption = "Einstellungen"
|
||||
Me.ButtonSettings.Id = 1
|
||||
Me.ButtonSettings.ImageOptions.Image = CType(resources.GetObject("ButtonSettings.ImageOptions.Image"), System.Drawing.Image)
|
||||
Me.ButtonSettings.Name = "ButtonSettings"
|
||||
'
|
||||
'ButtonExit
|
||||
'
|
||||
Me.ButtonExit.Caption = "Beenden"
|
||||
Me.ButtonExit.Id = 2
|
||||
Me.ButtonExit.ImageOptions.Image = CType(resources.GetObject("ButtonExit.ImageOptions.Image"), System.Drawing.Image)
|
||||
Me.ButtonExit.Name = "ButtonExit"
|
||||
'
|
||||
'SkinDropDownButtonItem1
|
||||
'
|
||||
Me.SkinDropDownButtonItem1.Id = 3
|
||||
Me.SkinDropDownButtonItem1.Name = "SkinDropDownButtonItem1"
|
||||
'
|
||||
'ribbonPage1
|
||||
'
|
||||
Me.ribbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.ribbonPageGroup1})
|
||||
Me.ribbonPage1.Name = "ribbonPage1"
|
||||
Me.ribbonPage1.Text = "ribbonPage1"
|
||||
'
|
||||
'ribbonPageGroup1
|
||||
'
|
||||
Me.ribbonPageGroup1.Name = "ribbonPageGroup1"
|
||||
Me.ribbonPageGroup1.Text = "ribbonPageGroup1"
|
||||
'
|
||||
'NotifyIconMain
|
||||
'
|
||||
Me.NotifyIconMain.ContextMenuStrip = Me.ContextMenuStripMain
|
||||
Me.NotifyIconMain.Icon = CType(resources.GetObject("NotifyIconMain.Icon"), System.Drawing.Icon)
|
||||
Me.NotifyIconMain.Text = "NotifyIcon1"
|
||||
Me.NotifyIconMain.Visible = True
|
||||
'
|
||||
'ContextMenuStripMain
|
||||
'
|
||||
Me.ContextMenuStripMain.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AnzeigenVersteckenToolStripMenuItem, Me.AdministrationToolStripMenuItem, Me.ToolStripSeparator2, Me.ToolStripSeparator1, Me.BeendenToolStripMenuItem})
|
||||
Me.ContextMenuStripMain.Name = "ContextMenuStripMain"
|
||||
Me.ContextMenuStripMain.Size = New System.Drawing.Size(185, 82)
|
||||
'
|
||||
'AnzeigenVersteckenToolStripMenuItem
|
||||
'
|
||||
Me.AnzeigenVersteckenToolStripMenuItem.Name = "AnzeigenVersteckenToolStripMenuItem"
|
||||
Me.AnzeigenVersteckenToolStripMenuItem.Size = New System.Drawing.Size(184, 22)
|
||||
Me.AnzeigenVersteckenToolStripMenuItem.Text = "Anzeigen/Verstecken"
|
||||
'
|
||||
'AdministrationToolStripMenuItem
|
||||
'
|
||||
Me.AdministrationToolStripMenuItem.Name = "AdministrationToolStripMenuItem"
|
||||
Me.AdministrationToolStripMenuItem.Size = New System.Drawing.Size(184, 22)
|
||||
Me.AdministrationToolStripMenuItem.Text = "Administration"
|
||||
'
|
||||
'ToolStripSeparator2
|
||||
'
|
||||
Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
|
||||
Me.ToolStripSeparator2.Size = New System.Drawing.Size(181, 6)
|
||||
Me.ToolStripSeparator2.Tag = "MODULE_ITEM_START"
|
||||
'
|
||||
'ToolStripSeparator1
|
||||
'
|
||||
Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
|
||||
Me.ToolStripSeparator1.Size = New System.Drawing.Size(181, 6)
|
||||
Me.ToolStripSeparator1.Tag = "MODULE_ITEM_END"
|
||||
'
|
||||
'BeendenToolStripMenuItem
|
||||
'
|
||||
Me.BeendenToolStripMenuItem.Name = "BeendenToolStripMenuItem"
|
||||
Me.BeendenToolStripMenuItem.Size = New System.Drawing.Size(184, 22)
|
||||
Me.BeendenToolStripMenuItem.Text = "Beenden"
|
||||
'
|
||||
'ToastNotificationsManager
|
||||
'
|
||||
Me.ToastNotificationsManager.ApplicationId = "e0bfb9d4-ab95-488f-af6f-0b69c2381ee8"
|
||||
Me.ToastNotificationsManager.ApplicationName = "ZooFlow"
|
||||
Me.ToastNotificationsManager.Notifications.AddRange(New DevExpress.XtraBars.ToastNotifications.IToastNotificationProperties() {New DevExpress.XtraBars.ToastNotifications.ToastNotification("37d276f6-e182-4bdf-b06a-8414d9604a4f", Nothing, "Pellentesque lacinia tellus eget volutpat", "Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor i" &
|
||||
"ncididunt ut labore et dolore magna aliqua.", "Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do eiusmod tempor i" &
|
||||
"ncididunt ut labore et dolore magna aliqua.", DevExpress.XtraBars.ToastNotifications.ToastNotificationTemplate.Text01)})
|
||||
'
|
||||
'TimerRefreshData
|
||||
'
|
||||
Me.TimerRefreshData.Interval = 5000
|
||||
'
|
||||
'ImageListDebugTree
|
||||
'
|
||||
Me.ImageListDebugTree.ImageStream = CType(resources.GetObject("ImageListDebugTree.ImageStream"), System.Windows.Forms.ImageListStreamer)
|
||||
Me.ImageListDebugTree.TransparentColor = System.Drawing.Color.Transparent
|
||||
Me.ImageListDebugTree.Images.SetKeyName(0, "WorkItem_32xMD.png")
|
||||
Me.ImageListDebugTree.Images.SetKeyName(1, "key_16xLG.png")
|
||||
Me.ImageListDebugTree.Images.SetKeyName(2, "ResultstoFile_9946.png")
|
||||
Me.ImageListDebugTree.Images.SetKeyName(3, "WindowsForm_817.ico")
|
||||
Me.ImageListDebugTree.Images.SetKeyName(4, "process_16xMD.png")
|
||||
'
|
||||
'frmAdmin
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(906, 587)
|
||||
Me.Controls.Add(Me.ribbonControl1)
|
||||
Me.Name = "frmAdmin"
|
||||
Me.Ribbon = Me.ribbonControl1
|
||||
Me.Text = "Zoo Flow"
|
||||
CType(Me.ribbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.ApplicationMenu, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ContextMenuStripMain.ResumeLayout(False)
|
||||
CType(Me.ToastNotificationsManager, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
Private WithEvents ribbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
|
||||
Private WithEvents ribbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
|
||||
Private WithEvents ribbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
|
||||
Friend WithEvents NotifyIconMain As NotifyIcon
|
||||
Friend WithEvents ContextMenuStripMain As ContextMenuStrip
|
||||
Friend WithEvents AdministrationToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents ToolStripSeparator2 As ToolStripSeparator
|
||||
Friend WithEvents ToolStripSeparator1 As ToolStripSeparator
|
||||
Friend WithEvents BeendenToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents AnzeigenVersteckenToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents ToastNotificationsManager As DevExpress.XtraBars.ToastNotifications.ToastNotificationsManager
|
||||
Friend WithEvents ApplicationMenu As DevExpress.XtraBars.Ribbon.ApplicationMenu
|
||||
Friend WithEvents ButtonSettings As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents ButtonExit As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents SkinDropDownButtonItem1 As DevExpress.XtraBars.SkinDropDownButtonItem
|
||||
Friend WithEvents TimerRefreshData As Timer
|
||||
Friend WithEvents ImageListDebugTree As ImageList
|
||||
End Class
|
||||
@@ -1,434 +0,0 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<metadata name="ApplicationMenu.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>702, 17</value>
|
||||
</metadata>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="ButtonSettings.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAACt0RVh0VGl0
|
||||
bGUAU2V0dXA7Q3VzdG9taXo7RGVzaWduO1NldHRpbmc7UHJvcGVydDgftSEAAApzSURBVFhHnVdnVFVX
|
||||
Fr7WkGKmJJkxa7ISgyODiUQdUSMKFkSUGAU1gqBA4mCJDQyg+FAJxRIBUVZQo6CoCKigFJH+6B0UEKQL
|
||||
0rsIdlx7vn3ee6iz5sdM9lof5917zznf7ucg/Q4ZBowARgNqSrwFjASGA/+/HDgW/N/hw7gkeQDuRy/x
|
||||
VEFuv+/4DDevi+TqdZ5cPc+Ti2cgLV258Wt8YyWG7Tt8Vtp7CDgYIDkf9JdkHmekPR6nBZzcf5N2u52S
|
||||
drue5P0UwmQvBl++AQiTCbz2ji0cJTtw2is1q4SePR8USMm8TassbI/iG3uD5wytVT6Ld719j6TevgGp
|
||||
+8GA5ODih1dKeV0BiGoRu5kt4lG1CT+/s/ewf1ljSxf1PnxM7d0Pqba+hVavsy/HtzEAh4bnMV4P0yhg
|
||||
eBfIu3r7pZ/2+uJRKe4+QW+QG3675l2XI+eigXg7mbcO3ok4r7NxmLDb1c/D0+8yPX32QpA3t/cSLKPN
|
||||
tu60xMTmkLGpzUTMZUXGWG3cvXCn87EkO5nPzfEaWh/iHSs0vLOnX7KVHcNPpbh5Xxxy8SKQu3kHxpRV
|
||||
1lNFzX06GRhJzh6nb+xxOxV22DdkMDo+m1rauql/4Kkgb2ztofsAzz8VcJXcPAMHbZ28o2z3+CR7nwyl
|
||||
wuIqyi4oJzvZ0YRx47/4CBysxLAdu72ZTyE/e13gga0fse+wf3RZZYOwsP/RU3r85DkVl9VSTmE5DYjn
|
||||
Z9TTN0CtHQ8EcX1zF91r6qQ6oKmtl9q7+ig16zbl36oU8/j7rbv1FBmXQUuMbWLB8Q4wXN/oe+ZUiMuR
|
||||
QB5YgZF7D/pHlJbXCbLuB4+oq3cAGz2iB/2PCfGj1s4H1ATL77d2Y3MQN3ZSTUM7Vd5rpfLaFiqracLv
|
||||
NvGutKqR0vMqKKuomsKjUslg6Q+J4HgXGDHf0JI5FbIfZaMMwYgtDoe0j58Oe/no8VOQ91NHTz+sekht
|
||||
nX3UAqvZylfkHVTd0EaVda0gbqE7VU1UfLeBisrrqaCkjrJvVZM8p4yK8bxhqwtpzzJaDA5RKXMN1jKf
|
||||
QmA1FBjkn5zpbzm6+MXculNNPbCYXdoGq5s7ekGOeLd00z2Q1za2U3U9LAd5eU2zsJbJC8vqKb+kFuQ1
|
||||
lJZ3l9ILKijkWgLNN1wrx94fACIHdBeYY1CKDA3i+YtXCtjv9Q3LyC2lXridY93CyQbyBiZHrDmuze09
|
||||
8IgiCfndneomkN+jPCV5RkElJWWWCgVOng0nvYXmN7D3kAJKDIkoP2CkmbWt5s9Hzg32DzwRIRCZriJH
|
||||
vJlQnlZAdrsOkfHqrcAWsnM8TDeTc+hOZaOId0ZhJcmz71BcejHdTL1NOcXVtN3xl5df6xlpg4OTkHsE
|
||||
8wkl+A83G24Ub2/f5ekdFplCnAPNHT2CsAFNh63k3ycDrpCewdrWmbomNppac77U1NKZ9LWeycb5S6xa
|
||||
/U5fpsI79yglt5xiQRyTcouik4vwXEbHfrvK3ZL771+B9wHOBeaVRlhvcv5ym6Onq63saOH+Q/7U3NpJ
|
||||
3ch+LrMGLjNYfq+pi+TpBaRvZF2jrvHP8VjHlrA7+SB69/MJUzQWG9tUJ6TmUwoS74ZcQR6ZWECRSYV0
|
||||
U15Am+0OkJm1Q9ly0x8958w3mYF1bwPS6J2yYxQZm0FVtU305Okz6ut/IrK9HqR195Hp9W3UBGW22LnT
|
||||
7AWrf8AalRuHQge8N9fAbP1PMk94oY6iQBqRmE/X4vMoLDYXYy6l59+llKxikROmVo6ENX8CJLUdTkdB
|
||||
/BxZ/4hakPEcbyavvc+ZzmXWIhRYaW5Lf9ec9hnWiETint7R/ZD3EMn76biJn69d7yRKMyIB5HFMnkNX
|
||||
bmZTaHQWBUdl0uWYbErLvUvfrbVnBf7Ci9W27fIUCnCpNTQrMl1FXgHycjQXrntTSweaMFF7HNawAsPb
|
||||
u/uktq4+3kMo8Jn6F+pWG/eKkIXH5dJVJo/JohCQX4rMpKCIdKEEJ+cKcztWgPNBemv9Vle6EpGIhlFL
|
||||
2FC4vaq+lSqUna0E2V0Dq+xl3mS4zJp7KHczVSarQjDmG5N/2ew7cEoozlZfvsHkmSDPoJCoDFERQeHJ
|
||||
uEMEkLHZDlbgz4A00vDb7ycvN912cKWFXemGba5UUlYHy9HdUNslFffpVnkD3UaTiUspIPP1TlWTJuto
|
||||
YN17gOqoHTNpio7m95v316Rml1B+aS2FgpytZXIegyNSCfvTvMXrKmbNXXFs4ldzZmMdGzJkgdhI38jK
|
||||
1/fEJXS6DgU5OltBaR1quYaK0GjOBceQ9ab9bSZrtmyYrrNIa8bsRVorzLdu2rDdoy04PFF0RU4+QQ6X
|
||||
X7yWilDkksztBIHYHxyfAJx8XAHMK0SVzaP1l6yZvNX+8GAj+n0Rt1Umv11DmUVVor4z0NniU4vI+9dg
|
||||
cth3nBz3+9LRE6GUmlMqyOPTSykYVgddT6cLIA8MT0Ey5tLSVZtfqmtMnQMOviuIywkgGpEEi3jgBxFL
|
||||
U2vH6xExaXB7PWVyV0Ndx6WXIIaobXmRaDJZRZUIUaPIFSbOuV2Nms8XLr94PY0uhIM8LIVCkHxuXmdp
|
||||
pp5JPPYeC7CnmUtBzrJugzMPQwp8t+6npPiUPCpCPcdnFFNs2quuFpVUQNdRYq+yHCUm4p2hcDnIzyvJ
|
||||
A64kCy94+oXQ9NnLM7H3x4BQYMoMIwxKsVjvxAMrMHrRUquFDs4+4shldyvIiygajYW7moI8j67ezEGW
|
||||
Z4ssFy4Hucrl567KKeByMp0JTQISUQFZZGy6hdQ1tI3Bwck7QmvaIuZUiJn1Lh44JmorLWzj4+V5ogLY
|
||||
5TfY5ajbOLj9eoKiq10BeaiSXLg8Ai6/liasPhcmR/zxG144HZxAvwEBUMTDO5C0phmkgOOPAHv6VQi+
|
||||
s7TnQShgbLY9PiYhS5xo8SCWI/HOXIwmH9zvYtM4DIWwPlu4PChCEe/zsPo8rGeFQvHe5ZczdOj4BYQk
|
||||
Q+GFkARyOeJPX0xZkASOPwB8CL1SYKXFTh74xaixf1P/cMWa7QmXwhIoMDSO1tk40VwDi1TdBWaxqy3t
|
||||
Xzq7n6CgaymizITVsPR8eBr5B8fSNhzL+kaWL6fONEqcMn1JJv5ZIXevQNoPhbSmLkxVe2fMp+Dg8huu
|
||||
MWkucyrExGyHhJsO/xSl+MFHn3yEK1Os7kJz+eTpi/gaxReJDzQnzZqqZ2DmA0UoBqcdu/ws4s1dz3DZ
|
||||
D4S5vh9/8o+ZmMvZ/vG48VONYXWa5lfzktTeFuTiPggM0/hSF4NSlq3eJtU3dUro4fwolAD4xOMFnLX8
|
||||
rHo3FkdyVUxynki4QCjgFxhF2jrLq/GNmwzXOa9hcMJxzNntbLkgR8lKbyjwzaofJVwwJdzzJNxm+RWH
|
||||
gxXhBTzyM4OT531dfdMT3r8GiY4Xirjbybxo0lSDU/jGHY6bjGo+r+c1Q/vgxiQx3lBgickmSU/fQtLV
|
||||
N5fmzFsjzZ5vJqAzz1Rg1tzVPE2llBpcvWDBYiuaD8xbbEnzDC1JfYL2QnwT8eW5ugYWGIYUES7/T/we
|
||||
UVnFoWBr+TznI5VPNdUJyXP+R5GkfwMPT3OfchuhBQAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
<data name="ButtonExit.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAACN0RVh0VGl0
|
||||
bGUAQ2FuY2VsO1N0b3A7RXhpdDtCYXJzO1JpYmJvbjtMlpayAAALFUlEQVRYR5WXB1RVxxaGx/dSfEGM
|
||||
xq50BUUEC1goAtJBwYZiiRpFDREJNkBApVgQE7FjJMYSg6KiXlBRNNJEqQIXROBSlM6lKqLI1bf+7DkX
|
||||
iHkr67319lrfmrlzZvb/zz5zDgdWsz+Y2C0n9G+g8Wpqq0M4wYyiz3/jRYA/ex7gxyp2+rLnRIW/Nyv3
|
||||
9WLl271Ymc9WVuq9hUm2bWaSrZ40naJmXxD7d+vzbl6wD38DRY/AP4h/Ep8Qn/4HfIzDr/N5fd7XP2Pv
|
||||
6wvZ+zrOU/a+poDJasRMVp3Hijw9aApF1d4A9qGlnKj4K2SIokdYEM302jyleIdvcOku/0dlu/xyKgL8
|
||||
PpTv9P0g8ffOlfh6P8732rwnYcN6A5r7GZ9PyI0I4vm94rKqXFa4cQNdoqgM3sk+NJcRZOIjKHp2/Kl4
|
||||
+7bFJCip/DEEzbFX0CFOxdtnmaB5RBneFKbjdU4yGq9HomJvIJ5t2yxJc3dbTms/JwQjMm6gSi4uq3zC
|
||||
8r9zo2GKil1+7H2jpJtSoaUQdp3g7ja6xH97ek34EXTkpeJ9fRE6i9LQkX4Xr1Nv4uXdi3h55ze0J91A
|
||||
e0oM3oqTIKvOR3t2IirC9kPs4Z55dsH8cZSLV0SoRteLbNb1PIvlrVtLPynK/Lez9w3FvVBw8U/SPT2s
|
||||
JTu2t7beE6HrRR5eP75NYpFy4i6g7TZx6zzaYs+iVXQGrddPoyX6FFqunsTL+IvoLE6DNCYK+R7urTFL
|
||||
lzhQTl4NuYnSNJa9ejV1KSQ+2+jePGWy2kL+UxBP3fCdjWSXf1d7ViLeZP8uF7opp/XmObTFnCVI9MYv
|
||||
JPwzWq9FkPBPaL58As0Xj6Hpt8NoPB+G9oRotD2MQ66Hu+y688JeE53FqSxzxUqux1jRZk/WVZnHu0LZ
|
||||
Rd+sGFfos625PfMBXlGCFi5C8FaABFu4YDQXpR1fOUnC4Wi+dBxNkUfQeOEQGs/9iMYzByD9OUSoSmtS
|
||||
LDJcXVuOWVvrkoZwOx4vXcY1GROvWc26yrN5l5fnszyPjY+lsVFUxig08+RXaGe9cLFuwSjaLRcVdtwj
|
||||
fBCNZ3+A9HQoGiL2ouHkbtQdDyJjx1AdeRrJLkvTSaMfwQ8m3zBjWS5LeCOUPnntmuUlwbvQnixCY+RR
|
||||
YWEPNREHEOc8F78aTMX9rxej4exBNP1KolTqehKMd5mP0xP0IHKwRmXYDtSfCEbd0QDUHt6B2oO+aKFz
|
||||
kvX9Rlyyc+A3vy/BN8xYuvMi3vAfn2evXy9puh0F6YXDkJKA9FyYQE34PojsbXDNaxfuxDzE1fUeuDXX
|
||||
AXWnQlD30z7EzLHF5bXuiBOl4IqnL6JMjFAR4oXaMD9U/+CD6tBtqD7gjdrIU4h3ml9GWv2J3ioIu79q
|
||||
a28n3uJJTs9S4n2ojwgRaPh5P+4sdILINwipWWUoe96IotJ6XHPzxE1He9ycY0fiG5GUVoyisnqUPG+C
|
||||
iIyKrC1QFeqFqpAtqNq9CS8CNwq5UletwrGphk6k2fNUCAY+i7ObfejZzm2o3O2JmqOBqKUScuqIy8ZG
|
||||
qK9qQEV1C9rau9D2+h1KyhsEE5fXeSDxcTGKyVhz+zs0v+pEq7QFZ3QnomqPJ14EfY/nAe6o8P8W5d6u
|
||||
yN26ERemmxwnTQWCv2EFF33jbR0eSXZ6osTVCcXfzkflnk2oObQDNYd3InHVMjzasROd72Rk4B1aXpEQ
|
||||
tcXlUqTnVKC4ohFNLzsF+JwkLx/EzXeUC+9wQ+nWVXi2xglFaxxR6LMBUdNn8sPIb0OvgS/ireyaJd7r
|
||||
ULjSDoVf26JwhR1K3JxR7u+G2vA9uLdoAdICAwUBQYx2ytvGj+jslOGhnx9i7a3xItQHpZtWoNh1npDr
|
||||
6XIbwhbFW1xx2cCkhTQHEvwcCC4UblvYyCQey1HgYo2CpdZ4uowvILiZVQ4o93ND3GwbJPv6Qdr2BlIS
|
||||
lLa97aW+uQOJPr6IsTRD2Xa+EQdBkOfh+fJdLCFebIlidxdcmmwoI82vCP5XVDDQL3ampaxw9TyInWfR
|
||||
RAvk02S+qGCJlTwBJbptaYob33rgqUQKaQsZaHmLBqKOqG3qwK0NmxBjaggxzS9YaoX8JfIcPF+eszny
|
||||
Fpqh4Js5uKA7nRsY9BcDN4zMmnOW2CNvAU1cYEaTzckMsYgMLbLALXNDXKfH7/eUIhSUSlHXTKICHYJ4
|
||||
bdNbiIvrcdV1A64b6iOXC3IoV+4CU+TOm0mYIsvZGme19fkt6DXAz4DCJQOTx2lzrZBDE584mdBkDi2a
|
||||
PxN3LY1xw+173E95hnzavVywA2/edqGDqGnsQHU3ec9qcW3tBsQYG1AuUzyZa4InjsbIdjQS8ibZmSFc
|
||||
c2ImafaeAW7gX6f1ph29b2WObCdTZDvMQNYcQ2TPMaKFJG5qjDJJNcQl9YJYDYl3vOlCRlAA0gMDhH6V
|
||||
tEOgsuE1aqukuKg/RVifNXsGMilfpt10ymmEWKPpCFXR/ok0//IUfL5XS9cpepoRMhwIm6nItJmGDLtp
|
||||
yKKF8faWeHryBF51dFHp3wiCWcFBuGNjjjhrM8HIaxrjVeFz8o4ewc1ZJsL6TMqVYW2AdCt9pNlOx3nt
|
||||
idg6TN2FNPl7gGvL34TEl2e09cvvG08RJqdb8nYKMqwMkLtsNuJIjJt429CArKBA3LWdhYKVjihY5Yg7
|
||||
1qbICNyFNw31yDt2FCJTI+QstUcarU+zmIy0WZOQRvnipk7AYSVt/q03lOBvwj7s3Dh9auXvgj1q49dF
|
||||
6kxGqvkkPDKbiMfmBF9MhriJ+w6WiJ01Ew/mWCFvmYNgNIMQL7PHPXsLRBsbIs6K7jsd5jRLfSHHI1M9
|
||||
PJqphxQTPUSoa2PrYFV30uopfx/2i+ZkaoUq8BM54ISGbtYNPR2kGE9AqrEuUmlx6kxdPDKfjNzF9Diu
|
||||
nIscZyukmZFJUy5AJqmfs5Ae1xWOyF1kTcKT8NBEvv6hkQ6SZ4xHlJYmQoeO4R8ef+6eR4SGHkuw4B+y
|
||||
8sO4ZrDSjHA1ndbYiVpImqotLE6ZoYOHhtQakjGj8ULSh0YTPoJf52N03VCb5vM12kiaPg6JBlq4Pk4D
|
||||
YUNHty3oN8SUNPj3gHz3PMJVddj9GRMEKPhZ6Ld5iOrCcGVt2TXt0fh9iiYSp45FMpE4bRySiSQipbv9
|
||||
k7ECiZypWkgg7k3SwGVNVYQN1pC5Kg5fSrkHELzSfX4YqEYNxfFR2uzuZE0WR1D03Ir+7l8pLzo8XOtl
|
||||
pIYabuuo4f5kDTyYMgYP9DUFEnoZgwQymSBcI6h/T08DN8er4LyKCkK/Un21WmEo//7ir17+OdZHNEGd
|
||||
hfZXpS7FkRFjWSwNxOqo85/cQI8JxXn9Bk/bP0gjN3yEOqLUlRE7Vgm3KPE9XTVCHQ8mUoWIePodP0EN
|
||||
cXRNpDUKkaqjcHSwCoL6K4tt+w4wolx854I455qWEtunqEJdirAhY5iIBq5rjWIizVF8qMcEvx38WR3i
|
||||
0X+k+76BapWHBqsiYoQSflMZSSIjET16OKI1hiNSZQQuKI/EqeGjcHCgMvYoKle5KQzj/3sNJxQJoeyc
|
||||
K+oj2BX14WyvgjL9pPhxkAaLVh/Grml0Q32KHhP8sPATyx+bYcu+GOLorTjyRKCisjhYUaUkpL8KQhRp
|
||||
p/2USgIUlMRbvxgR7tJ30FyaO4Lgu+bffnwjQr7LKkNYD3sVlGiI4sBAdXZggBoL5XypSi3B2/5CiT42
|
||||
wkvIK8ITDyH47kZ2w/v88eLvd37KueleYS72d/w/0WOEP6o8MS8pN8SFOLzPx/g1Pqdn/v8Ixv4AVZya
|
||||
X9ttAMYAAAAASUVORK5CYII=
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="NotifyIconMain.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>189, 17</value>
|
||||
</metadata>
|
||||
<metadata name="ContextMenuStripMain.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>325, 17</value>
|
||||
</metadata>
|
||||
<data name="NotifyIconMain.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAABAAQAEBAAAAEACABoBQAARgAAABAQAAABABgAaAMAAK4FAAAgIAAAAQAIAKgIAAAWCQAAICAAAAEA
|
||||
GACoDAAAvhEAACgAAAAQAAAAIAAAAAEACAAAAAAAQAEAAAAAAAAAAAAAAAEAAAAAAAD28uoA6/TxAOXi
|
||||
wgDp39IA4M3DAN/SzADCwsIA9tSTAO/HlQDvwI0A3cu9AMfFvgDJwK0A18qdAOC8oQDcvaIAyb29ANur
|
||||
kQDap4EAzKWLAMqbggCW0N0AlcbfAKvztgCn0pQAubbFALSpwACBo8wAu7u7ALe3twC9t6cArKysAKWl
|
||||
pQCwqp4ArLmYAKCfmwCfr78Ahaa1AJyalwCMjIwA/8J9AP3FRwDsqXcA6qZZAOmfbQDilGIA3KR9ANST
|
||||
agDTjF0A0YFOAP+sOgD/pw0A/osmAP+UFAD/lwsA/5ABAP2IEgD/jAEA/4MBALWzaACoh28AvZRSAIG7
|
||||
VgCfhWwA/n4JAP98AQD/dgEAoW9QAJ54WwCccFEAqGI/AHzo8gBO0uQAUOq9AGu/7wBtqNwAMcX/AAHc
|
||||
/wAB1f8AAcb/AD6I6AAsmOMAIID2ABCg/AABtv8AAar/AAGj/wBm5XYAQMtOAF26UwAy4VIAL/RdACno
|
||||
UQAmyDkAHtM7ADewKwAUviYADK4VAEF75gBAYeQAH2HxAAF2/wABY/8AAVD/AAE//wBtbW0AZWVlAGhi
|
||||
XwBwXFMAdVtPAGpQRABcT0kAflE7AHdGLAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///8A/v7+/v7+
|
||||
/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/h8gHAYdIB/+/v7+/v7+
|
||||
/kZwbmttP0RqJxz+/v7+/hMsLTEwKwcSPG9pJyD+/v4vMjU0ODMIURUPRXFsIP4FKjY6QjcpE1ZPRwEO
|
||||
QyD+FCg5QUA9DSVUTk1USiEG/jAbYmNkUglfSE1PVRYj/gQuZWdoZks7YFpJTFMeBv4RJGZoZ1AMPl5b
|
||||
XF0YJv7+/goZGhAD/gJXW15hIhz+/v7+/v7+/v7+ABdYWQv+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+
|
||||
/v7+/v7+/v7+/v////////////////Af///gB///wAH//8AA//+AAP//gAD//4AB//8AAf//AAP//4ID
|
||||
////B/////////////8oAAAAEAAAACAAAAABABgAAAAAAEADAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAqamppaWlubm5wsLCt7e3paWlrq6uAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAqGI/flE7alBEaGJfdVtPn4VsnnhbZWVljo6Ovr6+AAAAAAAAAAAAAAAAAAAA
|
||||
zaON6Z9t4pRi0YFO1Yxb6qZZ9tST2qeBqIdvXE9JbW1tioqKp6enAAAAAAAAAAAA1JNq/6w6/5QU/osm
|
||||
/YgS/6cN78eVLJjjltDd3L2inHBRd0YscFxToqKiAAAA39LM7Kl3/5cL/4MB/3YB/5AB/cVHy6aIAaP/
|
||||
Acb/fOjy6/Tx4LyhoW9QpKSkAAAAypuC/8J9/4wB/3wB/n4JvZRS18qdhaa1AbX/AdX/Adj/Abf/a7/v
|
||||
sKqew8PDAAAA0YtegaPMQXvmQGHkH2HxIID278CNN7ArTtLkAd//Acb/Aar/lcbfoJ+bAAAA4M3D3KR9
|
||||
AXb/AVD/AT7/AWP/bajctbNoFL4mMuFSUOq9McX/EKD8vbenwMDAAAAA26uRn6+/AWP/AT//AVD/Pojo
|
||||
ycCtgbtWHdE5LvJbKehRJsg5p9KUnJqXAAAAAAAAAAAA3cu9ubbFtKnAyb296d/SAAAA5eLCZuV2L/Ve
|
||||
H9Q8DK4VrLmYu7u7AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA9vLqq/O2QMtOXbpTx8W+AAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA////////////////8B///+AH
|
||||
///AAf//wAD//4AA//+AAP//gAH//wAB//8AA///ggP///8H/////////////ygAAAAgAAAAQAAAAAEA
|
||||
CAAAAAAAgAQAAAAAAAAAAAAAAAEAAAAAAAD+/v4A/Pr3APPz8wD98+kA9/PoAPbx4wDs/P4A4eHhAPPu
|
||||
3wDw6dQA/eTJAO/l0ADg5NsA7uPKAOzhxgD43sYA7NrJAOvewADj3M4A2fHWAN7g1QDA98gA2traANrY
|
||||
1QDd19EA1NTUANrZxgDK1csAysrKAMXFxQD88roA+uy0APnkrAD34qoA9di9APHTuAD52qEA9t6lAPfV
|
||||
pQDq2rwA7NmyAOrTugDg07gA4dO3AO7WoQDpzbwA6MuxAObKuQDz05sA+ciTAPPKnADwyZEA8cWeAP7F
|
||||
jQD6xIIA8saKAOzAkwDvxY4A3M+tANXKrwDO3LMAwN6uAMvBpwDgu6QA87mVAP2+hAD3vIQA8raBAOm5
|
||||
nADhvpoA4raVAOu7hADstYQA57mOAOCthgDCuaMA0qmHAKzP4ACf2+8Ajc/pALzvvAC/3K0Aqs2PAJbb
|
||||
kwCS1YsAkdGHAJnGgQC7u7sAtrGpAKqqqgChoaEAoJuPAJubmwCZmJQAk5OTAJuWigCXlIwAjIyMAIKC
|
||||
ggDxtH8A9rZ1AO+xewDnsHoA6616AOytdQDkp3EA7KFsAPyrWAD3pV8A/6lJAOmfagDpm2YA451sAOKZ
|
||||
ZADikmIA+JRHAPGTSwDsnV4A45JeAOSJUgDqjEQA4oFGANyZYADblGgA3Y5cAN2JVQDbhlMA2YJPANKI
|
||||
TQDXgEwAyYdXAP+cNwD/jDQA/pAcAP+CHQD/iw0A/4QBAILPfQCgh3gA4nw9AO97KwDjcC0A/3ITAP98
|
||||
AQD/dgEA82wTAP9sAQD/ZgEA82AHAO9rGADnaRwA5F4KAN1pJgDbZiQAy2MuAMVZKADXXBoAylgSAJd3
|
||||
ZQCJZ1MAhVpAAKVTIACyVBwAnmQ/AJxTJwCXWC0AiFQ0AG/h9gBv1/UAUdL5AFn/gABsvOkAbLXqAGuz
|
||||
4wB6uN8ATrLwAFOR0wBcg8QAC9n/AAHZ/wAB1/8AAcv/ACSp+AABu/8AC6D+AAGr/wAWm/kACpT8AAGd
|
||||
/wBP6WwARtNYACb8VgAk81AAI/FNAB3hQAAc4D4AG9s8ABfPMQAVyy4ANawxAC+4NgAQvCEAFKscAA+6
|
||||
HwAOtx0ACakSAAimEAAZnhgAJHTmABh88AALbvgAC2H4AAFo/wABWv8AAVf/AAFL/wABQP8AATz/AAEx
|
||||
/wABL/8Aenp6AHFxcQB4cGwAbm5uAGdnZwB8WkYAa1NEAFtbWwBbVFAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///8A/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+
|
||||
/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+
|
||||
/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+
|
||||
/v7+/v7+/v7+/v7+/v7+/hkdGf7+/v7+/v7+GRwW/v7+/v7+/v7+/v7+/v7+/v4/it3cXllXHBkcV1qe
|
||||
3mEc/v7+/v7+/v7+/v7+/v7+/o2Ul6Km4eDf3Z+jgGiC5GJX/v7+/v7+/v7+/v7+/v7+nJuamZaVkZGM
|
||||
eEcfcHxM4t1aHP7+/v7+/v7+/v7+/nB2QTk5OTk5OTk5JR+AcDFJpePcXFf+/v7+/v7+/v7+mEE5OTk5
|
||||
OTk3NyAgOX5lJicneKHi4NxhWh3+/v7+/i2LNYiPkpKSMzMzIB98bjUoEQ0LMoSRnaSgXhb+/v7+cm8z
|
||||
iJCTj4gzc3M2IH9jRicOFAwECkGEjpdiFv7+/v6YQW2PkpKIazM2ICBmcUYpeyesuKgGAQUyel8H/v7+
|
||||
L4s1h5CTkJAzZ3M2Hn1oKXApJ7q5tbKpTw1LX/7+/v53bzWDhoaFazMzMyEzdilDCSdNvLeztbm6EWAZ
|
||||
/v7+/pg1NTU1NTU1Z2cwH2lxKShKCa+5tbS3vK4+X/7+/v5EeTXR1tna17EzM0EhfUINDQ4Jtreztbm7
|
||||
GlsZ/v7+/n1qWNTX29jVM3RkJDlxKUYODVEFp7K3vK07X/7+/v7+mDWw1dna19AsLCwfcUNGLkYJyr4V
|
||||
AE6rG18c/v7+/kB5ONLX2tnVNXVsNSxxRgtwJ1XLxL+9UzwrX/7+/v7+RmpY09na19AsLDc6GEgLRgsL
|
||||
yMbBwMXNUl0c/v7+/v7+NTU1NTVCY2dFEgIAA0gLJz3Jw7/Cy8cqXf7+/v7+/v7+/g8iIhAL/v7+/v7+
|
||||
/kgLVMXBwcbOVl0d/v7+/v7+/v7+/v7+/v7+/v7+/v7+/kgIUKrEzM8RXQf+/v7+/v7+/v7+/v7+/v7+
|
||||
/v7+/v7+/khISBOJUksc/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+SEg0FP7+/v7+/v7+/v7+/v7+
|
||||
/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+
|
||||
/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+
|
||||
/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v7+/v///////////////////////////H+P//gA
|
||||
B//4AAP/+AAA//AAAD/wAAAD4AAAAeAAAAHgAAABwAAAA8AAAAPAAAAHgAAAB4AAAA+AAAAPAAAAHwAA
|
||||
AB+AAAA/4P4AP///AD///4B////w////////////////////////////KAAAACAAAABAAAAAAQAYAAAA
|
||||
AACADAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAANHR0cbGxtTU1AAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAANbW1sjIyNjY2AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAOC7pKCHeHFxcX5+fpWVlaqqqry8vMvLy9HR0cvLy7q6uqKiopd3ZXhwbI6OjsjI
|
||||
yAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAONwLfNgB+ReCrJU
|
||||
HIhUNHxaRmZmZm5ubnFxcYlnU55kP9KITeitc8mHV1tUUIODg7u7uwAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAANdcGsVZKMtjLttmJOdpHO9rGPVqEfNtFu97K+uMRuu7hPnq
|
||||
suCfat6OXdKph2hRQnJycqGhoczMzAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAOSa
|
||||
beaTX/y+hu/Fju/Fju/Fju/Fju/Fju/Fju/Fju/Fjvbepfnrs9eATOefavnIk+e5jpdYLVtbW3h4eJub
|
||||
m7u7uwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAN5pJfy+hu/Fju/Fju/Fju/Fju/Fju/FjvLG
|
||||
i/LGi/niqvniqu7Hj9uGU++xe/fVpenbu+/bvemMQqVTIG1VRmdnZ3h4eIqKiqGhocXFxQAAAAAAAAAA
|
||||
AAAAAAAAAOnNvOJ8Pf/Fjf+DAf98Af9tAf9rAf9rAfDIkfDIkfDIkfniqvzvttuOWumfavjEjO7YsOve
|
||||
wO7iye/n0PPKmf+ON/FsE8pYEpxTJ4VaQJCQkN7e3gAAAAAAAAAAAAAAAOKSYumbZvDIkf+DAf9zAf9m
|
||||
Af95Af+GAfDIkfiUR/iUR/rEgvjnrdmCT/K0fuG2k+nauOzhx97g1eDk2/fz6P3kyf+8gf+JMP9yE+Re
|
||||
CoCAgNjY2AAAAAAAAAAAAAAAANxpJ/y+hv+pSf9+Af9tAf9qAf+EAfyrWPDIkfrEgvnmrfnmreeweuGZ
|
||||
ZOG2k+rTutuUaOrZvWy16gug/m/X9ez8/vz69/Xw4vPJntyZYJuWiuHh4QAAAAAAAAAAAObKueJ8Pf/F
|
||||
jf+LDf91Af9mAf93Af93AfDIkeuteviUR/rEgvzyutuJVe+sd+rTuuOfb+rTuurZvRaZ+gGp/wHK/wvZ
|
||||
/1HS+Y3P6e7iycO4oJuWigAAAAAAAAAAAAAAAOSJUumbZv/Fjf+cN/+EHf+AHf6QHPyrWPDIkfDIkfDI
|
||||
kffhqfDPluCQXOrTuvC2gvDp1erZvazP4AGb/wG7/wHY/wHJ/wGs/xad+OvfwZeUjNfX1wAAAAAAAAAA
|
||||
AAAAAN1oJf/Fjf/Fjf/Fjf/Fjf/Fjf/Fjf/FjeuteuutevPTm/nqsuSnceGZZOrTuunZtOCthvDp1U6y
|
||||
8AGp/wHO/wHX/wG7/wGf/3q438vBp5uWigAAAAAAAAAAAAAAAOm5nOKBRv/FjRh88AFX/wE5/wEy/wFO
|
||||
/1yDxPDIkfDIkf2/gPfjq9yKVve8hO7jy+7jy+zhx/Dp1SSp+AG7/wHa/wHJ/wGs/wqU/NrZxqCbj9LS
|
||||
0gAAAAAAAAAAAAAAAN+IVOyhbLaxqQFo/wFI/wEv/wFA/wFb//DIkfGTS/a2dfnaoezCi+GZZOrTuuG3
|
||||
levgxO7jy7/crfbx5G/h9gvY/wG7/wGe/2uz49XKr5uWigAAAAAAAAAAAAAAAAAAAN1oJf/FjVOR0wFZ
|
||||
/wE7/wEx/wFO/yN15u7Woe7Woe7WofzuteGZZPO2gOG3lejLseG3lfDo0hSrHEbTWMD3yP/+/p/b72y8
|
||||
6crVy5uWi8/PzwAAAAAAAAAAAAAAAPO5leKBRuzAkwtu+AFK/wEw/wE+/wFa///FjeydXvelX/3Gie3X
|
||||
ouSaZeG3le/m0OCba+rZvZHRhw64HxraOyb8Vk/pbJbbk87cs+HTt5uWigAAAAAAAAAAAAAAAAAAAOey
|
||||
leyhbLawqQth+AE+/wEw/wFK/yRz5u7Woe7WofPFidzPrd3X0e22hu/m0OG3le/m0O/m0C+4NhXLLyPw
|
||||
TSTzUBfPMQmpEqrNj5mYlMnJyQAAAAAAAAAAAAAAAAAAAAAAAP/Fjf/Fjf/Fjf/Fjf3Ci/e7hPC0f+qs
|
||||
eeG+muPczvPz8/39/f3z6ey1hO/m0OrZvcDerhC8IRzgPib8Vh3hQA+7HzWsMeDTuJmYlAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAPjexvXYvfHTuOzaye7g0gAAAAAAAAAAAAAAAAAAAAAAAAAAAOy1hO/m
|
||||
0JLVixfPMSPyTiPwTRXKLQimEJnGgZmYlMPDwwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAOy1hPPu37zvvFn/gBvbPA63HRmeGOvewJqZ
|
||||
leHh4QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAOy1hOy1hOy1hNnx1oLPfarNj8G5psjIyAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAOy1
|
||||
hOy1hPHFntrY1QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAP///////////////////////////H+P//gA
|
||||
B//4AAP/+AAA//AAAD/wAAAD4AAAAeAAAAHgAAABwAAAA8AAAAPAAAAHgAAAB4AAAA+AAAAPAAAAHwAA
|
||||
AB+AAAA/4P4AP///AD///4B////w////////////////////////////
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="ToastNotificationsManager.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>503, 17</value>
|
||||
</metadata>
|
||||
<metadata name="TimerRefreshData.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>847, 17</value>
|
||||
</metadata>
|
||||
<metadata name="ImageListDebugTree.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>996, 17</value>
|
||||
</metadata>
|
||||
<data name="ImageListDebugTree.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>
|
||||
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
|
||||
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
|
||||
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAABU
|
||||
CwAAAk1TRnQBSQFMAgEBBQEAAVgBAAFYAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
|
||||
AwABQAMAASADAAEBAQABCAYAAQgYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
|
||||
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
|
||||
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
|
||||
AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
|
||||
AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
|
||||
AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
|
||||
ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
|
||||
AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
|
||||
AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
|
||||
AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
|
||||
AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
|
||||
AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
|
||||
AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
|
||||
AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
|
||||
AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
|
||||
ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
|
||||
Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
|
||||
AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
|
||||
AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
|
||||
AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
|
||||
ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
|
||||
Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
|
||||
AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
|
||||
AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
|
||||
AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
|
||||
AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
|
||||
AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
|
||||
AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD/4UABvQ5AAH0AfAB9AJt
|
||||
AfQB8AH0NwAB9AHwARQBbQITAW0BFAHwAfQ2AAL0AW0BkgL0AZIBbQP0NQAB9AFtAeoB9AKSAfQBEwFt
|
||||
AfQB8AH0NAAB9AFtAeoB9AKSAfQBEwFtAbwBFAHwAfQzAAL0AW0BkgL0AZIBbQH0AQcBbQL0MwAB9AHw
|
||||
ARQBbQITAW0BFAHwAfQBEwFtAfQ0AAH0AfAB9AJtAfQB8AHxAfQBEwFtAfQ1AAP0AbwBBwL0AZIBbQL0
|
||||
NgAB9AHwARQBbQITAW0BFAHwAfQ3AAH0AfAB9AJtAfQB8AH0OQAG9JcADPQZAAH0GgAB9AoUAfQUAAL0
|
||||
AgAD9BkAAfQKFAH0AQAP9AMAAfQBvAHtAvQB8AEUAfQZAAH0AhQG9AIUAfQBAAH0DRQB9AQAAfQB6gEU
|
||||
AbwCFAH0BwAF9AEABvQGAAH0AhQG9AIUAfQBAAH0ARQL9AEUAfQEAAH/AfQEFAH0Af8GAAH0ARQB9AEU
|
||||
AvQB8wFtAhQBbQHzAfQFAAH0AhQG9AIUAfQBAAH0ARQB9AMUBfQBFAH0ARQB9AQAAfQB8AQUARMB9AH/
|
||||
BAAC9AEUAfQBFAL0AW0EFAFtAfQFAAH0AhQG9AIUAfQBAAH0ARQF9AUUAfQBFAH0AwAB9AHwBhQBEwP0
|
||||
AgAB9AcUARMC8gIUAfIFAAH0AhQG9AIUAfQBAAH0ARQL9AEUAfQDAAH0AQcCFAETBhQB8wH0AQAB9AcU
|
||||
ARMC8gIUAfQDAAP0Ae8BFAb0AhQB9AEAAfQBFAH0AxQF9AEUAfQBFAH0BAAE9AETBBQBbQH0AgAH9AFt
|
||||
BBQBbQH0AwAB9AG0AYoBtAHvBPQDFAHsAfQBAAH0ARQF9AUUAfQBFAH0BwAB/wH0ARMCFAHsAfQJAAH0
|
||||
AfMBbQIUAW0B8wH0AQAE9AG0AYoBtAT0AhQB7AH0Af8BAAH0ARQL9AEUAfQIAAH0AbwBFAHsAfQLAAb0
|
||||
AgAB9AaKAbQB7wMUAewB9AH/AgAB9A0UAfQJAAH0AewB9BQAAfQGigG0Ae8CFAHsAfQB/wMAAfQNFAH0
|
||||
CQAC9BUABPQBtAGKAbQF9AH/BAAP9CIAAfQBtAGKAbQB9AH/OgAE9AH/GQABQgFNAT4HAAE+AwABKAMA
|
||||
AUADAAEgAwABAQEAAQEGAAEBFgAD/wEAAv8GAAL/BgAB8AE/BgAB4AEfBgABwAEPBgABwAEHBgABwAED
|
||||
BgABwAEBBgABwAEBBgABwAEBBgAB4AEBBgAB8AEBBgAB+AEBBgAB/AEDBgAB/gEHBgAC/wYABP8B8AEA
|
||||
A/8BvwL/AfABAAL/AfMBHwL/AfABAAGAAQAB4AEfAv8B8AEAAYABAAHwAR8BwQEDAfABAAGAAQAB8AEP
|
||||
AcABAQHwAQABgAEAAfABBwGAAQEB8AEAAYABAAHgAQEBgAEBAfABAAGAAQAB4AEAAYABAQHAAQABgAEA
|
||||
AfABAQGAAQEBwAEAAYABAAH+AQMB/gEBAgABgAEAAf8BBwH/AQMBAAEBAYABAAH/AY8C/wEAAQMBgAEA
|
||||
Af8BnwL/AQABBwGAAQAE/wHAB/8BwQP/Cw==
|
||||
</value>
|
||||
</data>
|
||||
</root>
|
||||
@@ -1,201 +0,0 @@
|
||||
Imports System.Threading.Tasks
|
||||
Imports DevExpress.LookAndFeel
|
||||
Imports DevExpress.XtraSplashScreen
|
||||
Imports DigitalData.Modules.Logging
|
||||
Imports DigitalData.Modules.Windows
|
||||
Imports DigitalData.Modules.ZooFlow
|
||||
Imports DigitalData.Modules.Messaging
|
||||
Imports DigitalData.Modules.ZooFlow.Params
|
||||
Imports DigitalData.GUIs.ZooFlow.OnFlowFormStateChangedEvent.FlowFormState
|
||||
Imports DigitalData.Modules.ClipboardWatcher
|
||||
|
||||
Partial Public Class frmAdmin
|
||||
Private WithEvents FlowForm As frmFlowForm
|
||||
|
||||
Private Init As ClassInit
|
||||
Private Loading As Boolean = True
|
||||
Private Logger As Logger = My.LogConfig.GetLogger
|
||||
Private MatchingProfiles As List(Of ProfileData)
|
||||
Private MatchTreeView As New TreeView
|
||||
|
||||
Public Sub New()
|
||||
InitializeComponent()
|
||||
End Sub
|
||||
|
||||
Private Sub frmMain_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
' === Initialization ===
|
||||
Init = New ClassInit(My.LogConfig, Me)
|
||||
AddHandler Init.Completed, AddressOf Init_Completed
|
||||
Init.InitializeApplication()
|
||||
|
||||
' === Show Splash Screen ===
|
||||
SplashScreenManager.ShowForm(Me, GetType(frmSplash), False, False)
|
||||
|
||||
' === Layout and Skin ===
|
||||
UserLookAndFeel.Default.SetSkinStyle(My.UIConfig.SkinName)
|
||||
|
||||
' === Register As Event Listener ===
|
||||
EventBus.Instance.Register(Me)
|
||||
End Sub
|
||||
|
||||
Private Sub Init_Completed(sender As Object, e As EventArgs)
|
||||
' === Initialization Complete ===
|
||||
Loading = False
|
||||
SplashScreenManager.CloseForm(False)
|
||||
|
||||
' === Setup Timers ===
|
||||
AddHandler TimerRefreshData.Tick, AddressOf TimerRefreshData_Tick
|
||||
TimerRefreshData.Enabled = True
|
||||
|
||||
' === Setup Flow Form ===
|
||||
FlowForm = New frmFlowForm(My.Application.ModulesActive)
|
||||
FlowForm.Location = My.UIConfig.FlowForm.Location
|
||||
FlowForm.Show()
|
||||
|
||||
' === Load Data ===
|
||||
RefreshData()
|
||||
End Sub
|
||||
|
||||
Private Sub frmAdmin_Shown(sender As Object, e As EventArgs) Handles Me.Shown
|
||||
Visible = False
|
||||
End Sub
|
||||
|
||||
Private Sub frmMain_FormClosed(sender As Object, e As FormClosedEventArgs)
|
||||
EventBus.Instance.Unregister(Me)
|
||||
End Sub
|
||||
|
||||
Public Sub OnEvent(e As OnFlowFormInteractionEvent)
|
||||
Select Case e.Interaction
|
||||
Case OnFlowFormInteractionEvent.FlowFormInteraction.Click
|
||||
Dim oClipboardContents As String = Clipboard.GetText()
|
||||
Dim oEnvironment As New Environment() With {
|
||||
.User = My.Application.User,
|
||||
.Modules = My.Application.Modules,
|
||||
.Database = My.Database
|
||||
}
|
||||
Dim oParams As New ClipboardWatcherParams() With {
|
||||
.MatchingProfiles = MatchingProfiles,
|
||||
.MatchTreeView = MatchTreeView,
|
||||
.ClipboardContents = oClipboardContents
|
||||
}
|
||||
Dim oForm As New frmMatch(My.LogConfig, oEnvironment, oParams)
|
||||
oForm.Show()
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
Private Sub TimerRefreshData_Tick(sender As Object, e As EventArgs)
|
||||
RefreshData()
|
||||
End Sub
|
||||
|
||||
Private Async Sub FlowForm_ClipboardChanged(sender As Object, e As IDataObject) Handles FlowForm.ClipboardChanged
|
||||
If My.Application.ClipboardWatcher.UserProfiles.Rows.Count = 0 Then
|
||||
Logger.Warn("Clipboard Changed but no profiles configured!")
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Dim oProfileFilter As ProfileFilter
|
||||
Dim oMatchingProfiles As List(Of ProfileData)
|
||||
Dim oWindow As New Window(My.LogConfig)
|
||||
Dim oWindowInfo = oWindow.GetWindowInfo()
|
||||
Dim oClipboardContents As String = Clipboard.GetText()
|
||||
Dim oUserState = My.Application.User
|
||||
|
||||
Try
|
||||
oProfileFilter = New ProfileFilter(My.LogConfig,
|
||||
My.Application.ClipboardWatcher.UserProfiles,
|
||||
My.Application.ClipboardWatcher.ProfileProcesses,
|
||||
My.Application.ClipboardWatcher.ProfileWindows,
|
||||
My.Application.ClipboardWatcher.ProfileControls,
|
||||
MatchTreeView)
|
||||
|
||||
oMatchingProfiles = oProfileFilter.Profiles
|
||||
oMatchingProfiles = oProfileFilter.FilterProfilesByClipboardRegex(oMatchingProfiles, oClipboardContents)
|
||||
oMatchingProfiles = oProfileFilter.FilterProfilesByProcess(oMatchingProfiles, oWindowInfo.ProcessName)
|
||||
oMatchingProfiles = oProfileFilter.FilterWindowsByWindowTitleRegex(oMatchingProfiles, oWindowInfo.WindowTitle)
|
||||
oMatchingProfiles = oProfileFilter.FilterProfilesByFocusedControlLocation(oMatchingProfiles, oClipboardContents, Handle)
|
||||
oMatchingProfiles = Await Task.Run(Function()
|
||||
Return oProfileFilter.FilterProfilesBySearchResults(
|
||||
oMatchingProfiles,
|
||||
My.Database,
|
||||
oUserState,
|
||||
oClipboardContents)
|
||||
End Function)
|
||||
oMatchingProfiles = oProfileFilter.ClearNotMatchedProfiles(oMatchingProfiles)
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler beim Laden der Profile. Möglicherweise liegt ein Konfigurationsfehler vor." & vbNewLine & vbNewLine & ex.Message, MsgBoxStyle.Critical, Text)
|
||||
Exit Sub
|
||||
End Try
|
||||
|
||||
'If oMatchingProfiles.Count = 0 Then
|
||||
' Logger.Warn("No matching Profiles found")
|
||||
' Exit Sub
|
||||
'End If
|
||||
|
||||
MatchingProfiles = oMatchingProfiles
|
||||
|
||||
EventBus.Instance.PostEvent(New OnFlowFormStateChangedEvent(HasSearchResults))
|
||||
End Sub
|
||||
|
||||
#Region "Notify Icon Menu"
|
||||
Private Sub BeendenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles BeendenToolStripMenuItem.Click
|
||||
Application.Exit()
|
||||
End Sub
|
||||
|
||||
Private Sub NotifyIconMain_DoubleClick(sender As Object, e As EventArgs) Handles NotifyIconMain.DoubleClick
|
||||
ToggleVisibility()
|
||||
End Sub
|
||||
|
||||
Private Sub AnzeigenVersteckenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles AnzeigenVersteckenToolStripMenuItem.Click
|
||||
ToggleVisibility()
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
|
||||
#End Region
|
||||
|
||||
Private Sub ToggleVisibility()
|
||||
If Visible Then
|
||||
Hide()
|
||||
Else
|
||||
Show()
|
||||
BringToFront()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub ButtonSettings_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles ButtonSettings.ItemClick
|
||||
frmSettings.ShowDialog()
|
||||
End Sub
|
||||
|
||||
Private Sub frmMain_StyleChanged(sender As Object, e As EventArgs) Handles Me.StyleChanged
|
||||
If Loading = False Then
|
||||
My.UIConfig.SkinName = LookAndFeel.ActiveSkinName
|
||||
My.UIConfigManager.Save()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Sub RefreshData()
|
||||
Try
|
||||
Dim oUserId As Integer = My.Application.User.UserId
|
||||
Dim oSql As String = My.Queries.ClipboardWatcher.VWCW_USER_PROFILE(oUserId)
|
||||
My.Application.ClipboardWatcher.UserProfiles = My.Database.GetDatatable(oSql)
|
||||
|
||||
If My.Application.ClipboardWatcher.UserProfiles.Rows.Count = 0 Then
|
||||
MsgBox("No profiles configured for this user so far!", MsgBoxStyle.Exclamation)
|
||||
Else
|
||||
oSql = My.Queries.ClipboardWatcher.TBCW_PROFILE_PROCESS(oUserId)
|
||||
My.Application.ClipboardWatcher.ProfileProcesses = My.Database.GetDatatable(oSql)
|
||||
|
||||
oSql = My.Queries.ClipboardWatcher.VWCW_PROFILE_REL_WINDOW(oUserId)
|
||||
My.Application.ClipboardWatcher.ProfileWindows = My.Database.GetDatatable(oSql)
|
||||
|
||||
oSql = My.Queries.ClipboardWatcher.VWCW_PROFILE_REL_CONTROL(oUserId)
|
||||
My.Application.ClipboardWatcher.ProfileControls = My.Database.GetDatatable(oSql)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
Logger.Error(ex)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
|
||||
End Class
|
||||
265
ZooFlow/frmConfigDatabase.Designer.vb
generated
@@ -1,265 +0,0 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frmConfigDatabase
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Me.LayoutControl1 = New DevExpress.XtraLayout.LayoutControl()
|
||||
Me.txtServerName = New DevExpress.XtraEditors.TextEdit()
|
||||
Me.txtUserName = New DevExpress.XtraEditors.TextEdit()
|
||||
Me.txtPassword = New DevExpress.XtraEditors.TextEdit()
|
||||
Me.cmbDatabase = New DevExpress.XtraEditors.ComboBoxEdit()
|
||||
Me.btnTestConnection = New DevExpress.XtraEditors.SimpleButton()
|
||||
Me.txtConnectionString = New DevExpress.XtraEditors.TextEdit()
|
||||
Me.chkWinAuth = New DevExpress.XtraEditors.CheckEdit()
|
||||
Me.LayoutControlGroup1 = New DevExpress.XtraLayout.LayoutControlGroup()
|
||||
Me.LayoutControlItem1 = New DevExpress.XtraLayout.LayoutControlItem()
|
||||
Me.LayoutControlItem2 = New DevExpress.XtraLayout.LayoutControlItem()
|
||||
Me.EmptySpaceItem1 = New DevExpress.XtraLayout.EmptySpaceItem()
|
||||
Me.LayoutControlItem4 = New DevExpress.XtraLayout.LayoutControlItem()
|
||||
Me.LayoutControlItem3 = New DevExpress.XtraLayout.LayoutControlItem()
|
||||
Me.LayoutControlItem7 = New DevExpress.XtraLayout.LayoutControlItem()
|
||||
Me.LayoutControlItem6 = New DevExpress.XtraLayout.LayoutControlItem()
|
||||
Me.LayoutControlItem5 = New DevExpress.XtraLayout.LayoutControlItem()
|
||||
CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.LayoutControl1.SuspendLayout()
|
||||
CType(Me.txtServerName.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.txtUserName.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.txtPassword.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.cmbDatabase.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.txtConnectionString.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.chkWinAuth.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.LayoutControlGroup1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.EmptySpaceItem1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'LayoutControl1
|
||||
'
|
||||
Me.LayoutControl1.Controls.Add(Me.txtServerName)
|
||||
Me.LayoutControl1.Controls.Add(Me.txtUserName)
|
||||
Me.LayoutControl1.Controls.Add(Me.txtPassword)
|
||||
Me.LayoutControl1.Controls.Add(Me.cmbDatabase)
|
||||
Me.LayoutControl1.Controls.Add(Me.btnTestConnection)
|
||||
Me.LayoutControl1.Controls.Add(Me.txtConnectionString)
|
||||
Me.LayoutControl1.Controls.Add(Me.chkWinAuth)
|
||||
Me.LayoutControl1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.LayoutControl1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.LayoutControl1.Name = "LayoutControl1"
|
||||
Me.LayoutControl1.Root = Me.LayoutControlGroup1
|
||||
Me.LayoutControl1.Size = New System.Drawing.Size(560, 186)
|
||||
Me.LayoutControl1.TabIndex = 0
|
||||
Me.LayoutControl1.Text = "LayoutControl1"
|
||||
'
|
||||
'txtServerName
|
||||
'
|
||||
Me.txtServerName.Location = New System.Drawing.Point(145, 12)
|
||||
Me.txtServerName.Name = "txtServerName"
|
||||
Me.txtServerName.Size = New System.Drawing.Size(403, 20)
|
||||
Me.txtServerName.StyleController = Me.LayoutControl1
|
||||
Me.txtServerName.TabIndex = 4
|
||||
'
|
||||
'txtUserName
|
||||
'
|
||||
Me.txtUserName.Location = New System.Drawing.Point(145, 36)
|
||||
Me.txtUserName.Name = "txtUserName"
|
||||
Me.txtUserName.Size = New System.Drawing.Size(133, 20)
|
||||
Me.txtUserName.StyleController = Me.LayoutControl1
|
||||
Me.txtUserName.TabIndex = 5
|
||||
'
|
||||
'txtPassword
|
||||
'
|
||||
Me.txtPassword.Location = New System.Drawing.Point(415, 36)
|
||||
Me.txtPassword.Name = "txtPassword"
|
||||
Me.txtPassword.Size = New System.Drawing.Size(133, 20)
|
||||
Me.txtPassword.StyleController = Me.LayoutControl1
|
||||
Me.txtPassword.TabIndex = 6
|
||||
'
|
||||
'cmbDatabase
|
||||
'
|
||||
Me.cmbDatabase.Location = New System.Drawing.Point(145, 60)
|
||||
Me.cmbDatabase.Name = "cmbDatabase"
|
||||
Me.cmbDatabase.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
|
||||
Me.cmbDatabase.Size = New System.Drawing.Size(403, 20)
|
||||
Me.cmbDatabase.StyleController = Me.LayoutControl1
|
||||
Me.cmbDatabase.TabIndex = 7
|
||||
'
|
||||
'btnTestConnection
|
||||
'
|
||||
Me.btnTestConnection.Location = New System.Drawing.Point(12, 107)
|
||||
Me.btnTestConnection.Name = "btnTestConnection"
|
||||
Me.btnTestConnection.Size = New System.Drawing.Size(536, 22)
|
||||
Me.btnTestConnection.StyleController = Me.LayoutControl1
|
||||
Me.btnTestConnection.TabIndex = 8
|
||||
Me.btnTestConnection.Text = "Verbindung zur Datenbank herstellen"
|
||||
'
|
||||
'txtConnectionString
|
||||
'
|
||||
Me.txtConnectionString.Location = New System.Drawing.Point(145, 133)
|
||||
Me.txtConnectionString.Name = "txtConnectionString"
|
||||
Me.txtConnectionString.Properties.ReadOnly = True
|
||||
Me.txtConnectionString.Size = New System.Drawing.Size(403, 20)
|
||||
Me.txtConnectionString.StyleController = Me.LayoutControl1
|
||||
Me.txtConnectionString.TabIndex = 9
|
||||
'
|
||||
'chkWinAuth
|
||||
'
|
||||
Me.chkWinAuth.Location = New System.Drawing.Point(12, 84)
|
||||
Me.chkWinAuth.Name = "chkWinAuth"
|
||||
Me.chkWinAuth.Properties.Caption = "Windows Authentifizierung"
|
||||
Me.chkWinAuth.Size = New System.Drawing.Size(536, 19)
|
||||
Me.chkWinAuth.StyleController = Me.LayoutControl1
|
||||
Me.chkWinAuth.TabIndex = 10
|
||||
'
|
||||
'LayoutControlGroup1
|
||||
'
|
||||
Me.LayoutControlGroup1.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
|
||||
Me.LayoutControlGroup1.GroupBordersVisible = False
|
||||
Me.LayoutControlGroup1.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem1, Me.LayoutControlItem2, Me.EmptySpaceItem1, Me.LayoutControlItem4, Me.LayoutControlItem3, Me.LayoutControlItem7, Me.LayoutControlItem6, Me.LayoutControlItem5})
|
||||
Me.LayoutControlGroup1.Name = "LayoutControlGroup1"
|
||||
Me.LayoutControlGroup1.Size = New System.Drawing.Size(560, 186)
|
||||
Me.LayoutControlGroup1.TextVisible = False
|
||||
'
|
||||
'LayoutControlItem1
|
||||
'
|
||||
Me.LayoutControlItem1.Control = Me.txtServerName
|
||||
Me.LayoutControlItem1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.LayoutControlItem1.Name = "LayoutControlItem1"
|
||||
Me.LayoutControlItem1.Size = New System.Drawing.Size(540, 24)
|
||||
Me.LayoutControlItem1.Text = "Server Name:"
|
||||
Me.LayoutControlItem1.TextSize = New System.Drawing.Size(130, 13)
|
||||
'
|
||||
'LayoutControlItem2
|
||||
'
|
||||
Me.LayoutControlItem2.Control = Me.txtUserName
|
||||
Me.LayoutControlItem2.Location = New System.Drawing.Point(0, 24)
|
||||
Me.LayoutControlItem2.Name = "LayoutControlItem2"
|
||||
Me.LayoutControlItem2.Size = New System.Drawing.Size(270, 24)
|
||||
Me.LayoutControlItem2.Text = "Benutzername:"
|
||||
Me.LayoutControlItem2.TextSize = New System.Drawing.Size(130, 13)
|
||||
'
|
||||
'EmptySpaceItem1
|
||||
'
|
||||
Me.EmptySpaceItem1.AllowHotTrack = False
|
||||
Me.EmptySpaceItem1.Location = New System.Drawing.Point(0, 145)
|
||||
Me.EmptySpaceItem1.Name = "EmptySpaceItem1"
|
||||
Me.EmptySpaceItem1.Size = New System.Drawing.Size(540, 21)
|
||||
Me.EmptySpaceItem1.TextSize = New System.Drawing.Size(0, 0)
|
||||
'
|
||||
'LayoutControlItem4
|
||||
'
|
||||
Me.LayoutControlItem4.Control = Me.cmbDatabase
|
||||
Me.LayoutControlItem4.Location = New System.Drawing.Point(0, 48)
|
||||
Me.LayoutControlItem4.Name = "LayoutControlItem4"
|
||||
Me.LayoutControlItem4.Size = New System.Drawing.Size(540, 24)
|
||||
Me.LayoutControlItem4.Text = "Datenbank:"
|
||||
Me.LayoutControlItem4.TextSize = New System.Drawing.Size(130, 13)
|
||||
'
|
||||
'LayoutControlItem3
|
||||
'
|
||||
Me.LayoutControlItem3.Control = Me.txtPassword
|
||||
Me.LayoutControlItem3.Location = New System.Drawing.Point(270, 24)
|
||||
Me.LayoutControlItem3.Name = "LayoutControlItem3"
|
||||
Me.LayoutControlItem3.Size = New System.Drawing.Size(270, 24)
|
||||
Me.LayoutControlItem3.Text = "Passwort:"
|
||||
Me.LayoutControlItem3.TextSize = New System.Drawing.Size(130, 13)
|
||||
'
|
||||
'LayoutControlItem7
|
||||
'
|
||||
Me.LayoutControlItem7.Control = Me.chkWinAuth
|
||||
Me.LayoutControlItem7.Location = New System.Drawing.Point(0, 72)
|
||||
Me.LayoutControlItem7.Name = "LayoutControlItem7"
|
||||
Me.LayoutControlItem7.Size = New System.Drawing.Size(540, 23)
|
||||
Me.LayoutControlItem7.TextSize = New System.Drawing.Size(0, 0)
|
||||
Me.LayoutControlItem7.TextVisible = False
|
||||
'
|
||||
'LayoutControlItem6
|
||||
'
|
||||
Me.LayoutControlItem6.Control = Me.txtConnectionString
|
||||
Me.LayoutControlItem6.Location = New System.Drawing.Point(0, 121)
|
||||
Me.LayoutControlItem6.Name = "LayoutControlItem6"
|
||||
Me.LayoutControlItem6.Size = New System.Drawing.Size(540, 24)
|
||||
Me.LayoutControlItem6.Text = "Aktueller Connectionstring:"
|
||||
Me.LayoutControlItem6.TextSize = New System.Drawing.Size(130, 13)
|
||||
'
|
||||
'LayoutControlItem5
|
||||
'
|
||||
Me.LayoutControlItem5.Control = Me.btnTestConnection
|
||||
Me.LayoutControlItem5.Location = New System.Drawing.Point(0, 95)
|
||||
Me.LayoutControlItem5.Name = "LayoutControlItem5"
|
||||
Me.LayoutControlItem5.Size = New System.Drawing.Size(540, 26)
|
||||
Me.LayoutControlItem5.TextSize = New System.Drawing.Size(0, 0)
|
||||
Me.LayoutControlItem5.TextVisible = False
|
||||
'
|
||||
'frmConfigDatabase
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(560, 186)
|
||||
Me.Controls.Add(Me.LayoutControl1)
|
||||
Me.Name = "frmConfigDatabase"
|
||||
Me.Text = "Datenbank Verbindung"
|
||||
CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.LayoutControl1.ResumeLayout(False)
|
||||
CType(Me.txtServerName.Properties, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.txtUserName.Properties, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.txtPassword.Properties, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.cmbDatabase.Properties, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.txtConnectionString.Properties, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.chkWinAuth.Properties, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.LayoutControlGroup1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.EmptySpaceItem1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents LayoutControl1 As DevExpress.XtraLayout.LayoutControl
|
||||
Friend WithEvents LayoutControlGroup1 As DevExpress.XtraLayout.LayoutControlGroup
|
||||
Friend WithEvents txtServerName As DevExpress.XtraEditors.TextEdit
|
||||
Friend WithEvents txtUserName As DevExpress.XtraEditors.TextEdit
|
||||
Friend WithEvents txtPassword As DevExpress.XtraEditors.TextEdit
|
||||
Friend WithEvents cmbDatabase As DevExpress.XtraEditors.ComboBoxEdit
|
||||
Friend WithEvents btnTestConnection As DevExpress.XtraEditors.SimpleButton
|
||||
Friend WithEvents txtConnectionString As DevExpress.XtraEditors.TextEdit
|
||||
Friend WithEvents chkWinAuth As DevExpress.XtraEditors.CheckEdit
|
||||
Friend WithEvents LayoutControlItem1 As DevExpress.XtraLayout.LayoutControlItem
|
||||
Friend WithEvents LayoutControlItem2 As DevExpress.XtraLayout.LayoutControlItem
|
||||
Friend WithEvents EmptySpaceItem1 As DevExpress.XtraLayout.EmptySpaceItem
|
||||
Friend WithEvents LayoutControlItem4 As DevExpress.XtraLayout.LayoutControlItem
|
||||
Friend WithEvents LayoutControlItem3 As DevExpress.XtraLayout.LayoutControlItem
|
||||
Friend WithEvents LayoutControlItem7 As DevExpress.XtraLayout.LayoutControlItem
|
||||
Friend WithEvents LayoutControlItem6 As DevExpress.XtraLayout.LayoutControlItem
|
||||
Friend WithEvents LayoutControlItem5 As DevExpress.XtraLayout.LayoutControlItem
|
||||
End Class
|
||||
@@ -1,120 +0,0 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
@@ -1,117 +0,0 @@
|
||||
Imports DigitalData.Modules.Database
|
||||
Imports DigitalData.Modules.Filesystem
|
||||
Imports DigitalData.Modules.Logging
|
||||
|
||||
Public Class frmConfigDatabase
|
||||
Private Const STRING_CONNECTION_SUCCESSFUL = "Die Verbindung wurde erfolgreich aufgebaut!" & vbNewLine & "Möchten Sie diese Verbindung nun in der Anwendung speichern?"
|
||||
|
||||
Private Logger As Logger = My.LogConfig.GetLogger()
|
||||
|
||||
Private Sub frmConfigDatabase_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
Dim oConnectionString = My.SystemConfig.ConnectionString
|
||||
|
||||
If Not oConnectionString = String.Empty Then
|
||||
Dim oBuilder = My.SystemConfig.GetConnectionStringBuilder(oConnectionString)
|
||||
|
||||
If oBuilder Is Nothing Then
|
||||
MsgBox("Connection String ist ungültig!", MsgBoxStyle.Critical)
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
If oConnectionString.Contains("Trusted") Then
|
||||
chkWinAuth.Checked = True
|
||||
txtConnectionString.Text = oConnectionString
|
||||
Else
|
||||
chkWinAuth.Checked = False
|
||||
txtConnectionString.Text = oConnectionString.Replace(oBuilder.Password, "XXXXXX")
|
||||
txtUserName.Text = oBuilder.UserID
|
||||
End If
|
||||
|
||||
txtServerName.Text = oBuilder.DataSource
|
||||
cmbDatabase.Text = oBuilder.InitialCatalog
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub chkWinAuth_CheckedChanged(sender As Object, e As EventArgs) Handles chkWinAuth.CheckedChanged
|
||||
txtPassword.Enabled = Not chkWinAuth.Checked
|
||||
txtUserName.Enabled = Not chkWinAuth.Checked
|
||||
End Sub
|
||||
|
||||
Private Sub cmbDatabase_Click(sender As Object, e As EventArgs) Handles cmbDatabase.Click
|
||||
Cursor = Cursors.WaitCursor
|
||||
|
||||
Dim oConnectionString As String = GetConnectionString(False)
|
||||
Dim oDatabase As New MSSQLServer(My.LogConfig, oConnectionString)
|
||||
|
||||
If oDatabase.DBInitialized = False Then
|
||||
MsgBox("Verbindung fehlgeschlagen!", MsgBoxStyle.Critical)
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Try
|
||||
Using oConnection = New SqlClient.SqlConnection(oConnectionString)
|
||||
oConnection.Open()
|
||||
Using cmd As New SqlClient.SqlCommand("sp_databases", oConnection)
|
||||
Using dr As SqlClient.SqlDataReader = cmd.ExecuteReader
|
||||
If dr.HasRows Then
|
||||
cmbDatabase.Properties.Items.Clear()
|
||||
|
||||
Do While dr.Read
|
||||
cmbDatabase.Properties.Items.Add(dr("Database_Name"))
|
||||
Loop
|
||||
cmbDatabase.ShowPopup()
|
||||
Else
|
||||
MsgBox("The standard-databases could not be retrieved. The default database will be set!" & vbNewLine & "Check rights in sql-server for user: " & Me.txtUserName.Text, MsgBoxStyle.Exclamation)
|
||||
End If
|
||||
End Using
|
||||
End Using
|
||||
End Using
|
||||
|
||||
Catch ex As Exception
|
||||
Logger.Error(ex)
|
||||
End Try
|
||||
|
||||
Cursor = Cursors.Default
|
||||
End Sub
|
||||
|
||||
Private Function GetConnectionString(WithDatabase As Boolean) As String
|
||||
Dim oConnectionString As String
|
||||
|
||||
If chkWinAuth.Checked Then
|
||||
oConnectionString = $"Data Source={txtServerName.Text};Trusted_Connection=True;"
|
||||
Else
|
||||
oConnectionString = $"Server={txtServerName.Text};User Id={txtUserName.Text};Password={txtPassword.Text};"
|
||||
End If
|
||||
|
||||
If WithDatabase Then
|
||||
oConnectionString &= $"Database={cmbDatabase.Text};"
|
||||
End If
|
||||
|
||||
Return oConnectionString
|
||||
End Function
|
||||
|
||||
Private Sub btnTestConnection_Click(sender As Object, e As EventArgs) Handles btnTestConnection.Click
|
||||
Try
|
||||
Dim oConnectionString = GetConnectionString(True)
|
||||
|
||||
Using oConnection As New SqlClient.SqlConnection(oConnectionString)
|
||||
oConnection.Open()
|
||||
oConnection.Close()
|
||||
End Using
|
||||
|
||||
Dim oResult = MessageBox.Show(STRING_CONNECTION_SUCCESSFUL, Me.Text, MessageBoxButtons.YesNo, MessageBoxIcon.Question)
|
||||
|
||||
If oResult = DialogResult.Yes Then
|
||||
Dim oCrypt As New EncryptionLegacy("!35452didalog=")
|
||||
Dim oEncryptedPassword = oCrypt.EncryptData(txtPassword.Text)
|
||||
Dim oEncryptedConnectionString = $"Server={txtServerName.Text};Database={cmbDatabase.Text};User Id={txtUserName.Text};Password={oEncryptedPassword};"
|
||||
|
||||
My.SystemConfig.ConnectionString = oEncryptedConnectionString
|
||||
My.SystemConfigManager.Save()
|
||||
End If
|
||||
Catch ex As Exception
|
||||
Logger.Error(ex)
|
||||
MsgBox("Error while connecting to Database")
|
||||
End Try
|
||||
End Sub
|
||||
End Class
|
||||
37
ZooFlow/frmFlowForm.Designer.vb
generated
@@ -1,37 +0,0 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frmFlowForm
|
||||
Inherits ClassFlowForm
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'frmFlowForm
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(800, 450)
|
||||
Me.Name = "frmFlowForm"
|
||||
Me.Text = "frmFlowForm"
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
@@ -1,120 +0,0 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
@@ -1,113 +0,0 @@
|
||||
Imports DigitalData.Modules.Messaging
|
||||
|
||||
Public Class frmFlowForm
|
||||
Private WithEvents Watcher As ClassClipboardWatcher = ClassClipboardWatcher.Singleton
|
||||
Private ActiveModules As List(Of String)
|
||||
|
||||
Private CurrentState As OnFlowFormStateChangedEvent.FlowFormState = OnFlowFormStateChangedEvent.FlowFormState.Default
|
||||
|
||||
Public Event ClipboardChanged As EventHandler(Of IDataObject)
|
||||
|
||||
Public Sub New(ActiveModules As List(Of String))
|
||||
' Dieser Aufruf ist für den Designer erforderlich.
|
||||
InitializeComponent()
|
||||
|
||||
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
|
||||
Me.ActiveModules = ActiveModules
|
||||
End Sub
|
||||
|
||||
Private Sub frmFlowForm_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
' === Set Form Properties ===
|
||||
TopMost = True
|
||||
AllowDrop = True
|
||||
ShowInTaskbar = False
|
||||
SetFlowFormState(OnFlowFormStateChangedEvent.FlowFormState.Default)
|
||||
|
||||
' === Register Events ===
|
||||
|
||||
AddHandler MouseClick, New MouseEventHandler(AddressOf Form_MouseClick)
|
||||
AddHandler MouseMove, New MouseEventHandler(AddressOf Form_MouseMove)
|
||||
|
||||
' === Register As Event Listener ===
|
||||
EventBus.Instance.Register(Me)
|
||||
End Sub
|
||||
|
||||
Private Sub frmFlowForm_Closed(sender As Object, e As EventArgs) Handles Me.Closed
|
||||
EventBus.Instance.Unregister(Me)
|
||||
End Sub
|
||||
|
||||
Private Sub Form_MouseClick(sender As Object, e As EventArgs)
|
||||
If CurrentState = OnFlowFormStateChangedEvent.FlowFormState.HasSearchResults Then
|
||||
SetFlowFormState(OnFlowFormStateChangedEvent.FlowFormState.Default)
|
||||
EventBus.Instance.PostEvent(New OnFlowFormInteractionEvent(OnFlowFormInteractionEvent.FlowFormInteraction.Click))
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub Form_MouseMove(ByVal sender As Object, ByVal e As MouseEventArgs)
|
||||
If e.Button = MouseButtons.Left Then
|
||||
Win32.ReleaseCapture()
|
||||
Win32.SendMessage(Handle, Win32.WM_NCLBUTTONDOWN, Win32.HTCAPTION, 0)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Sub OnEvent(e As OnFlowFormStateChangedEvent)
|
||||
CurrentState = e.State
|
||||
SetFlowFormState(e.State)
|
||||
End Sub
|
||||
|
||||
Public Sub SetFlowFormState(State As OnFlowFormStateChangedEvent.FlowFormState)
|
||||
Select Case State
|
||||
Case OnFlowFormStateChangedEvent.FlowFormState.HasSearchResults
|
||||
SetBitmap(My.Resources.CW_GEFUNDEN_klein)
|
||||
Case OnFlowFormStateChangedEvent.FlowFormState.HasFileDropped
|
||||
SetBitmap(My.Resources.GLOBIX_GEFUNDEN_klein)
|
||||
Case Else
|
||||
SetBitmap(My.Resources.ZOOFLOW_Home_klein)
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
Private Sub frmFlowForm_DragOver(sender As Object, e As DragEventArgs) Handles Me.DragOver
|
||||
If Not ActiveModules.Contains(ClassConstants.MODULE_GLOBAL_INDEXER) Then
|
||||
e.Effect = DragDropEffects.None
|
||||
Else
|
||||
If e.Data.GetDataPresent(DataFormats.FileDrop) Then
|
||||
' Handle file dragged from Windows
|
||||
e.Effect = DragDropEffects.Copy
|
||||
SetFlowFormState(OnFlowFormStateChangedEvent.FlowFormState.HasFileDropped)
|
||||
ElseIf e.Data.GetDataPresent("FileGroupDescriptor") Then
|
||||
' Handle a message dragged from Outlook
|
||||
e.Effect = DragDropEffects.Copy
|
||||
SetFlowFormState(OnFlowFormStateChangedEvent.FlowFormState.HasFileDropped)
|
||||
ElseIf e.Data.GetDataPresent("aryFileGroupDescriptor") AndAlso (e.Data.GetDataPresent("FileContents")) Then
|
||||
' Handle a message dragged from Thunderbird?
|
||||
e.Effect = DragDropEffects.Copy
|
||||
SetFlowFormState(OnFlowFormStateChangedEvent.FlowFormState.HasFileDropped)
|
||||
Else
|
||||
' Otherwise, do not handle
|
||||
e.Effect = DragDropEffects.None
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub frmFlowForm_DragLeave(sender As Object, e As EventArgs) Handles Me.DragLeave
|
||||
SetFlowFormState(OnFlowFormStateChangedEvent.FlowFormState.Default)
|
||||
End Sub
|
||||
|
||||
Private Sub Watcher_ClipboardChanged(sender As Object, e As IDataObject) Handles Watcher.ClipboardChanged
|
||||
If ActiveModules.Contains(ClassConstants.MODULE_CLIPBOARDWATCHER) Then
|
||||
RaiseEvent ClipboardChanged(sender, e)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
'''' <summary>
|
||||
'''' DragDrop Support
|
||||
'''' </summary>
|
||||
'Protected Overrides Sub WndProc(ByRef m As Message)
|
||||
' If m.Msg = &H84 Then
|
||||
' m.Result = CType(2, IntPtr)
|
||||
' Return
|
||||
' End If
|
||||
|
||||
' MyBase.WndProc(m)
|
||||
'End Sub
|
||||
End Class
|
||||
181
ZooFlow/frmSettings.Designer.vb
generated
@@ -1,181 +0,0 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frmSettings
|
||||
Inherits DevExpress.XtraEditors.XtraForm
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim UserIdLabel As System.Windows.Forms.Label
|
||||
Dim Label1 As System.Windows.Forms.Label
|
||||
Dim Label2 As System.Windows.Forms.Label
|
||||
Me.XtraTabControl1 = New DevExpress.XtraTab.XtraTabControl()
|
||||
Me.PageModules = New DevExpress.XtraTab.XtraTabPage()
|
||||
Me.txtGivenName = New System.Windows.Forms.TextBox()
|
||||
Me.UserStateBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.txtUsername = New System.Windows.Forms.TextBox()
|
||||
Me.txtUserId = New System.Windows.Forms.TextBox()
|
||||
Me.XtraTabPage2 = New DevExpress.XtraTab.XtraTabPage()
|
||||
Me.GridControl1 = New DevExpress.XtraGrid.GridControl()
|
||||
Me.GridView1 = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.classModuleStateBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
UserIdLabel = New System.Windows.Forms.Label()
|
||||
Label1 = New System.Windows.Forms.Label()
|
||||
Label2 = New System.Windows.Forms.Label()
|
||||
CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.XtraTabControl1.SuspendLayout()
|
||||
Me.PageModules.SuspendLayout()
|
||||
CType(Me.UserStateBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridView1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.classModuleStateBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'UserIdLabel
|
||||
'
|
||||
UserIdLabel.AutoSize = True
|
||||
UserIdLabel.Location = New System.Drawing.Point(15, 24)
|
||||
UserIdLabel.Name = "UserIdLabel"
|
||||
UserIdLabel.Size = New System.Drawing.Size(43, 13)
|
||||
UserIdLabel.TabIndex = 0
|
||||
UserIdLabel.Text = "UserId:"
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Label1.AutoSize = True
|
||||
Label1.Location = New System.Drawing.Point(15, 51)
|
||||
Label1.Name = "Label1"
|
||||
Label1.Size = New System.Drawing.Size(59, 13)
|
||||
Label1.TabIndex = 0
|
||||
Label1.Text = "Username:"
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Label2.AutoSize = True
|
||||
Label2.Location = New System.Drawing.Point(15, 78)
|
||||
Label2.Name = "Label2"
|
||||
Label2.Size = New System.Drawing.Size(68, 13)
|
||||
Label2.TabIndex = 0
|
||||
Label2.Text = "Given Name:"
|
||||
'
|
||||
'XtraTabControl1
|
||||
'
|
||||
Me.XtraTabControl1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.XtraTabControl1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.XtraTabControl1.Name = "XtraTabControl1"
|
||||
Me.XtraTabControl1.SelectedTabPage = Me.PageModules
|
||||
Me.XtraTabControl1.Size = New System.Drawing.Size(784, 419)
|
||||
Me.XtraTabControl1.TabIndex = 0
|
||||
Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.PageModules, Me.XtraTabPage2})
|
||||
'
|
||||
'PageModules
|
||||
'
|
||||
Me.PageModules.Controls.Add(Me.GridControl1)
|
||||
Me.PageModules.Controls.Add(Label2)
|
||||
Me.PageModules.Controls.Add(Label1)
|
||||
Me.PageModules.Controls.Add(Me.txtGivenName)
|
||||
Me.PageModules.Controls.Add(Me.txtUsername)
|
||||
Me.PageModules.Controls.Add(UserIdLabel)
|
||||
Me.PageModules.Controls.Add(Me.txtUserId)
|
||||
Me.PageModules.Name = "PageModules"
|
||||
Me.PageModules.Size = New System.Drawing.Size(778, 391)
|
||||
Me.PageModules.Text = "Module && Lizenzen"
|
||||
'
|
||||
'txtGivenName
|
||||
'
|
||||
Me.txtGivenName.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.UserStateBindingSource, "GivenName", True))
|
||||
Me.txtGivenName.Location = New System.Drawing.Point(89, 75)
|
||||
Me.txtGivenName.Name = "txtGivenName"
|
||||
Me.txtGivenName.Size = New System.Drawing.Size(100, 21)
|
||||
Me.txtGivenName.TabIndex = 1
|
||||
'
|
||||
'UserStateBindingSource
|
||||
'
|
||||
Me.UserStateBindingSource.DataSource = GetType(DigitalData.Modules.ZooFlow.State.UserState)
|
||||
'
|
||||
'txtUsername
|
||||
'
|
||||
Me.txtUsername.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.UserStateBindingSource, "UserName", True))
|
||||
Me.txtUsername.Location = New System.Drawing.Point(89, 48)
|
||||
Me.txtUsername.Name = "txtUsername"
|
||||
Me.txtUsername.Size = New System.Drawing.Size(100, 21)
|
||||
Me.txtUsername.TabIndex = 1
|
||||
'
|
||||
'txtUserId
|
||||
'
|
||||
Me.txtUserId.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.UserStateBindingSource, "UserId", True))
|
||||
Me.txtUserId.Location = New System.Drawing.Point(89, 21)
|
||||
Me.txtUserId.Name = "txtUserId"
|
||||
Me.txtUserId.Size = New System.Drawing.Size(100, 21)
|
||||
Me.txtUserId.TabIndex = 1
|
||||
'
|
||||
'XtraTabPage2
|
||||
'
|
||||
Me.XtraTabPage2.Name = "XtraTabPage2"
|
||||
Me.XtraTabPage2.Size = New System.Drawing.Size(778, 391)
|
||||
Me.XtraTabPage2.Text = "XtraTabPage2"
|
||||
'
|
||||
'GridControl1
|
||||
'
|
||||
Me.GridControl1.DataSource = Me.classModuleStateBindingSource
|
||||
Me.GridControl1.Location = New System.Drawing.Point(324, 48)
|
||||
Me.GridControl1.MainView = Me.GridView1
|
||||
Me.GridControl1.Name = "GridControl1"
|
||||
Me.GridControl1.Size = New System.Drawing.Size(400, 200)
|
||||
Me.GridControl1.TabIndex = 2
|
||||
Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView1})
|
||||
'
|
||||
'GridView1
|
||||
'
|
||||
Me.GridView1.GridControl = Me.GridControl1
|
||||
Me.GridView1.Name = "GridView1"
|
||||
'
|
||||
'classModuleStateBindingSource
|
||||
'
|
||||
Me.classModuleStateBindingSource.DataSource = GetType(DigitalData.Modules.ZooFlow.State.ModuleState)
|
||||
'
|
||||
'frmSettings
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(784, 419)
|
||||
Me.Controls.Add(Me.XtraTabControl1)
|
||||
Me.Name = "frmSettings"
|
||||
Me.Text = "frmSettings"
|
||||
CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.XtraTabControl1.ResumeLayout(False)
|
||||
Me.PageModules.ResumeLayout(False)
|
||||
Me.PageModules.PerformLayout()
|
||||
CType(Me.UserStateBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridView1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.classModuleStateBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents XtraTabControl1 As DevExpress.XtraTab.XtraTabControl
|
||||
Friend WithEvents PageModules As DevExpress.XtraTab.XtraTabPage
|
||||
Friend WithEvents XtraTabPage2 As DevExpress.XtraTab.XtraTabPage
|
||||
Friend WithEvents txtUserId As TextBox
|
||||
Friend WithEvents UserStateBindingSource As BindingSource
|
||||
Friend WithEvents txtGivenName As TextBox
|
||||
Friend WithEvents txtUsername As TextBox
|
||||
Friend WithEvents GridControl1 As DevExpress.XtraGrid.GridControl
|
||||
Friend WithEvents classModuleStateBindingSource As BindingSource
|
||||
Friend WithEvents GridView1 As DevExpress.XtraGrid.Views.Grid.GridView
|
||||
End Class
|
||||
@@ -1,138 +0,0 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<metadata name="UserIdLabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>False</value>
|
||||
</metadata>
|
||||
<metadata name="Label1.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>False</value>
|
||||
</metadata>
|
||||
<metadata name="Label2.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>False</value>
|
||||
</metadata>
|
||||
<metadata name="classModuleStateBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>200, 17</value>
|
||||
</metadata>
|
||||
<metadata name="UserStateBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
<metadata name="UserStateBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
</root>
|
||||
@@ -1,5 +0,0 @@
|
||||
Public Class frmSettings
|
||||
Private Sub frmSettings_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
UserStateBindingSource.DataSource = My.Application.User
|
||||
End Sub
|
||||
End Class
|
||||
129
ZooFlow/frmSplash.Designer.vb
generated
@@ -1,129 +0,0 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frmSplash
|
||||
Inherits DevExpress.XtraSplashScreen.SplashScreen
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSplash))
|
||||
Me.pictureEdit2 = New DevExpress.XtraEditors.PictureEdit()
|
||||
Me.pictureEdit1 = New DevExpress.XtraEditors.PictureEdit()
|
||||
Me.labelControl2 = New DevExpress.XtraEditors.LabelControl()
|
||||
Me.txtActionName = New DevExpress.XtraEditors.LabelControl()
|
||||
Me.Version = New DevExpress.XtraEditors.LabelControl()
|
||||
Me.ProgressBarControl1 = New DevExpress.XtraEditors.ProgressBarControl()
|
||||
CType(Me.pictureEdit2.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pictureEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.ProgressBarControl1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'pictureEdit2
|
||||
'
|
||||
Me.pictureEdit2.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.pictureEdit2.Cursor = System.Windows.Forms.Cursors.Default
|
||||
Me.pictureEdit2.EditValue = CType(resources.GetObject("pictureEdit2.EditValue"), Object)
|
||||
Me.pictureEdit2.Location = New System.Drawing.Point(12, 12)
|
||||
Me.pictureEdit2.Name = "pictureEdit2"
|
||||
Me.pictureEdit2.Properties.AllowFocused = False
|
||||
Me.pictureEdit2.Properties.Appearance.BackColor = System.Drawing.Color.Transparent
|
||||
Me.pictureEdit2.Properties.Appearance.Options.UseBackColor = True
|
||||
Me.pictureEdit2.Properties.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.NoBorder
|
||||
Me.pictureEdit2.Properties.ShowMenu = False
|
||||
Me.pictureEdit2.Size = New System.Drawing.Size(525, 260)
|
||||
Me.pictureEdit2.TabIndex = 14
|
||||
'
|
||||
'pictureEdit1
|
||||
'
|
||||
Me.pictureEdit1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.pictureEdit1.Cursor = System.Windows.Forms.Cursors.Default
|
||||
Me.pictureEdit1.EditValue = CType(resources.GetObject("pictureEdit1.EditValue"), Object)
|
||||
Me.pictureEdit1.Location = New System.Drawing.Point(335, 346)
|
||||
Me.pictureEdit1.Name = "pictureEdit1"
|
||||
Me.pictureEdit1.Properties.AllowFocused = False
|
||||
Me.pictureEdit1.Properties.Appearance.BackColor = System.Drawing.Color.Transparent
|
||||
Me.pictureEdit1.Properties.Appearance.Options.UseBackColor = True
|
||||
Me.pictureEdit1.Properties.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.NoBorder
|
||||
Me.pictureEdit1.Properties.ShowMenu = False
|
||||
Me.pictureEdit1.Size = New System.Drawing.Size(202, 28)
|
||||
Me.pictureEdit1.TabIndex = 13
|
||||
'
|
||||
'labelControl2
|
||||
'
|
||||
Me.labelControl2.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.labelControl2.Location = New System.Drawing.Point(12, 278)
|
||||
Me.labelControl2.Name = "labelControl2"
|
||||
Me.labelControl2.Size = New System.Drawing.Size(50, 13)
|
||||
Me.labelControl2.TabIndex = 12
|
||||
Me.labelControl2.Text = "Starting..."
|
||||
'
|
||||
'txtActionName
|
||||
'
|
||||
Me.txtActionName.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.txtActionName.Location = New System.Drawing.Point(12, 321)
|
||||
Me.txtActionName.Name = "txtActionName"
|
||||
Me.txtActionName.Size = New System.Drawing.Size(45, 13)
|
||||
Me.txtActionName.TabIndex = 12
|
||||
Me.txtActionName.Text = "Loading.."
|
||||
'
|
||||
'Version
|
||||
'
|
||||
Me.Version.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
|
||||
Me.Version.Location = New System.Drawing.Point(12, 361)
|
||||
Me.Version.Name = "Version"
|
||||
Me.Version.Size = New System.Drawing.Size(54, 13)
|
||||
Me.Version.TabIndex = 12
|
||||
Me.Version.Text = "Version {0}"
|
||||
'
|
||||
'ProgressBarControl1
|
||||
'
|
||||
Me.ProgressBarControl1.Location = New System.Drawing.Point(12, 297)
|
||||
Me.ProgressBarControl1.Name = "ProgressBarControl1"
|
||||
Me.ProgressBarControl1.Size = New System.Drawing.Size(525, 18)
|
||||
Me.ProgressBarControl1.TabIndex = 15
|
||||
'
|
||||
'frmSplash
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(549, 386)
|
||||
Me.Controls.Add(Me.ProgressBarControl1)
|
||||
Me.Controls.Add(Me.pictureEdit2)
|
||||
Me.Controls.Add(Me.pictureEdit1)
|
||||
Me.Controls.Add(Me.Version)
|
||||
Me.Controls.Add(Me.txtActionName)
|
||||
Me.Controls.Add(Me.labelControl2)
|
||||
Me.Name = "frmSplash"
|
||||
Me.Text = "Form1"
|
||||
CType(Me.pictureEdit2.Properties, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pictureEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.ProgressBarControl1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Private WithEvents pictureEdit2 As DevExpress.XtraEditors.PictureEdit
|
||||
Private WithEvents pictureEdit1 As DevExpress.XtraEditors.PictureEdit
|
||||
Private WithEvents labelControl2 As DevExpress.XtraEditors.LabelControl
|
||||
Private WithEvents txtActionName As DevExpress.XtraEditors.LabelControl
|
||||
Private WithEvents Version As DevExpress.XtraEditors.LabelControl
|
||||
Friend WithEvents ProgressBarControl1 As DevExpress.XtraEditors.ProgressBarControl
|
||||
End Class
|
||||
@@ -1,27 +0,0 @@
|
||||
Public Class frmSplash
|
||||
Sub New
|
||||
InitializeComponent()
|
||||
End Sub
|
||||
|
||||
Public Overrides Sub ProcessCommand(ByVal cmd As System.Enum, ByVal arg As Object)
|
||||
MyBase.ProcessCommand(cmd, arg)
|
||||
|
||||
Dim oCommand As SplashScreenCommand = CType(cmd, SplashScreenCommand)
|
||||
Select Case oCommand
|
||||
Case SplashScreenCommand.SetProgress
|
||||
Dim oPosition As Integer = CInt(Fix(arg))
|
||||
ProgressBarControl1.Position = oPosition
|
||||
Case SplashScreenCommand.SetActionName
|
||||
txtActionName.Text = arg.ToString
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
Private Sub frmSplash_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
Version.Text = String.Format("Version {0}", My.Application.Info.Version.ToString)
|
||||
End Sub
|
||||
|
||||
Public Enum SplashScreenCommand
|
||||
SetProgress
|
||||
SetActionName
|
||||
End Enum
|
||||
End Class
|
||||
@@ -1,4 +0,0 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<packages>
|
||||
<package id="NLog" version="4.6.7" targetFramework="net461" />
|
||||
</packages>
|
||||