AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Win32/Win64 API (native code) Delphi PDF Dateien, Seitenzahlen ermitteln.
Thema durchsuchen
Ansicht
Themen-Optionen

PDF Dateien, Seitenzahlen ermitteln.

Ein Thema von Andreas2k · begonnen am 18. Okt 2011 · letzter Beitrag vom 10. Jul 2012
Antwort Antwort
Seite 1 von 2  1 2      
Andreas2k

Registriert seit: 2. Jan 2003
108 Beiträge
 
Delphi XE5 Professional
 
#1

PDF Dateien, Seitenzahlen ermitteln.

  Alt 18. Okt 2011, 15:19
Ich bräuchte einen schnellen Weg um aus diversen PDF-Dateien die reale Seitenzahl zu ermitteln damit ich sie in meinem Programm weiter verarbeiten kann.

Ich nutze derzeit Rad Studio XE (Delphi XE). Gibt es da in Delphi XE bereits ne Komponente oder kennt jemand eine kostenlose Komponente mit der man Zugriff auf solche Informationen hat.

Danke im voraus!
Andreas
  Mit Zitat antworten Zitat
Benutzerbild von Bummi
Bummi

Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
 
Delphi XE3 Enterprise
 
#2

AW: PDF Dateien, Seitenzahlen ermitteln.

  Alt 18. Okt 2011, 15:24
ein verwegener Ansatz ....
nach <</Typ/Pages
das erste /Count enthält AFAIF die Seitenzahl
wobei Leerzeichen entfernt ignoriert werden müssten
Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
  Mit Zitat antworten Zitat
Darlo

Registriert seit: 28. Jul 2008
Ort: München
1.196 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#3

AW: PDF Dateien, Seitenzahlen ermitteln.

  Alt 18. Okt 2011, 15:43
Hier sind mal 2 PDF Header einmal x1.4 und einmal x1.6. Das dicke ist jeweils die Seitenanzahl

%PDF-1.4
%âãÏÓ 5724 0 obj<</Linearized 1/L 799637/O 5727/E 47118/N 84/T 685108/H [ 654 2607]>>endobj

%PDF-1.6
%âãÏÓ 332 0 obj<</Linearized 1/L 1877963/O 334/E 103049/N 12/T 1877106/H [ 531 351]>>endobj


ein verwegener Ansatz ....
nach <</Typ/Pages
das erste /Count enthält AFAIF die Seitenzahl
wobei Leerzeichen entfernt ignoriert werden müssten
/Typ/Pages habe ich in den PDFs garnicht gefunden
Philip
  Mit Zitat antworten Zitat
Andreas2k

Registriert seit: 2. Jan 2003
108 Beiträge
 
Delphi XE5 Professional
 
#4

AW: PDF Dateien, Seitenzahlen ermitteln.

  Alt 18. Okt 2011, 16:22
Die Seiten sind gescannte Bilder und die PDFs sind im Schnitt 90MB groß!

Die Versionen können unterschiedlich sein weil die PDFs aus verschiedenen Quellen stammen

bei einer x beliebigen sieht der Header z.B. so aus
Code:
%PDF-1.4
1 0 obj
<</Type /XObject
/Subtype /Image
/Name /TI1a
/Filter /CCITTFaxDecode
/DecodeParms <</K -1 /Columns 2480 /Rows 3507>>
/Width 2480
/Height 3507
/BitsPerComponent 1
/ColorSpace /DeviceGray
/Length 2 0 R
>>
stream
ich will das Rad nicht neu erfinden, es geht nur darum mir die Arbeit zu erleichtern weil ich sonst in jede Datei manuell öffnen muss, die Seitenzahl notieren und in eine Liste eintragen.

Ich brauche eine schnelle und zuverlässige Lösung - daher die frage nach einer Komponente oder ähnlichem.
Andreas
  Mit Zitat antworten Zitat
Benutzerbild von p80286
p80286

Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
 
FreePascal / Lazarus
 
#5

AW: PDF Dateien, Seitenzahlen ermitteln.

  Alt 18. Okt 2011, 17:18
Such doch mal nach /Mediabox. Es sollte für jede seite einen Eintrag geben.

Gruß
K-H
Programme gehorchen nicht Deinen Absichten sondern Deinen Anweisungen
R.E.D retired error detector
  Mit Zitat antworten Zitat
hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.275 Beiträge
 
Delphi 10.4 Sydney
 
#6

AW: PDF Dateien, Seitenzahlen ermitteln.

  Alt 18. Okt 2011, 19:25
Hallo,

Zitat:
ich will das Rad nicht neu erfinden
Dann sollte dir das etwas Wert sein und du dir QuickPDF kaufen.


Heiko
Heiko
  Mit Zitat antworten Zitat
Benutzerbild von rweinzierl
rweinzierl

Registriert seit: 22. Mär 2005
98 Beiträge
 
#7

AW: PDF Dateien, Seitenzahlen ermitteln.

  Alt 19. Okt 2011, 09:30
Hallo

Such mal nach

pdftk


==> Kann bei PDF sehr viel (bestimmt auch die Seitenzahl ermitteln)

mfg

Reinhold
  Mit Zitat antworten Zitat
ASM

Registriert seit: 16. Aug 2004
165 Beiträge
 
Delphi 7 Enterprise
 
#8

AW: PDF Dateien, Seitenzahlen ermitteln.

  Alt 19. Okt 2011, 13:25
Such mal nach

pdftk


==> Kann bei PDF sehr viel (bestimmt auch die Seitenzahl ermitteln)

Man nehme den Sourcecode des PDFTKBuilder von Angus Johnson (http://angusj.com/pdftkb/), verwende daraus die zur Ermittlung der Pagecounts benötigten Funktionen (GetPdfPageCount() und ReversePngFilter()). Außerdem braucht man die zlib.
Die pdftk selbst wird dann nicht benötigt, solange es nur um die Pagecounts geht.
  Mit Zitat antworten Zitat
Benutzerbild von Bernhard Geyer
Bernhard Geyer

Registriert seit: 13. Aug 2002
17.196 Beiträge
 
Delphi 10.4 Sydney
 
#9

AW: PDF Dateien, Seitenzahlen ermitteln.

  Alt 19. Okt 2011, 13:41
Und Aufpassen mit den Lizenzen. Ich sehe hier öfter mal das als Lizenz GPL verwendet ist. Und GPL kann sehr viral sein.
Windows Vista - Eine neue Erfahrung in Fehlern.
  Mit Zitat antworten Zitat
ASM

Registriert seit: 16. Aug 2004
165 Beiträge
 
Delphi 7 Enterprise
 
#10

AW: PDF Dateien, Seitenzahlen ermitteln.

  Alt 19. Okt 2011, 14:29
Und Aufpassen mit den Lizenzen. Ich sehe hier öfter mal das als Lizenz GPL verwendet ist. Und GPL kann sehr viral sein.
Zur Nutzung für den eigenen, privaten Gebrauch wird es auf Grund der GPL-Lizenz, unter der Angus den Code freigegeben hat, jedoch keine "viralen" Probleme geben.
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2      

 

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:12 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz