This commit is contained in:
2023-07-27 14:30:57 +02:00
parent ea5ea5f205
commit fed1280f48
11 changed files with 1090 additions and 360 deletions

View File

@@ -24,7 +24,6 @@ Partial Class frmDoc_Links
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmDoc_Links))
Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
Me.GridControlRecords = New DevExpress.XtraGrid.GridControl()
Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.OrdnerÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
@@ -37,17 +36,13 @@ Partial Class frmDoc_Links
Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.bsiSource = New DevExpress.XtraBars.BarStaticItem()
CType(Me.GridControlRecords, System.ComponentModel.ISupportInitialize).BeginInit()
Me.ContextMenuStrip1.SuspendLayout()
CType(Me.grvwGrid, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'StatusStrip1
'
resources.ApplyResources(Me.StatusStrip1, "StatusStrip1")
Me.StatusStrip1.Name = "StatusStrip1"
'
'GridControlRecords
'
Me.GridControlRecords.ContextMenuStrip = Me.ContextMenuStrip1
@@ -97,9 +92,9 @@ Partial Class frmDoc_Links
'RibbonControl1
'
Me.RibbonControl1.ExpandCollapseItem.Id = 0
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bbtnitmdeletelink, Me.BarStaticItemStatus, Me.BarButtonItem2})
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bbtnitmdeletelink, Me.BarStaticItemStatus, Me.BarButtonItem2, Me.bsiSource})
resources.ApplyResources(Me.RibbonControl1, "RibbonControl1")
Me.RibbonControl1.MaxItemId = 4
Me.RibbonControl1.MaxItemId = 5
Me.RibbonControl1.Name = "RibbonControl1"
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
@@ -142,6 +137,7 @@ Partial Class frmDoc_Links
'RibbonStatusBar1
'
Me.RibbonStatusBar1.ItemLinks.Add(Me.BarStaticItemStatus)
Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiSource)
resources.ApplyResources(Me.RibbonStatusBar1, "RibbonStatusBar1")
Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
@@ -151,12 +147,18 @@ Partial Class frmDoc_Links
Me.RibbonPage2.Name = "RibbonPage2"
resources.ApplyResources(Me.RibbonPage2, "RibbonPage2")
'
'bsiSource
'
Me.bsiSource.Alignment = DevExpress.XtraBars.BarItemLinkAlignment.Right
resources.ApplyResources(Me.bsiSource, "bsiSource")
Me.bsiSource.Id = 4
Me.bsiSource.Name = "bsiSource"
'
'frmDoc_Links
'
resources.ApplyResources(Me, "$this")
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.Controls.Add(Me.GridControlRecords)
Me.Controls.Add(Me.StatusStrip1)
Me.Controls.Add(Me.RibbonStatusBar1)
Me.Controls.Add(Me.RibbonControl1)
Me.IconOptions.Icon = CType(resources.GetObject("frmDoc_Links.IconOptions.Icon"), System.Drawing.Icon)
@@ -171,7 +173,6 @@ Partial Class frmDoc_Links
Me.PerformLayout()
End Sub
Friend WithEvents StatusStrip1 As StatusStrip
Friend WithEvents GridControlRecords As DevExpress.XtraGrid.GridControl
Friend WithEvents grvwGrid As DevExpress.XtraGrid.Views.Grid.GridView
Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
@@ -184,4 +185,5 @@ Partial Class frmDoc_Links
Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents ContextMenuStrip1 As ContextMenuStrip
Friend WithEvents OrdnerÖffnenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents bsiSource As DevExpress.XtraBars.BarStaticItem
End Class