Member 12947390 Ответов: 0

Как изменить ориентацию, в то время как конвертировать PDF в изображения с помощью Ghostscript в .Чистая


Привет, у меня есть PDF-файл, который был поставлен или создан как альбомная диаграмма, мне нужно преобразовать этот PDF-файл в jpeg и поместить диаграмму в портретный формат и попытаться сохранить качество вывода.

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

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


Пример кода:

Dim Pconverter Как Новый PDFConvert()

Проблемы с pconverter.JPEGQuality = 100

Проблемы с pconverter.OutputFormat = "jpeg"

Проблемы с pconverter.OutputToMultipleFile = True

Проблемы с pconverter.Высота = 500

Проблемы с pconverter.Ширина = 600

Проблемы с pconverter.FitPage = True

Проблемы с pconverter.TextAlphaBit = 4


Тусклый вывод в виде String = String.Формат("{0}\{1}{2}", SaveImageToFolder, input.Name, ".jpeg")


Преобразовано = Pconverter.Преобразования(вход.Полное имя, вывод)

Спасибо, Алекс.

Что я уже пробовал:

Hi, I've a PDF file which was supplied or created as landscape chart, i need to convert this PDF to jpeg and fit the chart on portrait format and try to preserve output quality.

I've tried to manipulate with JPEGQuality and width and height but without any luck, each converted file created as portrait but i'm loosing picture quality.

Possible i need to use scaling or anything else, but i'm not sure what and how, any advise really appreciated.


Sample code:

Dim Pconverter As New PDFConvert()

    Pconverter.JPEGQuality = 100

    Pconverter.OutputFormat = "jpeg"

    Pconverter.OutputToMultipleFile = True

    Pconverter.Height = 500

    Pconverter.Width = 600

    Pconverter.FitPage = True

    Pconverter.TextAlphaBit = 4


Dim output As String = String.Format("{0}\{1}{2}", SaveImageToFolder, input.Name, ".jpeg")

 
Converted = Pconverter.Convert(input.FullName, output)

Thanks Alex.

0 Ответов