![]() |
Re: DBGrid Tabelle als pdf speichern/drucken
|
Re: DBGrid Tabelle als pdf speichern/drucken
Ich hatte gedacht, das es wie folgt gehen würde, aber scheinbar nicht:
Delphi-Quellcode:
QR1.Printer.PrinterIndex:= Printer.Printers.IndexOf('PDFCreator');
QR1.Print; |
Re: DBGrid Tabelle als pdf speichern/drucken
Hallo Tim,
versuch es doch mal so...
Delphi-Quellcode:
Das eigentliche Problem besteht nur darin, dem Druckertreiber mitzuteilen, in welche Datei er schreiben soll. Mögliche Links dafür habe ich ja oben schon erwähnt.
const Druckername = 'PDFCreator';
var Printer:TPrinter; i, Index:integer; begin Printer:=TPrinter.create; try Index:=-1; for i:=1 to Printer.Printers.Count do if pos(lowercase(Druckername), lowercase(Printer.Printers[i-1])) > 0 then Index:=i-1; if Index >= 0 then begin Report.PrinterSettings.PrinterIndex:=Index; Report.Print; end else MessageDlg('Drucker ('+Druckername+') nicht gefunden.', mtError, [mbOK], 0); finally Printer.free; end; end; Gruss Thorsten |
Alle Zeitangaben in WEZ +1. Es ist jetzt 06:28 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz