it works fine for me.

I'm wondering why you want to use 300 dpi?

The original embedded image has 7198 x 4790 pixels.

With the (for pdf normal) 72 dpi you're getting a 2592 x 1725 pixels tiff-file with 1.13 mb.

With 300 dpi you're getting a 10798 x 7185 pixels tiff-file with 12.3 mb.

So you should try something between these two dpi-values.

Here is my code:

targetfile := target + ExtractFileName(Edit1.Text) + '-72.tif';

QP.RenderDocumentToFile(72, 1, QP.PageCount, 7, targetfile);

targetfile := target + ExtractFileName(Edit1.Text) + '-300.tif';

QP.RenderDocumentToFile(300, 1, QP.PageCount, 7, targetfile);

If you want to get the best quality image you should try other functions.

Plans like yours are embedded as original image-files into pdf-documents.

So you should grab the images out of the pdf-document.

You can use for this job (in the same order):

QP.SelectPage()

QP.GetPageImageList()

QP.GetImageListCount()

QP.GetImageListItemIntProperty() // <-- to get the original filetype

QP.SaveImageListItemDataToFile()

Cheers and welcome here,

Ingo