AppStd/RecordOrganizer
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

MS_19012016

Browse Source
This commit is contained in:
SchreiberM
2016-01-20 11:33:37 +01:00
parent 0c256313e2
commit 48fe3a4845
10 changed files with 88 additions and 42 deletions
Download Patch File Download Diff File Expand all files Collapse all files

26
app/DD-Record-Organiser/frmSplash.vb
View File

@@ -65,24 +65,28 @@ Public NotInheritable Class frmSplash
System.Threading.Thread.Sleep(500)
bw.ReportProgress(CalcProgress(2), "Initialisiere Datenbank")
Init.InitDatabase()
If Init.InitDatabase() = True Then
System.Threading.Thread.Sleep(500)
System.Threading.Thread.Sleep(500)
bw.ReportProgress(CalcProgress(3), "Initialisiere Windream-Einstellungen")
Init.InitWindream()
bw.ReportProgress(CalcProgress(3), "Initialisiere Windream-Einstellungen")
Init.InitWindream()
System.Threading.Thread.Sleep(500)
System.Threading.Thread.Sleep(500)
bw.ReportProgress(CalcProgress(4), "Initialisiere Benutzer")
Init.InitUserLogin()
bw.ReportProgress(CalcProgress(4), "Initialisiere Benutzer")
Init.InitUserLogin()
System.Threading.Thread.Sleep(500)
System.Threading.Thread.Sleep(500)
bw.ReportProgress(CalcProgress(5), "Initialisiere Oberfläche")
Init.InitInterface(mainForm)
bw.ReportProgress(CalcProgress(5), "Initialisiere Oberfläche")
Init.InitInterface(mainForm)
System.Threading.Thread.Sleep(500)
Else
ERROR_INIT = "DATABASE"
End If
System.Threading.Thread.Sleep(500)
End Sub
Private Sub bw_ProgressChanged(sender As Object, e As System.ComponentModel.ProgressChangedEventArgs)