ZooFlow: IDB Admin

2021-03-08 15:34:57 +01:00
parent 526c9c349a
commit 6b814b9089
24 changed files with 835 additions and 2519 deletions
--- a/GUIs.ZooFlow/ClassLayout.vb
+++ b/GUIs.ZooFlow/ClassLayout.vb
@@ -72,7 +72,7 @@ Public Class ClassWindowLocation
            MsgBox("Error while loading Window Position!" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
        End Try
    End Sub
-    Private Function IsVisibleOnAnyScreen(rect As Rectangle)
+    Private Function IsVisibleOnAnyScreen(rect As Rectangle) As Boolean
        Try
            Dim result As Boolean = False
            For Each Screen As Screen In Screen.AllScreens