habe mehrere Probleme mit Quickpdf.
1. beim Rendern von PDF zu EPS wird das Ergebnisfile viel größer, z.B. PDF mit 3 Seiten hat ca. 17000 Byte, das EPS einer einzelnen Seite fast 3MB
// Parameter : DPI, vonSeite,bisSeite,4 für EPS,Ausgabefiel
.:RenderDocumentToFile(96,1,1,4,"test.eps") // 4 = EPS output
2. ich versuche aus einem PDF einzelne Seiten zu extrahieren, aber bekomme immer einen Fehler "403 Could not open output file "
Code: Alles auswählen
WITH OBJECT ( oPdf := TQuickPdf():New() ) // Hintergrundpdf
n := .:ExtractFilePages("test.pdf","","test2.pdf","1") // habe auch versucht Passwort auf NIL zu setzen oder Ragen "1-2"
c := .:LastErrorCode()// 403 Could not open output file
.:Destroy()
END WITH
return .t.
Description
Extracts ranges of pages from a PDF document on disk and places the extracted pages into a new PDF document.
Function DebenuPDFLibrary0913.PDFLibrary::ExtractFilePages(InputFileName As String,
Password As String, OutputFileName As String,
RangeList As String) As Long
Parameters
InputFileName The path and name of the document that contains the pages to extract.
Password The password to use when opening the document
OutputFileName The path and name of the document to create containing the extracted pages.
RangeList The pages to extract, for example "10,15,18-20,25-35". Invalid characters will be ignored. Reversed page ranges such as "5-1" will be accepted. Duplicate page numbers will be accepted but if a change is made to such a page the same changes will appear on the duplicate pages. The list of pages will not be sorted so the resulting document will have the pages in the specified order.
Return values
0 The pages could not be extracted. Use the LastErrorCode function to determine the cause of the failure.
1 The pages were extracted successfully
Grüße
Rudolf