Entwickler-Ecke

Sonstiges (Delphi) - Drucken mit QuickReport


Stefan Z. - Mi 21.05.03 17:24
Titel: Drucken mit QuickReport
Hallo zusamen,
ich habe in einem Program einen Bericht mit Quick Report erstellt, der jetzt ausgedruckt werden soll. Jedoch soll kein Preview angezeigt werden.
Wenn ich auf einen Button Drucken klicke, soll nur das Printersetupfenster aufgerufen werden.

Das ist ja noch ganz einfach:
Report1.PrinterSetup;
Jetzt bekomme ich es auch angezeigt.

Nun meine Frage:
1.Wie schaffe ich es, das er nur druckt, wenn ich auch auf drucken klicke und nicht auf abbrechen, oder schließen.
2. Jetzt will ich noch, das unter dem Punkt Seiten drucken von bis, immer die korrekte Anzahl der Seiten steht.

Wie kann man dies realisieren?
Ich hab es auch schon mit dem normalen PrinterDialog versucht, aber da komme ich nicht an die Anzahl der zu druckenden Seiten ran!!! :roll:

Danke schonmal für die Hilfe
Stefan


neojones - Mi 21.05.03 17:59

Report1.Print;

Das mit den Gesamtseitenzahlen geht meines Wissens nicht direkt über QReport, sondern das muss man anhand der Anzahl der Datensätze selber kalkulieren.

Viele Grüße,

Matthias


grayfox - Mi 21.05.03 21:32

hallo neojones!

mit der methode QuickRep.Prepare einen report erzeugen, der weder ausdruckt noch angezeigt wird. danach kannst aus der variablen QuickRep.Pages die gesamtseitenanzahl auslesen

mfg, stefan


Stefan Z. - Do 22.05.03 20:39

Danke grayfox,
werd ich gleich mal ausprobieren :D

bis später,
Stefan


neojones - Mo 26.05.03 10:32

@grayfox:

Coole Sache ;-)