Commit 39024360 authored by Pilzinsel64's avatar Pilzinsel64

add statusbar

parent e9effe4c
......@@ -5,4 +5,9 @@
<startup>
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.7.2"/>
</startup>
<runtime>
<assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1">
<probing privatePath="Data\Lib;Data\Lang"></probing>
</assemblyBinding>
</runtime>
</configuration>
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Class FormMain
Inherits DevComponents.DotNetBar.OfficeForm
Inherits DevComponents.DotNetBar.RibbonForm
'Form overrides dispose to clean up the component list.
<System.Diagnostics.DebuggerNonUserCode()>
......@@ -29,64 +29,109 @@ Partial Class FormMain
Me.ButtonItem_Save = New DevComponents.DotNetBar.ButtonItem()
Me.ButtonItem_EditProfile = New DevComponents.DotNetBar.ButtonItem()
Me.StyleManager1 = New DevComponents.DotNetBar.StyleManager(Me.components)
Me.Bar2 = New DevComponents.DotNetBar.Bar()
Me.LabelItem_OtherStatus = New DevComponents.DotNetBar.LabelItem()
Me.RibbonControl1 = New DevComponents.DotNetBar.RibbonControl()
CType(Me.Bar1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.Bar2, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'Bar1
'
Me.Bar1.AccessibleDescription = "DotNetBar Bar (Bar1)"
Me.Bar1.AccessibleName = "DotNetBar Bar"
resources.ApplyResources(Me.Bar1, "Bar1")
Me.Bar1.AccessibleRole = System.Windows.Forms.AccessibleRole.MenuBar
Me.Bar1.AntiAlias = True
Me.Bar1.Dock = System.Windows.Forms.DockStyle.Top
Me.Bar1.Font = New System.Drawing.Font("Segoe UI", 9.0!)
Me.Bar1.IsMaximized = False
Me.Bar1.Items.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.ButtonItem_Load, Me.ButtonItem_Save, Me.ButtonItem_EditProfile})
Me.Bar1.Location = New System.Drawing.Point(0, 0)
Me.Bar1.MenuBar = True
Me.Bar1.Name = "Bar1"
Me.Bar1.Size = New System.Drawing.Size(748, 26)
Me.Bar1.Stretch = True
Me.Bar1.Style = DevComponents.DotNetBar.eDotNetBarStyle.StyleManagerControlled
Me.Bar1.TabIndex = 0
Me.Bar1.TabStop = False
Me.Bar1.Text = "Bar1"
'
'ButtonItem_Load
'
Me.ButtonItem_Load.Name = "ButtonItem_Load"
Me.ButtonItem_Load.Text = "Open ROM"
resources.ApplyResources(Me.ButtonItem_Load, "ButtonItem_Load")
'
'ButtonItem_Save
'
Me.ButtonItem_Save.Enabled = False
Me.ButtonItem_Save.Name = "ButtonItem_Save"
Me.ButtonItem_Save.Text = "Save"
resources.ApplyResources(Me.ButtonItem_Save, "ButtonItem_Save")
'
'ButtonItem_EditProfile
'
Me.ButtonItem_EditProfile.BeginGroup = True
Me.ButtonItem_EditProfile.Name = "ButtonItem_EditProfile"
Me.ButtonItem_EditProfile.Text = "Manager Text Profile"
resources.ApplyResources(Me.ButtonItem_EditProfile, "ButtonItem_EditProfile")
'
'StyleManager1
'
Me.StyleManager1.ManagerStyle = DevComponents.DotNetBar.eStyle.Office2016
Me.StyleManager1.MetroColorParameters = New DevComponents.DotNetBar.Metro.ColorTables.MetroColorGeneratorParameters(System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer)), System.Drawing.Color.FromArgb(CType(CType(1, Byte), Integer), CType(CType(115, Byte), Integer), CType(CType(199, Byte), Integer)))
'
'Bar2
'
Me.Bar2.AntiAlias = True
Me.Bar2.BarType = DevComponents.DotNetBar.eBarType.StatusBar
resources.ApplyResources(Me.Bar2, "Bar2")
Me.Bar2.IsMaximized = False
Me.Bar2.Items.AddRange(New DevComponents.DotNetBar.BaseItem() {Me.LabelItem_OtherStatus})
Me.Bar2.Name = "Bar2"
Me.Bar2.Stretch = True
Me.Bar2.Style = DevComponents.DotNetBar.eDotNetBarStyle.StyleManagerControlled
Me.Bar2.TabStop = False
'
'LabelItem_OtherStatus
'
Me.LabelItem_OtherStatus.ItemAlignment = DevComponents.DotNetBar.eItemAlignment.Far
Me.LabelItem_OtherStatus.Name = "LabelItem_OtherStatus"
resources.ApplyResources(Me.LabelItem_OtherStatus, "LabelItem_OtherStatus")
'
'RibbonControl1
'
Me.RibbonControl1.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer))
'
'
'
Me.RibbonControl1.BackgroundStyle.CornerType = DevComponents.DotNetBar.eCornerType.Square
Me.RibbonControl1.CanCustomize = False
Me.RibbonControl1.CaptionVisible = True
resources.ApplyResources(Me.RibbonControl1, "RibbonControl1")
Me.RibbonControl1.ForeColor = System.Drawing.Color.Black
Me.RibbonControl1.KeyTipsFont = New System.Drawing.Font("Tahoma", 7.0!)
Me.RibbonControl1.Name = "RibbonControl1"
Me.RibbonControl1.Style = DevComponents.DotNetBar.eDotNetBarStyle.StyleManagerControlled
Me.RibbonControl1.SystemText.MaximizeRibbonText = resources.GetString("RibbonControl1.SystemText.MaximizeRibbonText")
Me.RibbonControl1.SystemText.MinimizeRibbonText = resources.GetString("RibbonControl1.SystemText.MinimizeRibbonText")
Me.RibbonControl1.SystemText.QatAddItemText = resources.GetString("RibbonControl1.SystemText.QatAddItemText")
Me.RibbonControl1.SystemText.QatCustomizeMenuLabel = resources.GetString("RibbonControl1.SystemText.QatCustomizeMenuLabel")
Me.RibbonControl1.SystemText.QatCustomizeText = resources.GetString("RibbonControl1.SystemText.QatCustomizeText")
Me.RibbonControl1.SystemText.QatDialogAddButton = resources.GetString("RibbonControl1.SystemText.QatDialogAddButton")
Me.RibbonControl1.SystemText.QatDialogCancelButton = resources.GetString("RibbonControl1.SystemText.QatDialogCancelButton")
Me.RibbonControl1.SystemText.QatDialogCaption = resources.GetString("RibbonControl1.SystemText.QatDialogCaption")
Me.RibbonControl1.SystemText.QatDialogCategoriesLabel = resources.GetString("RibbonControl1.SystemText.QatDialogCategoriesLabel")
Me.RibbonControl1.SystemText.QatDialogOkButton = resources.GetString("RibbonControl1.SystemText.QatDialogOkButton")
Me.RibbonControl1.SystemText.QatDialogPlacementCheckbox = resources.GetString("RibbonControl1.SystemText.QatDialogPlacementCheckbox")
Me.RibbonControl1.SystemText.QatDialogRemoveButton = resources.GetString("RibbonControl1.SystemText.QatDialogRemoveButton")
Me.RibbonControl1.SystemText.QatPlaceAboveRibbonText = resources.GetString("RibbonControl1.SystemText.QatPlaceAboveRibbonText")
Me.RibbonControl1.SystemText.QatPlaceBelowRibbonText = resources.GetString("RibbonControl1.SystemText.QatPlaceBelowRibbonText")
Me.RibbonControl1.SystemText.QatRemoveItemText = resources.GetString("RibbonControl1.SystemText.QatRemoveItemText")
Me.RibbonControl1.TabGroupHeight = 14
'
'FormMain
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
resources.ApplyResources(Me, "$this")
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(748, 654)
Me.Controls.Add(Me.Bar2)
Me.Controls.Add(Me.Bar1)
Me.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Controls.Add(Me.RibbonControl1)
Me.Name = "FormMain"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "SM64 Text Manager"
Me.TopLeftCornerSize = 0
Me.TopRightCornerSize = 0
CType(Me.Bar1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.Bar2, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
......@@ -95,4 +140,7 @@ Partial Class FormMain
Friend WithEvents ButtonItem_Save As DevComponents.DotNetBar.ButtonItem
Friend WithEvents StyleManager1 As DevComponents.DotNetBar.StyleManager
Friend WithEvents ButtonItem_EditProfile As DevComponents.DotNetBar.ButtonItem
Friend WithEvents Bar2 As DevComponents.DotNetBar.Bar
Friend WithEvents LabelItem_OtherStatus As DevComponents.DotNetBar.LabelItem
Friend WithEvents RibbonControl1 As DevComponents.DotNetBar.RibbonControl
End Class
This diff is collapsed.
......@@ -117,10 +117,174 @@
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="Bar1.AccessibleDescription" xml:space="preserve">
<value>Bar1 (Bar1)</value>
</data>
<data name="Bar1.AccessibleName" xml:space="preserve">
<value>Bar1</value>
</data>
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="Bar1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
<value>Top</value>
</data>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="Bar1.Font" type="System.Drawing.Font, System.Drawing">
<value>Segoe UI, 9pt</value>
</data>
<data name="ButtonItem_Load.Text" xml:space="preserve">
<value>Open ROM</value>
</data>
<data name="ButtonItem_Save.Text" xml:space="preserve">
<value>Save</value>
</data>
<data name="ButtonItem_EditProfile.Text" xml:space="preserve">
<value>Manager Text Profile</value>
</data>
<data name="Bar1.Location" type="System.Drawing.Point, System.Drawing">
<value>5, 31</value>
</data>
<data name="Bar1.Size" type="System.Drawing.Size, System.Drawing">
<value>738, 26</value>
</data>
<assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="Bar1.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
</data>
<data name="Bar1.Text" xml:space="preserve">
<value>Bar1</value>
</data>
<data name="&gt;&gt;Bar1.Name" xml:space="preserve">
<value>Bar1</value>
</data>
<data name="&gt;&gt;Bar1.Type" xml:space="preserve">
<value>DevComponents.DotNetBar.Bar, DevComponents.DotNetBar2, Version=14.1.0.35, Culture=neutral, PublicKeyToken=null</value>
</data>
<data name="&gt;&gt;Bar1.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="&gt;&gt;Bar1.ZOrder" xml:space="preserve">
<value>1</value>
</data>
<metadata name="StyleManager1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>145, 17</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="Bar2.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
<value>Bottom</value>
</data>
<data name="Bar2.Font" type="System.Drawing.Font, System.Drawing">
<value>Segoe UI, 9pt</value>
</data>
<data name="LabelItem_OtherStatus.Text" xml:space="preserve">
<value>-</value>
</data>
<data name="Bar2.Location" type="System.Drawing.Point, System.Drawing">
<value>5, 632</value>
</data>
<data name="Bar2.Size" type="System.Drawing.Size, System.Drawing">
<value>738, 20</value>
</data>
<data name="Bar2.TabIndex" type="System.Int32, mscorlib">
<value>1</value>
</data>
<data name="Bar2.Text" xml:space="preserve">
<value>Bar2</value>
</data>
<data name="&gt;&gt;Bar2.Name" xml:space="preserve">
<value>Bar2</value>
</data>
<data name="&gt;&gt;Bar2.Type" xml:space="preserve">
<value>DevComponents.DotNetBar.Bar, DevComponents.DotNetBar2, Version=14.1.0.35, Culture=neutral, PublicKeyToken=null</value>
</data>
<data name="&gt;&gt;Bar2.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="&gt;&gt;Bar2.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="RibbonControl1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
<value>Top</value>
</data>
<data name="RibbonControl1.Location" type="System.Drawing.Point, System.Drawing">
<value>5, 1</value>
</data>
<data name="RibbonControl1.Size" type="System.Drawing.Size, System.Drawing">
<value>738, 30</value>
</data>
<data name="RibbonControl1.SystemText.MaximizeRibbonText" xml:space="preserve">
<value>&amp;Maximize the Ribbon</value>
</data>
<data name="RibbonControl1.SystemText.MinimizeRibbonText" xml:space="preserve">
<value>Mi&amp;nimize the Ribbon</value>
</data>
<data name="RibbonControl1.SystemText.QatAddItemText" xml:space="preserve">
<value>&amp;Add to Quick Access Toolbar</value>
</data>
<data name="RibbonControl1.SystemText.QatCustomizeMenuLabel" xml:space="preserve">
<value>&lt;b&gt;Customize Quick Access Toolbar&lt;/b&gt;</value>
</data>
<data name="RibbonControl1.SystemText.QatCustomizeText" xml:space="preserve">
<value>&amp;Customize Quick Access Toolbar...</value>
</data>
<data name="RibbonControl1.SystemText.QatDialogAddButton" xml:space="preserve">
<value>&amp;Add &gt;&gt;</value>
</data>
<data name="RibbonControl1.SystemText.QatDialogCancelButton" xml:space="preserve">
<value>Cancel</value>
</data>
<data name="RibbonControl1.SystemText.QatDialogCaption" xml:space="preserve">
<value>Customize Quick Access Toolbar</value>
</data>
<data name="RibbonControl1.SystemText.QatDialogCategoriesLabel" xml:space="preserve">
<value>&amp;Choose commands from:</value>
</data>
<data name="RibbonControl1.SystemText.QatDialogOkButton" xml:space="preserve">
<value>OK</value>
</data>
<data name="RibbonControl1.SystemText.QatDialogPlacementCheckbox" xml:space="preserve">
<value>&amp;Place Quick Access Toolbar below the Ribbon</value>
</data>
<data name="RibbonControl1.SystemText.QatDialogRemoveButton" xml:space="preserve">
<value>&amp;Remove</value>
</data>
<data name="RibbonControl1.SystemText.QatPlaceAboveRibbonText" xml:space="preserve">
<value>&amp;Place Quick Access Toolbar above the Ribbon</value>
</data>
<data name="RibbonControl1.SystemText.QatPlaceBelowRibbonText" xml:space="preserve">
<value>&amp;Place Quick Access Toolbar below the Ribbon</value>
</data>
<data name="RibbonControl1.SystemText.QatRemoveItemText" xml:space="preserve">
<value>&amp;Remove from Quick Access Toolbar</value>
</data>
<data name="RibbonControl1.TabIndex" type="System.Int32, mscorlib">
<value>2</value>
</data>
<data name="RibbonControl1.Text" xml:space="preserve">
<value>RibbonControl1</value>
</data>
<data name="&gt;&gt;RibbonControl1.Name" xml:space="preserve">
<value>RibbonControl1</value>
</data>
<data name="&gt;&gt;RibbonControl1.Type" xml:space="preserve">
<value>DevComponents.DotNetBar.RibbonControl, DevComponents.DotNetBar2, Version=14.1.0.35, Culture=neutral, PublicKeyToken=null</value>
</data>
<data name="&gt;&gt;RibbonControl1.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="&gt;&gt;RibbonControl1.ZOrder" xml:space="preserve">
<value>2</value>
</data>
<metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<data name="$this.AutoScaleDimensions" type="System.Drawing.SizeF, System.Drawing">
<value>6, 13</value>
</data>
<data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
<value>748, 654</value>
</data>
<data name="$this.Font" type="System.Drawing.Font, System.Drawing">
<value>Segoe UI, 8.25pt</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAMDAAAAEAIACoJQAAFgAAACgAAAAwAAAAYAAAAAEAIAAAAAAAACQAABILAAASCwAAAAAAAAAA
......@@ -287,4 +451,46 @@
AAA=
</value>
</data>
<data name="$this.StartPosition" type="System.Windows.Forms.FormStartPosition, System.Windows.Forms">
<value>CenterScreen</value>
</data>
<data name="$this.Text" xml:space="preserve">
<value>SM64 Text Manager</value>
</data>
<data name="&gt;&gt;ButtonItem_Load.Name" xml:space="preserve">
<value>ButtonItem_Load</value>
</data>
<data name="&gt;&gt;ButtonItem_Load.Type" xml:space="preserve">
<value>DevComponents.DotNetBar.ButtonItem, DevComponents.DotNetBar2, Version=14.1.0.35, Culture=neutral, PublicKeyToken=null</value>
</data>
<data name="&gt;&gt;ButtonItem_Save.Name" xml:space="preserve">
<value>ButtonItem_Save</value>
</data>
<data name="&gt;&gt;ButtonItem_Save.Type" xml:space="preserve">
<value>DevComponents.DotNetBar.ButtonItem, DevComponents.DotNetBar2, Version=14.1.0.35, Culture=neutral, PublicKeyToken=null</value>
</data>
<data name="&gt;&gt;ButtonItem_EditProfile.Name" xml:space="preserve">
<value>ButtonItem_EditProfile</value>
</data>
<data name="&gt;&gt;ButtonItem_EditProfile.Type" xml:space="preserve">
<value>DevComponents.DotNetBar.ButtonItem, DevComponents.DotNetBar2, Version=14.1.0.35, Culture=neutral, PublicKeyToken=null</value>
</data>
<data name="&gt;&gt;StyleManager1.Name" xml:space="preserve">
<value>StyleManager1</value>
</data>
<data name="&gt;&gt;StyleManager1.Type" xml:space="preserve">
<value>DevComponents.DotNetBar.StyleManager, DevComponents.DotNetBar2, Version=14.1.0.35, Culture=neutral, PublicKeyToken=null</value>
</data>
<data name="&gt;&gt;LabelItem_OtherStatus.Name" xml:space="preserve">
<value>LabelItem_OtherStatus</value>
</data>
<data name="&gt;&gt;LabelItem_OtherStatus.Type" xml:space="preserve">
<value>DevComponents.DotNetBar.LabelItem, DevComponents.DotNetBar2, Version=14.1.0.35, Culture=neutral, PublicKeyToken=null</value>
</data>
<data name="&gt;&gt;$this.Name" xml:space="preserve">
<value>FormMain</value>
</data>
<data name="&gt;&gt;$this.Type" xml:space="preserve">
<value>DevComponents.DotNetBar.RibbonForm, DevComponents.DotNetBar2, Version=14.1.0.35, Culture=neutral, PublicKeyToken=null</value>
</data>
</root>
\ No newline at end of file
......@@ -23,7 +23,7 @@ Public Class FormMain
'Init Controller
AddHandler controller.RequestRomManager, Sub(e) e.RomManager = romManager
'AddHandler controller.RequestIsChangingTab, Sub(e) e.Value = False
'AddHandler controller.SettingOtherStatusInfo, Sub(text, foreColor) SetOtherStatusInfos(text, foreColor)
AddHandler controller.SettingOtherStatusInfo, Sub(text, foreColor) SetOtherStatusInfos(text, foreColor)
'AddHandler controller.SettingStatusText, Sub(text) StatusText = text
'AddHandler controller.RequestStatusText, Sub(e) e.Value = StatusText
......@@ -77,6 +77,19 @@ Public Class FormMain
Text = $"{Application.ProductName} (v{versionStr}){romext}"
End Sub
Private Sub SetOtherStatusInfos(text As String, foreColor As Color)
LabelItem_OtherStatus.Text = text
Select Case foreColor
Case Color.Green
foreColor = Color.LightGreen
Case Color.Red
foreColor = Color.DarkRed
End Select
LabelItem_OtherStatus.ForeColor = If(foreColor = Color.Green, Nothing, foreColor)
End Sub
'G u i
Private Sub ButtonItem_Load_Click(sender As Object, e As EventArgs) Handles ButtonItem_Load.Click
......
......@@ -138,6 +138,9 @@
</Compile>
</ItemGroup>
<ItemGroup>
<EmbeddedResource Include="FormMain.de.resx">
<DependentUpon>FormMain.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="FormMain.resx">
<DependentUpon>FormMain.vb</DependentUpon>
</EmbeddedResource>
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment