WIP: first pass of depending controls
This commit is contained in:
@@ -284,31 +284,19 @@ Public Class frmStart
|
||||
End Try
|
||||
Me.TopMost = True
|
||||
End Sub
|
||||
Sub MyBackgroundThread()
|
||||
|
||||
|
||||
Dim frmCollection = System.Windows.Forms.Application.OpenForms
|
||||
Do While frmCollection.OfType(Of frmIndex).Any
|
||||
|
||||
Loop
|
||||
End Sub
|
||||
Sub Open_IndexDialog()
|
||||
Try
|
||||
Me.Hide()
|
||||
Me.TopMost = False
|
||||
frmIndex.Show()
|
||||
'Dim thread As New Thread(AddressOf MyBackgroundThread)
|
||||
'thread.Start()
|
||||
'Do While thread.IsAlive
|
||||
|
||||
'Loop
|
||||
Me.Visible = True
|
||||
Me.TopMost = True
|
||||
Me.BringToFront()
|
||||
Catch ex As Exception
|
||||
LOGGER.Error(ex)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub frmStart_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
|
||||
|
||||
Reference in New Issue
Block a user