UI/UX improvements

Enhanced UX with ability to move window Enhanced UI with option to minimize window zilminerGUI now has a custom icon
sighclone · Nov 25, 2021 · c9b6505 · c9b6505
1 parent b29bb5a
commit c9b6505
Show file tree

Hide file tree

Showing 18 changed files with 56 additions and 10 deletions.
diff --git a/.vs/zilminerGUI/v16/.suo b/.vs/zilminerGUI/v16/.suo
diff --git a/Form1.Designer.vb b/Form1.Designer.vb
diff --git a/Form1.vb b/Form1.vb
@@ -1,4 +1,7 @@
 Public Class Form1
+
+
+
     Private Sub closeWindow_Click(sender As Object, e As EventArgs) Handles closeWindow.Click
         Me.Close()
     End Sub
@@ -135,4 +138,31 @@
             checkDAG = False
         End If
     End Sub
+
+    Private isMouseDown As Boolean = False
+    Private mouseOffset As Point
+    Private Sub Form1_MouseDown(sender As Object, e As MouseEventArgs) Handles MyBase.MouseDown
+        If e.Button = Windows.Forms.MouseButtons.Left Then
+            mouseOffset = New Point(-e.X, -e.Y)
+            isMouseDown = True
+        End If
+    End Sub
+
+    Private Sub Form1_MouseMove(sender As Object, e As MouseEventArgs) Handles MyBase.MouseMove
+        If isMouseDown Then
+            Dim mousePos As Point = Control.MousePosition
+            mousePos.Offset(mouseOffset.X, mouseOffset.Y)
+            Me.Location = mousePos
+        End If
+    End Sub
+
+    Private Sub Form1_MouseUp(sender As Object, e As MouseEventArgs) Handles MyBase.MouseUp
+        If e.Button = Windows.Forms.MouseButtons.Left Then
+            isMouseDown = False
+        End If
+    End Sub
+
+    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
+        Me.WindowState = FormWindowState.Minimized
+    End Sub
 End Class
diff --git a/My Project/Application.Designer.vb b/My Project/Application.Designer.vb
diff --git a/bin/Debug/net5.0-windows/ref/zilminerGUI.dll b/bin/Debug/net5.0-windows/ref/zilminerGUI.dll
diff --git a/bin/Debug/net5.0-windows/zilminerGUI.dll b/bin/Debug/net5.0-windows/zilminerGUI.dll
diff --git a/bin/Debug/net5.0-windows/zilminerGUI.exe b/bin/Debug/net5.0-windows/zilminerGUI.exe
diff --git a/bin/Debug/net5.0-windows/zilminerGUI.pdb b/bin/Debug/net5.0-windows/zilminerGUI.pdb
diff --git a/obj/Debug/net5.0-windows/apphost.exe b/obj/Debug/net5.0-windows/apphost.exe
diff --git a/obj/Debug/net5.0-windows/ref/zilminerGUI.dll b/obj/Debug/net5.0-windows/ref/zilminerGUI.dll
diff --git a/obj/Debug/net5.0-windows/zilminerGUI.Form1.resources b/obj/Debug/net5.0-windows/zilminerGUI.Form1.resources
diff --git a/obj/Debug/net5.0-windows/zilminerGUI.dll b/obj/Debug/net5.0-windows/zilminerGUI.dll
diff --git a/obj/Debug/net5.0-windows/zilminerGUI.pdb b/obj/Debug/net5.0-windows/zilminerGUI.pdb
diff --git a/obj/Debug/net5.0-windows/zilminerGUI.vbproj.AssemblyReference.cache b/obj/Debug/net5.0-windows/zilminerGUI.vbproj.AssemblyReference.cache
diff --git a/obj/Debug/net5.0-windows/zilminerGUI.vbproj.FileListAbsolute.txt b/obj/Debug/net5.0-windows/zilminerGUI.vbproj.FileListAbsolute.txt
@@ -43,7 +43,6 @@ C:\Users\sadhu\Documents\GitHub\zilminerGUI\bin\Debug\net5.0-windows\zilminerGUI
 C:\Users\sadhu\Documents\GitHub\zilminerGUI\bin\Debug\net5.0-windows\zilminerGUI.dll
 C:\Users\sadhu\Documents\GitHub\zilminerGUI\bin\Debug\net5.0-windows\ref\zilminerGUI.dll
 C:\Users\sadhu\Documents\GitHub\zilminerGUI\bin\Debug\net5.0-windows\zilminerGUI.pdb
-C:\Users\sadhu\Documents\GitHub\zilminerGUI\obj\Debug\net5.0-windows\zilminerGUI.vbproj.AssemblyReference.cache
 C:\Users\sadhu\Documents\GitHub\zilminerGUI\obj\Debug\net5.0-windows\zilminerGUI.Form1.resources
 C:\Users\sadhu\Documents\GitHub\zilminerGUI\obj\Debug\net5.0-windows\zilminerGUI.Resources.resources
 C:\Users\sadhu\Documents\GitHub\zilminerGUI\obj\Debug\net5.0-windows\zilminerGUI.vbproj.GenerateResource.cache

diff --git a/obj/Debug/net5.0-windows/zilminerGUI.vbproj.GenerateResource.cache b/obj/Debug/net5.0-windows/zilminerGUI.vbproj.GenerateResource.cache
diff --git a/zilminerGUI.vbproj b/zilminerGUI.vbproj
@@ -7,6 +7,7 @@
     <StartupObject>Sub Main</StartupObject>
     <UseWindowsForms>true</UseWindowsForms>
     <MyType>WindowsForms</MyType>
+    <ApplicationIcon>zilminerGUI_icon_400x400.ico</ApplicationIcon>
   </PropertyGroup>
 
   <ItemGroup>

diff --git a/zilminerGUI_icon_400x400.ico b/zilminerGUI_icon_400x400.ico