From d556f57a1fd140362d19baea107d98524427a45e Mon Sep 17 00:00:00 2001
From: TheUltimateHacker <tultimateh@gmail.com>
Date: Sun, 22 Mar 2015 10:45:19 -0400
Subject: #1 - File Skimmer bug fix + Fullscreen Login Screen

Fixed a bug with the File Skimmer, as well as adding a FullScreen Login
Screen test that can be utilized using the "test fullscreen login"
terminal command. There's also a "test fullscreen login customizer"
command to test the Customization Options for the login screen, though I
haven't even gotten close to completing that.

I've also referenced another DLL, one that I made called
"MichaelsMovableControlSuite.dll" that contains movable variations of
Windows Forms Controls. By movable, I mean that at run-time, the user
can drag these controls around, however some functions (such as the
ability to type in a MovableTextBox) have been disabled. These controls
are used for the Login Screen customizer.
---
 ShiftOS/FullScreenLogin.vb | 48 ++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 48 insertions(+)
 create mode 100644 ShiftOS/FullScreenLogin.vb

(limited to 'ShiftOS/FullScreenLogin.vb')

diff --git a/ShiftOS/FullScreenLogin.vb b/ShiftOS/FullScreenLogin.vb
new file mode 100644
index 0000000..af38901
--- /dev/null
+++ b/ShiftOS/FullScreenLogin.vb
@@ -0,0 +1,48 @@
+Public Class FullScreenLogin
+
+    Private Sub FullScreenLogin_Load(sender As Object, e As EventArgs) Handles MyBase.Load
+        Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None
+        Me.WindowState = FormWindowState.Maximized
+        setskin()
+    End Sub
+
+    Public Sub setskin()
+        Me.BackColor = Skins.loginbgcolor
+        Me.BackgroundImage = Skins.loginbg
+        Me.BackgroundImageLayout = Skins.loginbglayout
+        userpic.Size = New Size(Skins.userimagesize, Skins.userimagesize)
+        userpic.BackgroundImage = Skins.userimage
+        userpic.BackColor = Color.Transparent
+        userpic.BackgroundImageLayout = Skins.userimagelayout
+        If Not IsNothing(Skins.userimagelocation) Then userpic.Location = Skins.userimagelocation
+        txtusername.ForeColor = Skins.inputforecolor
+        txtpassword.ForeColor = Skins.inputforecolor
+        txtusername.BackColor = Skins.inputbackcolor
+        txtpassword.BackColor = Skins.inputbackcolor
+        txtusername.Font = New Font(Skins.inputfont, Skins.inputfontsize, Skins.inputfontstyle)
+        txtpassword.Font = New Font(Skins.inputfont, Skins.inputfontsize, Skins.inputfontstyle)
+        loginbtn.Font = New Font(Skins.buttonfont, Skins.buttonfontsize, Skins.buttonfontstyle)
+        shutdown.Font = New Font(Skins.buttonfont, Skins.buttonfontsize, Skins.buttonfontstyle)
+        txtusername.Location = New Point(Skins.userTextboxX, Skins.userTextBoxY)
+        txtpassword.Location = New Point(Skins.passTextBoxX, Skins.passTextBoxY)
+        loginbtn.Location = New Point(Skins.loginbtnX, Skins.loginbtnY)
+        shutdown.Location = New Point(Skins.shutdownbtnX, Skins.shutdownbtnY)
+        Me.TopMost = True
+    End Sub
+
+    Private Sub loginbtn_Click(sender As Object, e As EventArgs) Handles loginbtn.Click
+        If txtusername.Text = ShiftOSDesktop.username And txtpassword.Text = ShiftOSDesktop.password Then
+            Me.Close()
+            infobox.showinfo("Login Screen", "The Login Screen has completed with no errors!")
+        End If
+    End Sub
+
+    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles shutdown.Click
+        ShiftOSDesktop.shutdownshiftos()
+    End Sub
+
+    Private Sub clearChars(sender As Object, e As MouseEventArgs) Handles txtusername.MouseDown, txtpassword.MouseDown
+        txtusername.Text = ""
+        txtpassword.Text = ""
+    End Sub
+End Class
\ No newline at end of file
-- 
cgit v1.2.3