fix: make the start form topmost again! yay

This commit is contained in:
Jonathan Jenne 2020-05-15 16:08:31 +02:00
parent 5b2e562ded
commit 75d54ce33c

View File

@ -359,7 +359,9 @@ Public Class frmStart
ClassDatabase.Execute_non_Query("DELETE FROM TBGI_FILES_USER WHERE UPPER(USER@WORK) = UPPER('" & Environment.UserName & "')", True)
Unregister_Hotkeys()
Load_Hotkeys()
Me.Opacity = 30
Me.TopMost = True
Catch ex As Exception
MsgBox("Unexpected Error in Load-Form" & vbNewLine & ex.Message, MsgBoxStyle.Critical)