Do you own a Debenu Quick PDF Library version 7, 8, 9, 10, 11, 12, 13 or iSEDQuickPDF license? Upgrade to Debenu Quick PDF Library 14 today!
![]() |
Memory pb with extractFilepages |
Post Reply ![]() |
Author | |
m56ober ![]() Beginner ![]() Joined: 01 Feb 11 Status: Offline Points: 2 |
![]() ![]() ![]() ![]() ![]() Posted: 01 Feb 11 at 1:26PM |
I have a big file 126000 pages
I must separate pages of this file After 22% of traitement i have a memory problem. Can you help me? Thank you, Oliver ================================================================== My procedure ================================================================== Procedure tFRM_MAIN.WriteNewFile(pgfirst,pglast:integer); Var FName : String; outpdf : TQuickPDF0723; Begin inc(nbfic); Plage := intToStr(pgfist)+'-'+intTostr(pglast); { FileName : destination } fname := PREFIX + matricule + '_' + annee + '_' + FormatFloat('00000',nbFile)+ '.pdf'; { Extraction} outpdf := TQuickPDF0723.create; outpdf.UnlockKey(QPDFLicence); err := OutPdf.ExtractFilePages(Copie, // source File fName, // Destination File Plage); FreeAndNil(outpdf); { Index } write(findex,mat+';'+name+';'+year+';'+FormatFloat('0000',nbFile)+';'); if err = 0 then Begin writeln(findex,'Error'); ShowMessage('Error '+intToStr(pdf.lastErrorCode)); End Else writeln(findex,''); End; |
|
![]() |
|
m56ober ![]() Beginner ![]() Joined: 01 Feb 11 Status: Offline Points: 2 |
![]() ![]() ![]() ![]() ![]() |
My problem is solved
it's not ExtractFilePages the problem but DAFindPage For each group page, i'm using this code. It's longer , but i have not memory problem FreeAndNil(PDF); PDF := TQuickPDF0723.Create; PDF.UnlockKey(QPDFLicence); FH := pdf.DAOpenFile(FileName,''); Thank you! |
|
![]() |
|
Dimitry ![]() Team Player ![]() Joined: 18 Feb 10 Status: Offline Points: 37 |
![]() ![]() ![]() ![]() ![]() |
Sounds great that you found the solution.
Also there is one more function ExtractPages() as an alternative to ExtractFilePages().
|
|
Regards,
Dmitry |
|
![]() |
Post Reply ![]() |
|
Tweet
|
Forum Jump | Forum Permissions ![]() You cannot post new topics in this forum You cannot reply to topics in this forum You cannot delete your posts in this forum You cannot edit your posts in this forum You cannot create polls in this forum You cannot vote in polls in this forum |
Copyright © 2017 Debenu. Debenu Quick PDF Library is a PDF SDK. All rights reserved. About — Contact — Blog — Support — Online Store