2023-09-13

2023-09-13 13:57:52 +02:00
parent 5fb92fa5c8
commit 302a8c24ec
20 changed files with 3079 additions and 806 deletions
--- a/EnvelopeGenerator.Form/frmMain.Designer.vb
+++ b/EnvelopeGenerator.Form/frmMain.Designer.vb
@@ -30,11 +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.colContractType = New DevExpress.XtraGrid.Columns.GridColumn()
+        Me.colStatus = New DevExpress.XtraGrid.Columns.GridColumn()
        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()
@@ -46,13 +46,9 @@ 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})
+        resources.ApplyResources(Me.RibbonControl, "RibbonControl")
        Me.RibbonControl.MaxItemId = 5
        Me.RibbonControl.Name = "RibbonControl"
        Me.RibbonControl.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
@@ -62,8 +58,6 @@ Partial Class frmMain
        '
        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"
        '
@@ -71,8 +65,6 @@ Partial Class frmMain
        '
        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"
        '
@@ -80,8 +72,6 @@ Partial Class frmMain
        '
        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"
        '
@@ -108,18 +98,6 @@ Partial Class frmMain
        'GridEnvelopes
        '
        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"
@@ -127,11 +105,22 @@ Partial Class frmMain
        '
        '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.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colContractType, Me.colStatus, Me.colTitle, Me.colSubject, Me.colAddedWhen})
        Me.ViewEnvelopes.GridControl = Me.GridEnvelopes
        Me.ViewEnvelopes.Name = "ViewEnvelopes"
        '
+        'colContractType
+        '
+        resources.ApplyResources(Me.colContractType, "colContractType")
+        Me.colContractType.FieldName = "ContractTypeTranslated"
+        Me.colContractType.Name = "colContractType"
+        '
+        'colStatus
+        '
+        resources.ApplyResources(Me.colStatus, "colStatus")
+        Me.colStatus.FieldName = "StatusTranslated"
+        Me.colStatus.Name = "colStatus"
+        '
        'colTitle
        '
        resources.ApplyResources(Me.colTitle, "colTitle")
@@ -143,26 +132,12 @@ Partial Class frmMain
        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
        '