2023-09-13

This commit is contained in:
Jonathan Jenne
2023-09-13 10:23:50 +02:00
parent d4c010cda4
commit 5fb92fa5c8
15 changed files with 1162 additions and 80 deletions

View File

@@ -30,6 +30,11 @@ Partial Class frmMain
Me.RibbonStatusBar = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
Me.GridEnvelopes = New DevExpress.XtraGrid.GridControl()
Me.ViewEnvelopes = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.colTitle = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colSubject = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colAddedWhen = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colContractType = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colStatus = New DevExpress.XtraGrid.Columns.GridColumn()
CType(Me.RibbonControl, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridEnvelopes, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ViewEnvelopes, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -41,33 +46,42 @@ Partial Class frmMain
'
'RibbonControl
'
resources.ApplyResources(Me.RibbonControl, "RibbonControl")
Me.RibbonControl.ExpandCollapseItem.Id = 0
Me.RibbonControl.ExpandCollapseItem.ImageOptions.ImageIndex = CType(resources.GetObject("RibbonControl.ExpandCollapseItem.ImageOptions.ImageIndex"), Integer)
Me.RibbonControl.ExpandCollapseItem.ImageOptions.LargeImageIndex = CType(resources.GetObject("RibbonControl.ExpandCollapseItem.ImageOptions.LargeImageIndex"), Integer)
Me.RibbonControl.ExpandCollapseItem.ImageOptions.SvgImage = CType(resources.GetObject("RibbonControl.ExpandCollapseItem.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.RibbonControl.ExpandCollapseItem.SearchTags = resources.GetString("RibbonControl.ExpandCollapseItem.SearchTags")
Me.RibbonControl.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl.ExpandCollapseItem, Me.RibbonControl.SearchEditItem, Me.btnCreateEnvelope, Me.btnEditEnvelope, Me.btnDeleteEnvelope})
Me.RibbonControl.Location = New System.Drawing.Point(0, 0)
Me.RibbonControl.MaxItemId = 5
Me.RibbonControl.Name = "RibbonControl"
Me.RibbonControl.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
Me.RibbonControl.Size = New System.Drawing.Size(1088, 158)
Me.RibbonControl.StatusBar = Me.RibbonStatusBar
'
'btnCreateEnvelope
'
Me.btnCreateEnvelope.Caption = "Neuer Umschlag"
resources.ApplyResources(Me.btnCreateEnvelope, "btnCreateEnvelope")
Me.btnCreateEnvelope.Id = 1
Me.btnCreateEnvelope.ImageOptions.ImageIndex = CType(resources.GetObject("btnCreateEnvelope.ImageOptions.ImageIndex"), Integer)
Me.btnCreateEnvelope.ImageOptions.LargeImageIndex = CType(resources.GetObject("btnCreateEnvelope.ImageOptions.LargeImageIndex"), Integer)
Me.btnCreateEnvelope.ImageOptions.SvgImage = CType(resources.GetObject("btnCreateEnvelope.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.btnCreateEnvelope.Name = "btnCreateEnvelope"
'
'btnEditEnvelope
'
Me.btnEditEnvelope.Caption = "Umschlag laden"
resources.ApplyResources(Me.btnEditEnvelope, "btnEditEnvelope")
Me.btnEditEnvelope.Id = 2
Me.btnEditEnvelope.ImageOptions.ImageIndex = CType(resources.GetObject("btnEditEnvelope.ImageOptions.ImageIndex"), Integer)
Me.btnEditEnvelope.ImageOptions.LargeImageIndex = CType(resources.GetObject("btnEditEnvelope.ImageOptions.LargeImageIndex"), Integer)
Me.btnEditEnvelope.ImageOptions.SvgImage = CType(resources.GetObject("btnEditEnvelope.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.btnEditEnvelope.Name = "btnEditEnvelope"
'
'btnDeleteEnvelope
'
Me.btnDeleteEnvelope.Caption = "Umschlag löschen"
resources.ApplyResources(Me.btnDeleteEnvelope, "btnDeleteEnvelope")
Me.btnDeleteEnvelope.Id = 4
Me.btnDeleteEnvelope.ImageOptions.ImageIndex = CType(resources.GetObject("btnDeleteEnvelope.ImageOptions.ImageIndex"), Integer)
Me.btnDeleteEnvelope.ImageOptions.LargeImageIndex = CType(resources.GetObject("btnDeleteEnvelope.ImageOptions.LargeImageIndex"), Integer)
Me.btnDeleteEnvelope.ImageOptions.SvgImage = CType(resources.GetObject("btnDeleteEnvelope.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.btnDeleteEnvelope.Name = "btnDeleteEnvelope"
'
@@ -75,7 +89,7 @@ Partial Class frmMain
'
Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1})
Me.RibbonPage1.Name = "RibbonPage1"
Me.RibbonPage1.Text = "Start"
resources.ApplyResources(Me.RibbonPage1, "RibbonPage1")
'
'RibbonPageGroup1
'
@@ -83,43 +97,83 @@ Partial Class frmMain
Me.RibbonPageGroup1.ItemLinks.Add(Me.btnEditEnvelope)
Me.RibbonPageGroup1.ItemLinks.Add(Me.btnDeleteEnvelope)
Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
Me.RibbonPageGroup1.Text = "Funktionen"
resources.ApplyResources(Me.RibbonPageGroup1, "RibbonPageGroup1")
'
'RibbonStatusBar
'
Me.RibbonStatusBar.Location = New System.Drawing.Point(0, 657)
resources.ApplyResources(Me.RibbonStatusBar, "RibbonStatusBar")
Me.RibbonStatusBar.Name = "RibbonStatusBar"
Me.RibbonStatusBar.Ribbon = Me.RibbonControl
Me.RibbonStatusBar.Size = New System.Drawing.Size(1088, 24)
'
'GridEnvelopes
'
Me.GridEnvelopes.Dock = System.Windows.Forms.DockStyle.Fill
Me.GridEnvelopes.Location = New System.Drawing.Point(0, 158)
resources.ApplyResources(Me.GridEnvelopes, "GridEnvelopes")
Me.GridEnvelopes.EmbeddedNavigator.AccessibleDescription = resources.GetString("GridEnvelopes.EmbeddedNavigator.AccessibleDescription")
Me.GridEnvelopes.EmbeddedNavigator.AccessibleName = resources.GetString("GridEnvelopes.EmbeddedNavigator.AccessibleName")
Me.GridEnvelopes.EmbeddedNavigator.AllowHtmlTextInToolTip = CType(resources.GetObject("GridEnvelopes.EmbeddedNavigator.AllowHtmlTextInToolTip"), DevExpress.Utils.DefaultBoolean)
Me.GridEnvelopes.EmbeddedNavigator.Anchor = CType(resources.GetObject("GridEnvelopes.EmbeddedNavigator.Anchor"), System.Windows.Forms.AnchorStyles)
Me.GridEnvelopes.EmbeddedNavigator.BackgroundImage = CType(resources.GetObject("GridEnvelopes.EmbeddedNavigator.BackgroundImage"), System.Drawing.Image)
Me.GridEnvelopes.EmbeddedNavigator.BackgroundImageLayout = CType(resources.GetObject("GridEnvelopes.EmbeddedNavigator.BackgroundImageLayout"), System.Windows.Forms.ImageLayout)
Me.GridEnvelopes.EmbeddedNavigator.ImeMode = CType(resources.GetObject("GridEnvelopes.EmbeddedNavigator.ImeMode"), System.Windows.Forms.ImeMode)
Me.GridEnvelopes.EmbeddedNavigator.MaximumSize = CType(resources.GetObject("GridEnvelopes.EmbeddedNavigator.MaximumSize"), System.Drawing.Size)
Me.GridEnvelopes.EmbeddedNavigator.TextLocation = CType(resources.GetObject("GridEnvelopes.EmbeddedNavigator.TextLocation"), DevExpress.XtraEditors.NavigatorButtonsTextLocation)
Me.GridEnvelopes.EmbeddedNavigator.ToolTip = resources.GetString("GridEnvelopes.EmbeddedNavigator.ToolTip")
Me.GridEnvelopes.EmbeddedNavigator.ToolTipIconType = CType(resources.GetObject("GridEnvelopes.EmbeddedNavigator.ToolTipIconType"), DevExpress.Utils.ToolTipIconType)
Me.GridEnvelopes.EmbeddedNavigator.ToolTipTitle = resources.GetString("GridEnvelopes.EmbeddedNavigator.ToolTipTitle")
Me.GridEnvelopes.MainView = Me.ViewEnvelopes
Me.GridEnvelopes.MenuManager = Me.RibbonControl
Me.GridEnvelopes.Name = "GridEnvelopes"
Me.GridEnvelopes.Size = New System.Drawing.Size(1088, 499)
Me.GridEnvelopes.TabIndex = 2
Me.GridEnvelopes.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.ViewEnvelopes})
'
'ViewEnvelopes
'
resources.ApplyResources(Me.ViewEnvelopes, "ViewEnvelopes")
Me.ViewEnvelopes.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colTitle, Me.colSubject, Me.colAddedWhen, Me.colContractType, Me.colStatus})
Me.ViewEnvelopes.GridControl = Me.GridEnvelopes
Me.ViewEnvelopes.Name = "ViewEnvelopes"
'
'colTitle
'
resources.ApplyResources(Me.colTitle, "colTitle")
Me.colTitle.FieldName = "Title"
Me.colTitle.Name = "colTitle"
'
'colSubject
'
resources.ApplyResources(Me.colSubject, "colSubject")
Me.colSubject.FieldName = "Subject"
Me.colSubject.Name = "colSubject"
Me.colSubject.Summary.AddRange(New DevExpress.XtraGrid.GridSummaryItem() {New DevExpress.XtraGrid.GridColumnSummaryItem()})
'
'colAddedWhen
'
resources.ApplyResources(Me.colAddedWhen, "colAddedWhen")
Me.colAddedWhen.FieldName = "AddedWhen"
Me.colAddedWhen.Name = "colAddedWhen"
Me.colAddedWhen.Summary.AddRange(New DevExpress.XtraGrid.GridSummaryItem() {New DevExpress.XtraGrid.GridColumnSummaryItem()})
'
'colContractType
'
resources.ApplyResources(Me.colContractType, "colContractType")
Me.colContractType.FieldName = "ContractType"
Me.colContractType.Name = "colContractType"
'
'colStatus
'
resources.ApplyResources(Me.colStatus, "colStatus")
Me.colStatus.FieldName = "StatusTranslated"
Me.colStatus.Name = "colStatus"
'
'frmMain
'
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(1088, 681)
Me.Controls.Add(Me.GridEnvelopes)
Me.Controls.Add(Me.RibbonStatusBar)
Me.Controls.Add(Me.RibbonControl)
Me.Name = "frmMain"
Me.Ribbon = Me.RibbonControl
Me.StatusBar = Me.RibbonStatusBar
Me.Text = "Sign Flow"
CType(Me.RibbonControl, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridEnvelopes, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ViewEnvelopes, System.ComponentModel.ISupportInitialize).EndInit()
@@ -137,4 +191,9 @@ Partial Class frmMain
Friend WithEvents ViewEnvelopes As DevExpress.XtraGrid.Views.Grid.GridView
Friend WithEvents btnEditEnvelope As DevExpress.XtraBars.BarButtonItem
Friend WithEvents btnDeleteEnvelope As DevExpress.XtraBars.BarButtonItem
Friend WithEvents colTitle As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colSubject As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colAddedWhen As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colContractType As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colStatus As DevExpress.XtraGrid.Columns.GridColumn
End Class