Drucker: Seiten pro Blatt

[BLin4ik]

Hallo,

ich würde gerne meinem Drucker mitteilen wie viel Seiten pro Blatt gedruckt werden sollen.
Kann mir vielleicht einer erklären wie genau ich das machen kann ?
Über den normalen PrintDlg habe ich ja leider keine Möglichkeiten das einzustellen...

Habe schon ein paar Lösungsansätze betrachtet, die haben mir aber leider auch nicht weiter geholfen

[MeierZwoo]

Per Printer.Copies

[baumina]

Also im TPrintDialog müsste die Anzahl Exemplare aber einstellbar sein (TPrintDialog.Copies)

[BLin4ik]

Das ist nur die Anzahl der zu machenden Kopien, ich möchte aber mehrere Seiten auf ein Blatt bedrucken.

[p80286]

Seber machen!
Erst die Seiten in Originalgröße drucken, dann in Höhe und Breite halbieren und dann auf die Printer.canvas packen.
Und schon hast Du 4 Seiten pro Blatt, mit doppelseitig sogar 8.

Und wer soll das Augenpulver lesen?

Gruß
K-H

[MeierZwoo]

Das ist ohne eigene Vorarbeit nur möglich, wenn der Drucker(Treiber) dies anbietet - dann einen Drucker mit diesen Einstellungen (4 Seiten / Blatt, 8 Seiten / Blatt, ... ) installieren und im Dialog als Drucker auswählen.

Oder eine neue Klasse aus TPrintDialog erzeugen und dort dann dieses einarbeiten.

FF

p.s. Spätesten ab 8 Seiten/Blatt kannst Du aber auch gleich Toner/Tinte über das Papier vergießen, selbst bei extremster Auflösung des Druckes.

[baumina]

Hier habe ich etwas gefunden http://www.experts-exchange.com/Prog..._26557940.html
Stichworte sind wohl DEVMODE und dmNup.
http://msdn.microsoft.com/en-us/libr...(v=vs.85).aspx

[BLin4ik]

Es dient schon einem bestimmten Zweck deswegen brauche ich auch die Möglichkeit dazu
Eigentlich bietet so gut wie jeder Drucker diese Funktion an, ich kann sie nur ohne weiteres
nicht so einfach über Delphi ansprechen.

Klar kann man immer wieder diese Eingabe manuell machen, aber diese Informationen sollen
abgespeichert werden, damit es automatisiert passiert.

Dann komm ich wohl nicht drum herum eine eigene Funktion dafür zu schreiben

@baumina
Auf die Seite bin ich auch schon gestoßen, hat mich aber auch nicht weitergebracht.

[mkinzler]

Da dies aber wohl kein Standard ist, ist das dann vom Treiber abhängig. Anderst als die Anzahl der Kopien usw.

[baumina]

Also ich würde das hier mal als Grundlage nehmen http://www.swissdelphicenter.ch/de/showcode.php?id=1961 und dann mit dmNup rumprobieren.