2020年8月5日 星期三

vb.net 將iTextsharp裡的圖片加入Opacity [Use Opacity on PDF Image]

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
Dim pcbPic As PdfContentByte = pdfSetWriter.DirectContentUnder
Dim pdfPic As iTextSharp.text.Image
pdfPic = iTextSharp.text.Image.GetInstance(strCTablePath)
pdfPic.ScaleToFit(100.0F, 505.0F)
pdfPic.SetAbsolutePosition(intX, 50.0F)
pcbPic.SaveState()
Dim pdfState As PdfGState = New PdfGState()
pdfState.FillOpacity = 0.09F
pcbPic.SetGState(pdfState)
pcbPic.AddImage(pdfPic)
pcbPic.RestoreState()

沒有留言:

張貼留言