【发布时间】:2011-10-28 02:39:45
【问题描述】:
这是我目前的代码:
Imports iTextSharp.text
Imports iTextSharp.text.pdf
Imports System.IO
Module Module1
Sub Main()
AddjImage("C:\test.png", "c:\pdfTemplate.pdf", "C:\output.pdf")
End Sub
Private Function AddjImage(ByVal strImageFileName As String, ByVal pdfTemplateFile As String, ByVal outputPdf As String) As Boolean
Try
Dim iPdfReader As PdfReader = New PdfReader(pdfTemplateFile)
Dim iPdfStamper As PdfStamper = New PdfStamper(iPdfReader, New FileStream(outputPdf, FileMode.Create))
Dim imgjImage As iTextSharp.text.Image
Dim bytContent As PdfContentByte
'Insert Image
imgjImage = iTextSharp.text.Image.GetInstance(strImageFileName)
imgjImage.Alignment = iTextSharp.text.Image.ALIGN_TOP
imgjImage.ScalePercent(78)
imgjImage.SetAbsolutePosition(445, 0)
bytContent = iPdfStamper.GetOverContent(1)
bytContent.AddImage(imgjImage)
iPdfStamper.FormFlattening = True
iPdfStamper.Close()
Return True
Catch ex As Exception
Return False
End Try
End Function
End Module
pdf 为横向布局。页面大小为 A4。我正在尝试在 pdf 页面的右侧插入图像。我想在 x=445 和 y=0 位置对齐图像。
我有两个尺寸的图片。他们是: 图片 1,宽度 = 500px;高度=910px; 宽度为 500 像素的图像 2;高度=400px;
问题是,两个图像都对齐到底部而不是顶部。因为图片1的顶部被切断了。
【问题讨论】:
标签: vb.net itextsharp