Как преобразовать PDF в изображения с помощью Delphi 7 для Windows 7 x64

Delphi , Графика и Игры , Изображения

Преобразование PDF-файлов в изображения является актуальной задачей для многих разработчиков, работающих с документами. В данной статье мы рассмотрим, как решить эту задачу, используя среду разработки Delphi 7 на операционной системе Windows 7 x64.

Проблема

Вы столкнулись с необходимостью преобразования PDF-файлов в изображения, предпочтительно в формате PNG, с указанием разрешения. Вы знаете о возможности использования ImageMagick для конвертации с помощью convert.exe, однако сталкиваетесь с ошибками, работая на Windows 7 x64. Ваш предпочтительный метод — использование встроенных компонентов Delphi 7, но вы также готовы использовать командную строку, если это необходимо для решения проблемы.

Решение

1. Использование встроенных компонентов Delphi

Компонент PDFToolkit для Delphi предоставляет функцию RenderToStream, которая позволяет рендерить содержимое страниц PDF в изображение или объект Tcanvas. Это может быть удобным решением для вашего случая, особенно если требуются форматы BMP или JPG, которые являются более простыми по сравнению с TIFF.

pascal procedure TForm1.RenderPDFToImage(const APdfFile: string; const AImageFormat: string; const APageNumber: Integer; const AImageResolution: Integer); var PdfDocument: TPDFDocument; Page: TPDFPage; Image: TImage; Stream: TMemoryStream; begin PdfDocument := TPDFDocument.Create(NULL); try PdfDocument.LoadFromFile(APdfFile); Page := PdfDocument.Pages[APageNumber]; Image := TImage.Create(NULL); try Image.PixelFormat := pf32bit; Image.Canvas.SetOutputFormat(AImageFormat); Image.Canvas.SetResolution(AImageResolution, AImageResolution); Page.RenderToStream(Image.Canvas, nil); Stream := TMemoryStream.Create(); try Image.SaveToStream(Stream, AImageFormat); finally Stream.Free; end; finally Image.Free; end; finally PdfDocument.Free; end; end;

1. Использование внешних утилит

Если встроенные компоненты недоступны или не подходят, можно использовать внешние утилиты, такие как pdftoppm из пакета xpdf, а затем преобразовать полученные изображения в нужный формат с помощью ImageMagick. Убедитесь, что у вас установлен Ghostscript и правильно настроен ключ в Windows Registry.

bat pdftoppm -r 300 input.pdf output%03d.png

Это команда командной строки преобразует каждую страницу PDF в отдельный PNG файл с указанным разрешением.

Альтернативные решения

Вы также можете рассмотреть использование QuickPDF, который является полностью написанным на Delphi решением с множеством функций и поддержкой различных форматов вывода изображений.

Заключение

Выбор метода зависит от ваших предпочтений и требований к проекту. Использование встроенных компонентов Delphi может быть более предпочтительным, если вы хотите интегрировать функционал непосредственно в ваше приложение. В случае проблем с ImageMagick, использование xpdf и последующее преобразование через ImageMagick может быть надежным решением. QuickPDF также заслуживает внимания как полнофункциональный и поддерживаемый инструмент.

Надеемся, что предоставленная информация поможет вам успешно решить задачу преобразования PDF в изображения с помощью Delphi 7 на Windows 7 x64.

Создано по материалам из источника по ссылке.

Как преобразовать PDF в изображения, используя Delphi 7 для Windows 7 x64.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Изображения ::