Drucker - Papierformat auslesen

[Gentleman]

moin!

ich möchte Informationen eines Druckers auslesen. wie ich den aktiven drucker erkenne weiß ich schon.

Delphi-Quellcode:

Edit1.Text:= Printer.Printers[Printer.PrinterIndex];

aber wie kann man das gerade ausgewählte Papierformat (A4, Letter, etc.) auslesen? :gruebel:

ih hoffe ihr könnt mir helfen.
thx im voraus

[Dani]

Hi! Eine Funktion, die dir das Papierformat direkt liefert, kenne ich zwar nicht, du könntest aber GetDeviceCaps verwenden, um die Seitenbeite und -Höhe in "Device Units" auszulesen. 1 Device Unit entspicht 1 / DruckerDPI Zoll. D.h. wenn GetDeviceCaps(Printer.Handle, PHYSICALWIDTH) 600 zurückliefert und dein Drucker 600 DPI Horizontale Auflösung hat, ist das Papier 1 Zoll breit. Die horizontale und vertikale Auflösung des aktuellen Druckers liefert dir ebenfalls GetDeviceCaps.

[Gentleman]

hi!

danke für die Antwort!

das funktioniert super :mrgreen:!
allerdings kann ich mit damit nur auslesen. ist es auch möglich dem drucker eine Größe zuzuweisen?