Skip to main content
A newer version of this page is available. .

How to: Extract Images from a Document

  • 2 minutes to read


You require a license to the DevExpress Office File API or DevExpress Universal Subscription to use these examples in production code. Refer to the DevExpress Subscription page for pricing information.

This example illustrates the use of the PdfDocumentProcessor.GetImages method for obtaining document bitmaps in code by using PDF Document API.

Imports System
Imports System.Collections.Generic
Imports System.Drawing
Imports DevExpress.Pdf
' ...
        Shared Sub Main(ByVal args() As String)
            Dim processor As New PdfDocumentProcessor()

            Dim xCount As Integer = 8
            Dim yCount As Integer = 2
            Dim cardWidth As Double = 150.5 ' Measured in points (equals 2.09 inches).
            Dim cardHeight As Double = 442 ' Measured in points (equals 6.138 inches).
            Dim xMargin As Double = 122 ' Measured in points (equals 1.694 inches).
            Dim yMargin As Double = 77 ' Measured in points (equals 1.069 inches).
            Dim yCoord As Double = yMargin

            Dim y As Integer = 0
            Do While y < yCount
                Dim xCoord As Double = xMargin
                Dim x As Integer = 0
                Do While x < xCount
                    Dim area As New PdfDocumentArea(1, New PdfRectangle(xCoord, yCoord, xCoord + cardWidth, yCoord + cardHeight))
                    Dim bitmaps As IList(Of Bitmap) = processor.GetImages(area)
                    If bitmaps.Count <> 0 Then
                        bitmaps(0).Save(String.Format("{0}_{1}.bmp", x, y))
                    End If
                    x += 1
                    xCoord += cardWidth
                y += 1
                yCoord += cardHeight
        End Sub
See Also