Hallo,
in meiner Anwendung verwende ich einen Standard TPrintDialog zum Drucken und führe dann eine Schleife über Copies (Anzahl der Ausdrucke) durch:
Code
for i := 0 to PrintDialog1.Copies - 1 do begin
if PrintDialog1.PrintRange=prAllPages then
WP.PrintParameter.PageRange:=wprAllPages
else
WP.PrintParameter.PageRange:=wprPageList;
if WP.PrintParameter.PageRange=wprAllPages then
WP.print
else
WP.PrintPages(PrintDialog1.FromPage, PrintDialog1.ToPage);
end;
(WP ist ein TWPRichText-Objekt)
Mein Problem nun: Gebe ich als Anzahl 3 ein, wird bei manchen Druckertreibern in jedem Schleifendurchlauf dreimal gedruckt (also insgesamt neunmal). Bei meinem eigenen Drucker hingegen nur einmal pro Durchlauf.
Was mache ich falsch - bzw. wie druckt man mit WPTools richtig, so dass es möglichst überall gleich funktioniert?
Danke und Gruß,
Martin