Delphi-PRAXiS - Delphi Drucker - Papierformat auslesen

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)

- - Delphi Drucker - Papierformat auslesen (https://www.delphipraxis.net/31419-drucker-papierformat-auslesen.html)

Gentleman

8. Okt 2004 21:51

Drucker - Papierformat auslesen

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	9. Okt 2004 00:08

Re: Drucker - Papierformat auslesen

Hi! Eine Funktion, die dir das Papierformat direkt liefert, kenne ich zwar nicht, du könntest aber MSDN-Library durchsuchen

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

9. Okt 2004 12:07

Re: Drucker - Papierformat auslesen

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?

Alle Zeitangaben in WEZ +1. Es ist jetzt 02:47 Uhr.