jj: add service config form
This commit is contained in:
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user