Improve frmMain

This commit is contained in:
Jonathan Jenne
2021-01-11 14:27:03 +01:00
parent 2b7bee6b04
commit 0014948bf5
5 changed files with 79 additions and 21 deletions

View File

@@ -62,6 +62,7 @@ Partial Class frmMain
'
'RibbonControl1
'
Me.RibbonControl1.CommandLayout = DevExpress.XtraBars.Ribbon.CommandLayout.Simplified
Me.RibbonControl1.ExpandCollapseItem.Id = 0
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.lblUser, Me.lblVersion, Me.lblApplicationServer, Me.bbtniKonfig, Me.bbtnitemAdmin, Me.lblRefresh})
Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
@@ -69,12 +70,13 @@ Partial Class frmMain
Me.RibbonControl1.Name = "RibbonControl1"
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
Me.RibbonControl1.Size = New System.Drawing.Size(492, 157)
Me.RibbonControl1.ShowPageHeadersMode = DevExpress.XtraBars.Ribbon.ShowPageHeadersMode.Hide
Me.RibbonControl1.Size = New System.Drawing.Size(478, 66)
Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
'
'lblUser
'
Me.lblUser.Caption = "BarStaticItem1"
Me.lblUser.Caption = "lblUser"
Me.lblUser.Id = 1
Me.lblUser.ImageOptions.SvgImage = CType(resources.GetObject("lblUser.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.lblUser.Name = "lblUser"
@@ -82,8 +84,9 @@ Partial Class frmMain
'
'lblVersion
'
Me.lblVersion.Caption = "BarStaticItem1"
Me.lblVersion.Caption = "lblVersion"
Me.lblVersion.Id = 2
Me.lblVersion.ImageOptions.SvgImage = CType(resources.GetObject("lblVersion.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.lblVersion.Name = "lblVersion"
'
'lblApplicationServer
@@ -110,8 +113,9 @@ Partial Class frmMain
'
'lblRefresh
'
Me.lblRefresh.Caption = "BarStaticItem1"
Me.lblRefresh.Caption = "lblRefresh"
Me.lblRefresh.Id = 6
Me.lblRefresh.ImageOptions.SvgImage = CType(resources.GetObject("lblRefresh.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.lblRefresh.Name = "lblRefresh"
'
'RibbonPage1
@@ -133,10 +137,10 @@ Partial Class frmMain
Me.RibbonStatusBar1.ItemLinks.Add(Me.lblVersion)
Me.RibbonStatusBar1.ItemLinks.Add(Me.lblApplicationServer)
Me.RibbonStatusBar1.ItemLinks.Add(Me.lblRefresh)
Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 289)
Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 207)
Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
Me.RibbonStatusBar1.Size = New System.Drawing.Size(492, 22)
Me.RibbonStatusBar1.Size = New System.Drawing.Size(478, 22)
'
'RibbonPage2
'
@@ -148,7 +152,7 @@ Partial Class frmMain
Me.GroupBox2.Controls.Add(Me.labelStatus)
Me.GroupBox2.Controls.Add(Me.labelRefresh)
Me.GroupBox2.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.GroupBox2.Location = New System.Drawing.Point(209, 163)
Me.GroupBox2.Location = New System.Drawing.Point(209, 72)
Me.GroupBox2.Name = "GroupBox2"
Me.GroupBox2.Size = New System.Drawing.Size(256, 119)
Me.GroupBox2.TabIndex = 16
@@ -179,7 +183,7 @@ Partial Class frmMain
Me.GroupBox1.Controls.Add(Me.Label2)
Me.GroupBox1.Controls.Add(Me.labelHotkey)
Me.GroupBox1.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.GroupBox1.Location = New System.Drawing.Point(12, 163)
Me.GroupBox1.Location = New System.Drawing.Point(12, 72)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(191, 59)
Me.GroupBox1.TabIndex = 15
@@ -294,7 +298,7 @@ Partial Class frmMain
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(492, 311)
Me.ClientSize = New System.Drawing.Size(478, 229)
Me.ContextMenuStrip = Me.ContextMenuStripForm
Me.Controls.Add(Me.GroupBox2)
Me.Controls.Add(Me.GroupBox1)
@@ -303,6 +307,8 @@ Partial Class frmMain
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.IconOptions.Icon = CType(resources.GetObject("frmMain.IconOptions.Icon"), System.Drawing.Icon)
Me.MaximizeBox = False
Me.MaximumSize = New System.Drawing.Size(480, 230)
Me.MinimumSize = New System.Drawing.Size(480, 230)
Me.Name = "frmMain"
Me.Ribbon = Me.RibbonControl1
Me.StatusBar = Me.RibbonStatusBar1