How to print a pdf page by page

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   Hi everybody,

I have a very big PDF file (size about 700 MB, 330 pages) which I want to print.

First of all I used Adobe Acrobat Reader for printing.

Unfortunately Adobe Acrobat Reader crashes, or hangs up while preparing to print this pdf-monster.

That�s why I decided to print the pdf page by page.

And that�s why I tried to use quickpdf for printing.

Idea: 

QP.LoadFromFile()

For i := 1 to QP.PageCount do

begin

  QP.PrintDocument('printername',i,i,...)

end;

Result: QP.LoadFromFile() takes about 15 minutes to load the  complete pdf-file. None of my users are willing to wait so long time. 

QP.DAOpenFile() helped me to open the PDF-file.

But can anybody tell me, how to retrieve a single page and how to print this single page?

Fritz

Edited by FKirch

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
FKirch Members Profile Find Members Posts Team Player Joined: 29 Oct 05 Location: Germany Status: Offline Points: 23	Post Options Post Reply Quote FKirch Report Post Thanks(0) Quote Reply Topic: How to print a pdf page by page Posted: 06 Jun 06 at 9:50AM
	Hi everybody, I have a very big PDF file (size about 700 MB, 330 pages) which I want to print. First of all I used Adobe Acrobat Reader for printing. Unfortunately Adobe Acrobat Reader crashes, or hangs up while preparing to print this pdf-monster. That�s why I decided to print the pdf page by page. And that�s why I tried to use quickpdf for printing. Idea: QP.LoadFromFile() For i := 1 to QP.PageCount do begin QP.PrintDocument('printername',i,i,...) end; Result: QP.LoadFromFile() takes about 15 minutes to load the complete pdf-file. None of my users are willing to wait so long time. QP.DAOpenFile() helped me to open the PDF-file. But can anybody tell me, how to retrieve a single page and how to print this single page? Fritz Edited by FKirch

Ingo Members Profile Find Members Posts Moderator Group Joined: 29 Oct 05 Status: Offline Points: 3524	Post Options Post Reply Quote Ingo Report Post Thanks(0) Quote Reply Posted: 06 Jun 06 at 10:50AM
	Hi Fritz! No chance i think... Perhaps it's better using the standalone-function ExtractFilePages? You can create single-page-files, then printing, then deleting... Best regards, Ingo

FKirch Members Profile Find Members Posts Team Player Joined: 29 Oct 05 Location: Germany Status: Offline Points: 23	Post Options Post Reply Quote FKirch Report Post Thanks(0) Quote Reply Posted: 06 Jun 06 at 11:09AM
	Hi Ingo but QP.LoadFromFile() is a very very very time consuming process. As I mentioned above it takes about 15 minutes and nobody can predict, whether this process comes to an end or the machine preferes to hang up. Do you think somebody can code a DAExtractPages function?

gkwardjr Members Profile Find Members Posts Beginner Joined: 17 May 06 Location: United States Status: Offline Points: 4	Post Options Post Reply Quote gkwardjr Report Post Thanks(0) Quote Reply Posted: 06 Jun 06 at 6:56PM
	Hi Fritz Did your company make the file or someone else? I'm just asking because that is a pretty big file size for the number of pages. I came across a similar problem recently. However, it was a one time issue of a file someone else sent me. I just printed sections of it to a pdf printer and then spliced them back together (The file was so large because the author did no or little compression of the content). Afterwards the file was fine for everyone to print. If this is a one time deal you might try to recreate the pdf by using adobe distiller or primo or something. You could also try to convert the pdf to an image with photoshop or similar program. In both case you might want to split the document into smaller file sizes. Keith

Ingo Members Profile Find Members Posts Moderator Group Joined: 29 Oct 05 Status: Offline Points: 3524	Post Options Post Reply Quote Ingo Report Post Thanks(0) Quote Reply Posted: 07 Jun 06 at 1:44AM
	Hi Fritz! What do you want again with QP.LoadFromFile()? Take the STANDALONE-function ExtractFilePages. There's no need for LoadFromFile in this case. Only QP := TiSEDQuickPDF.Create; try QP.UnlockKey('MyLicenseKey'); QP.ExtractFilePages(BigFile, SmallFile, 'FromPage-ToPage'); //... and so on... Best regards, Ingo

FKirch Members Profile Find Members Posts Team Player Joined: 29 Oct 05 Location: Germany Status: Offline Points: 23	Post Options Post Reply Quote FKirch Report Post Thanks(0) Quote Reply Posted: 12 Jun 06 at 6:54AM
	Hi Ingo, Every call of QP.ExtractFilePages(BigFile,....) opens the BigFile to extract a range of pages. If I use the following source to print single pages QP := TiSEDQuickPDF.Create; QPX := TiSEDQuickPDF.Create; try QP.UnlockKey('MyLicenseKey'); QP.DAOpenFile(BigFile); For i := 1 to QP.GetPageCount do begin SmallFile := Format('%d.PDF',); QP.ExtractFilePages(BigFile, SmallFile, Format('%d',)); QPX.LoadFromFile(SmallFile); QPX.PrintDocument('printername',1,1,...) end; then in order to extract one single page every call of ExtractFilePages always load the complete BigFile. That is a solution which doesnt help. Sorry.

Ingo Members Profile Find Members Posts Moderator Group Joined: 29 Oct 05 Status: Offline Points: 3524	Post Options Post Reply Quote Ingo Report Post Thanks(0) Quote Reply Posted: 12 Jun 06 at 7:20AM
	... But it's a standalone function and it should be better than using LoadFromFile? If you want to print all pages you can use a pdf reader. If you want to use single pages from here and there it's okay i think. If you want to print from page 11 to page 21 it's onla yone call 'cause you can extract ranges. Best regards, Ingo