diff --git a/instat/frmMain.Designer.vb b/instat/frmMain.Designer.vb index 1ace18cf46..e9119897dc 100644 --- a/instat/frmMain.Designer.vb +++ b/instat/frmMain.Designer.vb @@ -3215,7 +3215,7 @@ Partial Class frmMain ' Me.mnuDataViewWindow.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None Me.mnuDataViewWindow.Name = "mnuDataViewWindow" - Me.mnuDataViewWindow.Size = New System.Drawing.Size(180, 22) + Me.mnuDataViewWindow.Size = New System.Drawing.Size(148, 22) Me.mnuDataViewWindow.Text = "Data View" ' 'mnuRDataViewerWindow @@ -3223,7 +3223,7 @@ Partial Class frmMain Me.mnuRDataViewerWindow.Enabled = False Me.mnuRDataViewerWindow.ImageScaling = System.Windows.Forms.ToolStripItemImageScaling.None Me.mnuRDataViewerWindow.Name = "mnuRDataViewerWindow" - Me.mnuRDataViewerWindow.Size = New System.Drawing.Size(180, 22) + Me.mnuRDataViewerWindow.Size = New System.Drawing.Size(148, 22) Me.mnuRDataViewerWindow.Text = "R-Data Viewer" ' 'mnuTbOutput diff --git a/instat/frmMain.vb b/instat/frmMain.vb index d5c70d0953..6b37bf3c29 100644 --- a/instat/frmMain.vb +++ b/instat/frmMain.vb @@ -227,6 +227,7 @@ Public Class frmMain '------------------------------------- SetAppVersionNumber() isMaximised = True 'Need to get the windowstate when the application is loaded + SetHideMenus() End Sub Private Sub CheckForUpdates() @@ -595,6 +596,15 @@ Public Class frmMain My.Application.Info.Version.Build.ToString() End Sub + Private Sub SetHideMenus() + mnuViewProcurementMenu.Checked = False + mnuProcurement.Visible = False + mnuViewOptionsByContextMenu.Checked = False + mnuOptionsByContext.Visible = False + mnuViewStructuredMenu.Checked = False + mnuStructured.Visible = False + End Sub + Private Sub SetMainMenusEnabled(bEnabled As Boolean) mnuFile.Enabled = bEnabled mnuEdit.Enabled = bEnabled