itextsharp : 이미지가 vb.net에서 전체 너비를 차지하도록 강요합니다.

Question

다음은 몇 개의 이미지가있는 생성 된 PDF입니다. 어떻게 이미지를 PDF 파일의 전체 너비를 차지하도록 강제합니까? alt text http://img52.imageshack.us/img52/3324/fullscreencapture121420u.png

Answer 1

ScalePercent 메서드는 이에 매우 잘 작동합니다.

Dim pgSize As New iTextSharp.text.Rectangle(595, 792) //A4 width, Letter height 
    Dim leftMargin as integer = 20 
    Dim rightMargin as integer = 20 
    Dim doc As New iTextSharp.text.Document(pgSize, leftMargin, rightMargin, 48, 24) 
    //Create PDF and write other stuff. 
    Dim img As System.Drawing.Image = My.Resources.My_Image 
    Dim png As System.Drawing.Imaging.ImageFormat = System.Drawing.Imaging.ImageFormat.Png 
    Dim pic1 As iTextSharp.text.Image = iTextSharp.text.Image.GetInstance(img, png) 

    Dim scaleFactor As Single = (pgSize.Width - leftMargin - rightMargin)/img.Width * 100 

    pic1.ScalePercent(scaleFactor) 
    pic1.SetAbsolutePosition(my_X, my_Y) 
    doc.Add(pic1)