AppStd/Modules
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

MS

Browse Source
This commit is contained in:
SchreiberM
2021-04-06 13:11:38 +02:00
parent 7fb03fd9a2 a756c51f34
commit 9b810b8e5f
18 changed files with 2746 additions and 493 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
GUIs.ZooFlow/frmFlowForm.vb
View File

@@ -121,7 +121,7 @@ Public Class frmFlowForm
' Now get the screen working area (without taskbar)
Dim WorkingRect As Rectangle =
Screen.GetWorkingArea(clientForm.ClientRectangle)
System.Windows.Forms.Screen.GetWorkingArea(clientForm.ClientRectangle)
' Left border
If NewPosition.x >= WorkingRect.X - mSnapOffset AndAlso
@@ -132,7 +132,7 @@ Public Class frmFlowForm
' Get screen bounds and taskbar height
' (when taskbar is horizontal)
Dim ScreenRect As Rectangle =
Screen.GetBounds(Screen.PrimaryScreen.Bounds)
System.Windows.Forms.Screen.GetBounds(System.Windows.Forms.Screen.PrimaryScreen.Bounds)
Dim TaskbarHeight As Integer =
ScreenRect.Height - WorkingRect.Height