13-11-23
This commit is contained in:
parent
623cf43520
commit
5302f0dff5
@ -1,4 +1,5 @@
|
||||
Imports System.Drawing
|
||||
Imports DevExpress.Utils.Svg
|
||||
Imports DigitalData.Modules.Base
|
||||
Imports EnvelopeGenerator.Common.Constants
|
||||
|
||||
@ -12,6 +13,13 @@ Public Class EnvelopeReceiver
|
||||
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
|
||||
|
||||
|
||||
|
||||
@ -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>
|
||||
@ -1,4 +1,5 @@
|
||||
Imports System.Drawing
|
||||
Imports DevExpress.Utils.Svg
|
||||
Imports EnvelopeGenerator.Common.Constants
|
||||
|
||||
Public Class Helpers
|
||||
@ -71,4 +72,17 @@ Public Class Helpers
|
||||
|
||||
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
|
||||
|
||||
3
EnvelopeGenerator.Common/Images/circle.svg
Normal file
3
EnvelopeGenerator.Common/Images/circle.svg
Normal file
@ -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>
|
||||
|
After Width: | Height: | Size: 168 B |
59
EnvelopeGenerator.Form/frmEnvelopeEditor.Designer.vb
generated
59
EnvelopeGenerator.Form/frmEnvelopeEditor.Designer.vb
generated
@ -66,11 +66,14 @@ Partial Public Class frmEnvelopeEditor
|
||||
Me.EnvelopeReceiverBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.ViewReceivers = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.colColor = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.RepositoryItemColorPickEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemColorPickEdit()
|
||||
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()
|
||||
@ -85,7 +88,6 @@ Partial Public Class frmEnvelopeEditor
|
||||
Me.FrmEditorBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.EnvelopeDocumentBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog()
|
||||
Me.RepositoryItemColorEdit1 = New DevExpress.XtraEditors.Repository.RepositoryItemColorEdit()
|
||||
CType(Me.SplitContainerControl1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.SplitContainerControl1.Panel1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SplitContainerControl1.Panel1.SuspendLayout()
|
||||
@ -113,9 +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.RepositoryItemColorPickEdit1, 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()
|
||||
@ -131,7 +136,6 @@ Partial Public Class frmEnvelopeEditor
|
||||
CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.FrmEditorBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.EnvelopeDocumentBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.RepositoryItemColorEdit1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'SplashScreenManager1
|
||||
@ -378,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.RepositoryItemPictureEdit1, Me.RepositoryItemColorPickEdit1, Me.RepositoryItemColorEdit1})
|
||||
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
|
||||
@ -409,14 +413,10 @@ Partial Public Class frmEnvelopeEditor
|
||||
Me.colColor.Name = "colColor"
|
||||
Me.colColor.OptionsColumn.AllowSort = DevExpress.Utils.DefaultBoolean.[False]
|
||||
'
|
||||
'RepositoryItemColorPickEdit1
|
||||
'RepositoryItemPictureEdit2
|
||||
'
|
||||
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
|
||||
Me.RepositoryItemPictureEdit2.Name = "RepositoryItemPictureEdit2"
|
||||
Me.RepositoryItemPictureEdit2.SvgImageSize = New System.Drawing.Size(16, 16)
|
||||
'
|
||||
'colEmail
|
||||
'
|
||||
@ -442,6 +442,27 @@ Partial Public Class frmEnvelopeEditor
|
||||
'
|
||||
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]
|
||||
@ -552,12 +573,6 @@ Partial Public Class frmEnvelopeEditor
|
||||
Me.OpenFileDialog1.FileName = "OpenFileDialog1"
|
||||
resources.ApplyResources(Me.OpenFileDialog1, "OpenFileDialog1")
|
||||
'
|
||||
'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"
|
||||
'
|
||||
'frmEnvelopeEditor
|
||||
'
|
||||
resources.ApplyResources(Me, "$this")
|
||||
@ -594,9 +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.RepositoryItemColorPickEdit1, 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()
|
||||
@ -612,7 +630,6 @@ Partial Public Class frmEnvelopeEditor
|
||||
CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.FrmEditorBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.EnvelopeDocumentBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.RepositoryItemColorEdit1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
@ -669,6 +686,8 @@ Partial Public Class frmEnvelopeEditor
|
||||
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
|
||||
|
||||
|
||||
@ -516,6 +516,12 @@
|
||||
<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>
|
||||
</data>
|
||||
@ -966,11 +972,11 @@
|
||||
<data name=">>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=">>RepositoryItemColorPickEdit1.Name" xml:space="preserve">
|
||||
<value>RepositoryItemColorPickEdit1</value>
|
||||
<data name=">>RepositoryItemPictureEdit2.Name" xml:space="preserve">
|
||||
<value>RepositoryItemPictureEdit2</value>
|
||||
</data>
|
||||
<data name=">>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 name=">>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=">>colEmail.Name" xml:space="preserve">
|
||||
<value>colEmail</value>
|
||||
@ -996,6 +1002,24 @@
|
||||
<data name=">>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=">>RepositoryItemColorPickEdit1.Name" xml:space="preserve">
|
||||
<value>RepositoryItemColorPickEdit1</value>
|
||||
</data>
|
||||
<data name=">>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=">>RepositoryItemColorEdit1.Name" xml:space="preserve">
|
||||
<value>RepositoryItemColorEdit1</value>
|
||||
</data>
|
||||
<data name=">>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=">>RepositoryItemImageEdit1.Name" xml:space="preserve">
|
||||
<value>RepositoryItemImageEdit1</value>
|
||||
</data>
|
||||
<data name=">>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=">>LayoutControlGroup2.Name" xml:space="preserve">
|
||||
<value>LayoutControlGroup2</value>
|
||||
</data>
|
||||
@ -1056,12 +1080,6 @@
|
||||
<data name=">>OpenFileDialog1.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.OpenFileDialog, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>RepositoryItemColorEdit1.Name" xml:space="preserve">
|
||||
<value>RepositoryItemColorEdit1</value>
|
||||
</data>
|
||||
<data name=">>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=">>$this.Name" xml:space="preserve">
|
||||
<value>frmEnvelopeEditor</value>
|
||||
</data>
|
||||
|
||||
@ -1,4 +1,6 @@
|
||||
Imports System.ComponentModel
|
||||
Imports DevExpress.Utils.Drawing
|
||||
Imports DevExpress.Utils.Svg
|
||||
Imports DevExpress.XtraEditors
|
||||
Imports DevExpress.XtraGrid
|
||||
Imports DevExpress.XtraGrid.Views.Grid
|
||||
@ -311,7 +313,6 @@ Partial Public Class frmEnvelopeEditor
|
||||
Dim oColorType = DirectCast(oRowCount, ColorType)
|
||||
|
||||
oReceiver.ColorType = oColorType
|
||||
'Dim oColor = Helpers.ColorTypeToColor(oColorType)
|
||||
'ViewReceivers.SetRowCellValue(e.RowHandle, colColor, oColor)
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
|
||||
10
EnvelopeGenerator.Form/frmFieldEditor.Designer.vb
generated
10
EnvelopeGenerator.Form/frmFieldEditor.Designer.vb
generated
@ -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
|
||||
|
||||
@ -283,7 +283,7 @@
|
||||
<value>DocumentViewer1</value>
|
||||
</data>
|
||||
<data name=">>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=">>DocumentViewer1.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
@ -486,10 +486,19 @@
|
||||
<data name=">>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=">>SvgImageCollection1.Name" xml:space="preserve">
|
||||
<value>SvgImageCollection1</value>
|
||||
</data>
|
||||
<data name=">>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=">>$this.Name" xml:space="preserve">
|
||||
<value>frmFieldEditor</value>
|
||||
</data>
|
||||
<data name=">>$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>
|
||||
@ -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 = SelectedReceiver.Color
|
||||
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 = SelectedReceiver.Color
|
||||
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
|
||||
|
||||
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user