diff options
Diffstat (limited to 'shiftos_next/TextPad.vb')
| -rw-r--r-- | shiftos_next/TextPad.vb | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/shiftos_next/TextPad.vb b/shiftos_next/TextPad.vb index a7d0906..f0b956c 100644 --- a/shiftos_next/TextPad.vb +++ b/shiftos_next/TextPad.vb @@ -1,5 +1,6 @@ Public Class TextPad + Private Sub OpenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles OpenToolStripMenuItem.Click file_skimmer.mode = "open" file_skimmer.application = "textpad" @@ -60,6 +61,17 @@ MenuStrip1.Renderer = New basicwm_renderer() setupmenufonts() Me.WindowState = FormWindowState.Maximized + If boughtbasicwm = True Then + pnltop.Show() + Me.WindowState = FormWindowState.Normal + Me.Left = (Screen.PrimaryScreen.Bounds.Width - Me.Width) / 2 + Me.Top = (Screen.PrimaryScreen.Bounds.Height - Me.Height) / 2 + Me.TopMost = True + Else + pnltop.Hide() + Me.WindowState = FormWindowState.Maximized + Me.TopMost = False + End If End Sub Public Sub setupmenufonts() |