From a043f16287f3805bb208f1816a42ecf1d2d8d1d7 Mon Sep 17 00:00:00 2001 From: EverythingWindows Date: Mon, 21 Nov 2022 13:56:13 +0700 Subject: rough working DuWM --- .../DesktopEnvironment/master/DesktopManager.vb | 20 +++++++++++++++----- 1 file changed, 15 insertions(+), 5 deletions(-) (limited to 'ShiftOS-TheRevival/MainForms/DesktopEnvironment/master/DesktopManager.vb') diff --git a/ShiftOS-TheRevival/MainForms/DesktopEnvironment/master/DesktopManager.vb b/ShiftOS-TheRevival/MainForms/DesktopEnvironment/master/DesktopManager.vb index dd3ff8d..89d8b65 100644 --- a/ShiftOS-TheRevival/MainForms/DesktopEnvironment/master/DesktopManager.vb +++ b/ShiftOS-TheRevival/MainForms/DesktopEnvironment/master/DesktopManager.vb @@ -1,19 +1,29 @@ Module DesktopManager - Public Sub StartX() + Public Sub StartG() Desktop.Show() Desktop.FormBorderStyle = FormBorderStyle.None Desktop.WindowState = FormWindowState.Maximized Desktop.TopMost = False IsConsoleParent = False - OnlyOne = True Console.Close() + WindowManagerChoose() Cursor.Show() End Sub - Public Sub StopX() - Desktop.Close() + Public Sub StopG() + DuWM_CurrentProcess = 0 + Strings.ProcessID(0) = 0 + Strings.ProcessID(1) = 0 Cursor.Hide() - Console_Full() IsConsoleParent = True + Console.Show() + Desktop.Close() + End Sub + + Public Sub WindowManagerChoose() + Select Case Strings.ComputerInfo(7) + Case 1 + DuWM_Initiate() + End Select End Sub End Module -- cgit v1.2.3