From 57e6eec1bc00eaedeb6004c225184ba03f1155e0 Mon Sep 17 00:00:00 2001 From: TheUltimateHacker Date: Sat, 23 May 2015 10:21:24 -0400 Subject: Basic Window Manager implemented WARNING: Due to a bug that made the save engine think it was ShiftOS 0.0.8, I had to change the actualshiftversion variable to prevent older ShiftOS versions opening the save file thus crashing. Due to this, ShiftOS-Next will automatically delete C:\ShiftOS and rewrite the save. Besides that, I've added a new Window Manager that can be bought after buying Gray, Basic GUI Server, File Skimmer, and Textpad. This window manager allows you to run multiple apps at once in their own window, as well as having up to 3 Terminals running at once. It is a work-in-progress feature, but it's currently stable. --- shiftos_next/Terminal.Designer.vb | 65 +++++++++++++++++++++++++++++---------- 1 file changed, 48 insertions(+), 17 deletions(-) (limited to 'shiftos_next/Terminal.Designer.vb') diff --git a/shiftos_next/Terminal.Designer.vb b/shiftos_next/Terminal.Designer.vb index 0ad2b94..7509fc4 100644 --- a/shiftos_next/Terminal.Designer.vb +++ b/shiftos_next/Terminal.Designer.vb @@ -23,41 +23,72 @@ Partial Class Terminal _ Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() - Me.txtterm = New System.Windows.Forms.TextBox() + Me.terminaltext = New System.Windows.Forms.TextBox() Me.tmrfirstuse = New System.Windows.Forms.Timer(Me.components) + Me.pnltop = New System.Windows.Forms.Panel() + Me.lbtitle = New System.Windows.Forms.Label() + Me.pnltop.SuspendLayout() Me.SuspendLayout() ' - 'txtterm - ' - Me.txtterm.BackColor = System.Drawing.Color.Black - Me.txtterm.BorderStyle = System.Windows.Forms.BorderStyle.None - Me.txtterm.Cursor = System.Windows.Forms.Cursors.IBeam - Me.txtterm.Dock = System.Windows.Forms.DockStyle.Fill - Me.txtterm.Font = New System.Drawing.Font("Courier New", 8.25!) - Me.txtterm.ForeColor = System.Drawing.Color.White - Me.txtterm.Location = New System.Drawing.Point(0, 0) - Me.txtterm.Multiline = True - Me.txtterm.Name = "txtterm" - Me.txtterm.Size = New System.Drawing.Size(635, 418) - Me.txtterm.TabIndex = 0 - Me.txtterm.Text = "ShiftOS Beta 1.0" + 'terminaltext + ' + Me.terminaltext.BackColor = System.Drawing.Color.Black + Me.terminaltext.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.terminaltext.Cursor = System.Windows.Forms.Cursors.IBeam + Me.terminaltext.Dock = System.Windows.Forms.DockStyle.Fill + Me.terminaltext.Font = New System.Drawing.Font("Courier New", 8.25!) + Me.terminaltext.ForeColor = System.Drawing.Color.White + Me.terminaltext.Location = New System.Drawing.Point(0, 30) + Me.terminaltext.Multiline = True + Me.terminaltext.Name = "terminaltext" + Me.terminaltext.Size = New System.Drawing.Size(635, 388) + Me.terminaltext.TabIndex = 0 + Me.terminaltext.Text = "ShiftOS Beta 1.0" ' 'tmrfirstuse ' Me.tmrfirstuse.Interval = 5000 ' + 'pnltop + ' + Me.pnltop.BackColor = System.Drawing.Color.Gray + Me.pnltop.Controls.Add(Me.lbtitle) + Me.pnltop.Dock = System.Windows.Forms.DockStyle.Top + Me.pnltop.Font = New System.Drawing.Font("Courier New", 8.25!) + Me.pnltop.ForeColor = System.Drawing.Color.White + Me.pnltop.Location = New System.Drawing.Point(0, 0) + Me.pnltop.Name = "pnltop" + Me.pnltop.Size = New System.Drawing.Size(635, 30) + Me.pnltop.TabIndex = 1 + ' + 'lbtitle + ' + Me.lbtitle.AutoSize = True + Me.lbtitle.Location = New System.Drawing.Point(12, 9) + Me.lbtitle.Name = "lbtitle" + Me.lbtitle.Size = New System.Drawing.Size(63, 14) + Me.lbtitle.TabIndex = 0 + Me.lbtitle.Text = "Terminal" + ' 'Terminal ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(635, 418) - Me.Controls.Add(Me.txtterm) + Me.Controls.Add(Me.terminaltext) + Me.Controls.Add(Me.pnltop) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None Me.Name = "Terminal" Me.Text = "Terminal" + Me.WindowState = System.Windows.Forms.FormWindowState.Maximized + Me.pnltop.ResumeLayout(False) + Me.pnltop.PerformLayout() Me.ResumeLayout(False) Me.PerformLayout() End Sub - Friend WithEvents txtterm As System.Windows.Forms.TextBox + Friend WithEvents terminaltext As System.Windows.Forms.TextBox Friend WithEvents tmrfirstuse As System.Windows.Forms.Timer + Friend WithEvents pnltop As System.Windows.Forms.Panel + Friend WithEvents lbtitle As System.Windows.Forms.Label End Class -- cgit v1.2.3