13-11-23

EnvelopeGenerator.Common/Constants.vb

@@ -47,6 +47,19 @@
         Contract = 1
         ReadAndSign = 2
     End Enum
+
+    Public Enum ColorType
+        ReceiverColor1 = 1
+        ReceiverColor2 = 2
+        ReceiverColor3 = 3
+        ReceiverColor4 = 4
+        ReceiverColor5 = 5
+        ReceiverColor6 = 6
+        ReceiverColor7 = 7
+        ReceiverColor8 = 8
+        ReceiverColor9 = 9
+        ReceiverColor10 = 10
+    End Enum
 #End Region
 
 End Class

EnvelopeGenerator.Common/Entities/EnvelopeReceiver.vb

@@ -1,10 +1,27 @@
-Imports DigitalData.Modules.Base
+Imports System.Drawing
+Imports DevExpress.Utils.Svg
+Imports DigitalData.Modules.Base
 Imports EnvelopeGenerator.Common.Constants
 
 Public Class EnvelopeReceiver
     Public Property Id As Integer = 0
     Public Property UserId As Integer
     Public Property Signature As String
+    Public ReadOnly Property Color As Color
+        Get
+            Return Helpers.ColorTypeToColor(ColorType)
+        End Get
+    End Property
+
+    Public ReadOnly Property Image As SvgBitmap
+        Get
+            Return SvgBitmap.FromFile("Images/circle.svg")
+        End Get
+    End Property
+
+
+    Public Property ColorType As ColorType
+
 
     Public Property Name As String
     Public Property Company As String = ""

EnvelopeGenerator.Common/EnvelopeGenerator.Common.vbproj

@@ -45,6 +45,7 @@
     <OptionInfer>On</OptionInfer>
   </PropertyGroup>
   <ItemGroup>
+    <Reference Include="DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
     <Reference Include="DigitalData.Modules.Base, Version=1.3.4.0, Culture=neutral, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
       <HintPath>..\..\DDModules\Base\bin\Debug\DigitalData.Modules.Base.dll</HintPath>
@@ -196,5 +197,10 @@
       <LastGenOutput>Settings.Designer.vb</LastGenOutput>
     </None>
   </ItemGroup>
+  <ItemGroup>
+    <Content Include="Images\circle.svg">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </Content>
+  </ItemGroup>
   <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
 </Project>

EnvelopeGenerator.Common/Helpers.vb

@@ -1,4 +1,8 @@
-Public Class Helpers
+Imports System.Drawing
+Imports DevExpress.Utils.Svg
+Imports EnvelopeGenerator.Common.Constants
+
+Public Class Helpers
 
     ''' <summary>
     ''' Encodes the EnvelopeUUID and the ReceiverSignature into an EnvelopeKey
@@ -8,7 +12,7 @@
     ''' <returns>The EnvelopeKey</returns>
     Public Shared Function EncodeEnvelopeReceiverId(pEnvelopeUuid As String, pReceiverSignature As String) As String
         Dim oString = $"{pEnvelopeUuid}::{pReceiverSignature}"
-        Dim oBytes = Text.Encoding.UTF8.GetBytes(oString)
+        Dim oBytes = System.Text.Encoding.UTF8.GetBytes(oString)
         Dim oBase64String = Convert.ToBase64String(oBytes)
 
         Return oBase64String
@@ -21,7 +25,7 @@
     ''' <returns>A tuple containing EnvelopeUUID and Receiver Signature</returns>
     Public Shared Function DecodeEnvelopeReceiverId(pEnvelopeReceiverId As String) As Tuple(Of String, String)
         Dim oBytes = Convert.FromBase64String(pEnvelopeReceiverId)
-        Dim oString = Text.Encoding.UTF8.GetString(oBytes)
+        Dim oString = System.Text.Encoding.UTF8.GetString(oBytes)
         Dim oSplit = oString.Split(New String() {"::"}, StringSplitOptions.None)
 
         Return New Tuple(Of String, String)(oSplit(0), oSplit(1))
@@ -33,4 +37,52 @@
         Return oURL
 
     End Function
+
+    Public Shared Function ColorTypeToColor(pColorType As ColorType) As Color
+        Select Case pColorType
+            Case ColorType.ReceiverColor1
+                Return Color.Blue
+
+            Case ColorType.ReceiverColor2
+                Return Color.Maroon
+
+            Case ColorType.ReceiverColor3
+                Return Color.LightSeaGreen
+
+            Case ColorType.ReceiverColor4
+                Return Color.LimeGreen
+
+            Case ColorType.ReceiverColor5
+                Return Color.Magenta
+
+            Case ColorType.ReceiverColor6
+                Return Color.MediumSpringGreen
+
+            Case ColorType.ReceiverColor7
+                Return Color.OrangeRed
+
+            Case ColorType.ReceiverColor8
+                Return Color.DodgerBlue
+
+            Case ColorType.ReceiverColor9
+                Return Color.Purple
+
+            Case ColorType.ReceiverColor10
+                Return Color.Gold
+
+        End Select
+    End Function
+
+    Public Shared Function GetColorCircle(pBaseImage As SvgImage, pColor As Color) As SvgImage
+        Dim oColoredImage As SvgImage = pBaseImage.
+            Clone(Sub(el As SvgElement, table As Hashtable)
+                      If TypeOf el Is SvgCircle Then
+                          el.Styles.Clear()
+                          table("StyleName") = String.Empty
+                          table("Fill") = ColorTranslator.ToHtml(pColor)
+                      End If
+                  End Sub)
+
+        Return oColoredImage
+    End Function
 End Class

EnvelopeGenerator.Common/Images/circle.svg

@@ -0,0 +1,3 @@
+<svg xmlns="http://www.w3.org/2000/svg" width="16" height="16" fill="currentColor" class="bi bi-circle-fill" viewBox="0 0 16 16">
+  <circle cx="8" cy="8" r="8"/>
+</svg>

EnvelopeGenerator.Common/Models/ReceiverModel.vb

@@ -11,14 +11,15 @@ Public Class ReceiverModel
         MyBase.New(pState)
     End Sub
 
-    Private Function ToReceiver(pRow As DataRow) As EnvelopeReceiver
+    Private Function ToReceiver(pRow As DataRow, pColorIndex As Integer) As EnvelopeReceiver
         Return New EnvelopeReceiver() With {
             .Id = pRow.ItemEx("GUID", 0),
             .Email = pRow.ItemEx("EMAIL_ADDRESS", ""),
             .Name = pRow.ItemEx("NAME", ""),
             .Sequence = pRow.ItemEx("SEQUENCE", 0),
             .Signature = pRow.ItemEx("SIGNATURE", ""),
-            .Status = ReceiverStatus.Unsigned
+            .Status = ReceiverStatus.Unsigned,
+            .ColorType = DirectCast(pColorIndex + 1, ColorType)
         }
     End Function
 

EnvelopeGenerator.Form/My Project/licenses.licx

@@ -1,12 +1,13 @@
-DevExpress.XtraEditors.Repository.RepositoryItemLookUpEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraEditors.ComboBoxEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraEditors.Repository.RepositoryItemPictureEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraEditors.Repository.RepositoryItemLookUpEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.PictureEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.Repository.RepositoryItemTextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.Repository.RepositoryItemComboBox, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.SearchLookUpEdit, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraDataLayout.DataLayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
 DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraDataLayout.DataLayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraEditors.Repository.RepositoryItemTextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraEditors.PictureEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraEditors.SearchLookUpEdit, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
+DevExpress.XtraEditors.Repository.RepositoryItemComboBox, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a

EnvelopeGenerator.Form/frmEnvelopeEditor.Designer.vb

@@ -65,9 +65,15 @@ Partial Public Class frmEnvelopeEditor
         Me.GridReceivers = New DevExpress.XtraGrid.GridControl()
         Me.EnvelopeReceiverBindingSource = New System.Windows.Forms.BindingSource(Me.components)
         Me.ViewReceivers = New DevExpress.XtraGrid.Views.Grid.GridView()
-        Me.colName = New DevExpress.XtraGrid.Columns.GridColumn()
+        Me.colColor = New DevExpress.XtraGrid.Columns.GridColumn()
+        Me.RepositoryItemPictureEdit2 = New DevExpress.XtraEditors.Repository.RepositoryItemPictureEdit()
         Me.colEmail = New DevExpress.XtraGrid.Columns.GridColumn()
         Me.RepositoryItemEmailEdit = New DevExpress.XtraEditors.Repository.RepositoryItemTextEdit()
+        Me.colName = New DevExpress.XtraGrid.Columns.GridColumn()
+        Me.RepositoryItemPictureEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemPictureEdit()
+        Me.RepositoryItemColorPickEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemColorPickEdit()
+        Me.RepositoryItemColorEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemColorEdit()
+        Me.RepositoryItemImageEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemImageEdit()
         Me.LayoutControlGroup2 = New DevExpress.XtraLayout.LayoutControlGroup()
         Me.LayoutControlGroup3 = New DevExpress.XtraLayout.LayoutControlGroup()
         Me.LayoutControlItem2 = New DevExpress.XtraLayout.LayoutControlItem()
@@ -109,7 +115,12 @@ Partial Public Class frmEnvelopeEditor
         CType(Me.GridReceivers, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.EnvelopeReceiverBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.ViewReceivers, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RepositoryItemPictureEdit2, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.RepositoryItemEmailEdit, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RepositoryItemPictureEdit1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RepositoryItemColorPickEdit1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RepositoryItemColorEdit1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.RepositoryItemImageEdit1, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.LayoutControlGroup2, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.LayoutControlGroup3, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -371,7 +382,7 @@ Partial Public Class frmEnvelopeEditor
         Me.GridReceivers.MainView = Me.ViewReceivers
         Me.GridReceivers.MenuManager = Me.RibbonControl1
         Me.GridReceivers.Name = "GridReceivers"
-        Me.GridReceivers.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemEmailEdit})
+        Me.GridReceivers.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemEmailEdit, Me.RepositoryItemPictureEdit1, Me.RepositoryItemColorPickEdit1, Me.RepositoryItemColorEdit1, Me.RepositoryItemImageEdit1, Me.RepositoryItemPictureEdit2})
         Me.GridReceivers.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.ViewReceivers})
         '
         'EnvelopeReceiverBindingSource
@@ -382,25 +393,37 @@ Partial Public Class frmEnvelopeEditor
         'ViewReceivers
         '
         Me.ViewReceivers.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.Simple
-        Me.ViewReceivers.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colEmail, Me.colName})
+        Me.ViewReceivers.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colColor, Me.colEmail, Me.colName})
         Me.ViewReceivers.GridControl = Me.GridReceivers
         Me.ViewReceivers.Name = "ViewReceivers"
         Me.ViewReceivers.OptionsBehavior.AllowDeleteRows = DevExpress.Utils.DefaultBoolean.[True]
         Me.ViewReceivers.OptionsView.NewItemRowPosition = DevExpress.XtraGrid.Views.Grid.NewItemRowPosition.Bottom
         Me.ViewReceivers.OptionsView.ShowGroupPanel = False
-        Me.ViewReceivers.SortInfo.AddRange(New DevExpress.XtraGrid.Columns.GridColumnSortInfo() {New DevExpress.XtraGrid.Columns.GridColumnSortInfo(Me.colEmail, DevExpress.Data.ColumnSortOrder.Ascending)})
+        Me.ViewReceivers.OptionsView.ShowIndicator = False
         '
-        'colName
+        'colColor
         '
-        Me.colName.FieldName = "Name"
-        Me.colName.Name = "colName"
-        resources.ApplyResources(Me.colName, "colName")
+        resources.ApplyResources(Me.colColor, "colColor")
+        Me.colColor.ColumnEdit = Me.RepositoryItemColorEdit1
+        Me.colColor.FieldName = "Color"
+        Me.colColor.ImageOptions.SvgImage = CType(resources.GetObject("colColor.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
+        Me.colColor.ImageOptions.SvgImageSize = New System.Drawing.Size(14, 14)
+        Me.colColor.MaxWidth = 40
+        Me.colColor.MinWidth = 25
+        Me.colColor.Name = "colColor"
+        Me.colColor.OptionsColumn.AllowSort = DevExpress.Utils.DefaultBoolean.[False]
+        '
+        'RepositoryItemPictureEdit2
+        '
+        Me.RepositoryItemPictureEdit2.Name = "RepositoryItemPictureEdit2"
+        Me.RepositoryItemPictureEdit2.SvgImageSize = New System.Drawing.Size(16, 16)
         '
         'colEmail
         '
         Me.colEmail.ColumnEdit = Me.RepositoryItemEmailEdit
         Me.colEmail.FieldName = "Email"
         Me.colEmail.Name = "colEmail"
+        Me.colEmail.OptionsColumn.AllowSort = DevExpress.Utils.DefaultBoolean.[False]
         resources.ApplyResources(Me.colEmail, "colEmail")
         '
         'RepositoryItemEmailEdit
@@ -408,6 +431,38 @@ Partial Public Class frmEnvelopeEditor
         resources.ApplyResources(Me.RepositoryItemEmailEdit, "RepositoryItemEmailEdit")
         Me.RepositoryItemEmailEdit.Name = "RepositoryItemEmailEdit"
         '
+        'colName
+        '
+        Me.colName.FieldName = "Name"
+        Me.colName.Name = "colName"
+        Me.colName.OptionsColumn.AllowSort = DevExpress.Utils.DefaultBoolean.[False]
+        resources.ApplyResources(Me.colName, "colName")
+        '
+        'RepositoryItemPictureEdit1
+        '
+        Me.RepositoryItemPictureEdit1.Name = "RepositoryItemPictureEdit1"
+        '
+        'RepositoryItemColorPickEdit1
+        '
+        resources.ApplyResources(Me.RepositoryItemColorPickEdit1, "RepositoryItemColorPickEdit1")
+        Me.RepositoryItemColorPickEdit1.AutomaticColor = System.Drawing.Color.Black
+        Me.RepositoryItemColorPickEdit1.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(CType(resources.GetObject("RepositoryItemColorPickEdit1.Buttons"), DevExpress.XtraEditors.Controls.ButtonPredefines))})
+        Me.RepositoryItemColorPickEdit1.Name = "RepositoryItemColorPickEdit1"
+        Me.RepositoryItemColorPickEdit1.ReadOnly = True
+        Me.RepositoryItemColorPickEdit1.ShowDropDown = DevExpress.XtraEditors.Controls.ShowDropDown.Never
+        '
+        'RepositoryItemColorEdit1
+        '
+        resources.ApplyResources(Me.RepositoryItemColorEdit1, "RepositoryItemColorEdit1")
+        Me.RepositoryItemColorEdit1.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(CType(resources.GetObject("RepositoryItemColorEdit1.Buttons"), DevExpress.XtraEditors.Controls.ButtonPredefines))})
+        Me.RepositoryItemColorEdit1.Name = "RepositoryItemColorEdit1"
+        '
+        'RepositoryItemImageEdit1
+        '
+        resources.ApplyResources(Me.RepositoryItemImageEdit1, "RepositoryItemImageEdit1")
+        Me.RepositoryItemImageEdit1.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(CType(resources.GetObject("RepositoryItemImageEdit1.Buttons"), DevExpress.XtraEditors.Controls.ButtonPredefines))})
+        Me.RepositoryItemImageEdit1.Name = "RepositoryItemImageEdit1"
+        '
         'LayoutControlGroup2
         '
         Me.LayoutControlGroup2.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
@@ -554,7 +609,12 @@ Partial Public Class frmEnvelopeEditor
         CType(Me.GridReceivers, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.EnvelopeReceiverBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.ViewReceivers, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RepositoryItemPictureEdit2, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.RepositoryItemEmailEdit, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RepositoryItemPictureEdit1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RepositoryItemColorPickEdit1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RepositoryItemColorEdit1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.RepositoryItemImageEdit1, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.LayoutControlGroup2, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.LayoutControlGroup3, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).EndInit()
@@ -622,6 +682,12 @@ Partial Public Class frmEnvelopeEditor
     Friend WithEvents LayoutControlGroup4 As LayoutControlGroup
     Friend WithEvents LayoutControlGroup5 As LayoutControlGroup
     Friend WithEvents LayoutControlItem5 As LayoutControlItem
+    Friend WithEvents colColor As DevExpress.XtraGrid.Columns.GridColumn
+    Friend WithEvents RepositoryItemColorPickEdit1 As Repository.RepositoryItemColorPickEdit
+    Friend WithEvents RepositoryItemPictureEdit1 As Repository.RepositoryItemPictureEdit
+    Friend WithEvents RepositoryItemColorEdit1 As Repository.RepositoryItemColorEdit
+    Friend WithEvents RepositoryItemImageEdit1 As Repository.RepositoryItemImageEdit
+    Friend WithEvents RepositoryItemPictureEdit2 As Repository.RepositoryItemPictureEdit
 
 #End Region
 

EnvelopeGenerator.Form/frmEnvelopeEditor.resx

@@ -452,6 +452,43 @@
   <data name="GridReceivers.Location" type="System.Drawing.Point, System.Drawing">
     <value>14, 35</value>
   </data>
+  <data name="colColor.Caption" xml:space="preserve">
+    <value> </value>
+  </data>
+  <data name="RepositoryItemColorEdit1.AutoHeight" type="System.Boolean, mscorlib">
+    <value>False</value>
+  </data>
+  <assembly alias="DevExpress.Utils.v21.2" name="DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
+  <data name="RepositoryItemColorEdit1.Buttons" type="DevExpress.XtraEditors.Controls.ButtonPredefines, DevExpress.Utils.v21.2">
+    <value>Combo</value>
+  </data>
+  <data name="colColor.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
+        LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
+        dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAGUCAAAC77u/
+        PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
+        IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
+        MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
+        Y2U9InByZXNlcnZlIiBpZD0iUmVkX3RvX0JsYWNrIiBzdHlsZT0iZW5hYmxlLWJhY2tncm91bmQ6bmV3
+        IDAgMCAzMiAzMiI+DQogIDxzdHlsZSB0eXBlPSJ0ZXh0L2NzcyI+CgkuUmVke2ZpbGw6I0QxMUMxQzt9
+        CgkuQmxhY2t7ZmlsbDojNzI3MjcyO30KCS5zdDB7b3BhY2l0eTowLjU7fQo8L3N0eWxlPg0KICA8Y2ly
+        Y2xlIGN4PSI5IiBjeT0iOSIgcj0iNyIgY2xhc3M9IlJlZCIgLz4NCiAgPGcgY2xhc3M9InN0MCI+DQog
+        ICAgPGNpcmNsZSBjeD0iOSIgY3k9IjI1IiByPSI3IiBjbGFzcz0iQmxhY2siIC8+DQogIDwvZz4NCiAg
+        PGcgY2xhc3M9InN0MCI+DQogICAgPGNpcmNsZSBjeD0iMjUiIGN5PSI5IiByPSI3IiBjbGFzcz0iUmVk
+        IiAvPg0KICA8L2c+DQogIDxjaXJjbGUgY3g9IjI1IiBjeT0iMjUiIHI9IjciIGNsYXNzPSJCbGFjayIg
+        Lz4NCjwvc3ZnPgs=
+</value>
+  </data>
+  <data name="colColor.Visible" type="System.Boolean, mscorlib">
+    <value>True</value>
+  </data>
+  <data name="colColor.VisibleIndex" type="System.Int32, mscorlib">
+    <value>0</value>
+  </data>
+  <data name="colColor.Width" type="System.Int32, mscorlib">
+    <value>40</value>
+  </data>
   <data name="RepositoryItemEmailEdit.AutoHeight" type="System.Boolean, mscorlib">
     <value>False</value>
   </data>
@@ -459,13 +496,31 @@
     <value>True</value>
   </data>
   <data name="colEmail.VisibleIndex" type="System.Int32, mscorlib">
-    <value>0</value>
+    <value>1</value>
+  </data>
+  <data name="colEmail.Width" type="System.Int32, mscorlib">
+    <value>362</value>
   </data>
   <data name="colName.Visible" type="System.Boolean, mscorlib">
     <value>True</value>
   </data>
   <data name="colName.VisibleIndex" type="System.Int32, mscorlib">
-    <value>1</value>
+    <value>2</value>
+  </data>
+  <data name="colName.Width" type="System.Int32, mscorlib">
+    <value>444</value>
+  </data>
+  <data name="RepositoryItemColorPickEdit1.AutoHeight" type="System.Boolean, mscorlib">
+    <value>False</value>
+  </data>
+  <data name="RepositoryItemColorPickEdit1.Buttons" type="DevExpress.XtraEditors.Controls.ButtonPredefines, DevExpress.Utils.v21.2">
+    <value>Combo</value>
+  </data>
+  <data name="RepositoryItemImageEdit1.AutoHeight" type="System.Boolean, mscorlib">
+    <value>False</value>
+  </data>
+  <data name="RepositoryItemImageEdit1.Buttons" type="DevExpress.XtraEditors.Controls.ButtonPredefines, DevExpress.Utils.v21.2">
+    <value>Combo</value>
   </data>
   <data name="GridReceivers.Size" type="System.Drawing.Size, System.Drawing">
     <value>871, 200</value>
@@ -911,12 +966,18 @@
   <data name="&gt;&gt;ViewReceivers.Type" xml:space="preserve">
     <value>DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
-  <data name="&gt;&gt;colName.Name" xml:space="preserve">
-    <value>colName</value>
+  <data name="&gt;&gt;colColor.Name" xml:space="preserve">
+    <value>colColor</value>
   </data>
-  <data name="&gt;&gt;colName.Type" xml:space="preserve">
+  <data name="&gt;&gt;colColor.Type" xml:space="preserve">
     <value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
+  <data name="&gt;&gt;RepositoryItemPictureEdit2.Name" xml:space="preserve">
+    <value>RepositoryItemPictureEdit2</value>
+  </data>
+  <data name="&gt;&gt;RepositoryItemPictureEdit2.Type" xml:space="preserve">
+    <value>DevExpress.XtraEditors.Repository.RepositoryItemPictureEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
   <data name="&gt;&gt;colEmail.Name" xml:space="preserve">
     <value>colEmail</value>
   </data>
@@ -929,6 +990,36 @@
   <data name="&gt;&gt;RepositoryItemEmailEdit.Type" xml:space="preserve">
     <value>DevExpress.XtraEditors.Repository.RepositoryItemTextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
+  <data name="&gt;&gt;colName.Name" xml:space="preserve">
+    <value>colName</value>
+  </data>
+  <data name="&gt;&gt;colName.Type" xml:space="preserve">
+    <value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;RepositoryItemPictureEdit1.Name" xml:space="preserve">
+    <value>RepositoryItemPictureEdit1</value>
+  </data>
+  <data name="&gt;&gt;RepositoryItemPictureEdit1.Type" xml:space="preserve">
+    <value>DevExpress.XtraEditors.Repository.RepositoryItemPictureEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;RepositoryItemColorPickEdit1.Name" xml:space="preserve">
+    <value>RepositoryItemColorPickEdit1</value>
+  </data>
+  <data name="&gt;&gt;RepositoryItemColorPickEdit1.Type" xml:space="preserve">
+    <value>DevExpress.XtraEditors.Repository.RepositoryItemColorPickEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;RepositoryItemColorEdit1.Name" xml:space="preserve">
+    <value>RepositoryItemColorEdit1</value>
+  </data>
+  <data name="&gt;&gt;RepositoryItemColorEdit1.Type" xml:space="preserve">
+    <value>DevExpress.XtraEditors.Repository.RepositoryItemColorEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
+  <data name="&gt;&gt;RepositoryItemImageEdit1.Name" xml:space="preserve">
+    <value>RepositoryItemImageEdit1</value>
+  </data>
+  <data name="&gt;&gt;RepositoryItemImageEdit1.Type" xml:space="preserve">
+    <value>DevExpress.XtraEditors.Repository.RepositoryItemImageEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
   <data name="&gt;&gt;LayoutControlGroup2.Name" xml:space="preserve">
     <value>LayoutControlGroup2</value>
   </data>

EnvelopeGenerator.Form/frmEnvelopeEditor.vb

@@ -1,10 +1,13 @@
 Imports System.ComponentModel
+Imports DevExpress.Utils.Drawing
+Imports DevExpress.Utils.Svg
 Imports DevExpress.XtraEditors
 Imports DevExpress.XtraGrid
 Imports DevExpress.XtraGrid.Views.Grid
 Imports DevExpress.XtraSplashScreen
 Imports DigitalData.Modules.Logging
 Imports EnvelopeGenerator.Common
+Imports EnvelopeGenerator.Common.Constants
 Imports EnvelopeGenerator.Common.My
 
 Partial Public Class frmEnvelopeEditor
@@ -303,4 +306,13 @@ Partial Public Class frmEnvelopeEditor
             pen.Dispose()
         End If
     End Sub
+
+    Private Sub ViewReceivers_InitNewRow(sender As Object, e As InitNewRowEventArgs) Handles ViewReceivers.InitNewRow
+        Dim oReceiver As EnvelopeReceiver = ViewReceivers.GetRow(e.RowHandle)
+        Dim oRowCount = ViewReceivers.RowCount
+        Dim oColorType = DirectCast(oRowCount, ColorType)
+
+        oReceiver.ColorType = oColorType
+    End Sub
+
 End Class

EnvelopeGenerator.Form/frmFieldEditor.Designer.vb

@@ -47,11 +47,13 @@
         Me.barDockControlBottom = New DevExpress.XtraBars.BarDockControl()
         Me.barDockControlLeft = New DevExpress.XtraBars.BarDockControl()
         Me.barDockControlRight = New DevExpress.XtraBars.BarDockControl()
+        Me.SvgImageCollection1 = New DevExpress.Utils.SvgImageCollection(Me.components)
         CType(Me.ribbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.PopupMenu1, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.RepositoryItemComboBox1, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.RepositoryItemLookUpEdit1, System.ComponentModel.ISupportInitialize).BeginInit()
         CType(Me.BarManager1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.SvgImageCollection1, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.SuspendLayout()
         '
         'ribbonControl1
@@ -102,6 +104,7 @@
         '
         'PopupMenu1
         '
+        Me.PopupMenu1.MenuDrawMode = DevExpress.XtraBars.MenuDrawMode.SmallImagesText
         Me.PopupMenu1.Name = "PopupMenu1"
         Me.PopupMenu1.Ribbon = Me.ribbonControl1
         '
@@ -192,6 +195,11 @@
         resources.ApplyResources(Me.barDockControlRight, "barDockControlRight")
         Me.barDockControlRight.Manager = Me.BarManager1
         '
+        'SvgImageCollection1
+        '
+        Me.SvgImageCollection1.ImageColorizationMode = DevExpress.Utils.SvgImageColorizationMode.None
+        Me.SvgImageCollection1.Add("appointmentnightclock", "image://svgimages/scheduling/appointmentnightclock.svg")
+        '
         'frmFieldEditor
         '
         resources.ApplyResources(Me, "$this")
@@ -209,6 +217,7 @@
         CType(Me.RepositoryItemComboBox1, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.RepositoryItemLookUpEdit1, System.ComponentModel.ISupportInitialize).EndInit()
         CType(Me.BarManager1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.SvgImageCollection1, System.ComponentModel.ISupportInitialize).EndInit()
         Me.ResumeLayout(False)
         Me.PerformLayout()
 
@@ -237,4 +246,5 @@
     Friend WithEvents barDockControlBottom As DevExpress.XtraBars.BarDockControl
     Friend WithEvents barDockControlLeft As DevExpress.XtraBars.BarDockControl
     Friend WithEvents barDockControlRight As DevExpress.XtraBars.BarDockControl
+    Friend WithEvents SvgImageCollection1 As DevExpress.Utils.SvgImageCollection
 End Class

EnvelopeGenerator.Form/frmFieldEditor.resx

@@ -283,7 +283,7 @@
     <value>DocumentViewer1</value>
   </data>
   <data name="&gt;&gt;DocumentViewer1.Type" xml:space="preserve">
-    <value>DigitalData.Controls.DocumentViewer.DocumentViewer, DigitalData.Controls.DocumentViewer, Version=1.9.1.0, Culture=neutral, PublicKeyToken=null</value>
+    <value>DigitalData.Controls.DocumentViewer.DocumentViewer, DigitalData.Controls.DocumentViewer, Version=1.9.2.0, Culture=neutral, PublicKeyToken=null</value>
   </data>
   <data name="&gt;&gt;DocumentViewer1.Parent" xml:space="preserve">
     <value>$this</value>
@@ -486,10 +486,19 @@
   <data name="&gt;&gt;BarManager1.Type" xml:space="preserve">
     <value>DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
+  <data name="&gt;&gt;SvgImageCollection1.Name" xml:space="preserve">
+    <value>SvgImageCollection1</value>
+  </data>
+  <data name="&gt;&gt;SvgImageCollection1.Type" xml:space="preserve">
+    <value>DevExpress.Utils.SvgImageCollection, DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
+  </data>
   <data name="&gt;&gt;$this.Name" xml:space="preserve">
     <value>frmFieldEditor</value>
   </data>
   <data name="&gt;&gt;$this.Type" xml:space="preserve">
     <value>DevExpress.XtraBars.Ribbon.RibbonForm, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
   </data>
+  <metadata name="SvgImageCollection1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>409, 17</value>
+  </metadata>
 </root>

EnvelopeGenerator.Form/frmFieldEditor.vb

@@ -1,4 +1,7 @@
-Imports DevExpress.XtraBars
+Imports System.Collections
+Imports DevExpress.Utils
+Imports DevExpress.Utils.Svg
+Imports DevExpress.XtraBars
 Imports DigitalData.Modules.Logging
 Imports EnvelopeGenerator.Common
 Imports EnvelopeGenerator.Common.My
@@ -63,26 +66,36 @@ Partial Public Class frmFieldEditor
         If Controller.LoadElements() = False Then
             MsgBox(Resources.Envelope.Elements_could_not_be_loaded, MsgBoxStyle.Critical, Text)
         Else
-            LoadAnnotations(SelectedReceiver.Id)
+            For Each oReceiver In Receivers
+                LoadAnnotations(oReceiver.Id)
+            Next
+            'LoadAnnotations(SelectedReceiver.Id)
             GDViewer.DisplayFirstPage()
         End If
     End Sub
 
     Private Function CreateBarItem(pReceiver As EnvelopeReceiver) As BarItem
         Dim oItem = New BarButtonItem(BarManager1, pReceiver.Name)
+        Dim oBaseCircle As SvgImage = SvgImageCollection1.Item(0)
+        Dim oColorCircle = Helpers.GetColorCircle(oBaseCircle, pReceiver.Color)
+
+        oItem.ImageOptions.SvgImage = oColorCircle
+
         AddHandler oItem.ItemClick, AddressOf ReceiverItem_Click
         oItem.Tag = pReceiver
         Return oItem
     End Function
 
+
+
     Private Sub ReceiverItem_Click(sender As Object, e As ItemClickEventArgs)
         Me.SuspendLayout()
 
-        Dim oReceiver As EnvelopeReceiver = e.Item.Tag
+        Dim oSelectedReceiver As EnvelopeReceiver = e.Item.Tag
         Dim oCurrentPage = GDViewer.CurrentPage
         Dim oCurrentPosition = GDViewer.GetVScrollBarPosition()
 
-        If oReceiver.Id = SelectedReceiver.Id Then
+        If oSelectedReceiver.Id = SelectedReceiver.Id Then
             Exit Sub
         End If
 
@@ -90,9 +103,13 @@ Partial Public Class frmFieldEditor
 
         If Controller.SaveElements(SelectedReceiver.Id) Then
 
-            SetReceiver(oReceiver)
+            SetReceiver(oSelectedReceiver)
             ClearAnnotations()
-            LoadAnnotations(oReceiver.Id)
+
+            For Each oReceiver In Receivers
+                LoadAnnotations(oReceiver.Id)
+            Next
+
             DisplayPage(oCurrentPage)
             GDViewer.SetVScrollBarPosition(oCurrentPosition)
             GDViewer.Redraw()
@@ -105,7 +122,10 @@ Partial Public Class frmFieldEditor
     End Sub
 
     Private Sub SetReceiver(pReceiver As EnvelopeReceiver)
+        Dim oBaseCircle As SvgImage = SvgImageCollection1.Item(0)
+
         txtReceiver.Caption = pReceiver.Name
+        txtReceiver.ImageOptions.SvgImage = Helpers.GetColorCircle(oBaseCircle, pReceiver.Color)
         SelectedReceiver = pReceiver
     End Sub
 
@@ -128,28 +148,9 @@ Partial Public Class frmFieldEditor
         End If
     End Sub
 
-    Private Sub Viewer_AnnotationAddedByUser(pAnnotationIdx As Integer)
-        Dim oAnnotation = GDViewer.GetAnnotationFromIdx(pAnnotationIdx)
-        Dim oPage = GDViewer.CurrentPage
-        Dim oTag = GetAnnotationTag(SelectedReceiver.Id, oPage, -1)
-
-        If TypeOf oAnnotation Is AnnotationStickyNote Then
-            Dim oStickyNote As AnnotationStickyNote = oAnnotation
-            oStickyNote.Width = SIGNATURE_WIDTH
-            oStickyNote.Height = SIGNATURE_HEIGHT
-            oStickyNote.Tag = oTag
-
-            ApplyAnnotationStyle(oAnnotation)
-        End If
-
-        oAnnotation.CanRotate = False
-        oAnnotation.CanEdit = False
-        oAnnotation.CanResize = False
-    End Sub
-
-
     Private Sub Viewer_BeforeAnnotationAddedByUser(pAnnotationIdx As Integer)
-        'NOOP
+        Dim oAnnotation As Annotation = GDViewer.GetAnnotationFromIdx(pAnnotationIdx)
+        ApplyAnnotationStyleForNewAnnotation(oAnnotation, SelectedReceiver.Color)
     End Sub
 
     Private Sub btnSave_ItemClick(sender As Object, e As ItemClickEventArgs) Handles btnSave.ItemClick
@@ -248,16 +249,22 @@ Partial Public Class frmFieldEditor
     Private Sub LoadAnnotation(pElement As EnvelopeDocumentElement, pReceiverId As Integer)
         Dim oAnnotation As AnnotationStickyNote = Manager.AddStickyNoteAnnot(0, 0, 0, 0, "SIGNATUR")
         Dim oPage = pElement.Page
+        Dim oReceiver = Receivers.Where(Function(r) r.Id = pReceiverId).Single()
+
+        Dim oAnnotationColor = oReceiver.Color
+        If oReceiver.Id <> SelectedReceiver.Id Then
+            oAnnotationColor = Color.FromArgb(30, oReceiver.Color)
+
+            oAnnotation.CanSelect = False
+        End If
 
         If Manager.GetStat() = GdPictureStatus.OK Then
+            ApplyAnnotationStyleForExistingAnnotation(oAnnotation, oAnnotationColor)
+
             oAnnotation.Width = CSng(pElement.Width)
             oAnnotation.Height = CSng(pElement.Height)
             oAnnotation.Left = CSng(pElement.X)
             oAnnotation.Top = CSng(pElement.Y)
-            oAnnotation.Fill = True
-            oAnnotation.FillColor = Color.Gainsboro
-            oAnnotation.BorderWidth = 0.01
-            oAnnotation.Text = SIGNATURE_LABEL
             oAnnotation.Tag = GetAnnotationTag(pReceiverId, oPage, pElement.Id)
         Else
             Dim oStatus = Manager.GetStat()
@@ -266,15 +273,48 @@ Partial Public Class frmFieldEditor
         End If
     End Sub
 
-    Private Sub ApplyAnnotationStyle(ByRef pAnnotation As Annotation)
+    Private Sub Viewer_AnnotationAddedByUser(pAnnotationIdx As Integer)
+        Dim oAnnotation = GDViewer.GetAnnotationFromIdx(pAnnotationIdx)
+        Dim oPage = GDViewer.CurrentPage
+        Dim oTag = GetAnnotationTag(SelectedReceiver.Id, oPage, -1)
+
+        If TypeOf oAnnotation Is AnnotationStickyNote Then
+            Dim oStickyNote As AnnotationStickyNote = oAnnotation
+            oStickyNote.Width = SIGNATURE_WIDTH
+            oStickyNote.Height = SIGNATURE_HEIGHT
+            oStickyNote.Tag = oTag
+
+            ApplyAnnotationStyleForExistingAnnotation(oAnnotation, SelectedReceiver.Color)
+        End If
+    End Sub
+
+    Private Sub ApplyAnnotationStyleForExistingAnnotation(ByRef pAnnotation As Annotation, pColor As Color)
+        ApplyAnnotationStyle(pAnnotation, pColor, pIsNewAnnotation:=False)
+    End Sub
+
+    Private Sub ApplyAnnotationStyleForNewAnnotation(ByRef pAnnotation As Annotation, pColor As Color)
+        ApplyAnnotationStyle(pAnnotation, pColor, pIsNewAnnotation:=True)
+    End Sub
+
+    Private Sub ApplyAnnotationStyle(ByRef pAnnotation As Annotation, pColor As Color, pIsNewAnnotation As Boolean)
         If TypeOf pAnnotation Is AnnotationStickyNote Then
             Dim oAnnotation As AnnotationStickyNote = pAnnotation
             oAnnotation.Fill = True
-            oAnnotation.FillColor = Color.Gainsboro
+            oAnnotation.FillColor = pColor
             oAnnotation.Text = SIGNATURE_LABEL
             oAnnotation.Alignment = StringAlignment.Center
             oAnnotation.LineAlignment = StringAlignment.Center
             oAnnotation.BorderWidth = 0.01
+            oAnnotation.FontSize = 16
+            oAnnotation.FontStyle = FontStyle.Regular
+
+            oAnnotation.CanEditText = False
+            oAnnotation.CanEdit = False
+            oAnnotation.CanRotate = False
+
+            If pIsNewAnnotation = False Then
+                oAnnotation.CanResize = False
+            End If
         End If
     End Sub
 
@@ -332,6 +372,10 @@ Partial Public Class frmFieldEditor
     Private Function GetAnnotationTag(pReceiver As Integer, pPage As Integer, pGuid As Integer) As String
         Return $"{pReceiver}|{pPage}|{pGuid}"
     End Function
+
+    Private Sub PopupMenu1_BeforePopup(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles PopupMenu1.BeforePopup
+
+    End Sub
 End Class