rename project to ClientSuite, add application timer

This commit is contained in:
Jonathan Jenne
2019-02-18 11:14:02 +01:00
parent a2f4c06492
commit bc7605bdcf
40 changed files with 120 additions and 1478 deletions

View File

@@ -1,15 +1,13 @@
Imports DevExpress.XtraBars.Docking2010.Views
Imports DevExpress.XtraBars.Docking2010
Imports DevExpress.XtraBars.Docking2010.Views.Widget
Imports DevExpress.XtraBars.Docking2010
Imports System.ComponentModel
Imports EDMI_ClientSuite.ClassLayout
Imports DigitalData.GUIs.ClientSuite.ClassLayout
Imports System.IO
Imports DigitalData.Modules.Logging
Imports DigitalData.Modules.Logging.LogConfig
Imports DigitalData.Modules.License
Public Class frmMain
Private _Logger As Logger
Private _Timer As ClassTimer
Public Sub New()
' Dieser Aufruf ist für den Designer erforderlich.
@@ -18,6 +16,9 @@ Public Class frmMain
' Assign My.MainForm before everything else
My.MainForm = Me
' Initialize Main Timer
_Timer = New ClassTimer(My.LogConfig)
' Show splashscreen
frmSplash.ShowDialog()
End Sub
@@ -44,8 +45,8 @@ Public Class frmMain
ProcessManagerWidget.DataSource = oDataTable
AddHandler ProcessManagerWidget.RowDoubleClicked, Sub(RowView As DataRowView)
MsgBox($"Clicked on Document {RowView.Row.Item("DocName")}")
End Sub
MsgBox($"Clicked on Document {RowView.Row.Item("DocName")}")
End Sub
LoadLayout()