I need help - I can help - ExtractPageRanges

Print Page | Close Window

ExtractPageRanges

Printed From: Debenu Quick PDF Library - PDF SDK Community Forum
Category: For Users of the Library
Forum Name: I need help - I can help
Forum Description: Problems and solutions while programming with the Debenu Quick PDF Library and Debenu PDF Viewer SDK
URL: http://www.quickpdf.org/forum/forum_posts.asp?TID=1281
Printed Date: 13 Jan 26 at 11:14AM
Software Version: Web Wiz Forums 11.01 - http://www.webwizforums.com

Topic: ExtractPageRanges

Posted By: swourin
Subject: ExtractPageRanges
Date Posted: 23 Nov 09 at 10:34AM

Hi folks, I'm considering buying QuickPDF for a very simple feature that I need, the ability to copy some pages from one document to a new (empty) one. I tried the ExtractPageRanges method but the font information is lost, how can I accomplish that without loosing font (name, size, style...)?

Thanks in advance.

Replies:

Posted By: Ingo
Date Posted: 23 Nov 09 at 11:32AM

Hi!

Perhaps you should try "ClonePages" ...
Another point: If something lost after page transformation you should use "CombineLayers" before 'cause the page properties can be on several layers.

Cheers and welcome here, Ingo

Posted By: swourin
Date Posted: 23 Nov 09 at 4:14PM

Hi Ingo, thanks for your reply.

I just didn't get how can I use ClonePages in my particular case. I need to split one document of several pages in various one page documents. How can I use ClonePages for doing this? I looked on the help and it shows that ClonePages can be used just for cloning pages inside the same document, a little bit different of what I want to accomplish. Any help will be welcome. Thanks in advance.

Regards, Anderson.

Posted By: Ingo
Date Posted: 23 Nov 09 at 4:45PM

Hi!

The question is... where are the font-information?
In your extracted page or anywhere else?
So first check which are the used fonts and add them to your extracted page(s) later?
Only ideas - not a solution ;-)

Cheers, Ingo

Posted By: DELBEKE
Date Posted: 23 Nov 09 at 5:19PM

Hi Swourin

Can you upload a pdf sample some where or send it directly to me at Jean-Luc(At)Delbeke(Dot)fr.

And the list of pages you want to export in a new pdf

Thanks

Posted By: swourin
Date Posted: 23 Nov 09 at 5:51PM

Hi Ingo,

I used FindFonts to enumerate all the fonts used in the source document, here is the list:
URWBookmanL-DemiBoldItal Type: Type1
NimbusRomNo9L-Regu Type: Type1
NimbusRomNo9L-Regu Type: Type1
URWBookmanL-Ligh Type: Type1
URWBookmanL-Ligh Type: Type1
URWBookmanL-LighItal Type: Type1
URWBookmanL-LighItal Type: Type1
NimbusRomNo9L-Medi Type: Type1
NimbusRomNo9L-Medi Type: Type1
URWBookmanL-DemiBold Type: Type1
URWBookmanL-DemiBold Type: Type1
Symbol Type: Standard

When I do the same thing in the target document FindFonts returns zero. The question is how can I add these fonts to the target document with the information available on the source PDF.

Posted By: DELBEKE
Date Posted: 23 Nov 09 at 6:43PM

Hi Swourin

Try with something like this

Dim Doc As New QuickPDFAX0717.PDFLibrary
Dim lret As Long
Doc.UnlockKey "My Key"
lret = Doc.ExtractFilePages("C:\PdfVisu\PdfTest\Document.pdf", "c:\test.pdf", "2")

Posted By: Ingo
Date Posted: 23 Nov 09 at 6:45PM

These fonts are not the from QP supported standard fonts.
If they are really embedded then you should get them. If there are only font references in the document you should have these fonts on your machine, too.
If you want to embedd these fonts you can use AddTrueTypeFont or AddTrueTypeFontFromFile.
BTW: The new QuickPDF library demo contains font-samples, too.

Cheers, Ingo