This commit is contained in:
Jonathan Jenne
2019-01-30 14:40:05 +01:00
parent afb2f1f658
commit 1ae788f52e
12 changed files with 144 additions and 91 deletions

View File

@@ -14,7 +14,7 @@ Public NotInheritable Class frmSplash
Private _CurrentRetry As Integer = 0
Private Const SLEEP_TIME = 600
Private Const INIT_STEPS = 2
Private Const INIT_STEPS = 4
Private Const MAX_RETRIES = 10
Private Const OPEN_TIMEOUT = 10
@@ -73,6 +73,15 @@ Public NotInheritable Class frmSplash
Thread.Sleep(SLEEP_TIME)
' TODO: Initialize Usersettings and populate My.Application.User
_Worker.ReportProgress(SetProgress(2), "Initializing User Settings..")
Thread.Sleep(SLEEP_TIME)
_Worker.ReportProgress(SetProgress(3), "Connecting to mainframe..")
Thread.Sleep(SLEEP_TIME)
_Worker.ReportProgress(SetProgress(4), "Setting up neural network..")
Thread.Sleep(SLEEP_TIME)
End Sub
Private Sub bw_ProgressChanged(sender As Object, e As System.ComponentModel.ProgressChangedEventArgs)