Ausdruck eine pdf mit xbppdf

Alle Fragen um die Programmierung, die sich sonst nicht kategorisieren lassen. Von Makro bis Codeblock, von IF bis ENDIF

Moderator: Moderatoren

Antworten
Bernd Reinhardt
Rekursionen-Architekt
Rekursionen-Architekt
Beiträge: 159
Registriert: So, 16. Apr 2006 11:12
Wohnort: Öhringen

Ausdruck eine pdf mit xbppdf

Beitrag von Bernd Reinhardt »

Hallo
Ich habe ein bestehende pdf-Datei die über crystal report erstellt wurde. Diese enthält eine DIN A4 Seite.

Diese pdf-Datei wollte ich nun mit xbppbf ausdrucken. Leider meldet mein Drucker immer:
Formatfehler:
Papier 215 x 1200 mm einlegen.
xbppdf:view zeigt die Seite ordentlich an.
Wenn ich über Acrobat drucke dann geht das ohne weiteres.

Hat jemand Erfahrung mit dem xbppdf diesbezüglich.

Gruß
Bernd

Code: Alles auswählen



     oMyPrinter := XbpPrinter():New() 
      oMyPrinter:Create(cDrucker) 
      oPrinterPS := XbpPresSpace():New() 
      aSize     := oMyPrinter:paperSize() 
      // Größe des bedruckbaren Bereichs 
      aSize := { aSize[5] - aSize[3]  , ; 
                 aSize[6] - aSize[4]  }   // rand brücksichtigt  Breite - Hoehe                               
      oPrinterPS:Create( oMyPrinter, aSize, GRA_PU_LOMETRIC ) 
      
      pdf := xbppdf():New()
      pdf:Create("myfile.pdf", oMyPrinter)
      pdf:newpage(XBPPRN_FORM_A4, XBPPRN_ORIENT_PORTRAIT, , , , 2 ) //, , , , ,0 ,0 ,0)      
      // pdf:view("12231-112235.pdf")
      pdf:RenderToPS("12231-112235.pdf",oPrinterPS)   
      pdf:EndDoc(.f., "myfile.pdf")
      pdf:PrintA("12231-112235.pdf")
      pdf:destroy()
   
Bernd Reinhardt
fa.reinhardt@gmx.de
Antworten