AppStd/EnvelopeGenerator
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

merge PDFBurner changes

Browse Source
This commit is contained in:
tekh 2025-11-20 11:57:00 +01:00
commit 5c232e61f2
1 changed files with 3 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
EnvelopeGenerator.CommonServices/Jobs/FinalizeDocument/PDFBurner.vb
View File

@ -160,19 +160,8 @@ Namespace Jobs.FinalizeDocument
#End Region #End Region
#Region "Add Value" #Region "Add Value"
Private Sub AddInstantJSONAnnotationToPDF(pInstantJSON As String) Exit Select
Dim oAnnotationData = JsonConvert.DeserializeObject(Of AnnotationData)(pInstantJSON) Case AnnotationType.Ink
oAnnotationData.annotations.Reverse()
For Each oAnnotation In oAnnotationData.annotations
Logger.Debug("Adding AnnotationID: " + oAnnotation.id)
Select Case oAnnotation.type
Case AnnotationType.Image
AddImageAnnotation(oAnnotation, oAnnotationData.attachments)
Exit Select
Case AnnotationType.Ink
AddInkAnnotation(oAnnotation) AddInkAnnotation(oAnnotation)
Exit Select Exit Select
Case AnnotationType.Widget Case AnnotationType.Widget
@ -272,7 +261,7 @@ Namespace Jobs.FinalizeDocument
ant.FontSize = _pdfBurnerParams.FontSize ant.FontSize = _pdfBurnerParams.FontSize
ant.FontStyle = _pdfBurnerParams.FontStyle ant.FontStyle = _pdfBurnerParams.FontStyle
Manager.SaveAnnotationsToPage() Manager.SaveAnnotationsToPage()
End Sub End Sub
#End Region #End Region
#Region "Helpers" #Region "Helpers"