merge PDFBurner changes
This commit is contained in:
commit
5c232e61f2
@ -160,17 +160,6 @@ Namespace Jobs.FinalizeDocument
|
|||||||
#End Region
|
#End Region
|
||||||
|
|
||||||
#Region "Add Value"
|
#Region "Add Value"
|
||||||
Private Sub AddInstantJSONAnnotationToPDF(pInstantJSON As String)
|
|
||||||
Dim oAnnotationData = JsonConvert.DeserializeObject(Of AnnotationData)(pInstantJSON)
|
|
||||||
|
|
||||||
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
|
Exit Select
|
||||||
Case AnnotationType.Ink
|
Case AnnotationType.Ink
|
||||||
AddInkAnnotation(oAnnotation)
|
AddInkAnnotation(oAnnotation)
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user