MS

2022-05-19 17:23:41 +02:00
parent 0c23878301
commit 5448240b46
19 changed files with 340 additions and 161 deletions
--- a/GUIs.ZooFlow/ClassDragDrop.vb
+++ b/GUIs.ZooFlow/ClassDragDrop.vb
@@ -98,7 +98,9 @@ Public Class ClassDragDrop
            End If
        Catch ex As Exception
            Logger.Error(ex)
-            MsgBox("Error in view_MouseMove: " & ex.Message, MsgBoxStyle.Critical)
+
+            Dim oMsgBox As New Dialog1("Error in view_MouseMove: " & ex.Message, "", True)
+            oMsgBox.ShowDialog()
        End Try
    End Sub