MS

2022-05-20 11:26:03 +02:00
parent 90e31c01b5
commit a0f99ba5a4
21 changed files with 432 additions and 228 deletions
--- a/GUIs.ZooFlow/ClassInit.vb
+++ b/GUIs.ZooFlow/ClassInit.vb
@@ -13,6 +13,7 @@ Imports System.Data.SqlClient
 Imports DigitalData.Modules
 Imports DevExpress.LookAndFeel
 Imports DigitalData.Modules.Language
+Imports DigitalData.GUIs.Common

 Public Class ClassInit
    Inherits Base.BaseClass
@@ -371,7 +372,7 @@ Public Class ClassInit

            Dim oMessage = $"{oMessageStart}{oMessage1}{oMessage2}{oMessageEnd}"

-            Dim oMsgBox As New Dialog1(oMessage, _MainForm.Text, True)
+            Dim oMsgBox As New frmDialog(oMessage, _MainForm.Text, True)
            oMsgBox.ShowDialog()
            Application.ExitThread()
        Else