fix pageindex, translations

EnvelopeGenerator.Common/Jobs/PDFBurner.vb

@@ -78,8 +78,10 @@ Namespace Jobs
                     Select Case oAnnotation.type
                         Case ANNOTATION_TYPE_IMAGE
                             AddImageAnnotation(oAnnotation, oAnnotationData.attachments)
+
                         Case ANNOTATION_TYPE_INK
                             AddInkAnnotation(oAnnotation)
+
                     End Select
                 Next
 
@@ -104,6 +106,7 @@ Namespace Jobs
                 Dim oWidth = oBounds.Item(2)
                 Dim oHeight = oBounds.Item(3)
 
+                Manager.SelectPage(pAnnotation.pageIndex + 1)
                 Manager.AddEmbeddedImageAnnotFromBase64(oAttachment.Value.binary, oX, oY, oWidth, oHeight)
 
                 Return True
@@ -126,7 +129,6 @@ Namespace Jobs
                     Select(AddressOf ToPointF).
                     ToArray()
 
-
                     Manager.AddFreeHandAnnot(oColor, oPoints)
                 Next