Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/16.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181

Warning: file_get_contents(/data/phpspider/zhask/data//catemap/9/windows-phone-7/3.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vb.net PDFsharp位图大小_Vb.net_Pdfsharp - Fatal编程技术网

Vb.net PDFsharp位图大小

Vb.net PDFsharp位图大小,vb.net,pdfsharp,Vb.net,Pdfsharp,我正在使用PDFsharp库将控件转换为PDF文件。问题是位图图像,即使我设置了高度和宽度,并且格式为A4,也无法填充Adobe Reader中的视图。 我还尝试从DPI手动设置参数,但不起作用。剧本是: Dim docum As New PdfDocument() For i As Integer = 0 To FoglioFattura1.listaPagIndex.Count - 1 Dim memImage = New Bitmap(FoglioFattura1

我正在使用PDFsharp库将控件转换为PDF文件。问题是位图图像,即使我设置了高度和宽度,并且格式为A4,也无法填充Adobe Reader中的视图。
我还尝试从DPI手动设置参数,但不起作用。剧本是:

 Dim docum As New PdfDocument()
    For i As Integer = 0 To FoglioFattura1.listaPagIndex.Count - 1
        Dim memImage = New Bitmap(FoglioFattura1.Width, FoglioFattura1.Height) 'A4Size
        FoglioFattura1.DrawToBitmap(memImage, New Rectangle(0, 0, FoglioFattura1.Width, FoglioFattura1.Height))

        Dim oPage As New PdfPage()
        oPage.Orientation = PageOrientation.Portrait
        oPage.Size = PageSize.A4
        'oPage.TrimMargins.Left = 30
        'oPage.TrimMargins.Top = 50
        docum.Pages.Add(oPage)

        Dim xgr As XGraphics = XGraphics.FromPdfPage(oPage)
        Dim img As XImage = XImage.FromGdiPlusImage(memImage)
        xgr.DrawImage(img, 0, 0)
        Next
这些是文档的维度,出于隐私原因,我隐藏了内容。我想让文档填充视图


问题是调用
DrawImage
,而没有在PDF中指定图像的目标大小。将宽度和高度添加到
DrawImage
调用中,图像将以指定的大小绘制

PDF没有DPI。PDF页面的大小以点为单位,点不是像素。
另请参见: