jj: add service config form

This commit is contained in:
Jonathan Jenne
2019-01-29 16:32:37 +01:00
parent 94376068d6
commit 6ede3e1be9
14 changed files with 521 additions and 40 deletions

View File

@@ -4,8 +4,29 @@ Imports DevExpress.XtraBars.Docking2010.Views.Widget
Imports System.ComponentModel
Imports EDMI_ClientSuite.ClassLayout
Imports System.IO
Imports DigitalData.Modules.Logging
Imports DigitalData.Modules.Logging.LogConfig
Public Class frmMain
Private _Logger As Logger
Public Sub New()
' Dieser Aufruf ist für den Designer erforderlich.
InitializeComponent()
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
' Initialize Logger
Dim oLogConfig As New LogConfig(PathType.AppData)
_Logger = oLogConfig.GetLogger()
' This sets the LogConfig object that is used in the WHOLE application!!
My.LogConfig = oLogConfig
' Show splashscreen
frmSplash.ShowDialog()
End Sub
Private Sub FrmMain_Load(sender As Object, e As EventArgs) Handles Me.Load
LabelCurrentUser.Caption = Environment.UserName
LabelCurrentMachine.Caption = Environment.MachineName