How to: Extract Images from a Document

• Sep 19, 2023
• 4 minutes to read

Important

You need a license for the DevExpress Office File API Subscription or DevExpress Universal Subscription to use these examples in production code.

Windows

This example illustrates the use of the PdfDocumentProcessor.GetImages method to obtain images from a PDF file.

View Example

Program.cs

using System;
using System.Collections.Generic;
using System.Drawing;
using DevExpress.Pdf;
// ...
static void Main(string[] args) {
    PdfDocumentProcessor processor = new PdfDocumentProcessor();
    processor.LoadDocument(@"..\\..\\Demo.pdf");

    int xCount = 8; 
    int yCount = 2;
    double cardWidth = 150.5; // Measured in points (equals 2.09 inches).
    double cardHeight = 442; // Measured in points (equals 6.138 inches).
    double xMargin = 122; // Measured in points (equals 1.694 inches).
    double yMargin = 77; // Measured in points (equals 1.069 inches).
    double yCoord = yMargin;

    for (int y = 0; y < yCount; y++, yCoord += cardHeight) {
        double xCoord = xMargin;
        for (int x = 0; x < xCount; x++, xCoord += cardWidth) {
            PdfDocumentArea area = new PdfDocumentArea(1,
                new PdfRectangle(xCoord, yCoord, xCoord + cardWidth, yCoord + cardHeight));
            IList<Bitmap> bitmaps = processor.GetImages(area);
            if (bitmaps.Count != 0) {
                bitmaps[0].Save(String.Format(@"{0}_{1}.bmp", x, y));
                bitmaps[0].Dispose();
            }
            Console.WriteLine(bitmaps.Count.ToString());
        }
    }
}

Program.vb

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

    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))
                bitmaps(0).Dispose()
            End If
            Console.WriteLine(bitmaps.Count.ToString())
            x += 1
            xCoord += cardWidth
        Loop
        y += 1
        yCoord += cardHeight
    Loop
End Sub

Warning

The GetImages method uses GDI/GDI+ rendering and works only on Windows OS. The PlatformNotSupportedException is thrown on other operating systems. Use the GetDXImages method in non-Windows environments.

Non-Windows Environments

The code below shows how to retrieve images from the specified page area:

View Example

Program.cs

using System;
using System.Collections.Generic;
using DevExpress.Drawing;
using DevExpress.Pdf;
// ...
static void Main(string[] args) {
    PdfDocumentProcessor processor = new PdfDocumentProcessor();
    processor.LoadDocument(@"..\\..\\Demo.pdf");

    int xCount = 8; 
    int yCount = 2;
    double cardWidth = 150.5; // Measured in points (equals 2.09 inches).
    double cardHeight = 442; // Measured in points (equals 6.138 inches).
    double xMargin = 122; // Measured in points (equals 1.694 inches).
    double yMargin = 77; // Measured in points (equals 1.069 inches).
    double yCoord = yMargin;

    for (int y = 0; y < yCount; y++, yCoord += cardHeight) {
        double xCoord = xMargin;
        for (int x = 0; x < xCount; x++, xCoord += cardWidth) {
            PdfDocumentArea area = new PdfDocumentArea(1,
                new PdfRectangle(xCoord, yCoord, xCoord + cardWidth, yCoord + cardHeight));
            IList<DXBitmap> bitmaps = processor.GetDXImages(area);
            if (bitmaps.Count != 0) {
                bitmaps[0].Save(String.Format(@"{0}_{1}.bmp", x, y), DXImageFormat.Bmp);
                bitmaps[0].Dispose();
            }
            Console.WriteLine(bitmaps.Count.ToString());
        }
    }
}

Program.vb

Imports DevExpress.Drawing
Imports DevExpress.Pdf

Shared Sub Main(ByVal args() As String)
    Dim processor As New PdfDocumentProcessor()
    processor.LoadDocument("..\\..\\Demo.pdf")

    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 DXBitmap) = processor.GetDXImages(area)
            If bitmaps.Count <> 0 Then
                bitmaps(0).Save(String.Format("{0}_{1}.bmp", x, y), DXImageFormat.Bmp)
                bitmaps(0).Dispose()
            End If
            Console.WriteLine(bitmaps.Count.ToString())
            x += 1
            xCoord += cardWidth
        Loop
        y += 1
        yCoord += cardHeight
    Loop
End Sub